]> git.ipfire.org Git - thirdparty/glibc.git/blame - math/libm-test.inc
projects / thirdparty / glibc.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Convert TEST_fff_f tests from code to data.
[thirdparty/glibc.git] / math / libm-test.inc
CommitLineData
568035b7 1/* Copyright (C) 1997-2013 Free Software Foundation, Inc.
8847214f 2 This file is part of the GNU C Library.
18394a08 3 Contributed by Andreas Jaeger <aj@suse.de>, 1997.
8847214f
UD		 4
5 The GNU C Library is free software; you can redistribute it and/or
41bdb6e2
AJ		 6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
8847214f
UD		 9
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
41bdb6e2 13 Lesser General Public License for more details.
8847214f 14
41bdb6e2 15 You should have received a copy of the GNU Lesser General Public
59ba27a6
PE		 16 License along with the GNU C Library; if not, see
17 <http://www.gnu.org/licenses/>. */
8847214f
UD		 18
19/* Part of testsuite for libm.
20
21 This file is processed by a perl script. The resulting file has to
22 be included by a master file that defines:
23
f964490f 24 Macros:
8847214f
UD		 25 FUNC(function): converts general function name (like cos) to
26 name with correct suffix (e.g. cosl or cosf)
27 MATHCONST(x): like FUNC but for constants (e.g convert 0.0 to 0.0L)
28 FLOAT: floating point type to test
29 - TEST_MSG: informal message to be displayed
30 CHOOSE(Clongdouble,Cdouble,Cfloat,Cinlinelongdouble,Cinlinedouble,Cinlinefloat):
31 chooses one of the parameters as delta for testing
32 equality
33 PRINTF_EXPR Floating point conversion specification to print a variable
34 of type FLOAT with printf. PRINTF_EXPR just contains
35 the specifier, not the percent and width arguments,
36 e.g. "f".
37 PRINTF_XEXPR Like PRINTF_EXPR, but print in hexadecimal format.
38 PRINTF_NEXPR Like PRINTF_EXPR, but print nice. */
39
40/* This testsuite has currently tests for:
41 acos, acosh, asin, asinh, atan, atan2, atanh,
42 cbrt, ceil, copysign, cos, cosh, erf, erfc, exp, exp10, exp2, expm1,
ef1bb361 43 fabs, fdim, finite, floor, fma, fmax, fmin, fmod, fpclassify,
8847214f 44 frexp, gamma, hypot,
57267616 45 ilogb, isfinite, isinf, isnan, isnormal, issignaling,
0e8e0c1c 46 isless, islessequal, isgreater, isgreaterequal, islessgreater, isunordered,
8847214f
UD		 47 j0, j1, jn,
48 ldexp, lgamma, log, log10, log1p, log2, logb,
28234b07 49 modf, nearbyint, nextafter, nexttoward,
8847214f
UD		 50 pow, remainder, remquo, rint, lrint, llrint,
51 round, lround, llround,
52 scalb, scalbn, scalbln, signbit, sin, sincos, sinh, sqrt, tan, tanh, tgamma, trunc,
e9c7764e 53 y0, y1, yn, significand
8847214f
UD		 54
55 and for the following complex math functions:
56 cabs, cacos, cacosh, carg, casin, casinh, catan, catanh,
28234b07
JM		 57 ccos, ccosh, cexp, cimag, clog, clog10, conj, cpow, cproj, creal,
58 csin, csinh, csqrt, ctan, ctanh.
8847214f 59
28234b07
JM		 60 At the moment the following functions and macros aren't tested:
61 drem (alias for remainder),
28234b07
JM		 62 lgamma_r,
63 nan,
64 pow10 (alias for exp10).
8847214f
UD		 65
66 Parameter handling is primitive in the moment:
67 --verbose=[0..3] for different levels of output:
68 0: only error count
69 1: basic report on failed tests (default)
70 2: full report on all tests
71 -v for full output (equals --verbose=3)
72 -u for generation of an ULPs file
73 */
74
75/* "Philosophy":
76
77 This suite tests some aspects of the correct implementation of
78 mathematical functions in libm. Some simple, specific parameters
79 are tested for correctness but there's no exhaustive
80 testing. Handling of specific inputs (e.g. infinity, not-a-number)
81 is also tested. Correct handling of exceptions is checked
82 against. These implemented tests should check all cases that are
ec751a23 83 specified in ISO C99.
8847214f 84
80bad0cc
JM		 85 Exception testing: At the moment only divide-by-zero, invalid,
86 overflow and underflow exceptions are tested. Inexact exceptions
8847214f
UD		 87 aren't checked at the moment.
88
89 NaN values: There exist signalling and quiet NaNs. This implementation
57267616
TS		 90 only uses quiet NaN as parameter. Where the sign of a NaN is
91 significant, this is not tested. The payload of NaNs is not examined.
8847214f
UD		 92
93 Inline functions: Inlining functions should give an improvement in
94 speed - but not in precission. The inlined functions return
95 reasonable values for a reasonable range of input values. The
96 result is not necessarily correct for all values and exceptions are
97 not correctly raised in all cases. Problematic input and return
98 values are infinity, not-a-number and minus zero. This suite
99 therefore does not check these specific inputs and the exception
100 handling for inlined mathematical functions - just the "reasonable"
101 values are checked.
102
103 Beware: The tests might fail for any of the following reasons:
104 - Tests are wrong
105 - Functions are wrong
106 - Floating Point Unit not working properly
107 - Compiler has errors
108
109 With e.g. gcc 2.7.2.2 the test for cexp fails because of a compiler error.
33996419
AJ		 110
111
112 To Do: All parameter should be numbers that can be represented as
2550dfe9
AJ		 113 exact floating point values. Currently some values cannot be
114 represented exactly and therefore the result is not the expected
115 result. For this we will use 36 digits so that numbers can be
116 represented exactly. */
8847214f
UD		 117
118#ifndef _GNU_SOURCE
119# define _GNU_SOURCE
120#endif
121
122#include "libm-test-ulps.h"
123#include <complex.h>
124#include <math.h>
125#include <float.h>
126#include <fenv.h>
601d2942 127#include <limits.h>
8847214f
UD		 128
129#include <errno.h>
130#include <stdlib.h>
131#include <stdio.h>
bdf09fab 132#include <string.h>
8847214f 133#include <argp.h>
ef82f4da 134#include <tininess.h>
8847214f 135
0af797de
CM		 136/* Allow platforms without all rounding modes to test properly,
137 assuming they provide an __FE_UNDEFINED in <bits/fenv.h> which
138 causes fesetround() to return failure. */
139#ifndef FE_TONEAREST
140# define FE_TONEAREST __FE_UNDEFINED
141#endif
142#ifndef FE_TOWARDZERO
143# define FE_TOWARDZERO __FE_UNDEFINED
144#endif
145#ifndef FE_UPWARD
146# define FE_UPWARD __FE_UNDEFINED
147#endif
148#ifndef FE_DOWNWARD
149# define FE_DOWNWARD __FE_UNDEFINED
150#endif
151
8847214f
UD		 152/* Possible exceptions */
153#define NO_EXCEPTION 0x0
154#define INVALID_EXCEPTION 0x1
155#define DIVIDE_BY_ZERO_EXCEPTION 0x2
c135cc1b 156#define OVERFLOW_EXCEPTION 0x4
80bad0cc 157#define UNDERFLOW_EXCEPTION 0x8
8847214f 158/* The next flags signals that those exceptions are allowed but not required. */
80bad0cc
JM		 159#define INVALID_EXCEPTION_OK 0x10
160#define DIVIDE_BY_ZERO_EXCEPTION_OK 0x20
161#define OVERFLOW_EXCEPTION_OK 0x40
162#define UNDERFLOW_EXCEPTION_OK 0x80
8847214f 163#define EXCEPTIONS_OK INVALID_EXCEPTION_OK+DIVIDE_BY_ZERO_EXCEPTION_OK
80bad0cc
JM		 164/* Some special test flags, passed together with exceptions. */
165#define IGNORE_ZERO_INF_SIGN 0x100
f2da7793
JM		 166/* Indicate errno settings required or disallowed. */
167#define ERRNO_UNCHANGED 0x200
168#define ERRNO_EDOM 0x400
169#define ERRNO_ERANGE 0x800
80bad0cc
JM		 170
171/* Values underflowing only for float. */
172#ifdef TEST_FLOAT
173# define UNDERFLOW_EXCEPTION_FLOAT UNDERFLOW_EXCEPTION
174# define UNDERFLOW_EXCEPTION_OK_FLOAT UNDERFLOW_EXCEPTION_OK
175#else
176# define UNDERFLOW_EXCEPTION_FLOAT 0
177# define UNDERFLOW_EXCEPTION_OK_FLOAT 0
178#endif
179/* Values underflowing only for double or types with a larger least
180 positive normal value. */
181#if defined TEST_FLOAT || defined TEST_DOUBLE \
182 || (defined TEST_LDOUBLE && LDBL_MIN_EXP >= DBL_MIN_EXP)
183# define UNDERFLOW_EXCEPTION_DOUBLE UNDERFLOW_EXCEPTION
ccc8cadf 184# define UNDERFLOW_EXCEPTION_OK_DOUBLE UNDERFLOW_EXCEPTION_OK
80bad0cc
JM		 185#else
186# define UNDERFLOW_EXCEPTION_DOUBLE 0
ccc8cadf 187# define UNDERFLOW_EXCEPTION_OK_DOUBLE 0
80bad0cc
JM		 188#endif
189/* Values underflowing only for IBM long double or types with a larger least
190 positive normal value. */
191#if defined TEST_FLOAT || (defined TEST_LDOUBLE && LDBL_MIN_EXP > DBL_MIN_EXP)
192# define UNDERFLOW_EXCEPTION_LDOUBLE_IBM UNDERFLOW_EXCEPTION
193#else
194# define UNDERFLOW_EXCEPTION_LDOUBLE_IBM 0
195#endif
ef82f4da
JM		 196/* Values underflowing on architectures detecting tininess before
197 rounding, but not on those detecting tininess after rounding. */
198#define UNDERFLOW_EXCEPTION_BEFORE_ROUNDING (TININESS_AFTER_ROUNDING \
199 ? 0 \
200 : UNDERFLOW_EXCEPTION)
8847214f
UD		 201
202/* Various constants (we must supply them precalculated for accuracy). */
42be70d4
UD		 203#define M_PI_6l .52359877559829887307710723054658383L
204#define M_E2l 7.389056098930650227230427460575008L
205#define M_E3l 20.085536923187667740928529654581719L
206#define M_2_SQRT_PIl 3.5449077018110320545963349666822903L /* 2 sqrt (M_PIl) */
207#define M_SQRT_PIl 1.7724538509055160272981674833411451L /* sqrt (M_PIl) */
3c6cad26
UD		 208#define M_LOG_SQRT_PIl 0.57236494292470008707171367567652933L /* log(sqrt(M_PIl)) */
209#define M_LOG_2_SQRT_PIl 1.265512123484645396488945797134706L /* log(2*sqrt(M_PIl)) */
faa7f811
JM		 210#define M_PI_34l 2.356194490192344928846982537459627163L /* 3*pi/4 */
211#define M_PI_34_LOG10El 1.023282265381381010614337719073516828L
212#define M_PI2_LOG10El 0.682188176920920673742891812715677885L
213#define M_PI4_LOG10El 0.341094088460460336871445906357838943L
214#define M_PI_LOG10El 1.364376353841841347485783625431355770L
8847214f 215
26510bdd
CD		 216#define ulps_file_name "ULPs" /* Name of the ULPs file. */
217static FILE *ulps_file; /* File to document difference. */
218static int output_ulps; /* Should ulps printed? */
219static char *output_dir; /* Directory where generated files will be written. */
8847214f
UD		 220
221static int noErrors; /* number of errors */
222static int noTests; /* number of tests (without testing exceptions) */
223static int noExcTests; /* number of tests for exception flags */
f2da7793 224static int noErrnoTests;/* number of tests for errno values */
8847214f
UD		 225
226static int verbose;
227static int output_max_error; /* Should the maximal errors printed? */
228static int output_points; /* Should the single function results printed? */
cd33623e 229static int ignore_max_ulp; /* Should we ignore max_ulp? */
8847214f 230
a0d9f9d7
JM		 231#define PLUS_ZERO_INIT CHOOSE (0.0L, 0.0, 0.0f, \
232 0.0L, 0.0, 0.0f)
233#define MINUS_ZERO_INIT CHOOSE (-0.0L, -0.0, -0.0f, \
234 -0.0L, -0.0, -0.0f)
235#define PLUS_INFTY_INIT CHOOSE (HUGE_VALL, HUGE_VAL, HUGE_VALF, \
236 HUGE_VALL, HUGE_VAL, HUGE_VALF)
237#define MINUS_INFTY_INIT CHOOSE (-HUGE_VALL, -HUGE_VAL, -HUGE_VALF, \
238 -HUGE_VALL, -HUGE_VAL, -HUGE_VALF)
239#define QNAN_VALUE_INIT FUNC (__builtin_nan) ("")
240#define MAX_VALUE_INIT CHOOSE (LDBL_MAX, DBL_MAX, FLT_MAX, \
241 LDBL_MAX, DBL_MAX, FLT_MAX)
242#define MIN_VALUE_INIT CHOOSE (LDBL_MIN, DBL_MIN, FLT_MIN, \
243 LDBL_MIN, DBL_MIN, FLT_MIN)
244#define MIN_SUBNORM_VALUE_INIT CHOOSE (__LDBL_DENORM_MIN__, \
245 __DBL_DENORM_MIN__, \
246 __FLT_DENORM_MIN__, \
247 __LDBL_DENORM_MIN__, \
248 __DBL_DENORM_MIN__, \
249 __FLT_DENORM_MIN__)
250
251static const FLOAT plus_zero = PLUS_ZERO_INIT;
252static const FLOAT minus_zero = MINUS_ZERO_INIT;
253static const FLOAT plus_infty = PLUS_INFTY_INIT;
254static const FLOAT minus_infty = MINUS_INFTY_INIT;
255static const FLOAT qnan_value = QNAN_VALUE_INIT;
256static const FLOAT max_value = MAX_VALUE_INIT;
257static const FLOAT min_value = MIN_VALUE_INIT;
258static const FLOAT min_subnorm_value = MIN_SUBNORM_VALUE_INIT;
8847214f 259
6815fabc 260static FLOAT max_error, real_max_error, imag_max_error;
8847214f
UD		 261
262
263#define BUILD_COMPLEX(real, imag) \
264 ({ __complex__ FLOAT __retval; \
265 __real__ __retval = (real); \
266 __imag__ __retval = (imag); \
267 __retval; })
08198877 268#define BUILD_COMPLEX_ULP(real, imag) ((real) + I * (imag))
8847214f
UD		 269
270#define MANT_DIG CHOOSE ((LDBL_MANT_DIG-1), (DBL_MANT_DIG-1), (FLT_MANT_DIG-1), \
bf582445 271 (LDBL_MANT_DIG-1), (DBL_MANT_DIG-1), (FLT_MANT_DIG-1))
8847214f
UD		 272
273static void
274init_max_error (void)
275{
276 max_error = 0;
6815fabc
UD		 277 real_max_error = 0;
278 imag_max_error = 0;
aaca11d8 279 feclearexcept (FE_ALL_EXCEPT);
f2da7793 280 errno = 0;
8847214f
UD		 281}
282
283static void
6815fabc 284set_max_error (FLOAT current, FLOAT *curr_max_error)
8847214f 285{
6815fabc
UD		 286 if (current > *curr_max_error)
287 *curr_max_error = current;
8847214f
UD		 288}
289
290
57267616
TS		 291/* Print a FLOAT. */
292static void
293print_float (FLOAT f)
294{
295 /* As printf doesn't differ between a sNaN and a qNaN, do this manually. */
296 if (issignaling (f))
297 printf ("sNaN\n");
298 else if (isnan (f))
299 printf ("qNaN\n");
300 else
301 printf ("% .20" PRINTF_EXPR " % .20" PRINTF_XEXPR "\n", f, f);
302}
303
8847214f
UD		 304/* Should the message print to screen? This depends on the verbose flag,
305 and the test status. */
306static int
b7dab1e4 307print_screen (int ok)
8847214f
UD		 308{
309 if (output_points
310 && (verbose > 1
b7dab1e4 311 || (verbose == 1 && ok == 0)))
8847214f
UD		 312 return 1;
313 return 0;
314}
315
316
317/* Should the message print to screen? This depends on the verbose flag,
318 and the test status. */
319static int
b7dab1e4 320print_screen_max_error (int ok)
8847214f
UD		 321{
322 if (output_max_error
323 && (verbose > 1
b7dab1e4 324 || ((verbose == 1) && (ok == 0))))
8847214f
UD		 325 return 1;
326 return 0;
327}
328
329/* Update statistic counters. */
330static void
b7dab1e4 331update_stats (int ok)
8847214f
UD		 332{
333 ++noTests;
b7dab1e4 334 if (!ok)
8847214f
UD		 335 ++noErrors;
336}
337
338static void
339print_ulps (const char *test_name, FLOAT ulp)
340{
341 if (output_ulps)
342 {
343 fprintf (ulps_file, "Test \"%s\":\n", test_name);
303f1335 344 fprintf (ulps_file, "%s: %.0" PRINTF_NEXPR "\n",
8847214f 345 CHOOSE("ldouble", "double", "float",
303f1335
AS		 346 "ildouble", "idouble", "ifloat"),
347 FUNC(ceil) (ulp));
8847214f
UD		 348 }
349}
350
351static void
352print_function_ulps (const char *function_name, FLOAT ulp)
353{
354 if (output_ulps)
355 {
6815fabc 356 fprintf (ulps_file, "Function: \"%s\":\n", function_name);
303f1335 357 fprintf (ulps_file, "%s: %.0" PRINTF_NEXPR "\n",
8847214f 358 CHOOSE("ldouble", "double", "float",
303f1335
AS		 359 "ildouble", "idouble", "ifloat"),
360 FUNC(ceil) (ulp));
8847214f
UD		 361 }
362}
363
364
6815fabc
UD		 365static void
366print_complex_function_ulps (const char *function_name, FLOAT real_ulp,
367 FLOAT imag_ulp)
368{
369 if (output_ulps)
370 {
371 if (real_ulp != 0.0)
372 {
373 fprintf (ulps_file, "Function: Real part of \"%s\":\n", function_name);
303f1335 374 fprintf (ulps_file, "%s: %.0" PRINTF_NEXPR "\n",
6815fabc 375 CHOOSE("ldouble", "double", "float",
303f1335
AS		 376 "ildouble", "idouble", "ifloat"),
377 FUNC(ceil) (real_ulp));
6815fabc
UD		 378 }
379 if (imag_ulp != 0.0)
380 {
381 fprintf (ulps_file, "Function: Imaginary part of \"%s\":\n", function_name);
303f1335 382 fprintf (ulps_file, "%s: %.0" PRINTF_NEXPR "\n",
6815fabc 383 CHOOSE("ldouble", "double", "float",
303f1335
AS		 384 "ildouble", "idouble", "ifloat"),
385 FUNC(ceil) (imag_ulp));
6815fabc 386 }
15daa639
UD		 387
388
6815fabc
UD		 389 }
390}
391
392
8847214f
UD		 393
394/* Test if Floating-Point stack hasn't changed */
395static void
396fpstack_test (const char *test_name)
397{
64487e12 398#if defined (__i386__) || defined (__x86_64__)
8847214f
UD		 399 static int old_stack;
400 int sw;
401
402 asm ("fnstsw" : "=a" (sw));
403 sw >>= 11;
404 sw &= 7;
405
406 if (sw != old_stack)
407 {
408 printf ("FP-Stack wrong after test %s (%d, should be %d)\n",
409 test_name, sw, old_stack);
410 ++noErrors;
411 old_stack = sw;
412 }
413#endif
414}
415
416
417static void
b7dab1e4 418print_max_error (const char *func_name, FLOAT allowed)
8847214f 419{
8847214f
UD		 420 int ok = 0;
421
cd33623e 422 if (max_error == 0.0 || (max_error <= allowed && !ignore_max_ulp))
8847214f
UD		 423 {
424 ok = 1;
425 }
426
427 if (!ok)
428 print_function_ulps (func_name, max_error);
429
430
b7dab1e4 431 if (print_screen_max_error (ok))
8847214f 432 {
6815fabc 433 printf ("Maximal error of `%s'\n", func_name);
303f1335
AS		 434 printf (" is : %.0" PRINTF_NEXPR " ulp\n", FUNC(ceil) (max_error));
435 printf (" accepted: %.0" PRINTF_NEXPR " ulp\n", FUNC(ceil) (allowed));
8847214f
UD		 436 }
437
b7dab1e4 438 update_stats (ok);
8847214f
UD		 439}
440
441
6815fabc 442static void
b7dab1e4 443print_complex_max_error (const char *func_name, __complex__ FLOAT allowed)
6815fabc
UD		 444{
445 int ok = 0;
446
303f1335
AS		 447 if ((real_max_error == 0 && imag_max_error == 0)
448 || (real_max_error <= __real__ allowed
449 && imag_max_error <= __imag__ allowed
450 && !ignore_max_ulp))
6815fabc
UD		 451 {
452 ok = 1;
453 }
454
455 if (!ok)
456 print_complex_function_ulps (func_name, real_max_error, imag_max_error);
457
458
b7dab1e4 459 if (print_screen_max_error (ok))
6815fabc
UD		 460 {
461 printf ("Maximal error of real part of: %s\n", func_name);
303f1335
AS		 462 printf (" is : %.0" PRINTF_NEXPR " ulp\n",
463 FUNC(ceil) (real_max_error));
464 printf (" accepted: %.0" PRINTF_NEXPR " ulp\n",
465 FUNC(ceil) (__real__ allowed));
6815fabc 466 printf ("Maximal error of imaginary part of: %s\n", func_name);
303f1335
AS		 467 printf (" is : %.0" PRINTF_NEXPR " ulp\n",
468 FUNC(ceil) (imag_max_error));
469 printf (" accepted: %.0" PRINTF_NEXPR " ulp\n",
470 FUNC(ceil) (__imag__ allowed));
6815fabc
UD		 471 }
472
b7dab1e4 473 update_stats (ok);
6815fabc
UD		 474}
475
476
8847214f
UD		 477/* Test whether a given exception was raised. */
478static void
479test_single_exception (const char *test_name,
480 int exception,
481 int exc_flag,
482 int fe_flag,
483 const char *flag_name)
484{
485#ifndef TEST_INLINE
486 int ok = 1;
487 if (exception & exc_flag)
488 {
489 if (fetestexcept (fe_flag))
490 {
b7dab1e4 491 if (print_screen (1))
8847214f
UD		 492 printf ("Pass: %s: Exception \"%s\" set\n", test_name, flag_name);
493 }
494 else
495 {
496 ok = 0;
b7dab1e4 497 if (print_screen (0))
8847214f
UD		 498 printf ("Failure: %s: Exception \"%s\" not set\n",
499 test_name, flag_name);
500 }
501 }
502 else
503 {
504 if (fetestexcept (fe_flag))
505 {
506 ok = 0;
b7dab1e4 507 if (print_screen (0))
8847214f
UD		 508 printf ("Failure: %s: Exception \"%s\" set\n",
509 test_name, flag_name);
510 }
511 else
512 {
b7dab1e4 513 if (print_screen (1))
8847214f
UD		 514 printf ("%s: Exception \"%s\" not set\n", test_name,
515 flag_name);
516 }
517 }
518 if (!ok)
519 ++noErrors;
520
521#endif
522}
523
524
525/* Test whether exceptions given by EXCEPTION are raised. Ignore thereby
526 allowed but not required exceptions.
527*/
528static void
529test_exceptions (const char *test_name, int exception)
530{
531 ++noExcTests;
532#ifdef FE_DIVBYZERO
533 if ((exception & DIVIDE_BY_ZERO_EXCEPTION_OK) == 0)
534 test_single_exception (test_name, exception,
535 DIVIDE_BY_ZERO_EXCEPTION, FE_DIVBYZERO,
536 "Divide by zero");
537#endif
538#ifdef FE_INVALID
539 if ((exception & INVALID_EXCEPTION_OK) == 0)
540 test_single_exception (test_name, exception, INVALID_EXCEPTION, FE_INVALID,
541 "Invalid operation");
c135cc1b
JM		 542#endif
543#ifdef FE_OVERFLOW
544 if ((exception & OVERFLOW_EXCEPTION_OK) == 0)
545 test_single_exception (test_name, exception, OVERFLOW_EXCEPTION,
546 FE_OVERFLOW, "Overflow");
80bad0cc
JM		 547#endif
548#ifdef FE_UNDERFLOW
549 if ((exception & UNDERFLOW_EXCEPTION_OK) == 0)
550 test_single_exception (test_name, exception, UNDERFLOW_EXCEPTION,
551 FE_UNDERFLOW, "Underflow");
8847214f
UD		 552#endif
553 feclearexcept (FE_ALL_EXCEPT);
554}
555
f2da7793
JM		 556/* Test whether errno for TEST_NAME, set to ERRNO_VALUE, has value
557 EXPECTED_VALUE (description EXPECTED_NAME). */
558static void
559test_single_errno (const char *test_name, int errno_value,
560 int expected_value, const char *expected_name)
561{
562 if (errno_value == expected_value)
563 {
b7dab1e4 564 if (print_screen (1))
f2da7793
JM		 565 printf ("Pass: %s: errno set to %d (%s)\n", test_name, errno_value,
566 expected_name);
567 }
568 else
569 {
570 ++noErrors;
b7dab1e4 571 if (print_screen (0))
f2da7793
JM		 572 printf ("Failure: %s: errno set to %d, expected %d (%s)\n",
573 test_name, errno_value, expected_value, expected_name);
574 }
575}
576
577/* Test whether errno (value ERRNO_VALUE) has been for TEST_NAME set
578 as required by EXCEPTIONS. */
579static void
580test_errno (const char *test_name, int errno_value, int exceptions)
581{
582 ++noErrnoTests;
583 if (exceptions & ERRNO_UNCHANGED)
584 test_single_errno (test_name, errno_value, 0, "unchanged");
585 if (exceptions & ERRNO_EDOM)
586 test_single_errno (test_name, errno_value, EDOM, "EDOM");
587 if (exceptions & ERRNO_ERANGE)
588 test_single_errno (test_name, errno_value, ERANGE, "ERANGE");
589}
8847214f
UD		 590
591static void
6815fabc 592check_float_internal (const char *test_name, FLOAT computed, FLOAT expected,
b7dab1e4 593 FLOAT max_ulp, int exceptions,
6815fabc 594 FLOAT *curr_max_error)
8847214f
UD		 595{
596 int ok = 0;
597 int print_diff = 0;
598 FLOAT diff = 0;
599 FLOAT ulp = 0;
f2da7793 600 int errno_value = errno;
8847214f
UD		 601
602 test_exceptions (test_name, exceptions);
f2da7793 603 test_errno (test_name, errno_value, exceptions);
57267616
TS		 604 if (issignaling (computed) && issignaling (expected))
605 ok = 1;
606 else if (issignaling (computed) || issignaling (expected))
607 ok = 0;
608 else if (isnan (computed) && isnan (expected))
8847214f
UD		 609 ok = 1;
610 else if (isinf (computed) && isinf (expected))
611 {
612 /* Test for sign of infinities. */
ba3752d5
UD		 613 if ((exceptions & IGNORE_ZERO_INF_SIGN) == 0
614 && signbit (computed) != signbit (expected))
8847214f
UD		 615 {
616 ok = 0;
617 printf ("infinity has wrong sign.\n");
618 }
619 else
620 ok = 1;
621 }
57267616
TS		 622 /* Don't calculate ULPs for infinities or any kind of NaNs. */
623 else if (isinf (computed) || isnan (computed)
624 || isinf (expected) || isnan (expected))
8847214f
UD		 625 ok = 0;
626 else
627 {
628 diff = FUNC(fabs) (computed - expected);
e6b29af8
UD		 629 switch (fpclassify (expected))
630 {
631 case FP_ZERO:
632 /* ilogb (0) isn't allowed. */
633 ulp = diff / FUNC(ldexp) (1.0, - MANT_DIG);
634 break;
635 case FP_NORMAL:
636 ulp = diff / FUNC(ldexp) (1.0, FUNC(ilogb) (expected) - MANT_DIG);
637 break;
638 case FP_SUBNORMAL:
6c23e11c
JM		 639 /* 1ulp for a subnormal value, shifted by MANT_DIG, is the
640 least normal value. */
641 ulp = (FUNC(ldexp) (diff, MANT_DIG) / min_value);
e6b29af8
UD		 642 break;
643 default:
644 /* It should never happen. */
645 abort ();
646 break;
647 }
6815fabc 648 set_max_error (ulp, curr_max_error);
8847214f 649 print_diff = 1;
ba3752d5
UD		 650 if ((exceptions & IGNORE_ZERO_INF_SIGN) == 0
651 && computed == 0.0 && expected == 0.0
652 && signbit(computed) != signbit (expected))
3a8e65a0 653 ok = 0;
f964490f 654 else if (ulp <= 0.5 || (ulp <= max_ulp && !ignore_max_ulp))
8847214f
UD		 655 ok = 1;
656 else
657 {
658 ok = 0;
659 print_ulps (test_name, ulp);
660 }
661
662 }
b7dab1e4 663 if (print_screen (ok))
8847214f
UD		 664 {
665 if (!ok)
666 printf ("Failure: ");
667 printf ("Test: %s\n", test_name);
668 printf ("Result:\n");
57267616
TS		 669 printf (" is: ");
670 print_float (computed);
671 printf (" should be: ");
672 print_float (expected);
8847214f
UD		 673 if (print_diff)
674 {
675 printf (" difference: % .20" PRINTF_EXPR " % .20" PRINTF_XEXPR
676 "\n", diff, diff);
677 printf (" ulp : % .4" PRINTF_NEXPR "\n", ulp);
678 printf (" max.ulp : % .4" PRINTF_NEXPR "\n", max_ulp);
679 }
680 }
b7dab1e4 681 update_stats (ok);
8847214f
UD		 682
683 fpstack_test (test_name);
f2da7793 684 errno = 0;
8847214f
UD		 685}
686
687
688static void
6815fabc 689check_float (const char *test_name, FLOAT computed, FLOAT expected,
b7dab1e4 690 FLOAT max_ulp, int exceptions)
6815fabc 691{
b7dab1e4 692 check_float_internal (test_name, computed, expected, max_ulp,
6815fabc
UD		 693 exceptions, &max_error);
694}
695
696
697static void
698check_complex (const char *test_name, __complex__ FLOAT computed,
699 __complex__ FLOAT expected,
b7dab1e4 700 __complex__ FLOAT max_ulp,
6815fabc 701 int exception)
8847214f 702{
6815fabc 703 FLOAT part_comp, part_exp, part_max_ulp;
2fd89785
MS		 704 char *str;
705
706 if (asprintf (&str, "Real part of: %s", test_name) == -1)
707 abort ();
8847214f 708
8847214f
UD		 709 part_comp = __real__ computed;
710 part_exp = __real__ expected;
6815fabc 711 part_max_ulp = __real__ max_ulp;
15daa639 712
b7dab1e4 713 check_float_internal (str, part_comp, part_exp, part_max_ulp,
6815fabc 714 exception, &real_max_error);
2fd89785
MS		 715 free (str);
716
717 if (asprintf (&str, "Imaginary part of: %s", test_name) == -1)
718 abort ();
8847214f 719
8847214f
UD		 720 part_comp = __imag__ computed;
721 part_exp = __imag__ expected;
6815fabc 722 part_max_ulp = __imag__ max_ulp;
15daa639 723
f2da7793 724 /* Don't check again for exceptions or errno, just pass through the
8847214f 725 zero/inf sign test. */
b7dab1e4 726 check_float_internal (str, part_comp, part_exp, part_max_ulp,
6815fabc
UD		 727 exception & IGNORE_ZERO_INF_SIGN,
728 &imag_max_error);
2fd89785 729 free (str);
8847214f
UD		 730}
731
732
733/* Check that computed and expected values are equal (int values). */
734static void
735check_int (const char *test_name, int computed, int expected, int max_ulp,
b7dab1e4 736 int exceptions)
8847214f
UD		 737{
738 int diff = computed - expected;
739 int ok = 0;
f2da7793 740 int errno_value = errno;
8847214f
UD		 741
742 test_exceptions (test_name, exceptions);
f2da7793 743 test_errno (test_name, errno_value, exceptions);
8847214f
UD		 744 noTests++;
745 if (abs (diff) <= max_ulp)
746 ok = 1;
747
748 if (!ok)
749 print_ulps (test_name, diff);
750
b7dab1e4 751 if (print_screen (ok))
8847214f
UD		 752 {
753 if (!ok)
754 printf ("Failure: ");
755 printf ("Test: %s\n", test_name);
756 printf ("Result:\n");
757 printf (" is: %d\n", computed);
758 printf (" should be: %d\n", expected);
759 }
760
b7dab1e4 761 update_stats (ok);
8847214f 762 fpstack_test (test_name);
f2da7793 763 errno = 0;
8847214f
UD		 764}
765
766
767/* Check that computed and expected values are equal (long int values). */
768static void
769check_long (const char *test_name, long int computed, long int expected,
b7dab1e4 770 long int max_ulp, int exceptions)
8847214f
UD		 771{
772 long int diff = computed - expected;
773 int ok = 0;
f2da7793 774 int errno_value = errno;
8847214f
UD		 775
776 test_exceptions (test_name, exceptions);
f2da7793 777 test_errno (test_name, errno_value, exceptions);
8847214f
UD		 778 noTests++;
779 if (labs (diff) <= max_ulp)
780 ok = 1;
781
782 if (!ok)
783 print_ulps (test_name, diff);
784
b7dab1e4 785 if (print_screen (ok))
8847214f
UD		 786 {
787 if (!ok)
788 printf ("Failure: ");
789 printf ("Test: %s\n", test_name);
790 printf ("Result:\n");
791 printf (" is: %ld\n", computed);
792 printf (" should be: %ld\n", expected);
793 }
794
b7dab1e4 795 update_stats (ok);
8847214f 796 fpstack_test (test_name);
f2da7793 797 errno = 0;
8847214f
UD		 798}
799
800
801/* Check that computed value is true/false. */
802static void
803check_bool (const char *test_name, int computed, int expected,
b7dab1e4 804 long int max_ulp, int exceptions)
8847214f
UD		 805{
806 int ok = 0;
f2da7793 807 int errno_value = errno;
8847214f
UD		 808
809 test_exceptions (test_name, exceptions);
f2da7793 810 test_errno (test_name, errno_value, exceptions);
8847214f
UD		 811 noTests++;
812 if ((computed == 0) == (expected == 0))
813 ok = 1;
814
b7dab1e4 815 if (print_screen (ok))
8847214f
UD		 816 {
817 if (!ok)
818 printf ("Failure: ");
819 printf ("Test: %s\n", test_name);
820 printf ("Result:\n");
821 printf (" is: %d\n", computed);
822 printf (" should be: %d\n", expected);
823 }
824
b7dab1e4 825 update_stats (ok);
8847214f 826 fpstack_test (test_name);
f2da7793 827 errno = 0;
8847214f
UD		 828}
829
830
831/* check that computed and expected values are equal (long int values) */
832static void
833check_longlong (const char *test_name, long long int computed,
834 long long int expected,
b7dab1e4 835 long long int max_ulp,
8847214f
UD		 836 int exceptions)
837{
838 long long int diff = computed - expected;
839 int ok = 0;
f2da7793 840 int errno_value = errno;
8847214f
UD		 841
842 test_exceptions (test_name, exceptions);
f2da7793 843 test_errno (test_name, errno_value, exceptions);
8847214f
UD		 844 noTests++;
845 if (llabs (diff) <= max_ulp)
846 ok = 1;
847
848 if (!ok)
849 print_ulps (test_name, diff);
850
b7dab1e4 851 if (print_screen (ok))
8847214f
UD		 852 {
853 if (!ok)
854 printf ("Failure:");
855 printf ("Test: %s\n", test_name);
856 printf ("Result:\n");
857 printf (" is: %lld\n", computed);
858 printf (" should be: %lld\n", expected);
859 }
860
b7dab1e4 861 update_stats (ok);
8847214f 862 fpstack_test (test_name);
f2da7793 863 errno = 0;
8847214f
UD		 864}
865
51df539d
JM		 866/* Structures for each kind of test. */
867struct test_f_f_data
868{
869 const char *test_name;
870 FLOAT arg;
871 FLOAT expected;
872 FLOAT max_ulp;
873 int exceptions;
874};
601a3a5f
JM		 875struct test_ff_f_data
876{
877 const char *test_name;
878 FLOAT arg1, arg2;
879 FLOAT expected;
880 FLOAT max_ulp;
881 int exceptions;
882};
883struct test_ff_f_data_nexttoward
884{
885 const char *test_name;
886 FLOAT arg1;
887 long double arg2;
888 FLOAT expected;
889 FLOAT max_ulp;
890 int exceptions;
891};
4f184d30
JM		 892struct test_fff_f_data
893{
894 const char *test_name;
895 FLOAT arg1, arg2, arg3;
896 FLOAT expected;
897 FLOAT max_ulp;
898 int exceptions;
899};
08198877
JM		 900struct test_c_c_data
901{
902 const char *test_name;
903 FLOAT argr, argc;
904 FLOAT expr, expc;
905 __complex__ FLOAT max_ulp;
906 int exceptions;
907};
51df539d
JM		 908
909/* Set the rounding mode, or restore the saved value. */
910#define IF_ROUND_INIT_ /* Empty. */
911#define IF_ROUND_INIT_FE_DOWNWARD \
912 int save_round_mode = fegetround (); \
913 if (fesetround (FE_DOWNWARD) == 0)
914#define IF_ROUND_INIT_FE_TONEAREST \
915 int save_round_mode = fegetround (); \
916 if (fesetround (FE_TONEAREST) == 0)
917#define IF_ROUND_INIT_FE_TOWARDZERO \
918 int save_round_mode = fegetround (); \
919 if (fesetround (FE_TOWARDZERO) == 0)
920#define IF_ROUND_INIT_FE_UPWARD \
921 int save_round_mode = fegetround (); \
922 if (fesetround (FE_UPWARD) == 0)
923#define ROUND_RESTORE_ /* Empty. */
924#define ROUND_RESTORE_FE_DOWNWARD \
925 fesetround (save_round_mode)
926#define ROUND_RESTORE_FE_TONEAREST \
927 fesetround (save_round_mode)
928#define ROUND_RESTORE_FE_TOWARDZERO \
929 fesetround (save_round_mode)
930#define ROUND_RESTORE_FE_UPWARD \
931 fesetround (save_round_mode)
932
f44bf14a 933/* Run an individual test, including any required setup and checking
51df539d 934 of results, or loop over all tests in an array. */
f44bf14a
JM		 935#define RUN_TEST_f_f(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
936 MAX_ULP, EXCEPTIONS) \
937 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
938 MAX_ULP, EXCEPTIONS)
51df539d
JM		 939#define RUN_TEST_LOOP_f_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
940 IF_ROUND_INIT_ ## ROUNDING_MODE \
941 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
942 RUN_TEST_f_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg, \
943 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
944 (ARRAY)[i].exceptions); \
945 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 946#define RUN_TEST_2_f(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
947 MAX_ULP, EXCEPTIONS) \
948 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG1, ARG2), EXPECTED, \
949 MAX_ULP, EXCEPTIONS)
601a3a5f
JM		 950#define RUN_TEST_LOOP_2_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
951 IF_ROUND_INIT_ ## ROUNDING_MODE \
952 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
953 RUN_TEST_2_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg1, \
954 (ARRAY)[i].arg2, (ARRAY)[i].expected, \
955 (ARRAY)[i].max_ulp, (ARRAY)[i].exceptions); \
956 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a 957#define RUN_TEST_ff_f RUN_TEST_2_f
601a3a5f 958#define RUN_TEST_LOOP_ff_f RUN_TEST_LOOP_2_f
f44bf14a
JM		 959#define RUN_TEST_fi_f RUN_TEST_2_f
960#define RUN_TEST_fl_f RUN_TEST_2_f
ae08db3b 961#define RUN_TEST_if_f RUN_TEST_2_f
f44bf14a
JM		 962#define RUN_TEST_fff_f(TEST_NAME, FUNC_NAME, ARG1, ARG2, ARG3, \
963 EXPECTED, MAX_ULP, EXCEPTIONS) \
964 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG1, ARG2, ARG3), \
965 EXPECTED, MAX_ULP, EXCEPTIONS)
4f184d30
JM		 966#define RUN_TEST_LOOP_fff_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
967 IF_ROUND_INIT_ ## ROUNDING_MODE \
968 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
969 RUN_TEST_fff_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg1, \
970 (ARRAY)[i].arg2, (ARRAY)[i].arg3, \
971 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
972 (ARRAY)[i].exceptions); \
973 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 974#define RUN_TEST_c_f(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
975 MAX_ULP, EXCEPTIONS) \
976 check_float (TEST_NAME, \
977 FUNC (FUNC_NAME) (BUILD_COMPLEX (ARG1, ARG2)), \
978 EXPECTED, MAX_ULP, EXCEPTIONS)
979#define RUN_TEST_f_f1(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
980 MAX_ULP, EXCEPTIONS, \
981 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
982 EXTRA_EXPECTED, EXTRA_ULP) \
983 do \
984 { \
985 (EXTRA_VAR) = (EXTRA_INIT); \
986 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
987 MAX_ULP, EXCEPTIONS); \
988 if (EXTRA_TEST) \
989 check_int (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
990 EXTRA_ULP, 0); \
991 } \
992 while (0)
993#define RUN_TEST_fF_f1(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
994 MAX_ULP, EXCEPTIONS, \
995 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
996 EXTRA_EXPECTED, EXTRA_ULP) \
997 do \
998 { \
999 (EXTRA_VAR) = (EXTRA_INIT); \
1000 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG, &(EXTRA_VAR)), \
1001 EXPECTED, MAX_ULP, EXCEPTIONS); \
1002 if (EXTRA_TEST) \
1003 check_float (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1004 EXTRA_ULP, 0); \
1005 } \
1006 while (0)
1007#define RUN_TEST_fI_f1(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1008 MAX_ULP, EXCEPTIONS, \
1009 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1010 EXTRA_EXPECTED, EXTRA_ULP) \
1011 do \
1012 { \
1013 (EXTRA_VAR) = (EXTRA_INIT); \
1014 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG, &(EXTRA_VAR)), \
1015 EXPECTED, MAX_ULP, EXCEPTIONS); \
1016 if (EXTRA_TEST) \
1017 check_int (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1018 EXTRA_ULP, 0); \
1019 } \
1020 while (0)
1021#define RUN_TEST_ffI_f1(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
1022 MAX_ULP, EXCEPTIONS, \
1023 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1024 EXTRA_EXPECTED, EXTRA_ULP) \
1025 do \
1026 { \
1027 (EXTRA_VAR) = (EXTRA_INIT); \
1028 check_float (TEST_NAME, \
1029 FUNC (FUNC_NAME) (ARG1, ARG2, &(EXTRA_VAR)), \
1030 EXPECTED, MAX_ULP, EXCEPTIONS); \
1031 if (EXTRA_TEST) \
1032 check_int (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1033 EXTRA_ULP, 0); \
1034 } \
1035 while (0)
1036#define RUN_TEST_c_c(TEST_NAME, FUNC_NAME, ARGR, ARGC, EXPR, EXPC, \
1037 MAX_ULP, EXCEPTIONS) \
1038 check_complex (TEST_NAME, \
1039 FUNC (FUNC_NAME) (BUILD_COMPLEX (ARGR, ARGC)), \
1040 BUILD_COMPLEX (EXPR, EXPC), \
1041 MAX_ULP, EXCEPTIONS)
08198877
JM		 1042#define RUN_TEST_LOOP_c_c(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1043 IF_ROUND_INIT_ ## ROUNDING_MODE \
1044 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1045 RUN_TEST_c_c ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].argr, \
1046 (ARRAY)[i].argc, (ARRAY)[i].expr, (ARRAY)[i].expc, \
1047 (ARRAY)[i].max_ulp, (ARRAY)[i].exceptions); \
1048 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM		 1049#define RUN_TEST_cc_c(TEST_NAME, FUNC_NAME, ARG1R, ARG1C, ARG2R, ARG2C, \
1050 EXPR, EXPC, MAX_ULP, EXCEPTIONS) \
1051 check_complex (TEST_NAME, \
1052 FUNC (FUNC_NAME) (BUILD_COMPLEX (ARG1R, ARG1C), \
1053 BUILD_COMPLEX (ARG2R, ARG2C)), \
1054 BUILD_COMPLEX (EXPR, EXPC), \
1055 MAX_ULP, EXCEPTIONS)
1056#define RUN_TEST_f_i(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1057 MAX_ULP, EXCEPTIONS) \
1058 check_int (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1059 MAX_ULP, EXCEPTIONS)
1060#define RUN_TEST_f_i_tg(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1061 MAX_ULP, EXCEPTIONS) \
1062 check_int (TEST_NAME, FUNC_NAME (ARG), EXPECTED, \
1063 MAX_ULP, EXCEPTIONS)
1064#define RUN_TEST_ff_i_tg(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
1065 MAX_ULP, EXCEPTIONS) \
1066 check_int (TEST_NAME, FUNC_NAME (ARG1, ARG2), EXPECTED, \
1067 MAX_ULP, EXCEPTIONS)
1068#define RUN_TEST_f_b(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1069 MAX_ULP, EXCEPTIONS) \
1070 check_bool (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1071 MAX_ULP, EXCEPTIONS)
1072#define RUN_TEST_f_b_tg(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1073 MAX_ULP, EXCEPTIONS) \
1074 check_bool (TEST_NAME, FUNC_NAME (ARG), EXPECTED, \
1075 MAX_ULP, EXCEPTIONS)
1076#define RUN_TEST_f_l(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1077 MAX_ULP, EXCEPTIONS) \
1078 check_long (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1079 MAX_ULP, EXCEPTIONS)
1080#define RUN_TEST_f_L(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1081 MAX_ULP, EXCEPTIONS) \
1082 check_longlong (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1083 MAX_ULP, EXCEPTIONS)
1084#define RUN_TEST_sincos(ARG, TEST_NAME_SIN, SIN_RES_VAR, EXPECTED_SIN, \
1085 MAX_ULP_SIN, TEST_NAME_COS, COS_RES_VAR, \
1086 EXPECTED_COS, MAX_ULP_COS, EXCEPTIONS) \
1087 do \
1088 { \
1089 FUNC (sincos) (ARG, &(SIN_RES_VAR), &(COS_RES_VAR)); \
1090 check_float (TEST_NAME_SIN, SIN_RES_VAR, \
1091 EXPECTED_SIN, MAX_ULP_SIN, EXCEPTIONS); \
1092 check_float (TEST_NAME_COS, COS_RES_VAR, \
1093 EXPECTED_COS, MAX_ULP_COS, 0); \
1094 } \
1095 while (0)
1096
8847214f
UD		 1097
1098
1099/* This is to prevent messages from the SVID libm emulation. */
1100int
1101matherr (struct exception *x __attribute__ ((unused)))
1102{
1103 return 1;
1104}
1105
1106
1107/****************************************************************************
1108 Tests for single functions of libm.
1109 Please keep them alphabetically sorted!
1110****************************************************************************/
1111
51df539d
JM		 1112static const struct test_f_f_data acos_test_data[] =
1113 {
1114 START_DATA (acos),
1115 TEST_f_f (acos, plus_infty, qnan_value, INVALID_EXCEPTION),
1116 TEST_f_f (acos, minus_infty, qnan_value, INVALID_EXCEPTION),
1117 TEST_f_f (acos, qnan_value, qnan_value),
1118
1119 /* |x| > 1: */
1120 TEST_f_f (acos, 1.125L, qnan_value, INVALID_EXCEPTION),
1121 TEST_f_f (acos, -1.125L, qnan_value, INVALID_EXCEPTION),
1122 TEST_f_f (acos, max_value, qnan_value, INVALID_EXCEPTION),
1123 TEST_f_f (acos, -max_value, qnan_value, INVALID_EXCEPTION),
1124
1125 TEST_f_f (acos, 0, M_PI_2l),
1126 TEST_f_f (acos, minus_zero, M_PI_2l),
1127 TEST_f_f (acos, 1, 0),
1128 TEST_f_f (acos, -1, M_PIl),
1129 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1130 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1131 TEST_f_f (acos, 0.75L, 0.722734247813415611178377352641333362L),
1132 TEST_f_f (acos, 2e-17L, 1.57079632679489659923132169163975144L),
1133 TEST_f_f (acos, 0.0625L, 1.50825556499840522843072005474337068L),
1134 TEST_f_f (acos, 0x0.ffffffp0L, 3.4526698471620358760324948263873649728491e-4L),
1135 TEST_f_f (acos, -0x0.ffffffp0L, 3.1412473866050770348750401337968641476999L),
1136#ifndef TEST_FLOAT
1137 TEST_f_f (acos, 0x0.ffffffff8p0L, 1.5258789062648029736620564947844627548516e-5L),
1138 TEST_f_f (acos, -0x0.ffffffff8p0L, 3.1415773948007305904329067627145550395696L),
1139 TEST_f_f (acos, 0x0.ffffffffffffp0L, 8.4293697021788088529885473244391795127130e-8L),
1140 TEST_f_f (acos, -0x0.ffffffffffffp0L, 3.1415925692960962166745548533940296398054L),
1141#endif
1142#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
1143 TEST_f_f (acos, 0x0.ffffffffffffffffp0L, 3.2927225399135962333718255320079907245059e-10L),
1144 TEST_f_f (acos, -0x0.ffffffffffffffffp0L, 3.1415926532605209844712837599423203309964L),
1145#endif
1146 END_DATA (acos)
1147 };
1148
8847214f
UD		 1149static void
1150acos_test (void)
1151{
e6d3c4a7
AJ		 1152 errno = 0;
1153 FUNC(acos) (0);
1154 if (errno == ENOSYS)
1155 /* Function not implemented. */
1156 return;
1157
8847214f 1158 START (acos);
51df539d 1159 RUN_TEST_LOOP_f_f (acos, acos_test_data, );
8847214f
UD		 1160 END (acos);
1161}
1162
5ba3cc69 1163
51df539d
JM		 1164static const struct test_f_f_data acos_tonearest_test_data[] =
1165 {
1166 START_DATA (acos_tonearest),
1167 TEST_f_f (acos, 0, M_PI_2l),
1168 TEST_f_f (acos, minus_zero, M_PI_2l),
1169 TEST_f_f (acos, 1, 0),
1170 TEST_f_f (acos, -1, M_PIl),
1171 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1172 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1173 END_DATA (acos_tonearest)
1174 };
1175
5ba3cc69
JM		 1176static void
1177acos_test_tonearest (void)
1178{
5ba3cc69
JM		 1179 errno = 0;
1180 FUNC(acos) (0);
1181 if (errno == ENOSYS)
1182 /* Function not implemented. */
1183 return;
1184
1185 START (acos_tonearest);
51df539d 1186 RUN_TEST_LOOP_f_f (acos, acos_tonearest_test_data, FE_TONEAREST);
5ba3cc69
JM		 1187 END (acos_tonearest);
1188}
1189
1190
74c57478
JM		 1191static const struct test_f_f_data acos_towardzero_test_data[] =
1192 {
1193 START_DATA (acos_towardzero),
1194 TEST_f_f (acos, 0, M_PI_2l),
1195 TEST_f_f (acos, minus_zero, M_PI_2l),
1196 TEST_f_f (acos, 1, 0),
1197 TEST_f_f (acos, -1, M_PIl),
1198 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1199 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1200 END_DATA (acos_towardzero)
1201 };
1202
5ba3cc69
JM		 1203static void
1204acos_test_towardzero (void)
1205{
5ba3cc69
JM		 1206 errno = 0;
1207 FUNC(acos) (0);
1208 if (errno == ENOSYS)
1209 /* Function not implemented. */
1210 return;
1211
1212 START (acos_towardzero);
74c57478 1213 RUN_TEST_LOOP_f_f (acos, acos_towardzero_test_data, FE_TOWARDZERO);
5ba3cc69
JM		 1214 END (acos_towardzero);
1215}
1216
1217
74c57478
JM		 1218static const struct test_f_f_data acos_downward_test_data[] =
1219 {
1220 START_DATA (acos_downward),
1221 TEST_f_f (acos, 0, M_PI_2l),
1222 TEST_f_f (acos, minus_zero, M_PI_2l),
1223 TEST_f_f (acos, 1, 0),
1224 TEST_f_f (acos, -1, M_PIl),
1225 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1226 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1227 END_DATA (acos_downward)
1228 };
1229
5ba3cc69
JM		 1230static void
1231acos_test_downward (void)
1232{
5ba3cc69
JM		 1233 errno = 0;
1234 FUNC(acos) (0);
1235 if (errno == ENOSYS)
1236 /* Function not implemented. */
1237 return;
1238
1239 START (acos_downward);
74c57478 1240 RUN_TEST_LOOP_f_f (acos, acos_downward_test_data, FE_DOWNWARD);
5ba3cc69
JM		 1241 END (acos_downward);
1242}
1243
1244
74c57478
JM		 1245static const struct test_f_f_data acos_upward_test_data[] =
1246 {
1247 START_DATA (acos_upward),
1248 TEST_f_f (acos, 0, M_PI_2l),
1249 TEST_f_f (acos, minus_zero, M_PI_2l),
1250 TEST_f_f (acos, 1, 0),
1251 TEST_f_f (acos, -1, M_PIl),
1252 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1253 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1254 END_DATA (acos_upward)
1255 };
1256
5ba3cc69
JM		 1257static void
1258acos_test_upward (void)
1259{
5ba3cc69
JM		 1260 errno = 0;
1261 FUNC(acos) (0);
1262 if (errno == ENOSYS)
1263 /* Function not implemented. */
1264 return;
1265
1266 START (acos_upward);
74c57478 1267 RUN_TEST_LOOP_f_f (acos, acos_upward_test_data, FE_UPWARD);
5ba3cc69
JM		 1268 END (acos_upward);
1269}
1270
74c57478
JM		 1271static const struct test_f_f_data acosh_test_data[] =
1272 {
1273 START_DATA (acosh),
1274 TEST_f_f (acosh, plus_infty, plus_infty),
1275 TEST_f_f (acosh, minus_infty, qnan_value, INVALID_EXCEPTION),
1276 TEST_f_f (acosh, qnan_value, qnan_value),
1277
1278 /* x < 1: */
1279 TEST_f_f (acosh, -1.125L, qnan_value, INVALID_EXCEPTION),
1280 TEST_f_f (acosh, -max_value, qnan_value, INVALID_EXCEPTION),
1281
1282 TEST_f_f (acosh, 1, 0),
1283 TEST_f_f (acosh, 7, 2.63391579384963341725009269461593689L),
1284 END_DATA (acosh)
1285 };
1286
8847214f
UD		 1287static void
1288acosh_test (void)
1289{
aaca11d8
UD		 1290 errno = 0;
1291 FUNC(acosh) (7);
1292 if (errno == ENOSYS)
1293 /* Function not implemented. */
1294 return;
1295
8847214f 1296 START (acosh);
74c57478 1297 RUN_TEST_LOOP_f_f (acosh, acosh_test_data, );
8847214f
UD		 1298 END (acosh);
1299}
1300
74c57478
JM		 1301static const struct test_f_f_data asin_test_data[] =
1302 {
1303 START_DATA (asin),
1304 TEST_f_f (asin, plus_infty, qnan_value, INVALID_EXCEPTION),
1305 TEST_f_f (asin, minus_infty, qnan_value, INVALID_EXCEPTION),
1306 TEST_f_f (asin, qnan_value, qnan_value),
1307
1308 /* asin x == qNaN plus invalid exception for |x| > 1. */
1309 TEST_f_f (asin, 1.125L, qnan_value, INVALID_EXCEPTION),
1310 TEST_f_f (asin, -1.125L, qnan_value, INVALID_EXCEPTION),
1311 TEST_f_f (asin, max_value, qnan_value, INVALID_EXCEPTION),
1312 TEST_f_f (asin, -max_value, qnan_value, INVALID_EXCEPTION),
1313
1314 TEST_f_f (asin, 0, 0),
1315 TEST_f_f (asin, minus_zero, minus_zero),
1316 TEST_f_f (asin, 0.5, M_PI_6l),
1317 TEST_f_f (asin, -0.5, -M_PI_6l),
1318 TEST_f_f (asin, 1.0, M_PI_2l),
1319 TEST_f_f (asin, -1.0, -M_PI_2l),
1320 TEST_f_f (asin, 0.75L, 0.848062078981481008052944338998418080L),
1321 TEST_f_f (asin, 0x0.ffffffp0L, 1.5704510598101804156437184421571127056013L),
1322 TEST_f_f (asin, -0x0.ffffffp0L, -1.5704510598101804156437184421571127056013L),
1323#ifndef TEST_FLOAT
1324 TEST_f_f (asin, 0x0.ffffffff8p0L, 1.5707810680058339712015850710748035974710L),
1325 TEST_f_f (asin, -0x0.ffffffff8p0L, -1.5707810680058339712015850710748035974710L),
1326 TEST_f_f (asin, 0x0.ffffffffffffp0L, 1.5707962425011995974432331617542781977068L),
1327 TEST_f_f (asin, -0x0.ffffffffffffp0L, -1.5707962425011995974432331617542781977068L),
1328#endif
1329#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
1330 TEST_f_f (asin, 0x0.ffffffffffffffffp0L, 1.5707963264656243652399620683025688888978L),
1331 TEST_f_f (asin, -0x0.ffffffffffffffffp0L, -1.5707963264656243652399620683025688888978L),
1332#endif
1333 END_DATA (asin)
1334 };
1335
8847214f
UD		 1336static void
1337asin_test (void)
1338{
e6d3c4a7
AJ		 1339 errno = 0;
1340 FUNC(asin) (0);
1341 if (errno == ENOSYS)
1342 /* Function not implemented. */
1343 return;
8847214f
UD		 1344
1345 START (asin);
74c57478 1346 RUN_TEST_LOOP_f_f (asin, asin_test_data, );
8847214f
UD		 1347 END (asin);
1348}
1349
5ba3cc69 1350
74c57478
JM		 1351static const struct test_f_f_data asin_tonearest_test_data[] =
1352 {
1353 START_DATA (asin_tonearest),
1354 TEST_f_f (asin, 0, 0),
1355 TEST_f_f (asin, minus_zero, minus_zero),
1356 TEST_f_f (asin, 0.5, M_PI_6l),
1357 TEST_f_f (asin, -0.5, -M_PI_6l),
1358 TEST_f_f (asin, 1.0, M_PI_2l),
1359 TEST_f_f (asin, -1.0, -M_PI_2l),
1360 END_DATA (asin_tonearest)
1361 };
1362
5ba3cc69
JM		 1363static void
1364asin_test_tonearest (void)
1365{
5ba3cc69
JM		 1366 errno = 0;
1367 FUNC(asin) (0);
1368 if (errno == ENOSYS)
1369 /* Function not implemented. */
1370 return;
1371
1372 START (asin_tonearest);
74c57478 1373 RUN_TEST_LOOP_f_f (asin, asin_tonearest_test_data, FE_TONEAREST);
5ba3cc69
JM		 1374 END (asin_tonearest);
1375}
1376
1377
74c57478
JM		 1378static const struct test_f_f_data asin_towardzero_test_data[] =
1379 {
1380 START_DATA (asin_towardzero),
1381 TEST_f_f (asin, 0, 0),
1382 TEST_f_f (asin, minus_zero, minus_zero),
1383 TEST_f_f (asin, 0.5, M_PI_6l),
1384 TEST_f_f (asin, -0.5, -M_PI_6l),
1385 TEST_f_f (asin, 1.0, M_PI_2l),
1386 TEST_f_f (asin, -1.0, -M_PI_2l),
1387 END_DATA (asin_towardzero)
1388 };
1389
5ba3cc69
JM		 1390static void
1391asin_test_towardzero (void)
1392{
5ba3cc69
JM		 1393 errno = 0;
1394 FUNC(asin) (0);
1395 if (errno == ENOSYS)
1396 /* Function not implemented. */
1397 return;
1398
1399 START (asin_towardzero);
74c57478 1400 RUN_TEST_LOOP_f_f (asin, asin_towardzero_test_data, FE_TOWARDZERO);
5ba3cc69
JM		 1401 END (asin_towardzero);
1402}
1403
1404
74c57478
JM		 1405static const struct test_f_f_data asin_downward_test_data[] =
1406 {
1407 START_DATA (asin_downward),
1408 TEST_f_f (asin, 0, 0),
1409 TEST_f_f (asin, minus_zero, minus_zero),
1410 TEST_f_f (asin, 0.5, M_PI_6l),
1411 TEST_f_f (asin, -0.5, -M_PI_6l),
1412 TEST_f_f (asin, 1.0, M_PI_2l),
1413 TEST_f_f (asin, -1.0, -M_PI_2l),
1414 END_DATA (asin_downward)
1415 };
1416
5ba3cc69
JM		 1417static void
1418asin_test_downward (void)
1419{
5ba3cc69
JM		 1420 errno = 0;
1421 FUNC(asin) (0);
1422 if (errno == ENOSYS)
1423 /* Function not implemented. */
1424 return;
1425
1426 START (asin_downward);
74c57478 1427 RUN_TEST_LOOP_f_f (asin, asin_downward_test_data, FE_DOWNWARD);
5ba3cc69
JM		 1428 END (asin_downward);
1429}
1430
1431
74c57478
JM		 1432static const struct test_f_f_data asin_upward_test_data[] =
1433 {
1434 START_DATA (asin_upward),
1435 TEST_f_f (asin, 0, 0),
1436 TEST_f_f (asin, minus_zero, minus_zero),
1437 TEST_f_f (asin, 0.5, M_PI_6l),
1438 TEST_f_f (asin, -0.5, -M_PI_6l),
1439 TEST_f_f (asin, 1.0, M_PI_2l),
1440 TEST_f_f (asin, -1.0, -M_PI_2l),
1441 END_DATA (asin_upward)
1442 };
1443
5ba3cc69
JM		 1444static void
1445asin_test_upward (void)
1446{
5ba3cc69
JM		 1447 errno = 0;
1448 FUNC(asin) (0);
1449 if (errno == ENOSYS)
1450 /* Function not implemented. */
1451 return;
1452
1453 START (asin_upward);
74c57478 1454 RUN_TEST_LOOP_f_f (asin, asin_upward_test_data, FE_UPWARD);
5ba3cc69
JM		 1455 END (asin_upward);
1456}
1457
74c57478
JM		 1458static const struct test_f_f_data asinh_test_data[] =
1459 {
1460 START_DATA (asinh),
1461 TEST_f_f (asinh, 0, 0),
1462 TEST_f_f (asinh, minus_zero, minus_zero),
1463#ifndef TEST_INLINE
1464 TEST_f_f (asinh, plus_infty, plus_infty),
1465 TEST_f_f (asinh, minus_infty, minus_infty),
1466#endif
1467 TEST_f_f (asinh, qnan_value, qnan_value),
1468 TEST_f_f (asinh, 0.75L, 0.693147180559945309417232121458176568L),
1469 END_DATA (asinh)
1470 };
1471
8847214f
UD		 1472static void
1473asinh_test (void)
1474{
aaca11d8 1475 errno = 0;
3c6cad26 1476 FUNC(asinh) (0.7L);
aaca11d8
UD		 1477 if (errno == ENOSYS)
1478 /* Function not implemented. */
1479 return;
1480
8847214f 1481 START (asinh);
74c57478 1482 RUN_TEST_LOOP_f_f (asinh, asinh_test_data, );
8847214f
UD		 1483 END (asinh);
1484}
1485
74c57478
JM		 1486static const struct test_f_f_data atan_test_data[] =
1487 {
1488 START_DATA (atan),
1489 TEST_f_f (atan, 0, 0),
1490 TEST_f_f (atan, minus_zero, minus_zero),
1491
1492 TEST_f_f (atan, plus_infty, M_PI_2l),
1493 TEST_f_f (atan, minus_infty, -M_PI_2l),
1494 TEST_f_f (atan, qnan_value, qnan_value),
1495 TEST_f_f (atan, max_value, M_PI_2l),
1496 TEST_f_f (atan, -max_value, -M_PI_2l),
1497
1498 TEST_f_f (atan, 1, M_PI_4l),
1499 TEST_f_f (atan, -1, -M_PI_4l),
1500
1501 TEST_f_f (atan, 0.75L, 0.643501108793284386802809228717322638L),
1502
1503 TEST_f_f (atan, 0x1p-100L, 0x1p-100L),
1504#ifndef TEST_FLOAT
1505 TEST_f_f (atan, 0x1p-600L, 0x1p-600L),
1506#endif
1507#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
1508 TEST_f_f (atan, 0x1p-10000L, 0x1p-10000L),
1509#endif
1510 END_DATA (atan)
1511 };
1512
8847214f
UD		 1513static void
1514atan_test (void)
1515{
e6d3c4a7
AJ		 1516 errno = 0;
1517 FUNC(atan) (0);
1518 if (errno == ENOSYS)
1519 /* Function not implemented. */
1520 return;
8847214f
UD		 1521
1522 START (atan);
74c57478 1523 RUN_TEST_LOOP_f_f (atan, atan_test_data, );
8847214f
UD		 1524 END (atan);
1525}
1526
1527
1528
74c57478
JM		 1529static const struct test_f_f_data atanh_test_data[] =
1530 {
1531 START_DATA (atanh),
1532 TEST_f_f (atanh, 0, 0),
1533 TEST_f_f (atanh, minus_zero, minus_zero),
1534
1535 TEST_f_f (atanh, 1, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
1536 TEST_f_f (atanh, -1, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
1537 TEST_f_f (atanh, qnan_value, qnan_value),
1538
1539 /* atanh (x) == qNaN plus invalid exception if |x| > 1. */
1540 TEST_f_f (atanh, 1.125L, qnan_value, INVALID_EXCEPTION),
1541 TEST_f_f (atanh, -1.125L, qnan_value, INVALID_EXCEPTION),
1542 TEST_f_f (atanh, max_value, qnan_value, INVALID_EXCEPTION),
1543 TEST_f_f (atanh, -max_value, qnan_value, INVALID_EXCEPTION),
1544
1545 TEST_f_f (atanh, 0.75L, 0.972955074527656652552676371721589865L),
1546 END_DATA (atanh)
1547 };
1548
8847214f
UD		 1549static void
1550atanh_test (void)
1551{
aaca11d8 1552 errno = 0;
3c6cad26 1553 FUNC(atanh) (0.7L);
aaca11d8
UD		 1554 if (errno == ENOSYS)
1555 /* Function not implemented. */
1556 return;
8847214f
UD		 1557
1558 START (atanh);
74c57478 1559 RUN_TEST_LOOP_f_f (atanh, atanh_test_data, );
8847214f
UD		 1560 END (atanh);
1561}
1562
601a3a5f
JM		 1563static const struct test_ff_f_data atan2_test_data[] =
1564 {
1565 START_DATA (atan2),
1566 /* atan2 (0,x) == 0 for x > 0. */
1567 TEST_ff_f (atan2, 0, 1, 0),
8847214f 1568
601a3a5f
JM		 1569 /* atan2 (-0,x) == -0 for x > 0. */
1570 TEST_ff_f (atan2, minus_zero, 1, minus_zero),
8847214f 1571
601a3a5f
JM		 1572 TEST_ff_f (atan2, 0, 0, 0),
1573 TEST_ff_f (atan2, minus_zero, 0, minus_zero),
8847214f 1574
601a3a5f
JM		 1575 /* atan2 (+0,x) == +pi for x < 0. */
1576 TEST_ff_f (atan2, 0, -1, M_PIl),
8847214f 1577
601a3a5f
JM		 1578 /* atan2 (-0,x) == -pi for x < 0. */
1579 TEST_ff_f (atan2, minus_zero, -1, -M_PIl),
8847214f 1580
601a3a5f
JM		 1581 TEST_ff_f (atan2, 0, minus_zero, M_PIl),
1582 TEST_ff_f (atan2, minus_zero, minus_zero, -M_PIl),
8847214f 1583
601a3a5f
JM		 1584 /* atan2 (y,+0) == pi/2 for y > 0. */
1585 TEST_ff_f (atan2, 1, 0, M_PI_2l),
8847214f 1586
601a3a5f
JM		 1587 /* atan2 (y,-0) == pi/2 for y > 0. */
1588 TEST_ff_f (atan2, 1, minus_zero, M_PI_2l),
8847214f 1589
601a3a5f
JM		 1590 /* atan2 (y,+0) == -pi/2 for y < 0. */
1591 TEST_ff_f (atan2, -1, 0, -M_PI_2l),
8847214f 1592
601a3a5f
JM		 1593 /* atan2 (y,-0) == -pi/2 for y < 0. */
1594 TEST_ff_f (atan2, -1, minus_zero, -M_PI_2l),
8847214f 1595
601a3a5f
JM		 1596 /* atan2 (y,inf) == +0 for finite y > 0. */
1597 TEST_ff_f (atan2, 1, plus_infty, 0),
8847214f 1598
601a3a5f
JM		 1599 /* atan2 (y,inf) == -0 for finite y < 0. */
1600 TEST_ff_f (atan2, -1, plus_infty, minus_zero),
8847214f 1601
601a3a5f
JM		 1602 /* atan2(+inf, x) == pi/2 for finite x. */
1603 TEST_ff_f (atan2, plus_infty, -1, M_PI_2l),
8847214f 1604
601a3a5f
JM		 1605 /* atan2(-inf, x) == -pi/2 for finite x. */
1606 TEST_ff_f (atan2, minus_infty, 1, -M_PI_2l),
8847214f 1607
601a3a5f
JM		 1608 /* atan2 (y,-inf) == +pi for finite y > 0. */
1609 TEST_ff_f (atan2, 1, minus_infty, M_PIl),
8847214f 1610
601a3a5f
JM		 1611 /* atan2 (y,-inf) == -pi for finite y < 0. */
1612 TEST_ff_f (atan2, -1, minus_infty, -M_PIl),
8847214f 1613
601a3a5f
JM		 1614 TEST_ff_f (atan2, plus_infty, plus_infty, M_PI_4l),
1615 TEST_ff_f (atan2, minus_infty, plus_infty, -M_PI_4l),
1616 TEST_ff_f (atan2, plus_infty, minus_infty, M_PI_34l),
1617 TEST_ff_f (atan2, minus_infty, minus_infty, -M_PI_34l),
1618 TEST_ff_f (atan2, qnan_value, qnan_value, qnan_value),
8847214f 1619
601a3a5f 1620 TEST_ff_f (atan2, max_value, max_value, M_PI_4l),
7726d6a9 1621
601a3a5f
JM		 1622 TEST_ff_f (atan2, max_value, min_value, M_PI_2l),
1623 TEST_ff_f (atan2, -max_value, -min_value, -M_PI_2l),
6d33cc9d 1624
601a3a5f
JM		 1625 TEST_ff_f (atan2, 0.75L, 1, 0.643501108793284386802809228717322638L),
1626 TEST_ff_f (atan2, -0.75L, 1.0L, -0.643501108793284386802809228717322638L),
1627 TEST_ff_f (atan2, 0.75L, -1.0L, 2.49809154479650885165983415456218025L),
1628 TEST_ff_f (atan2, -0.75L, -1.0L, -2.49809154479650885165983415456218025L),
1629 TEST_ff_f (atan2, 0.390625L, .00029L, 1.57005392693128974780151246612928941L),
1630 TEST_ff_f (atan2, 1.390625L, 0.9296875L, 0.981498387184244311516296577615519772L),
8847214f 1631
601a3a5f 1632 TEST_ff_f (atan2, -0.00756827042671106339L, -.001792735857538728036L, -1.80338464113663849327153994379639112L),
16a0e2ec 1633#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
601a3a5f 1634 TEST_ff_f (atan2, 0x1.00000000000001p0L, 0x1.00000000000001p0L, M_PI_4l),
16a0e2ec 1635#endif
601a3a5f
JM		 1636 END_DATA (atan2)
1637 };
bb3f4825 1638
601a3a5f
JM		 1639static void
1640atan2_test (void)
1641{
1642 errno = 0;
1643 FUNC(atan2) (-0, 1);
1644 if (errno == ENOSYS)
1645 /* Function not implemented. */
1646 return;
1647
1648 START (atan2);
1649 RUN_TEST_LOOP_ff_f (atan2, atan2_test_data, );
8847214f
UD		 1650 END (atan2);
1651}
1652
8847214f
UD		 1653static void
1654cabs_test (void)
1655{
aaca11d8 1656 errno = 0;
3c6cad26 1657 FUNC(cabs) (BUILD_COMPLEX (0.7L, 12.4L));
aaca11d8
UD		 1658 if (errno == ENOSYS)
1659 /* Function not implemented. */
1660 return;
1661
8847214f
UD		 1662 START (cabs);
1663
1664 /* cabs (x + iy) is specified as hypot (x,y) */
1665
1666 /* cabs (+inf + i x) == +inf. */
1667 TEST_c_f (cabs, plus_infty, 1.0, plus_infty);
1668 /* cabs (-inf + i x) == +inf. */
1669 TEST_c_f (cabs, minus_infty, 1.0, plus_infty);
1670
67e971f1
TS		 1671 TEST_c_f (cabs, minus_infty, qnan_value, plus_infty);
1672 TEST_c_f (cabs, minus_infty, qnan_value, plus_infty);
8847214f 1673
67e971f1 1674 TEST_c_f (cabs, qnan_value, qnan_value, qnan_value);
8847214f
UD		 1675
1676 /* cabs (x,y) == cabs (y,x). */
2550dfe9 1677 TEST_c_f (cabs, 0.75L, 12.390625L, 12.4133028598606664302388810868156657L);
8847214f 1678 /* cabs (x,y) == cabs (-x,y). */
2550dfe9 1679 TEST_c_f (cabs, -12.390625L, 0.75L, 12.4133028598606664302388810868156657L);
8847214f 1680 /* cabs (x,y) == cabs (-y,x). */
2550dfe9 1681 TEST_c_f (cabs, -0.75L, 12.390625L, 12.4133028598606664302388810868156657L);
8847214f 1682 /* cabs (x,y) == cabs (-x,-y). */
2550dfe9 1683 TEST_c_f (cabs, -12.390625L, -0.75L, 12.4133028598606664302388810868156657L);
8847214f 1684 /* cabs (x,y) == cabs (-y,-x). */
2550dfe9 1685 TEST_c_f (cabs, -0.75L, -12.390625L, 12.4133028598606664302388810868156657L);
8847214f 1686 /* cabs (x,0) == fabs (x). */
2550dfe9
AJ		 1687 TEST_c_f (cabs, -0.75L, 0, 0.75L);
1688 TEST_c_f (cabs, 0.75L, 0, 0.75L);
8847214f
UD		 1689 TEST_c_f (cabs, -1.0L, 0, 1.0L);
1690 TEST_c_f (cabs, 1.0L, 0, 1.0L);
1691 TEST_c_f (cabs, -5.7e7L, 0, 5.7e7L);
1692 TEST_c_f (cabs, 5.7e7L, 0, 5.7e7L);
1693
2550dfe9 1694 TEST_c_f (cabs, 0.75L, 1.25L, 1.45773797371132511771853821938639577L);
8847214f
UD		 1695
1696 END (cabs);
1697}
1698
2550dfe9 1699
08198877
JM		 1700static const struct test_c_c_data cacos_test_data[] =
1701 {
1702 START_DATA (cacos),
1703 TEST_c_c (cacos, 0, 0, M_PI_2l, minus_zero),
1704 TEST_c_c (cacos, minus_zero, 0, M_PI_2l, minus_zero),
1705 TEST_c_c (cacos, minus_zero, minus_zero, M_PI_2l, 0.0),
1706 TEST_c_c (cacos, 0, minus_zero, M_PI_2l, 0.0),
1707
1708 TEST_c_c (cacos, minus_infty, plus_infty, M_PI_34l, minus_infty),
1709 TEST_c_c (cacos, minus_infty, minus_infty, M_PI_34l, plus_infty),
1710
1711 TEST_c_c (cacos, plus_infty, plus_infty, M_PI_4l, minus_infty),
1712 TEST_c_c (cacos, plus_infty, minus_infty, M_PI_4l, plus_infty),
1713
1714 TEST_c_c (cacos, -10.0, plus_infty, M_PI_2l, minus_infty),
1715 TEST_c_c (cacos, -10.0, minus_infty, M_PI_2l, plus_infty),
1716 TEST_c_c (cacos, 0, plus_infty, M_PI_2l, minus_infty),
1717 TEST_c_c (cacos, 0, minus_infty, M_PI_2l, plus_infty),
1718 TEST_c_c (cacos, 0.1L, plus_infty, M_PI_2l, minus_infty),
1719 TEST_c_c (cacos, 0.1L, minus_infty, M_PI_2l, plus_infty),
1720
1721 TEST_c_c (cacos, minus_infty, 0, M_PIl, minus_infty),
1722 TEST_c_c (cacos, minus_infty, minus_zero, M_PIl, plus_infty),
1723 TEST_c_c (cacos, minus_infty, 100, M_PIl, minus_infty),
1724 TEST_c_c (cacos, minus_infty, -100, M_PIl, plus_infty),
1725
1726 TEST_c_c (cacos, plus_infty, 0, 0.0, minus_infty),
1727 TEST_c_c (cacos, plus_infty, minus_zero, 0.0, plus_infty),
1728 TEST_c_c (cacos, plus_infty, 0.5, 0.0, minus_infty),
1729 TEST_c_c (cacos, plus_infty, -0.5, 0.0, plus_infty),
1730
1731 TEST_c_c (cacos, plus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
1732 TEST_c_c (cacos, minus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
1733
1734 TEST_c_c (cacos, 0, qnan_value, M_PI_2l, qnan_value),
1735 TEST_c_c (cacos, minus_zero, qnan_value, M_PI_2l, qnan_value),
1736
1737 TEST_c_c (cacos, qnan_value, plus_infty, qnan_value, minus_infty),
1738 TEST_c_c (cacos, qnan_value, minus_infty, qnan_value, plus_infty),
1739
1740 TEST_c_c (cacos, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1741 TEST_c_c (cacos, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1742
1743 TEST_c_c (cacos, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1744 TEST_c_c (cacos, qnan_value, -0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1745
1746 TEST_c_c (cacos, qnan_value, qnan_value, qnan_value, qnan_value),
1747
1748 TEST_c_c (cacos, plus_zero, -1.5L, M_PI_2l, 1.194763217287109304111930828519090523536L),
1749 TEST_c_c (cacos, minus_zero, -1.5L, M_PI_2l, 1.194763217287109304111930828519090523536L),
1750 TEST_c_c (cacos, plus_zero, -1.0L, M_PI_2l, 0.8813735870195430252326093249797923090282L),
1751 TEST_c_c (cacos, minus_zero, -1.0L, M_PI_2l, 0.8813735870195430252326093249797923090282L),
1752 TEST_c_c (cacos, plus_zero, -0.5L, M_PI_2l, 0.4812118250596034474977589134243684231352L),
1753 TEST_c_c (cacos, minus_zero, -0.5L, M_PI_2l, 0.4812118250596034474977589134243684231352L),
1754 TEST_c_c (cacos, plus_zero, 0.5L, M_PI_2l, -0.4812118250596034474977589134243684231352L),
1755 TEST_c_c (cacos, minus_zero, 0.5L, M_PI_2l, -0.4812118250596034474977589134243684231352L),
1756 TEST_c_c (cacos, plus_zero, 1.0L, M_PI_2l, -0.8813735870195430252326093249797923090282L),
1757 TEST_c_c (cacos, minus_zero, 1.0L, M_PI_2l, -0.8813735870195430252326093249797923090282L),
1758 TEST_c_c (cacos, plus_zero, 1.5L, M_PI_2l, -1.194763217287109304111930828519090523536L),
1759 TEST_c_c (cacos, minus_zero, 1.5L, M_PI_2l, -1.194763217287109304111930828519090523536L),
1760
1761 TEST_c_c (cacos, -1.5L, plus_zero, M_PIl, -0.9624236501192068949955178268487368462704L),
1762 TEST_c_c (cacos, -1.5L, minus_zero, M_PIl, 0.9624236501192068949955178268487368462704L),
1763 TEST_c_c (cacos, -1.0L, plus_zero, M_PIl, minus_zero),
1764 TEST_c_c (cacos, -1.0L, minus_zero, M_PIl, plus_zero),
1765 TEST_c_c (cacos, -0.5L, plus_zero, 2.094395102393195492308428922186335256131L, minus_zero),
1766 TEST_c_c (cacos, -0.5L, minus_zero, 2.094395102393195492308428922186335256131L, plus_zero),
1767 TEST_c_c (cacos, 0.5L, plus_zero, 1.047197551196597746154214461093167628066L, minus_zero),
1768 TEST_c_c (cacos, 0.5L, minus_zero, 1.047197551196597746154214461093167628066L, plus_zero),
1769 TEST_c_c (cacos, 1.0L, plus_zero, plus_zero, minus_zero),
1770 TEST_c_c (cacos, 1.0L, minus_zero, plus_zero, plus_zero),
1771 TEST_c_c (cacos, 1.5L, plus_zero, plus_zero, -0.9624236501192068949955178268487368462704L),
1772 TEST_c_c (cacos, 1.5L, minus_zero, plus_zero, 0.9624236501192068949955178268487368462704L),
1773
1774 TEST_c_c (cacos, 0x1p50L, 1.0L, 8.881784197001252323389053344727730248720e-16L, -3.535050620855721078027883819436720218708e1L),
1775 TEST_c_c (cacos, 0x1p50L, -1.0L, 8.881784197001252323389053344727730248720e-16L, 3.535050620855721078027883819436720218708e1L),
1776 TEST_c_c (cacos, -0x1p50L, 1.0L, 3.141592653589792350284223683154270545292L, -3.535050620855721078027883819436720218708e1L),
1777 TEST_c_c (cacos, -0x1p50L, -1.0L, 3.141592653589792350284223683154270545292L, 3.535050620855721078027883819436720218708e1L),
1778 TEST_c_c (cacos, 1.0L, 0x1p50L, 1.570796326794895731052901991514519103193L, -3.535050620855721078027883819436759661753e1L),
1779 TEST_c_c (cacos, -1.0L, 0x1p50L, 1.570796326794897507409741391764983781004L, -3.535050620855721078027883819436759661753e1L),
1780 TEST_c_c (cacos, 1.0L, -0x1p50L, 1.570796326794895731052901991514519103193L, 3.535050620855721078027883819436759661753e1L),
1781 TEST_c_c (cacos, -1.0L, -0x1p50L, 1.570796326794897507409741391764983781004L, 3.535050620855721078027883819436759661753e1L),
728d7b43 1782#ifndef TEST_FLOAT
08198877
JM		 1783 TEST_c_c (cacos, 0x1p500L, 1.0L, 3.054936363499604682051979393213617699789e-151L, -3.472667374605326000180332928505464606058e2L),
1784 TEST_c_c (cacos, 0x1p500L, -1.0L, 3.054936363499604682051979393213617699789e-151L, 3.472667374605326000180332928505464606058e2L),
1785 TEST_c_c (cacos, -0x1p500L, 1.0L, 3.141592653589793238462643383279502884197L, -3.472667374605326000180332928505464606058e2L),
1786 TEST_c_c (cacos, -0x1p500L, -1.0L, 3.141592653589793238462643383279502884197L, 3.472667374605326000180332928505464606058e2L),
1787 TEST_c_c (cacos, 1.0L, 0x1p500L, 1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
1788 TEST_c_c (cacos, -1.0L, 0x1p500L, 1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
1789 TEST_c_c (cacos, 1.0L, -0x1p500L, 1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
1790 TEST_c_c (cacos, -1.0L, -0x1p500L, 1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
728d7b43
JM		 1791#endif
1792#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 1793 TEST_c_c (cacos, 0x1p5000L, 1.0L, 7.079811261048172892385615158694057552948e-1506L, -3.466429049980286492395577839412341016946e3L),
1794 TEST_c_c (cacos, 0x1p5000L, -1.0L, 7.079811261048172892385615158694057552948e-1506L, 3.466429049980286492395577839412341016946e3L),
1795 TEST_c_c (cacos, -0x1p5000L, 1.0L, 3.141592653589793238462643383279502884197L, -3.466429049980286492395577839412341016946e3L),
1796 TEST_c_c (cacos, -0x1p5000L, -1.0L, 3.141592653589793238462643383279502884197L, 3.466429049980286492395577839412341016946e3L),
1797 TEST_c_c (cacos, 1.0L, 0x1p5000L, 1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
1798 TEST_c_c (cacos, -1.0L, 0x1p5000L, 1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
1799 TEST_c_c (cacos, 1.0L, -0x1p5000L, 1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
1800 TEST_c_c (cacos, -1.0L, -0x1p5000L, 1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
728d7b43
JM		 1801#endif
1802
08198877 1803 TEST_c_c (cacos, 0x1.fp127L, 0x1.fp127L, 7.853981633974483096156608458198757210493e-1L, -8.973081118419833726837456344608533993585e1L),
728d7b43 1804#ifndef TEST_FLOAT
08198877 1805 TEST_c_c (cacos, 0x1.fp1023L, 0x1.fp1023L, 7.853981633974483096156608458198757210493e-1L, -7.107906849659093345062145442726115449315e2L),
728d7b43
JM		 1806#endif
1807#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 1808 TEST_c_c (cacos, 0x1.fp16383L, 0x1.fp16383L, 7.853981633974483096156608458198757210493e-1L, -1.135753137836666928715489992987020363057e4L),
728d7b43
JM		 1809#endif
1810
08198877
JM		 1811 TEST_c_c (cacos, 0x1.fp-129L, 1.5L, 1.570796326794896619231321691639751442097L, -1.194763217287109304111930828519090523536L),
1812 TEST_c_c (cacos, 0x1.fp-129L, -1.5L, 1.570796326794896619231321691639751442097L, 1.194763217287109304111930828519090523536L),
1813 TEST_c_c (cacos, -0x1.fp-129L, 1.5L, 1.570796326794896619231321691639751442100L, -1.194763217287109304111930828519090523536L),
1814 TEST_c_c (cacos, -0x1.fp-129L, -1.5L, 1.570796326794896619231321691639751442100L, 1.194763217287109304111930828519090523536L),
1815 TEST_c_c (cacos, 1.5L, 0x1.fp-129L, 2.546345110742945032959687790021055102355e-39L, -9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_FLOAT),
1816 TEST_c_c (cacos, -1.5L, 0x1.fp-129L, 3.141592653589793238462643383279502884195L, -9.624236501192068949955178268487368462704e-1L),
1817 TEST_c_c (cacos, 1.5L, -0x1.fp-129L, 2.546345110742945032959687790021055102355e-39L, 9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_FLOAT),
1818 TEST_c_c (cacos, -1.5L, -0x1.fp-129L, 3.141592653589793238462643383279502884195L, 9.624236501192068949955178268487368462704e-1L),
8cf28c5e 1819#ifndef TEST_FLOAT
08198877
JM		 1820 TEST_c_c (cacos, 0x1.fp-1025L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1821 TEST_c_c (cacos, 0x1.fp-1025L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1822 TEST_c_c (cacos, -0x1.fp-1025L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1823 TEST_c_c (cacos, -0x1.fp-1025L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1824 TEST_c_c (cacos, 1.5L, 0x1.fp-1025L, 4.819934639999230680322935210539402497827e-309L, -9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
1825 TEST_c_c (cacos, -1.5L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -9.624236501192068949955178268487368462704e-1L),
1826 TEST_c_c (cacos, 1.5L, -0x1.fp-1025L, 4.819934639999230680322935210539402497827e-309L, 9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
1827 TEST_c_c (cacos, -1.5L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 9.624236501192068949955178268487368462704e-1L),
8cf28c5e
JM		 1828#endif
1829#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 1830 TEST_c_c (cacos, 0x1.fp-16385L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1831 TEST_c_c (cacos, 0x1.fp-16385L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1832 TEST_c_c (cacos, -0x1.fp-16385L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1833 TEST_c_c (cacos, -0x1.fp-16385L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1834 TEST_c_c (cacos, 1.5L, 0x1.fp-16385L, 7.282957076134209141226696333885150260319e-4933L, -9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION),
1835 TEST_c_c (cacos, -1.5L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -9.624236501192068949955178268487368462704e-1L),
1836 TEST_c_c (cacos, 1.5L, -0x1.fp-16385L, 7.282957076134209141226696333885150260319e-4933L, 9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION),
1837 TEST_c_c (cacos, -1.5L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 9.624236501192068949955178268487368462704e-1L),
1838#endif
1839
1840 TEST_c_c (cacos, 0.5L, 1.0L, 1.221357263937683325603909865564381489366L, -9.261330313501824245501244453057873152694e-1L),
1841 TEST_c_c (cacos, 0.5L, -1.0L, 1.221357263937683325603909865564381489366L, 9.261330313501824245501244453057873152694e-1L),
1842 TEST_c_c (cacos, -0.5L, 1.0L, 1.920235389652109912858733517715121394831L, -9.261330313501824245501244453057873152694e-1L),
1843 TEST_c_c (cacos, -0.5L, -1.0L, 1.920235389652109912858733517715121394831L, 9.261330313501824245501244453057873152694e-1L),
1844 TEST_c_c (cacos, 1.0L, 0.5L, 6.748888455860063801646649673121744318756e-1L, -7.328576759736452608886724437653071523305e-1L),
1845 TEST_c_c (cacos, -1.0L, 0.5L, 2.466703808003786858297978415967328452322L, -7.328576759736452608886724437653071523305e-1L),
1846 TEST_c_c (cacos, 1.0L, -0.5L, 6.748888455860063801646649673121744318756e-1L, 7.328576759736452608886724437653071523305e-1L),
1847 TEST_c_c (cacos, -1.0L, -0.5L, 2.466703808003786858297978415967328452322L, 7.328576759736452608886724437653071523305e-1L),
1848 TEST_c_c (cacos, 0.25L, 1.0L, 1.394493894017929688812643125003661339452L, -8.924633639033482359562124741744951972772e-1L),
1849 TEST_c_c (cacos, 0.25L, -1.0L, 1.394493894017929688812643125003661339452L, 8.924633639033482359562124741744951972772e-1L),
1850 TEST_c_c (cacos, -0.25L, 1.0L, 1.747098759571863549650000258275841544745L, -8.924633639033482359562124741744951972772e-1L),
1851 TEST_c_c (cacos, -0.25L, -1.0L, 1.747098759571863549650000258275841544745L, 8.924633639033482359562124741744951972772e-1L),
1852 TEST_c_c (cacos, 1.0L, 0.25L, 4.890443302710802929202843732146540079124e-1L, -5.097911466811016354623559941115413499164e-1L),
1853 TEST_c_c (cacos, -1.0L, 0.25L, 2.652548323318712945542359010064848876285L, -5.097911466811016354623559941115413499164e-1L),
1854 TEST_c_c (cacos, 1.0L, -0.25L, 4.890443302710802929202843732146540079124e-1L, 5.097911466811016354623559941115413499164e-1L),
1855 TEST_c_c (cacos, -1.0L, -0.25L, 2.652548323318712945542359010064848876285L, 5.097911466811016354623559941115413499164e-1L),
1856 TEST_c_c (cacos, 0x1.fp-10L, 1.0L, 1.569458417435338878318763342108699202986L, -8.813742198809567991336704287826445879025e-1L),
1857 TEST_c_c (cacos, 0x1.fp-10L, -1.0L, 1.569458417435338878318763342108699202986L, 8.813742198809567991336704287826445879025e-1L),
1858 TEST_c_c (cacos, -0x1.fp-10L, 1.0L, 1.572134236154454360143880041170803681211L, -8.813742198809567991336704287826445879025e-1L),
1859 TEST_c_c (cacos, -0x1.fp-10L, -1.0L, 1.572134236154454360143880041170803681211L, 8.813742198809567991336704287826445879025e-1L),
1860 TEST_c_c (cacos, 1.0L, 0x1.fp-10L, 4.349129763101882771258049954181971959031e-2L, -4.350501469856803800217957402220976497152e-2L),
1861 TEST_c_c (cacos, -1.0L, 0x1.fp-10L, 3.098101355958774410750062883737683164607L, -4.350501469856803800217957402220976497152e-2L),
1862 TEST_c_c (cacos, 1.0L, -0x1.fp-10L, 4.349129763101882771258049954181971959031e-2L, 4.350501469856803800217957402220976497152e-2L),
1863 TEST_c_c (cacos, -1.0L, -0x1.fp-10L, 3.098101355958774410750062883737683164607L, 4.350501469856803800217957402220976497152e-2L),
1864 TEST_c_c (cacos, 0x1.fp-30L, 1.0L, 1.570796325518966635014803151387033957091L, -8.813735870195430258081932989769495326854e-1L),
1865 TEST_c_c (cacos, 0x1.fp-30L, -1.0L, 1.570796325518966635014803151387033957091L, 8.813735870195430258081932989769495326854e-1L),
1866 TEST_c_c (cacos, -0x1.fp-30L, 1.0L, 1.570796328070826603447840231892468927106L, -8.813735870195430258081932989769495326854e-1L),
1867 TEST_c_c (cacos, -0x1.fp-30L, -1.0L, 1.570796328070826603447840231892468927106L, 8.813735870195430258081932989769495326854e-1L),
1868 TEST_c_c (cacos, 1.0L, 0x1.fp-30L, 4.247867097467650115899790787875186617316e-5L, -4.247867098745151888768727039216644758847e-5L),
1869 TEST_c_c (cacos, -1.0L, 0x1.fp-30L, 3.141550174918818561961484385371624132331L, -4.247867098745151888768727039216644758847e-5L),
1870 TEST_c_c (cacos, 1.0L, -0x1.fp-30L, 4.247867097467650115899790787875186617316e-5L, 4.247867098745151888768727039216644758847e-5L),
1871 TEST_c_c (cacos, -1.0L, -0x1.fp-30L, 3.141550174918818561961484385371624132331L, 4.247867098745151888768727039216644758847e-5L),
1872 TEST_c_c (cacos, 0x1.fp-100L, 1.0L, 1.570796326794896619231321691638670687364L, -8.813735870195430252326093249797923090282e-1L),
1873 TEST_c_c (cacos, 0x1.fp-100L, -1.0L, 1.570796326794896619231321691638670687364L, 8.813735870195430252326093249797923090282e-1L),
1874 TEST_c_c (cacos, -0x1.fp-100L, 1.0L, 1.570796326794896619231321691640832196834L, -8.813735870195430252326093249797923090282e-1L),
1875 TEST_c_c (cacos, -0x1.fp-100L, -1.0L, 1.570796326794896619231321691640832196834L, 8.813735870195430252326093249797923090282e-1L),
1876 TEST_c_c (cacos, 1.0L, 0x1.fp-100L, 1.236292038260260888664514866456887257525e-15L, -1.236292038260260888664514866457202186027e-15L),
1877 TEST_c_c (cacos, -1.0L, 0x1.fp-100L, 3.141592653589792002170605123018614219682L, -1.236292038260260888664514866457202186027e-15L),
1878 TEST_c_c (cacos, 1.0L, -0x1.fp-100L, 1.236292038260260888664514866456887257525e-15L, 1.236292038260260888664514866457202186027e-15L),
1879 TEST_c_c (cacos, -1.0L, -0x1.fp-100L, 3.141592653589792002170605123018614219682L, 1.236292038260260888664514866457202186027e-15L),
1880 TEST_c_c (cacos, 0x1.fp-129L, 1.0L, 1.570796326794896619231321691639751442097L, -8.813735870195430252326093249797923090282e-1L),
1881 TEST_c_c (cacos, 0x1.fp-129L, -1.0L, 1.570796326794896619231321691639751442097L, 8.813735870195430252326093249797923090282e-1L),
1882 TEST_c_c (cacos, -0x1.fp-129L, 1.0L, 1.570796326794896619231321691639751442101L, -8.813735870195430252326093249797923090282e-1L),
1883 TEST_c_c (cacos, -0x1.fp-129L, -1.0L, 1.570796326794896619231321691639751442101L, 8.813735870195430252326093249797923090282e-1L),
1884 TEST_c_c (cacos, 1.0L, 0x1.fp-129L, 5.335635276982233498398987585285818977930e-20L, -5.335635276982233498398987585285818977933e-20L),
1885 TEST_c_c (cacos, -1.0L, 0x1.fp-129L, 3.141592653589793238409287030509680549213L, -5.335635276982233498398987585285818977933e-20L),
1886 TEST_c_c (cacos, 1.0L, -0x1.fp-129L, 5.335635276982233498398987585285818977930e-20L, 5.335635276982233498398987585285818977933e-20L),
1887 TEST_c_c (cacos, -1.0L, -0x1.fp-129L, 3.141592653589793238409287030509680549213L, 5.335635276982233498398987585285818977933e-20L),
0a1b2ae6 1888#ifndef TEST_FLOAT
08198877
JM		 1889 TEST_c_c (cacos, 0x1.fp-1000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1890 TEST_c_c (cacos, 0x1.fp-1000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1891 TEST_c_c (cacos, -0x1.fp-1000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1892 TEST_c_c (cacos, -0x1.fp-1000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1893 TEST_c_c (cacos, 1.0L, 0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, -4.252291453851660175550490409247739011867e-151L),
1894 TEST_c_c (cacos, -1.0L, 0x1.fp-1000L, 3.141592653589793238462643383279502884197L, -4.252291453851660175550490409247739011867e-151L),
1895 TEST_c_c (cacos, 1.0L, -0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, 4.252291453851660175550490409247739011867e-151L),
1896 TEST_c_c (cacos, -1.0L, -0x1.fp-1000L, 3.141592653589793238462643383279502884197L, 4.252291453851660175550490409247739011867e-151L),
1897 TEST_c_c (cacos, 0x1.fp-1025L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1898 TEST_c_c (cacos, 0x1.fp-1025L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1899 TEST_c_c (cacos, -0x1.fp-1025L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1900 TEST_c_c (cacos, -0x1.fp-1025L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1901 TEST_c_c (cacos, 1.0L, 0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, -7.340879205566679497036857179189356754017e-155L),
1902 TEST_c_c (cacos, -1.0L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -7.340879205566679497036857179189356754017e-155L),
1903 TEST_c_c (cacos, 1.0L, -0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, 7.340879205566679497036857179189356754017e-155L),
1904 TEST_c_c (cacos, -1.0L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 7.340879205566679497036857179189356754017e-155L),
0a1b2ae6
JM		 1905#endif
1906#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 1907 TEST_c_c (cacos, 0x1.fp-10000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1908 TEST_c_c (cacos, 0x1.fp-10000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1909 TEST_c_c (cacos, -0x1.fp-10000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1910 TEST_c_c (cacos, -0x1.fp-10000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1911 TEST_c_c (cacos, 1.0L, 0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, -9.854680208706673586644342922051388714633e-1506L),
1912 TEST_c_c (cacos, -1.0L, 0x1.fp-10000L, 3.141592653589793238462643383279502884197L, -9.854680208706673586644342922051388714633e-1506L),
1913 TEST_c_c (cacos, 1.0L, -0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, 9.854680208706673586644342922051388714633e-1506L),
1914 TEST_c_c (cacos, -1.0L, -0x1.fp-10000L, 3.141592653589793238462643383279502884197L, 9.854680208706673586644342922051388714633e-1506L),
1915 TEST_c_c (cacos, 0x1.fp-16385L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1916 TEST_c_c (cacos, 0x1.fp-16385L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1917 TEST_c_c (cacos, -0x1.fp-16385L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1918 TEST_c_c (cacos, -0x1.fp-16385L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1919 TEST_c_c (cacos, 1.0L, 0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, -9.023632056840860275214893047597614177639e-2467L),
1920 TEST_c_c (cacos, -1.0L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -9.023632056840860275214893047597614177639e-2467L),
1921 TEST_c_c (cacos, 1.0L, -0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, 9.023632056840860275214893047597614177639e-2467L),
1922 TEST_c_c (cacos, -1.0L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 9.023632056840860275214893047597614177639e-2467L),
1923#endif
1924
1925 TEST_c_c (cacos, 0x1p-23L, 0x1.000002p0L, 1.570796242501204621739026081991856762292L, -8.813736713132400470205730751186547909968e-1L),
1926 TEST_c_c (cacos, 0x1p-23L, -0x1.000002p0L, 1.570796242501204621739026081991856762292L, 8.813736713132400470205730751186547909968e-1L),
1927 TEST_c_c (cacos, -0x1p-23L, 0x1.000002p0L, 1.570796411088588616723617301287646121905L, -8.813736713132400470205730751186547909968e-1L),
1928 TEST_c_c (cacos, -0x1p-23L, -0x1.000002p0L, 1.570796411088588616723617301287646121905L, 8.813736713132400470205730751186547909968e-1L),
1929 TEST_c_c (cacos, 0x1.000002p0L, 0x1p-23L, 2.222118384408546368406374049167636760903e-4L, -5.364668491573609633134147164031476452679e-4L),
1930 TEST_c_c (cacos, -0x1.000002p0L, 0x1p-23L, 3.141370441751352383825802745874586120521L, -5.364668491573609633134147164031476452679e-4L),
1931 TEST_c_c (cacos, 0x1.000002p0L, -0x1p-23L, 2.222118384408546368406374049167636760903e-4L, 5.364668491573609633134147164031476452679e-4L),
1932 TEST_c_c (cacos, -0x1.000002p0L, -0x1p-23L, 3.141370441751352383825802745874586120521L, 5.364668491573609633134147164031476452679e-4L),
1933 TEST_c_c (cacos, 0x1.fp-129L, 0x1.000002p0L, 1.570796326794896619231321691639751442097L, -8.813736713132375348727889167749389235161e-1L),
1934 TEST_c_c (cacos, 0x1.fp-129L, -0x1.000002p0L, 1.570796326794896619231321691639751442097L, 8.813736713132375348727889167749389235161e-1L),
1935 TEST_c_c (cacos, -0x1.fp-129L, 0x1.000002p0L, 1.570796326794896619231321691639751442101L, -8.813736713132375348727889167749389235161e-1L),
1936 TEST_c_c (cacos, -0x1.fp-129L, -0x1.000002p0L, 1.570796326794896619231321691639751442101L, 8.813736713132375348727889167749389235161e-1L),
1937 TEST_c_c (cacos, 0x1.000002p0L, 0x1.fp-129L, 5.830451806317544230969669308596361881467e-36L, -4.882812451493617206486388134172712975070e-4L),
1938 TEST_c_c (cacos, -0x1.000002p0L, 0x1.fp-129L, 3.141592653589793238462643383279502878367L, -4.882812451493617206486388134172712975070e-4L),
1939 TEST_c_c (cacos, 0x1.000002p0L, -0x1.fp-129L, 5.830451806317544230969669308596361881467e-36L, 4.882812451493617206486388134172712975070e-4L),
1940 TEST_c_c (cacos, -0x1.000002p0L, -0x1.fp-129L, 3.141592653589793238462643383279502878367L, 4.882812451493617206486388134172712975070e-4L),
1941 TEST_c_c (cacos, 0.0L, 0x1.000002p0L, 1.570796326794896619231321691639751442099L, -8.813736713132375348727889167749389235161e-1L),
1942 TEST_c_c (cacos, 0.0L, -0x1.000002p0L, 1.570796326794896619231321691639751442099L, 8.813736713132375348727889167749389235161e-1L),
1943 TEST_c_c (cacos, -0.0L, 0x1.000002p0L, 1.570796326794896619231321691639751442099L, -8.813736713132375348727889167749389235161e-1L),
1944 TEST_c_c (cacos, -0.0L, -0x1.000002p0L, 1.570796326794896619231321691639751442099L, 8.813736713132375348727889167749389235161e-1L),
1945 TEST_c_c (cacos, 0x1.000002p0L, 0.0L, 0.0L, -4.882812451493617206486388134172712975070e-4L),
1946 TEST_c_c (cacos, -0x1.000002p0L, 0.0L, 3.141592653589793238462643383279502884197L, -4.882812451493617206486388134172712975070e-4L),
1947 TEST_c_c (cacos, 0x1.000002p0L, -0.0L, 0.0L, 4.882812451493617206486388134172712975070e-4L),
1948 TEST_c_c (cacos, -0x1.000002p0L, -0.0L, 3.141592653589793238462643383279502884197L, 4.882812451493617206486388134172712975070e-4L),
3a7182a1 1949#ifndef TEST_FLOAT
08198877
JM		 1950 TEST_c_c (cacos, 0x1p-52L, 0x1.0000000000001p0L, 1.570796326794896462222075823262262934288L, -8.813735870195431822418551933572982483664e-1L),
1951 TEST_c_c (cacos, 0x1p-52L, -0x1.0000000000001p0L, 1.570796326794896462222075823262262934288L, 8.813735870195431822418551933572982483664e-1L),
1952 TEST_c_c (cacos, -0x1p-52L, 0x1.0000000000001p0L, 1.570796326794896776240567560017239949909L, -8.813735870195431822418551933572982483664e-1L),
1953 TEST_c_c (cacos, -0x1p-52L, -0x1.0000000000001p0L, 1.570796326794896776240567560017239949909L, 8.813735870195431822418551933572982483664e-1L),
1954 TEST_c_c (cacos, 0x1.0000000000001p0L, 0x1p-52L, 9.590301705980041385828904092662391018164e-9L, -2.315303644582684770975188768022139415020e-8L),
1955 TEST_c_c (cacos, -0x1.0000000000001p0L, 0x1p-52L, 3.141592643999491532482601997450598791535L, -2.315303644582684770975188768022139415020e-8L),
1956 TEST_c_c (cacos, 0x1.0000000000001p0L, -0x1p-52L, 9.590301705980041385828904092662391018164e-9L, 2.315303644582684770975188768022139415020e-8L),
1957 TEST_c_c (cacos, -0x1.0000000000001p0L, -0x1p-52L, 3.141592643999491532482601997450598791535L, 2.315303644582684770975188768022139415020e-8L),
1958 TEST_c_c (cacos, 0x1.fp-1025L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
1959 TEST_c_c (cacos, 0x1.fp-1025L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
1960 TEST_c_c (cacos, -0x1.fp-1025L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
1961 TEST_c_c (cacos, -0x1.fp-1025L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
1962 TEST_c_c (cacos, 0x1.0000000000001p0L, 0x1.fp-1025L, 2.557178503953494342609835913586108008322e-301L, -2.107342425544701550354780375182800088393e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
1963 TEST_c_c (cacos, -0x1.0000000000001p0L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -2.107342425544701550354780375182800088393e-8L),
1964 TEST_c_c (cacos, 0x1.0000000000001p0L, -0x1.fp-1025L, 2.557178503953494342609835913586108008322e-301L, 2.107342425544701550354780375182800088393e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
1965 TEST_c_c (cacos, -0x1.0000000000001p0L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 2.107342425544701550354780375182800088393e-8L),
1966 TEST_c_c (cacos, 0.0L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
1967 TEST_c_c (cacos, 0.0L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
1968 TEST_c_c (cacos, -0.0L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
1969 TEST_c_c (cacos, -0.0L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
1970 TEST_c_c (cacos, 0x1.0000000000001p0L, 0.0L, 0.0L, -2.107342425544701550354780375182800088393e-8L),
1971 TEST_c_c (cacos, -0x1.0000000000001p0L, 0.0L, 3.141592653589793238462643383279502884197L, -2.107342425544701550354780375182800088393e-8L),
1972 TEST_c_c (cacos, 0x1.0000000000001p0L, -0.0L, 0.0L, 2.107342425544701550354780375182800088393e-8L),
1973 TEST_c_c (cacos, -0x1.0000000000001p0L, -0.0L, 3.141592653589793238462643383279502884197L, 2.107342425544701550354780375182800088393e-8L),
3a7182a1
JM		 1974#endif
1975#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 1976 TEST_c_c (cacos, 0x1p-63L, 0x1.0000000000000002p0L, 1.570796326794896619154657020805582738031L, -8.813735870195430253092739958139610131001e-1L),
1977 TEST_c_c (cacos, 0x1p-63L, -0x1.0000000000000002p0L, 1.570796326794896619154657020805582738031L, 8.813735870195430253092739958139610131001e-1L),
1978 TEST_c_c (cacos, -0x1p-63L, 0x1.0000000000000002p0L, 1.570796326794896619307986362473920146166L, -8.813735870195430253092739958139610131001e-1L),
1979 TEST_c_c (cacos, -0x1p-63L, -0x1.0000000000000002p0L, 1.570796326794896619307986362473920146166L, 8.813735870195430253092739958139610131001e-1L),
1980 TEST_c_c (cacos, 0x1.0000000000000002p0L, 0x1p-63L, 2.119177303101063432592523199680782317447e-10L, -5.116146586219826555037807251857670783420e-10L),
1981 TEST_c_c (cacos, -0x1.0000000000000002p0L, 0x1p-63L, 3.141592653377875508152537040020250564229L, -5.116146586219826555037807251857670783420e-10L),
1982 TEST_c_c (cacos, 0x1.0000000000000002p0L, -0x1p-63L, 2.119177303101063432592523199680782317447e-10L, 5.116146586219826555037807251857670783420e-10L),
1983 TEST_c_c (cacos, -0x1.0000000000000002p0L, -0x1p-63L, 3.141592653377875508152537040020250564229L, 5.116146586219826555037807251857670783420e-10L),
3a7182a1 1984# if LDBL_MIN_EXP <= -16381
08198877
JM		 1985 TEST_c_c (cacos, 0x1.fp-16385L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
1986 TEST_c_c (cacos, 0x1.fp-16385L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
1987 TEST_c_c (cacos, -0x1.fp-16385L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
1988 TEST_c_c (cacos, -0x1.fp-16385L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
1989 TEST_c_c (cacos, 0x1.0000000000000002p0L, 0x1.fp-16385L, 1.748608650034385653922359120438227480943e-4923L, -4.656612873077392578082927418388212703712e-10L),
1990 TEST_c_c (cacos, -0x1.0000000000000002p0L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -4.656612873077392578082927418388212703712e-10L),
1991 TEST_c_c (cacos, 0x1.0000000000000002p0L, -0x1.fp-16385L, 1.748608650034385653922359120438227480943e-4923L, 4.656612873077392578082927418388212703712e-10L),
1992 TEST_c_c (cacos, -0x1.0000000000000002p0L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 4.656612873077392578082927418388212703712e-10L),
3a7182a1 1993# endif
08198877
JM		 1994 TEST_c_c (cacos, 0.0L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
1995 TEST_c_c (cacos, 0.0L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
1996 TEST_c_c (cacos, -0.0L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
1997 TEST_c_c (cacos, -0.0L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
1998 TEST_c_c (cacos, 0x1.0000000000000002p0L, 0.0L, 0.0L, -4.656612873077392578082927418388212703712e-10L),
1999 TEST_c_c (cacos, -0x1.0000000000000002p0L, 0.0L, 3.141592653589793238462643383279502884197L, -4.656612873077392578082927418388212703712e-10L),
2000 TEST_c_c (cacos, 0x1.0000000000000002p0L, -0.0L, 0.0L, 4.656612873077392578082927418388212703712e-10L),
2001 TEST_c_c (cacos, -0x1.0000000000000002p0L, -0.0L, 3.141592653589793238462643383279502884197L, 4.656612873077392578082927418388212703712e-10L),
3a7182a1
JM		 2002#endif
2003#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 2004 TEST_c_c (cacos, 0x1p-106L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639742726335L, -8.813735870195430252326093249798097405561e-1L),
2005 TEST_c_c (cacos, 0x1p-106L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639742726335L, 8.813735870195430252326093249798097405561e-1L),
2006 TEST_c_c (cacos, -0x1p-106L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639760157863L, -8.813735870195430252326093249798097405561e-1L),
2007 TEST_c_c (cacos, -0x1p-106L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639760157863L, 8.813735870195430252326093249798097405561e-1L),
2008 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, 0x1p-106L, 5.394221422390606848017034778914096659726e-17L, -2.285028863093221674154232933662774454211e-16L),
2009 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, 0x1p-106L, 3.141592653589793184520429159373434404027L, -2.285028863093221674154232933662774454211e-16L),
2010 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, -0x1p-106L, 5.394221422390606848017034778914096659726e-17L, 2.285028863093221674154232933662774454211e-16L),
2011 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, -0x1p-106L, 3.141592653589793184520429159373434404027L, 2.285028863093221674154232933662774454211e-16L),
2012 TEST_c_c (cacos, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2013 TEST_c_c (cacos, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2014 TEST_c_c (cacos, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2015 TEST_c_c (cacos, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2016 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 2.426922623448365473354662093431821897807e-293L, -2.220446049250313080847263336181636063482e-16L),
2017 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -2.220446049250313080847263336181636063482e-16L),
2018 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 2.426922623448365473354662093431821897807e-293L, 2.220446049250313080847263336181636063482e-16L),
2019 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 2.220446049250313080847263336181636063482e-16L),
2020 TEST_c_c (cacos, 0.0L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2021 TEST_c_c (cacos, 0.0L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2022 TEST_c_c (cacos, -0.0L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2023 TEST_c_c (cacos, -0.0L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2024 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, 0.0L, 0.0L, -2.220446049250313080847263336181636063482e-16L),
2025 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, 0.0L, 3.141592653589793238462643383279502884197L, -2.220446049250313080847263336181636063482e-16L),
2026 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, -0.0L, 0.0L, 2.220446049250313080847263336181636063482e-16L),
2027 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, -0.0L, 3.141592653589793238462643383279502884197L, 2.220446049250313080847263336181636063482e-16L),
3a7182a1
JM		 2028#endif
2029#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 2030 TEST_c_c (cacos, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751374007L, -8.813735870195430252326093249797924452120e-1L),
2031 TEST_c_c (cacos, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751374007L, 8.813735870195430252326093249797924452120e-1L),
2032 TEST_c_c (cacos, -0x1p-113L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751510190L, -8.813735870195430252326093249797924452120e-1L),
2033 TEST_c_c (cacos, -0x1p-113L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751510190L, 8.813735870195430252326093249797924452120e-1L),
2034 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 4.767863183742677481693563511435642755521e-18L, -2.019699255375255198156433710951064632386e-17L),
2035 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, 0x1p-113L, 3.141592653589793233694780199536825402504L, -2.019699255375255198156433710951064632386e-17L),
2036 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 4.767863183742677481693563511435642755521e-18L, 2.019699255375255198156433710951064632386e-17L),
2037 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, -0x1p-113L, 3.141592653589793233694780199536825402504L, 2.019699255375255198156433710951064632386e-17L),
2038 TEST_c_c (cacos, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2039 TEST_c_c (cacos, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2040 TEST_c_c (cacos, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2041 TEST_c_c (cacos, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2042 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 4.148847925325683229178506116378864361396e-4916L, -1.962615573354718824241727964954454332780e-17L),
2043 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -1.962615573354718824241727964954454332780e-17L),
2044 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 4.148847925325683229178506116378864361396e-4916L, 1.962615573354718824241727964954454332780e-17L),
2045 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 1.962615573354718824241727964954454332780e-17L),
2046 TEST_c_c (cacos, 0.0L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2047 TEST_c_c (cacos, 0.0L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2048 TEST_c_c (cacos, -0.0L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2049 TEST_c_c (cacos, -0.0L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2050 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, 0.0L, 0.0L, -1.962615573354718824241727964954454332780e-17L),
2051 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, 0.0L, 3.141592653589793238462643383279502884197L, -1.962615573354718824241727964954454332780e-17L),
2052 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, -0.0L, 0.0L, 1.962615573354718824241727964954454332780e-17L),
2053 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, -0.0L, 3.141592653589793238462643383279502884197L, 1.962615573354718824241727964954454332780e-17L),
2054#endif
2055
2056 TEST_c_c (cacos, 0x1p-23L, 0x0.ffffffp0L, 1.570796242501197085295336701632142060969L, -8.813735448726963984495965873956465777250e-1L),
2057 TEST_c_c (cacos, 0x1p-23L, -0x0.ffffffp0L, 1.570796242501197085295336701632142060969L, 8.813735448726963984495965873956465777250e-1L),
2058 TEST_c_c (cacos, -0x1p-23L, 0x0.ffffffp0L, 1.570796411088596153167306681647360823228L, -8.813735448726963984495965873956465777250e-1L),
2059 TEST_c_c (cacos, -0x1p-23L, -0x0.ffffffp0L, 1.570796411088596153167306681647360823228L, 8.813735448726963984495965873956465777250e-1L),
2060 TEST_c_c (cacos, 0x0.ffffffp0L, 0x1p-23L, 4.391863861910487109445187743978204002614e-4L, -2.714321200917194650737217746780928423385e-4L),
2061 TEST_c_c (cacos, -0x0.ffffffp0L, 0x1p-23L, 3.141153467203602189751698864505105063797L, -2.714321200917194650737217746780928423385e-4L),
2062 TEST_c_c (cacos, 0x0.ffffffp0L, -0x1p-23L, 4.391863861910487109445187743978204002614e-4L, 2.714321200917194650737217746780928423385e-4L),
2063 TEST_c_c (cacos, -0x0.ffffffp0L, -0x1p-23L, 3.141153467203602189751698864505105063797L, 2.714321200917194650737217746780928423385e-4L),
2064 TEST_c_c (cacos, 0x1.fp-129L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442097L, -8.813735448726938863015878255140556727969e-1L),
2065 TEST_c_c (cacos, 0x1.fp-129L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442097L, 8.813735448726938863015878255140556727969e-1L),
2066 TEST_c_c (cacos, -0x1.fp-129L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442101L, -8.813735448726938863015878255140556727969e-1L),
2067 TEST_c_c (cacos, -0x1.fp-129L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442101L, 8.813735448726938863015878255140556727969e-1L),
2068 TEST_c_c (cacos, 0x0.ffffffp0L, 0x1.fp-129L, 3.452669847162035876032494826387364972849e-4L, -8.245504387859737323891843603996428534945e-36L),
2069 TEST_c_c (cacos, -0x0.ffffffp0L, 0x1.fp-129L, 3.141247386605077034875040133796864147700L, -8.245504387859737323891843603996428534945e-36L),
2070 TEST_c_c (cacos, 0x0.ffffffp0L, -0x1.fp-129L, 3.452669847162035876032494826387364972849e-4L, 8.245504387859737323891843603996428534945e-36L),
2071 TEST_c_c (cacos, -0x0.ffffffp0L, -0x1.fp-129L, 3.141247386605077034875040133796864147700L, 8.245504387859737323891843603996428534945e-36L),
2072 TEST_c_c (cacos, 0.0L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735448726938863015878255140556727969e-1L),
2073 TEST_c_c (cacos, 0.0L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735448726938863015878255140556727969e-1L),
2074 TEST_c_c (cacos, -0.0L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735448726938863015878255140556727969e-1L),
2075 TEST_c_c (cacos, -0.0L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735448726938863015878255140556727969e-1L),
2076 TEST_c_c (cacos, 0x0.ffffffp0L, 0.0L, 3.452669847162035876032494826387364972849e-4L, -0.0L),
2077 TEST_c_c (cacos, -0x0.ffffffp0L, 0.0L, 3.141247386605077034875040133796864147700L, -0.0L),
2078 TEST_c_c (cacos, 0x0.ffffffp0L, -0.0L, 3.452669847162035876032494826387364972849e-4L, 0.0L),
2079 TEST_c_c (cacos, -0x0.ffffffp0L, -0.0L, 3.141247386605077034875040133796864147700L, 0.0L),
2080 TEST_c_c (cacos, 0x1p-23L, 0.5L, 1.570796220170866625230343643673321150378L, -4.812118250596059896127318386463676808798e-1L),
2081 TEST_c_c (cacos, 0x1p-23L, -0.5L, 1.570796220170866625230343643673321150378L, 4.812118250596059896127318386463676808798e-1L),
2082 TEST_c_c (cacos, -0x1p-23L, 0.5L, 1.570796433418926613232299739606181733819L, -4.812118250596059896127318386463676808798e-1L),
2083 TEST_c_c (cacos, -0x1p-23L, -0.5L, 1.570796433418926613232299739606181733819L, 4.812118250596059896127318386463676808798e-1L),
2084 TEST_c_c (cacos, 0.5L, 0x1p-23L, 1.047197551196603215914744618665204532273L, -1.376510308240943236356088341381173571841e-7L),
2085 TEST_c_c (cacos, -0.5L, 0x1p-23L, 2.094395102393190022547898764614298351924L, -1.376510308240943236356088341381173571841e-7L),
2086 TEST_c_c (cacos, 0.5L, -0x1p-23L, 1.047197551196603215914744618665204532273L, 1.376510308240943236356088341381173571841e-7L),
2087 TEST_c_c (cacos, -0.5L, -0x1p-23L, 2.094395102393190022547898764614298351924L, 1.376510308240943236356088341381173571841e-7L),
2088 TEST_c_c (cacos, 0x1.fp-129L, 0.5L, 1.570796326794896619231321691639751442096L, -4.812118250596034474977589134243684231352e-1L),
2089 TEST_c_c (cacos, 0x1.fp-129L, -0.5L, 1.570796326794896619231321691639751442096L, 4.812118250596034474977589134243684231352e-1L),
2090 TEST_c_c (cacos, -0x1.fp-129L, 0.5L, 1.570796326794896619231321691639751442101L, -4.812118250596034474977589134243684231352e-1L),
2091 TEST_c_c (cacos, -0x1.fp-129L, -0.5L, 1.570796326794896619231321691639751442101L, 4.812118250596034474977589134243684231352e-1L),
2092 TEST_c_c (cacos, 0.5L, 0x1.fp-129L, 1.047197551196597746154214461093167628066L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2093 TEST_c_c (cacos, -0.5L, 0x1.fp-129L, 2.094395102393195492308428922186335256131L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2094 TEST_c_c (cacos, 0.5L, -0x1.fp-129L, 1.047197551196597746154214461093167628066L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2095 TEST_c_c (cacos, -0.5L, -0x1.fp-129L, 2.094395102393195492308428922186335256131L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2096 TEST_c_c (cacos, 0x1p-23L, 0x1p-23L, 1.570796207585607068450636380271254316214L, -1.192092895507818146886315028596704749235e-7L),
2097 TEST_c_c (cacos, 0x1p-23L, -0x1p-23L, 1.570796207585607068450636380271254316214L, 1.192092895507818146886315028596704749235e-7L),
2098 TEST_c_c (cacos, -0x1p-23L, 0x1p-23L, 1.570796446004186170012007003008248567984L, -1.192092895507818146886315028596704749235e-7L),
2099 TEST_c_c (cacos, -0x1p-23L, -0x1p-23L, 1.570796446004186170012007003008248567984L, 1.192092895507818146886315028596704749235e-7L),
2100 TEST_c_c (cacos, 0x1.fp-129L, 0x1p-23L, 1.570796326794896619231321691639751442096L, -1.192092895507809676556842485683592032154e-7L),
2101 TEST_c_c (cacos, 0x1.fp-129L, -0x1p-23L, 1.570796326794896619231321691639751442096L, 1.192092895507809676556842485683592032154e-7L),
2102 TEST_c_c (cacos, -0x1.fp-129L, 0x1p-23L, 1.570796326794896619231321691639751442101L, -1.192092895507809676556842485683592032154e-7L),
2103 TEST_c_c (cacos, -0x1.fp-129L, -0x1p-23L, 1.570796326794896619231321691639751442101L, 1.192092895507809676556842485683592032154e-7L),
2104 TEST_c_c (cacos, 0x1p-23L, 0x1.fp-129L, 1.570796207585607068449789347324000006847L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2105 TEST_c_c (cacos, -0x1p-23L, 0x1.fp-129L, 1.570796446004186170012854035955502877351L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2106 TEST_c_c (cacos, 0x1p-23L, -0x1.fp-129L, 1.570796207585607068449789347324000006847L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2107 TEST_c_c (cacos, -0x1p-23L, -0x1.fp-129L, 1.570796446004186170012854035955502877351L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2108 TEST_c_c (cacos, 0.0L, 0x1p-23L, 1.570796326794896619231321691639751442099L, -1.192092895507809676556842485683592032154e-7L),
2109 TEST_c_c (cacos, 0.0L, -0x1p-23L, 1.570796326794896619231321691639751442099L, 1.192092895507809676556842485683592032154e-7L),
2110 TEST_c_c (cacos, -0.0L, 0x1p-23L, 1.570796326794896619231321691639751442099L, -1.192092895507809676556842485683592032154e-7L),
2111 TEST_c_c (cacos, -0.0L, -0x1p-23L, 1.570796326794896619231321691639751442099L, 1.192092895507809676556842485683592032154e-7L),
2112 TEST_c_c (cacos, 0x1p-23L, 0.0L, 1.570796207585607068449789347324000006847L, -0.0L),
2113 TEST_c_c (cacos, -0x1p-23L, 0.0L, 1.570796446004186170012854035955502877351L, -0.0L),
2114 TEST_c_c (cacos, 0x1p-23L, -0.0L, 1.570796207585607068449789347324000006847L, 0.0L),
2115 TEST_c_c (cacos, -0x1p-23L, -0.0L, 1.570796446004186170012854035955502877351L, 0.0L),
2116 TEST_c_c (cacos, 0x1.fp-129L, 0x1.fp-129L, 1.570796326794896619231321691639751442096L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2117 TEST_c_c (cacos, 0x1.fp-129L, -0x1.fp-129L, 1.570796326794896619231321691639751442096L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2118 TEST_c_c (cacos, -0x1.fp-129L, 0x1.fp-129L, 1.570796326794896619231321691639751442101L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2119 TEST_c_c (cacos, -0x1.fp-129L, -0x1.fp-129L, 1.570796326794896619231321691639751442101L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
ccc8cadf 2120#ifndef TEST_FLOAT
08198877
JM		 2121 TEST_c_c (cacos, 0x1p-52L, 0x0.fffffffffffff8p0L, 1.570796326794896462222075823262236786996L, -8.813735870195429467279863907910458761820e-1L),
2122 TEST_c_c (cacos, 0x1p-52L, -0x0.fffffffffffff8p0L, 1.570796326794896462222075823262236786996L, 8.813735870195429467279863907910458761820e-1L),
2123 TEST_c_c (cacos, -0x1p-52L, 0x0.fffffffffffff8p0L, 1.570796326794896776240567560017266097201L, -8.813735870195429467279863907910458761820e-1L),
2124 TEST_c_c (cacos, -0x1p-52L, -0x0.fffffffffffff8p0L, 1.570796326794896776240567560017266097201L, 8.813735870195429467279863907910458761820e-1L),
2125 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, 0x1p-52L, 1.895456983915074112227925127005564372844e-8L, -1.171456840272878582596796205397918831268e-8L),
2126 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, 0x1p-52L, 3.141592634635223399311902261000251614142L, -1.171456840272878582596796205397918831268e-8L),
2127 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, -0x1p-52L, 1.895456983915074112227925127005564372844e-8L, 1.171456840272878582596796205397918831268e-8L),
2128 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, -0x1p-52L, 3.141592634635223399311902261000251614142L, 1.171456840272878582596796205397918831268e-8L),
2129 TEST_c_c (cacos, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2130 TEST_c_c (cacos, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2131 TEST_c_c (cacos, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2132 TEST_c_c (cacos, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2133 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 1.490116119384765638786343542550461592240e-8L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2134 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, 3.141592638688632044614986995416067458693L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2135 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 1.490116119384765638786343542550461592240e-8L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2136 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, 3.141592638688632044614986995416067458693L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2137 TEST_c_c (cacos, 0.0L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2138 TEST_c_c (cacos, 0.0L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2139 TEST_c_c (cacos, -0.0L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2140 TEST_c_c (cacos, -0.0L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2141 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, 0.0L, 1.490116119384765638786343542550461592240e-8L, -0.0L),
2142 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, 0.0L, 3.141592638688632044614986995416067458693L, -0.0L),
2143 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, -0.0L, 1.490116119384765638786343542550461592240e-8L, 0.0L),
2144 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, -0.0L, 3.141592638688632044614986995416067458693L, 0.0L),
2145#endif
2146 TEST_c_c (cacos, 0x1p-52L, 0.5L, 1.570796326794896420628589431857911675917L, -4.812118250596034474977589134243772428682e-1L),
2147 TEST_c_c (cacos, 0x1p-52L, -0.5L, 1.570796326794896420628589431857911675917L, 4.812118250596034474977589134243772428682e-1L),
2148 TEST_c_c (cacos, -0x1p-52L, 0.5L, 1.570796326794896817834053951421591208280L, -4.812118250596034474977589134243772428682e-1L),
2149 TEST_c_c (cacos, -0x1p-52L, -0.5L, 1.570796326794896817834053951421591208280L, 4.812118250596034474977589134243772428682e-1L),
2150 TEST_c_c (cacos, 0.5L, 0x1p-52L, 1.047197551196597746154214461093186605110L, -2.563950248511418570403591756798643804971e-16L),
2151 TEST_c_c (cacos, -0.5L, 0x1p-52L, 2.094395102393195492308428922186316279087L, -2.563950248511418570403591756798643804971e-16L),
2152 TEST_c_c (cacos, 0.5L, -0x1p-52L, 1.047197551196597746154214461093186605110L, 2.563950248511418570403591756798643804971e-16L),
2153 TEST_c_c (cacos, -0.5L, -0x1p-52L, 2.094395102393195492308428922186316279087L, 2.563950248511418570403591756798643804971e-16L),
ccc8cadf 2154#ifndef TEST_FLOAT
08198877
JM		 2155 TEST_c_c (cacos, 0x1.fp-1025L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2156 TEST_c_c (cacos, 0x1.fp-1025L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2157 TEST_c_c (cacos, -0x1.fp-1025L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2158 TEST_c_c (cacos, -0x1.fp-1025L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2159 TEST_c_c (cacos, 0.5L, 0x1.fp-1025L, 1.047197551196597746154214461093167628066L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2160 TEST_c_c (cacos, -0.5L, 0x1.fp-1025L, 2.094395102393195492308428922186335256131L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2161 TEST_c_c (cacos, 0.5L, -0x1.fp-1025L, 1.047197551196597746154214461093167628066L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2162 TEST_c_c (cacos, -0.5L, -0x1.fp-1025L, 2.094395102393195492308428922186335256131L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2163#endif
2164 TEST_c_c (cacos, 0x1p-52L, 0x1p-52L, 1.570796326794896397186716766608443357372L, -2.220446049250313080847263336181677117148e-16L),
2165 TEST_c_c (cacos, 0x1p-52L, -0x1p-52L, 1.570796326794896397186716766608443357372L, 2.220446049250313080847263336181677117148e-16L),
2166 TEST_c_c (cacos, -0x1p-52L, 0x1p-52L, 1.570796326794896841275926616671059526825L, -2.220446049250313080847263336181677117148e-16L),
2167 TEST_c_c (cacos, -0x1p-52L, -0x1p-52L, 1.570796326794896841275926616671059526825L, 2.220446049250313080847263336181677117148e-16L),
ccc8cadf 2168#ifndef TEST_FLOAT
08198877
JM		 2169 TEST_c_c (cacos, 0x1.fp-1025L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2170 TEST_c_c (cacos, 0x1.fp-1025L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2171 TEST_c_c (cacos, -0x1.fp-1025L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2172 TEST_c_c (cacos, -0x1.fp-1025L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2173 TEST_c_c (cacos, 0x1p-52L, 0x1.fp-1025L, 1.570796326794896397186716766608443357372L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2174 TEST_c_c (cacos, -0x1p-52L, 0x1.fp-1025L, 1.570796326794896841275926616671059526825L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2175 TEST_c_c (cacos, 0x1p-52L, -0x1.fp-1025L, 1.570796326794896397186716766608443357372L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2176 TEST_c_c (cacos, -0x1p-52L, -0x1.fp-1025L, 1.570796326794896841275926616671059526825L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2177#endif
2178 TEST_c_c (cacos, 0.0L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2179 TEST_c_c (cacos, 0.0L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2180 TEST_c_c (cacos, -0.0L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2181 TEST_c_c (cacos, -0.0L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2182 TEST_c_c (cacos, 0x1p-52L, 0.0L, 1.570796326794896397186716766608443357372L, -0.0L),
2183 TEST_c_c (cacos, -0x1p-52L, 0.0L, 1.570796326794896841275926616671059526825L, -0.0L),
2184 TEST_c_c (cacos, 0x1p-52L, -0.0L, 1.570796326794896397186716766608443357372L, 0.0L),
2185 TEST_c_c (cacos, -0x1p-52L, -0.0L, 1.570796326794896841275926616671059526825L, 0.0L),
ccc8cadf 2186#ifndef TEST_FLOAT
08198877
JM		 2187 TEST_c_c (cacos, 0x1.fp-1025L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2188 TEST_c_c (cacos, 0x1.fp-1025L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2189 TEST_c_c (cacos, -0x1.fp-1025L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2190 TEST_c_c (cacos, -0x1.fp-1025L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
ccc8cadf
JM		 2191#endif
2192#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 2193 TEST_c_c (cacos, 0x1p-63L, 0x0.ffffffffffffffffp0L, 1.570796326794896619154657020805582738025L, -8.813735870195430251942769895627079569937e-1L),
2194 TEST_c_c (cacos, 0x1p-63L, -0x0.ffffffffffffffffp0L, 1.570796326794896619154657020805582738025L, 8.813735870195430251942769895627079569937e-1L),
2195 TEST_c_c (cacos, -0x1p-63L, 0x0.ffffffffffffffffp0L, 1.570796326794896619307986362473920146173L, -8.813735870195430251942769895627079569937e-1L),
2196 TEST_c_c (cacos, -0x1p-63L, -0x0.ffffffffffffffffp0L, 1.570796326794896619307986362473920146173L, 8.813735870195430251942769895627079569937e-1L),
2197 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, 0x1p-63L, 4.188407771167967636741951941902992986043e-10L, -2.588578361325995866221775673638805081337e-10L),
2198 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, 0x1p-63L, 3.141592653170952461345846619605307690007L, -2.588578361325995866221775673638805081337e-10L),
2199 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, -0x1p-63L, 4.188407771167967636741951941902992986043e-10L, 2.588578361325995866221775673638805081337e-10L),
2200 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, -0x1p-63L, 3.141592653170952461345846619605307690007L, 2.588578361325995866221775673638805081337e-10L),
ccc8cadf 2201# if LDBL_MIN_EXP <= -16381
08198877
JM		 2202 TEST_c_c (cacos, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2203 TEST_c_c (cacos, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2204 TEST_c_c (cacos, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2205 TEST_c_c (cacos, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2206 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 3.292722539913596233371825532007990724506e-10L, -2.472906068161537187835415298076415423459e-4923L),
2207 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 3.141592653260520984471283759942320330996L, -2.472906068161537187835415298076415423459e-4923L),
2208 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 3.292722539913596233371825532007990724506e-10L, 2.472906068161537187835415298076415423459e-4923L),
2209 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 3.141592653260520984471283759942320330996L, 2.472906068161537187835415298076415423459e-4923L),
ccc8cadf 2210# endif
08198877
JM		 2211 TEST_c_c (cacos, 0.0L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2212 TEST_c_c (cacos, 0.0L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2213 TEST_c_c (cacos, -0.0L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2214 TEST_c_c (cacos, -0.0L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2215 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, 0.0L, 3.292722539913596233371825532007990724506e-10L, -0.0L),
2216 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, 0.0L, 3.141592653260520984471283759942320330996L, -0.0L),
2217 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, -0.0L, 3.292722539913596233371825532007990724506e-10L, 0.0L),
2218 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, -0.0L, 3.141592653260520984471283759942320330996L, 0.0L),
2219#endif
2220 TEST_c_c (cacos, 0x1p-63L, 0.5L, 1.570796326794896619134347701278529840650L, -4.812118250596034474977589134243684231373e-1L),
2221 TEST_c_c (cacos, 0x1p-63L, -0.5L, 1.570796326794896619134347701278529840650L, 4.812118250596034474977589134243684231373e-1L),
2222 TEST_c_c (cacos, -0x1p-63L, 0.5L, 1.570796326794896619328295682000973043547L, -4.812118250596034474977589134243684231373e-1L),
2223 TEST_c_c (cacos, -0x1p-63L, -0.5L, 1.570796326794896619328295682000973043547L, 4.812118250596034474977589134243684231373e-1L),
2224 TEST_c_c (cacos, 0.5L, 0x1p-63L, 1.047197551196597746154214461093167628070L, -1.251928832280966098829878787499365228659e-19L),
2225 TEST_c_c (cacos, -0.5L, 0x1p-63L, 2.094395102393195492308428922186335256127L, -1.251928832280966098829878787499365228659e-19L),
2226 TEST_c_c (cacos, 0.5L, -0x1p-63L, 1.047197551196597746154214461093167628070L, 1.251928832280966098829878787499365228659e-19L),
2227 TEST_c_c (cacos, -0.5L, -0x1p-63L, 2.094395102393195492308428922186335256127L, 1.251928832280966098829878787499365228659e-19L),
ccc8cadf 2228#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2229 TEST_c_c (cacos, 0x1.fp-16385L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2230 TEST_c_c (cacos, 0x1.fp-16385L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2231 TEST_c_c (cacos, -0x1.fp-16385L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2232 TEST_c_c (cacos, -0x1.fp-16385L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2233 TEST_c_c (cacos, 0.5L, 0x1.fp-16385L, 1.047197551196597746154214461093167628066L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2234 TEST_c_c (cacos, -0.5L, 0x1.fp-16385L, 2.094395102393195492308428922186335256131L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2235 TEST_c_c (cacos, 0.5L, -0x1.fp-16385L, 1.047197551196597746154214461093167628066L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2236 TEST_c_c (cacos, -0.5L, -0x1.fp-16385L, 2.094395102393195492308428922186335256131L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2237#endif
2238 TEST_c_c (cacos, 0x1p-63L, 0x1p-63L, 1.570796326794896619122901474391200998698L, -1.084202172485504434007452800869941711430e-19L),
2239 TEST_c_c (cacos, 0x1p-63L, -0x1p-63L, 1.570796326794896619122901474391200998698L, 1.084202172485504434007452800869941711430e-19L),
2240 TEST_c_c (cacos, -0x1p-63L, 0x1p-63L, 1.570796326794896619339741908888301885499L, -1.084202172485504434007452800869941711430e-19L),
2241 TEST_c_c (cacos, -0x1p-63L, -0x1p-63L, 1.570796326794896619339741908888301885499L, 1.084202172485504434007452800869941711430e-19L),
ccc8cadf 2242#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2243 TEST_c_c (cacos, 0x1.fp-16385L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2244 TEST_c_c (cacos, 0x1.fp-16385L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2245 TEST_c_c (cacos, -0x1.fp-16385L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2246 TEST_c_c (cacos, -0x1.fp-16385L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2247 TEST_c_c (cacos, 0x1p-63L, 0x1.fp-16385L, 1.570796326794896619122901474391200998698L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2248 TEST_c_c (cacos, -0x1p-63L, 0x1.fp-16385L, 1.570796326794896619339741908888301885499L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2249 TEST_c_c (cacos, 0x1p-63L, -0x1.fp-16385L, 1.570796326794896619122901474391200998698L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2250 TEST_c_c (cacos, -0x1p-63L, -0x1.fp-16385L, 1.570796326794896619339741908888301885499L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2251#endif
2252 TEST_c_c (cacos, 0.0L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2253 TEST_c_c (cacos, 0.0L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2254 TEST_c_c (cacos, -0.0L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2255 TEST_c_c (cacos, -0.0L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2256 TEST_c_c (cacos, 0x1p-63L, 0.0L, 1.570796326794896619122901474391200998698L, -0.0L),
2257 TEST_c_c (cacos, -0x1p-63L, 0.0L, 1.570796326794896619339741908888301885499L, -0.0L),
2258 TEST_c_c (cacos, 0x1p-63L, -0.0L, 1.570796326794896619122901474391200998698L, 0.0L),
2259 TEST_c_c (cacos, -0x1p-63L, -0.0L, 1.570796326794896619339741908888301885499L, 0.0L),
ccc8cadf 2260#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2261 TEST_c_c (cacos, 0x1.fp-16385L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2262 TEST_c_c (cacos, 0x1.fp-16385L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2263 TEST_c_c (cacos, -0x1.fp-16385L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2264 TEST_c_c (cacos, -0x1.fp-16385L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf
JM		 2265#endif
2266#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 2267 TEST_c_c (cacos, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639734010571L, -8.813735870195430252326093249797835932642e-1L),
2268 TEST_c_c (cacos, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639734010571L, 8.813735870195430252326093249797835932642e-1L),
2269 TEST_c_c (cacos, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639768873627L, -8.813735870195430252326093249797835932642e-1L),
2270 TEST_c_c (cacos, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639768873627L, 8.813735870195430252326093249797835932642e-1L),
2271 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.997188458999618357060632049675702684031e-16L, -1.234330349600789959989661887846005659983e-16L),
2272 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 3.141592653589793038743797483317667178134L, -1.234330349600789959989661887846005659983e-16L),
2273 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.997188458999618357060632049675702684031e-16L, 1.234330349600789959989661887846005659983e-16L),
2274 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 3.141592653589793038743797483317667178134L, 1.234330349600789959989661887846005659983e-16L),
2275 TEST_c_c (cacos, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2276 TEST_c_c (cacos, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2277 TEST_c_c (cacos, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2278 TEST_c_c (cacos, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2279 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 1.570092458683775059393382371963565104164e-16L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2280 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 3.141592653589793081453397514901996944859L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2281 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 1.570092458683775059393382371963565104164e-16L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2282 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 3.141592653589793081453397514901996944859L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2283 TEST_c_c (cacos, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2284 TEST_c_c (cacos, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2285 TEST_c_c (cacos, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2286 TEST_c_c (cacos, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2287 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 1.570092458683775059393382371963565104164e-16L, -0.0L),
2288 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 3.141592653589793081453397514901996944859L, -0.0L),
2289 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 1.570092458683775059393382371963565104164e-16L, 0.0L),
2290 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 3.141592653589793081453397514901996944859L, 0.0L),
2291#endif
2292 TEST_c_c (cacos, 0x1p-105L, 0.5L, 1.570796326794896619231321691639729392766L, -4.812118250596034474977589134243684231352e-1L),
2293 TEST_c_c (cacos, 0x1p-105L, -0.5L, 1.570796326794896619231321691639729392766L, 4.812118250596034474977589134243684231352e-1L),
2294 TEST_c_c (cacos, -0x1p-105L, 0.5L, 1.570796326794896619231321691639773491431L, -4.812118250596034474977589134243684231352e-1L),
2295 TEST_c_c (cacos, -0x1p-105L, -0.5L, 1.570796326794896619231321691639773491431L, 4.812118250596034474977589134243684231352e-1L),
2296 TEST_c_c (cacos, 0.5L, 0x1p-105L, 1.047197551196597746154214461093167628066L, -2.846556599890768890940941645338546615370e-32L),
2297 TEST_c_c (cacos, -0.5L, 0x1p-105L, 2.094395102393195492308428922186335256131L, -2.846556599890768890940941645338546615370e-32L),
2298 TEST_c_c (cacos, 0.5L, -0x1p-105L, 1.047197551196597746154214461093167628066L, 2.846556599890768890940941645338546615370e-32L),
2299 TEST_c_c (cacos, -0.5L, -0x1p-105L, 2.094395102393195492308428922186335256131L, 2.846556599890768890940941645338546615370e-32L),
2300 TEST_c_c (cacos, 0x1p-105L, 0x1p-105L, 1.570796326794896619231321691639726790195L, -2.465190328815661891911651766508706967729e-32L),
2301 TEST_c_c (cacos, 0x1p-105L, -0x1p-105L, 1.570796326794896619231321691639726790195L, 2.465190328815661891911651766508706967729e-32L),
2302 TEST_c_c (cacos, -0x1p-105L, 0x1p-105L, 1.570796326794896619231321691639776094002L, -2.465190328815661891911651766508706967729e-32L),
2303 TEST_c_c (cacos, -0x1p-105L, -0x1p-105L, 1.570796326794896619231321691639776094002L, 2.465190328815661891911651766508706967729e-32L),
ccc8cadf 2304#ifndef TEST_FLOAT
08198877
JM		 2305 TEST_c_c (cacos, 0x1.fp-1025L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2306 TEST_c_c (cacos, 0x1.fp-1025L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2307 TEST_c_c (cacos, -0x1.fp-1025L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2308 TEST_c_c (cacos, -0x1.fp-1025L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2309 TEST_c_c (cacos, 0x1p-105L, 0x1.fp-1025L, 1.570796326794896619231321691639726790195L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2310 TEST_c_c (cacos, -0x1p-105L, 0x1.fp-1025L, 1.570796326794896619231321691639776094002L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2311 TEST_c_c (cacos, 0x1p-105L, -0x1.fp-1025L, 1.570796326794896619231321691639726790195L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2312 TEST_c_c (cacos, -0x1p-105L, -0x1.fp-1025L, 1.570796326794896619231321691639776094002L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2313#endif
2314 TEST_c_c (cacos, 0.0L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2315 TEST_c_c (cacos, 0.0L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2316 TEST_c_c (cacos, -0.0L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2317 TEST_c_c (cacos, -0.0L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2318 TEST_c_c (cacos, 0x1p-105L, 0.0L, 1.570796326794896619231321691639726790195L, -0.0L),
2319 TEST_c_c (cacos, -0x1p-105L, 0.0L, 1.570796326794896619231321691639776094002L, -0.0L),
2320 TEST_c_c (cacos, 0x1p-105L, -0.0L, 1.570796326794896619231321691639726790195L, 0.0L),
2321 TEST_c_c (cacos, -0x1p-105L, -0.0L, 1.570796326794896619231321691639776094002L, 0.0L),
ccc8cadf 2322#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 2323 TEST_c_c (cacos, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751305915L, -8.813735870195430252326093249797922409363e-1L),
2324 TEST_c_c (cacos, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751305915L, 8.813735870195430252326093249797922409363e-1L),
2325 TEST_c_c (cacos, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751578282L, -8.813735870195430252326093249797922409363e-1L),
2326 TEST_c_c (cacos, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751578282L, 8.813735870195430252326093249797922409363e-1L),
2327 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.765281878332676474347460257221369818872e-17L, -1.091004200533850618345330909857103457781e-17L),
2328 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 3.141592653589793220809824599952738140723L, -1.091004200533850618345330909857103457781e-17L),
2329 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.765281878332676474347460257221369818872e-17L, 1.091004200533850618345330909857103457781e-17L),
2330 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 3.141592653589793220809824599952738140723L, 1.091004200533850618345330909857103457781e-17L),
2331 TEST_c_c (cacos, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2332 TEST_c_c (cacos, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2333 TEST_c_c (cacos, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2334 TEST_c_c (cacos, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2335 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 1.387778780781445675529539585113525401762e-17L, -5.867357004219059108790368268900490184505e-4916L),
2336 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 3.141592653589793224584855575465046128902L, -5.867357004219059108790368268900490184505e-4916L),
2337 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 1.387778780781445675529539585113525401762e-17L, 5.867357004219059108790368268900490184505e-4916L),
2338 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 3.141592653589793224584855575465046128902L, 5.867357004219059108790368268900490184505e-4916L),
2339 TEST_c_c (cacos, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2340 TEST_c_c (cacos, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2341 TEST_c_c (cacos, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2342 TEST_c_c (cacos, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2343 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 1.387778780781445675529539585113525401762e-17L, -0.0L),
2344 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 3.141592653589793224584855575465046128902L, -0.0L),
2345 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 1.387778780781445675529539585113525401762e-17L, 0.0L),
2346 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 3.141592653589793224584855575465046128902L, 0.0L),
2347#endif
2348 TEST_c_c (cacos, 0x1p-112L, 0.5L, 1.570796326794896619231321691639751269838L, -4.812118250596034474977589134243684231352e-1L),
2349 TEST_c_c (cacos, 0x1p-112L, -0.5L, 1.570796326794896619231321691639751269838L, 4.812118250596034474977589134243684231352e-1L),
2350 TEST_c_c (cacos, -0x1p-112L, 0.5L, 1.570796326794896619231321691639751614359L, -4.812118250596034474977589134243684231352e-1L),
2351 TEST_c_c (cacos, -0x1p-112L, -0.5L, 1.570796326794896619231321691639751614359L, 4.812118250596034474977589134243684231352e-1L),
2352 TEST_c_c (cacos, 0.5L, 0x1p-112L, 1.047197551196597746154214461093167628066L, -2.223872343664663196047610660420739543258e-34L),
2353 TEST_c_c (cacos, -0.5L, 0x1p-112L, 2.094395102393195492308428922186335256131L, -2.223872343664663196047610660420739543258e-34L),
2354 TEST_c_c (cacos, 0.5L, -0x1p-112L, 1.047197551196597746154214461093167628066L, 2.223872343664663196047610660420739543258e-34L),
2355 TEST_c_c (cacos, -0.5L, -0x1p-112L, 2.094395102393195492308428922186335256131L, 2.223872343664663196047610660420739543258e-34L),
2356 TEST_c_c (cacos, 0x1p-112L, 0x1p-112L, 1.570796326794896619231321691639751249506L, -1.925929944387235853055977942584927318538e-34L),
2357 TEST_c_c (cacos, 0x1p-112L, -0x1p-112L, 1.570796326794896619231321691639751249506L, 1.925929944387235853055977942584927318538e-34L),
2358 TEST_c_c (cacos, -0x1p-112L, 0x1p-112L, 1.570796326794896619231321691639751634692L, -1.925929944387235853055977942584927318538e-34L),
2359 TEST_c_c (cacos, -0x1p-112L, -0x1p-112L, 1.570796326794896619231321691639751634692L, 1.925929944387235853055977942584927318538e-34L),
ccc8cadf 2360#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2361 TEST_c_c (cacos, 0x1.fp-16385L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2362 TEST_c_c (cacos, 0x1.fp-16385L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2363 TEST_c_c (cacos, -0x1.fp-16385L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2364 TEST_c_c (cacos, -0x1.fp-16385L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2365 TEST_c_c (cacos, 0x1p-112L, 0x1.fp-16385L, 1.570796326794896619231321691639751249506L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2366 TEST_c_c (cacos, -0x1p-112L, 0x1.fp-16385L, 1.570796326794896619231321691639751634692L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2367 TEST_c_c (cacos, 0x1p-112L, -0x1.fp-16385L, 1.570796326794896619231321691639751249506L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2368 TEST_c_c (cacos, -0x1p-112L, -0x1.fp-16385L, 1.570796326794896619231321691639751634692L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2369#endif
2370 TEST_c_c (cacos, 0.0L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2371 TEST_c_c (cacos, 0.0L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2372 TEST_c_c (cacos, -0.0L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2373 TEST_c_c (cacos, -0.0L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2374 TEST_c_c (cacos, 0x1p-112L, 0.0L, 1.570796326794896619231321691639751249506L, -0.0L),
2375 TEST_c_c (cacos, -0x1p-112L, 0.0L, 1.570796326794896619231321691639751634692L, -0.0L),
2376 TEST_c_c (cacos, 0x1p-112L, -0.0L, 1.570796326794896619231321691639751249506L, 0.0L),
2377 TEST_c_c (cacos, -0x1p-112L, -0.0L, 1.570796326794896619231321691639751634692L, 0.0L),
2378
2379 TEST_c_c (cacos, 0.75L, 1.25L, 1.11752014915610270578240049553777969L, -1.13239363160530819522266333696834467L),
2380 TEST_c_c (cacos, -2, -3, 2.1414491111159960199416055713254211L, 1.9833870299165354323470769028940395L),
2381 END_DATA (cacos)
2382 };
8847214f 2383
8847214f 2384static void
08198877 2385cacos_test (void)
8847214f 2386{
aaca11d8 2387 errno = 0;
08198877 2388 FUNC(cacos) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 2389 if (errno == ENOSYS)
2390 /* Function not implemented. */
2391 return;
2392
08198877
JM		 2393 START (cacos);
2394 RUN_TEST_LOOP_c_c (cacos, cacos_test_data, );
2395 END (cacos, complex);
2396}
8847214f 2397
08198877
JM		 2398static const struct test_c_c_data cacosh_test_data[] =
2399 {
2400 START_DATA (cacosh),
2401 TEST_c_c (cacosh, 0, 0, 0.0, M_PI_2l),
2402 TEST_c_c (cacosh, minus_zero, 0, 0.0, M_PI_2l),
2403 TEST_c_c (cacosh, 0, minus_zero, 0.0, -M_PI_2l),
2404 TEST_c_c (cacosh, minus_zero, minus_zero, 0.0, -M_PI_2l),
2405 TEST_c_c (cacosh, minus_infty, plus_infty, plus_infty, M_PI_34l),
2406 TEST_c_c (cacosh, minus_infty, minus_infty, plus_infty, -M_PI_34l),
2407
2408 TEST_c_c (cacosh, plus_infty, plus_infty, plus_infty, M_PI_4l),
2409 TEST_c_c (cacosh, plus_infty, minus_infty, plus_infty, -M_PI_4l),
2410
2411 TEST_c_c (cacosh, -10.0, plus_infty, plus_infty, M_PI_2l),
2412 TEST_c_c (cacosh, -10.0, minus_infty, plus_infty, -M_PI_2l),
2413 TEST_c_c (cacosh, 0, plus_infty, plus_infty, M_PI_2l),
2414 TEST_c_c (cacosh, 0, minus_infty, plus_infty, -M_PI_2l),
2415 TEST_c_c (cacosh, 0.1L, plus_infty, plus_infty, M_PI_2l),
2416 TEST_c_c (cacosh, 0.1L, minus_infty, plus_infty, -M_PI_2l),
2417
2418 TEST_c_c (cacosh, minus_infty, 0, plus_infty, M_PIl),
2419 TEST_c_c (cacosh, minus_infty, minus_zero, plus_infty, -M_PIl),
2420 TEST_c_c (cacosh, minus_infty, 100, plus_infty, M_PIl),
2421 TEST_c_c (cacosh, minus_infty, -100, plus_infty, -M_PIl),
2422
2423 TEST_c_c (cacosh, plus_infty, 0, plus_infty, 0.0),
2424 TEST_c_c (cacosh, plus_infty, minus_zero, plus_infty, minus_zero),
2425 TEST_c_c (cacosh, plus_infty, 0.5, plus_infty, 0.0),
2426 TEST_c_c (cacosh, plus_infty, -0.5, plus_infty, minus_zero),
2427
2428 TEST_c_c (cacosh, plus_infty, qnan_value, plus_infty, qnan_value),
2429 TEST_c_c (cacosh, minus_infty, qnan_value, plus_infty, qnan_value),
2430
2431 TEST_c_c (cacosh, 0, qnan_value, qnan_value, qnan_value),
2432 TEST_c_c (cacosh, minus_zero, qnan_value, qnan_value, qnan_value),
2433
2434 TEST_c_c (cacosh, qnan_value, plus_infty, plus_infty, qnan_value),
2435 TEST_c_c (cacosh, qnan_value, minus_infty, plus_infty, qnan_value),
2436
2437 TEST_c_c (cacosh, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2438 TEST_c_c (cacosh, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2439
2440 TEST_c_c (cacosh, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2441 TEST_c_c (cacosh, qnan_value, -0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2442
2443 TEST_c_c (cacosh, qnan_value, qnan_value, qnan_value, qnan_value),
2444
2445 TEST_c_c (cacosh, plus_zero, -1.5L, 1.194763217287109304111930828519090523536L, -M_PI_2l),
2446 TEST_c_c (cacosh, minus_zero, -1.5L, 1.194763217287109304111930828519090523536L, -M_PI_2l),
2447 TEST_c_c (cacosh, plus_zero, -1.0L, 0.8813735870195430252326093249797923090282L, -M_PI_2l),
2448 TEST_c_c (cacosh, minus_zero, -1.0L, 0.8813735870195430252326093249797923090282L, -M_PI_2l),
2449 TEST_c_c (cacosh, plus_zero, -0.5L, 0.4812118250596034474977589134243684231352L, -M_PI_2l),
2450 TEST_c_c (cacosh, minus_zero, -0.5L, 0.4812118250596034474977589134243684231352L, -M_PI_2l),
2451 TEST_c_c (cacosh, plus_zero, 0.5L, 0.4812118250596034474977589134243684231352L, M_PI_2l),
2452 TEST_c_c (cacosh, minus_zero, 0.5L, 0.4812118250596034474977589134243684231352L, M_PI_2l),
2453 TEST_c_c (cacosh, plus_zero, 1.0L, 0.8813735870195430252326093249797923090282L, M_PI_2l),
2454 TEST_c_c (cacosh, minus_zero, 1.0L, 0.8813735870195430252326093249797923090282L, M_PI_2l),
2455 TEST_c_c (cacosh, plus_zero, 1.5L, 1.194763217287109304111930828519090523536L, M_PI_2l),
2456 TEST_c_c (cacosh, minus_zero, 1.5L, 1.194763217287109304111930828519090523536L, M_PI_2l),
2457
2458 TEST_c_c (cacosh, -1.5L, plus_zero, 0.9624236501192068949955178268487368462704L, M_PIl),
2459 TEST_c_c (cacosh, -1.5L, minus_zero, 0.9624236501192068949955178268487368462704L, -M_PIl),
2460 TEST_c_c (cacosh, -1.0L, plus_zero, plus_zero, M_PIl),
2461 TEST_c_c (cacosh, -1.0L, minus_zero, plus_zero, -M_PIl),
2462 TEST_c_c (cacosh, -0.5L, plus_zero, plus_zero, 2.094395102393195492308428922186335256131L),
2463 TEST_c_c (cacosh, -0.5L, minus_zero, plus_zero, -2.094395102393195492308428922186335256131L),
2464 TEST_c_c (cacosh, 0.5L, plus_zero, plus_zero, 1.047197551196597746154214461093167628066L),
2465 TEST_c_c (cacosh, 0.5L, minus_zero, plus_zero, -1.047197551196597746154214461093167628066L),
2466 TEST_c_c (cacosh, 1.0L, plus_zero, plus_zero, plus_zero),
2467 TEST_c_c (cacosh, 1.0L, minus_zero, plus_zero, minus_zero),
2468 TEST_c_c (cacosh, 1.5L, plus_zero, 0.9624236501192068949955178268487368462704L, plus_zero),
2469 TEST_c_c (cacosh, 1.5L, minus_zero, 0.9624236501192068949955178268487368462704L, minus_zero),
2470
2471 TEST_c_c (cacosh, 0x1p50L, 1.0L, 3.535050620855721078027883819436720218708e1L, 8.881784197001252323389053344727730248720e-16L),
2472 TEST_c_c (cacosh, 0x1p50L, -1.0L, 3.535050620855721078027883819436720218708e1L, -8.881784197001252323389053344727730248720e-16L),
2473 TEST_c_c (cacosh, -0x1p50L, 1.0L, 3.535050620855721078027883819436720218708e1L, 3.141592653589792350284223683154270545292L),
2474 TEST_c_c (cacosh, -0x1p50L, -1.0L, 3.535050620855721078027883819436720218708e1L, -3.141592653589792350284223683154270545292L),
2475 TEST_c_c (cacosh, 1.0L, 0x1p50L, 3.535050620855721078027883819436759661753e1L, 1.570796326794895731052901991514519103193L),
2476 TEST_c_c (cacosh, -1.0L, 0x1p50L, 3.535050620855721078027883819436759661753e1L, 1.570796326794897507409741391764983781004L),
2477 TEST_c_c (cacosh, 1.0L, -0x1p50L, 3.535050620855721078027883819436759661753e1L, -1.570796326794895731052901991514519103193L),
2478 TEST_c_c (cacosh, -1.0L, -0x1p50L, 3.535050620855721078027883819436759661753e1L, -1.570796326794897507409741391764983781004L),
52ce4860 2479#ifndef TEST_FLOAT
08198877
JM		 2480 TEST_c_c (cacosh, 0x1p500L, 1.0L, 3.472667374605326000180332928505464606058e2L, 3.054936363499604682051979393213617699789e-151L),
2481 TEST_c_c (cacosh, 0x1p500L, -1.0L, 3.472667374605326000180332928505464606058e2L, -3.054936363499604682051979393213617699789e-151L),
2482 TEST_c_c (cacosh, -0x1p500L, 1.0L, 3.472667374605326000180332928505464606058e2L, 3.141592653589793238462643383279502884197L),
2483 TEST_c_c (cacosh, -0x1p500L, -1.0L, 3.472667374605326000180332928505464606058e2L, -3.141592653589793238462643383279502884197L),
2484 TEST_c_c (cacosh, 1.0L, 0x1p500L, 3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
2485 TEST_c_c (cacosh, -1.0L, 0x1p500L, 3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
2486 TEST_c_c (cacosh, 1.0L, -0x1p500L, 3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
2487 TEST_c_c (cacosh, -1.0L, -0x1p500L, 3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
52ce4860
JM		 2488#endif
2489#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 2490 TEST_c_c (cacosh, 0x1p5000L, 1.0L, 3.466429049980286492395577839412341016946e3L, 7.079811261048172892385615158694057552948e-1506L),
2491 TEST_c_c (cacosh, 0x1p5000L, -1.0L, 3.466429049980286492395577839412341016946e3L, -7.079811261048172892385615158694057552948e-1506L),
2492 TEST_c_c (cacosh, -0x1p5000L, 1.0L, 3.466429049980286492395577839412341016946e3L, 3.141592653589793238462643383279502884197L),
2493 TEST_c_c (cacosh, -0x1p5000L, -1.0L, 3.466429049980286492395577839412341016946e3L, -3.141592653589793238462643383279502884197L),
2494 TEST_c_c (cacosh, 1.0L, 0x1p5000L, 3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
2495 TEST_c_c (cacosh, -1.0L, 0x1p5000L, 3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
2496 TEST_c_c (cacosh, 1.0L, -0x1p5000L, 3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
2497 TEST_c_c (cacosh, -1.0L, -0x1p5000L, 3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
2498#endif
2499 TEST_c_c (cacosh, 0x1.fp127L, 0x1.fp127L, 8.973081118419833726837456344608533993585e1L, 7.853981633974483096156608458198757210493e-1L),
52ce4860 2500#ifndef TEST_FLOAT
08198877 2501 TEST_c_c (cacosh, 0x1.fp1023L, 0x1.fp1023L, 7.107906849659093345062145442726115449315e2L, 7.853981633974483096156608458198757210493e-1L),
52ce4860
JM		 2502#endif
2503#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 2504 TEST_c_c (cacosh, 0x1.fp16383L, 0x1.fp16383L, 1.135753137836666928715489992987020363057e4L, 7.853981633974483096156608458198757210493e-1L),
2505#endif
2506 TEST_c_c (cacosh, 0x1.fp-129L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442097L),
2507 TEST_c_c (cacosh, 0x1.fp-129L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442097L),
2508 TEST_c_c (cacosh, -0x1.fp-129L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442100L),
2509 TEST_c_c (cacosh, -0x1.fp-129L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442100L),
2510 TEST_c_c (cacosh, 1.5L, 0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, 2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2511 TEST_c_c (cacosh, -1.5L, 0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, 3.141592653589793238462643383279502884195L),
2512 TEST_c_c (cacosh, 1.5L, -0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, -2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2513 TEST_c_c (cacosh, -1.5L, -0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, -3.141592653589793238462643383279502884195L),
52ce4860 2514#ifndef TEST_FLOAT
08198877
JM		 2515 TEST_c_c (cacosh, 0x1.fp-1025L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2516 TEST_c_c (cacosh, 0x1.fp-1025L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2517 TEST_c_c (cacosh, -0x1.fp-1025L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2518 TEST_c_c (cacosh, -0x1.fp-1025L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2519 TEST_c_c (cacosh, 1.5L, 0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, 4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2520 TEST_c_c (cacosh, -1.5L, 0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, 3.141592653589793238462643383279502884197L),
2521 TEST_c_c (cacosh, 1.5L, -0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, -4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2522 TEST_c_c (cacosh, -1.5L, -0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2523#endif
2524#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2525 TEST_c_c (cacosh, 0x1.fp-16385L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2526 TEST_c_c (cacosh, 0x1.fp-16385L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2527 TEST_c_c (cacosh, -0x1.fp-16385L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2528 TEST_c_c (cacosh, -0x1.fp-16385L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2529 TEST_c_c (cacosh, 1.5L, 0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, 7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
2530 TEST_c_c (cacosh, -1.5L, 0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, 3.141592653589793238462643383279502884197L),
2531 TEST_c_c (cacosh, 1.5L, -0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, -7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
2532 TEST_c_c (cacosh, -1.5L, -0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, -3.141592653589793238462643383279502884197L),
2533#endif
2534 TEST_c_c (cacosh, 0.5L, 1.0L, 9.261330313501824245501244453057873152694e-1L, 1.221357263937683325603909865564381489366L),
2535 TEST_c_c (cacosh, 0.5L, -1.0L, 9.261330313501824245501244453057873152694e-1L, -1.221357263937683325603909865564381489366L),
2536 TEST_c_c (cacosh, -0.5L, 1.0L, 9.261330313501824245501244453057873152694e-1L, 1.920235389652109912858733517715121394831L),
2537 TEST_c_c (cacosh, -0.5L, -1.0L, 9.261330313501824245501244453057873152694e-1L, -1.920235389652109912858733517715121394831L),
2538 TEST_c_c (cacosh, 1.0L, 0.5L, 7.328576759736452608886724437653071523305e-1L, 6.748888455860063801646649673121744318756e-1L),
2539 TEST_c_c (cacosh, -1.0L, 0.5L, 7.328576759736452608886724437653071523305e-1L, 2.466703808003786858297978415967328452322L),
2540 TEST_c_c (cacosh, 1.0L, -0.5L, 7.328576759736452608886724437653071523305e-1L, -6.748888455860063801646649673121744318756e-1L),
2541 TEST_c_c (cacosh, -1.0L, -0.5L, 7.328576759736452608886724437653071523305e-1L, -2.466703808003786858297978415967328452322L),
2542 TEST_c_c (cacosh, 0.25L, 1.0L, 8.924633639033482359562124741744951972772e-1L, 1.394493894017929688812643125003661339452L),
2543 TEST_c_c (cacosh, 0.25L, -1.0L, 8.924633639033482359562124741744951972772e-1L, -1.394493894017929688812643125003661339452L),
2544 TEST_c_c (cacosh, -0.25L, 1.0L, 8.924633639033482359562124741744951972772e-1L, 1.747098759571863549650000258275841544745L),
2545 TEST_c_c (cacosh, -0.25L, -1.0L, 8.924633639033482359562124741744951972772e-1L, -1.747098759571863549650000258275841544745L),
2546 TEST_c_c (cacosh, 1.0L, 0.25L, 5.097911466811016354623559941115413499164e-1L, 4.890443302710802929202843732146540079124e-1L),
2547 TEST_c_c (cacosh, -1.0L, 0.25L, 5.097911466811016354623559941115413499164e-1L, 2.652548323318712945542359010064848876285L),
2548 TEST_c_c (cacosh, 1.0L, -0.25L, 5.097911466811016354623559941115413499164e-1L, -4.890443302710802929202843732146540079124e-1L),
2549 TEST_c_c (cacosh, -1.0L, -0.25L, 5.097911466811016354623559941115413499164e-1L, -2.652548323318712945542359010064848876285L),
2550 TEST_c_c (cacosh, 0x1.fp-10L, 1.0L, 8.813742198809567991336704287826445879025e-1L, 1.569458417435338878318763342108699202986L),
2551 TEST_c_c (cacosh, 0x1.fp-10L, -1.0L, 8.813742198809567991336704287826445879025e-1L, -1.569458417435338878318763342108699202986L),
2552 TEST_c_c (cacosh, -0x1.fp-10L, 1.0L, 8.813742198809567991336704287826445879025e-1L, 1.572134236154454360143880041170803681211L),
2553 TEST_c_c (cacosh, -0x1.fp-10L, -1.0L, 8.813742198809567991336704287826445879025e-1L, -1.572134236154454360143880041170803681211L),
2554 TEST_c_c (cacosh, 1.0L, 0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, 4.349129763101882771258049954181971959031e-2L),
2555 TEST_c_c (cacosh, -1.0L, 0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, 3.098101355958774410750062883737683164607L),
2556 TEST_c_c (cacosh, 1.0L, -0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, -4.349129763101882771258049954181971959031e-2L),
2557 TEST_c_c (cacosh, -1.0L, -0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, -3.098101355958774410750062883737683164607L),
2558 TEST_c_c (cacosh, 0x1.fp-30L, 1.0L, 8.813735870195430258081932989769495326854e-1L, 1.570796325518966635014803151387033957091L),
2559 TEST_c_c (cacosh, 0x1.fp-30L, -1.0L, 8.813735870195430258081932989769495326854e-1L, -1.570796325518966635014803151387033957091L),
2560 TEST_c_c (cacosh, -0x1.fp-30L, 1.0L, 8.813735870195430258081932989769495326854e-1L, 1.570796328070826603447840231892468927106L),
2561 TEST_c_c (cacosh, -0x1.fp-30L, -1.0L, 8.813735870195430258081932989769495326854e-1L, -1.570796328070826603447840231892468927106L),
2562 TEST_c_c (cacosh, 1.0L, 0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, 4.247867097467650115899790787875186617316e-5L),
2563 TEST_c_c (cacosh, -1.0L, 0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, 3.141550174918818561961484385371624132331L),
2564 TEST_c_c (cacosh, 1.0L, -0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, -4.247867097467650115899790787875186617316e-5L),
2565 TEST_c_c (cacosh, -1.0L, -0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, -3.141550174918818561961484385371624132331L),
2566 TEST_c_c (cacosh, 0x1.fp-100L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691638670687364L),
2567 TEST_c_c (cacosh, 0x1.fp-100L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691638670687364L),
2568 TEST_c_c (cacosh, -0x1.fp-100L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691640832196834L),
2569 TEST_c_c (cacosh, -0x1.fp-100L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691640832196834L),
2570 TEST_c_c (cacosh, 1.0L, 0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, 1.236292038260260888664514866456887257525e-15L),
2571 TEST_c_c (cacosh, -1.0L, 0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, 3.141592653589792002170605123018614219682L),
2572 TEST_c_c (cacosh, 1.0L, -0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, -1.236292038260260888664514866456887257525e-15L),
2573 TEST_c_c (cacosh, -1.0L, -0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, -3.141592653589792002170605123018614219682L),
2574 TEST_c_c (cacosh, 0x1.fp-129L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442097L),
2575 TEST_c_c (cacosh, 0x1.fp-129L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442097L),
2576 TEST_c_c (cacosh, -0x1.fp-129L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442101L),
2577 TEST_c_c (cacosh, -0x1.fp-129L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442101L),
2578 TEST_c_c (cacosh, 1.0L, 0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, 5.335635276982233498398987585285818977930e-20L),
2579 TEST_c_c (cacosh, -1.0L, 0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, 3.141592653589793238409287030509680549213L),
2580 TEST_c_c (cacosh, 1.0L, -0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, -5.335635276982233498398987585285818977930e-20L),
2581 TEST_c_c (cacosh, -1.0L, -0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, -3.141592653589793238409287030509680549213L),
52ce4860 2582#ifndef TEST_FLOAT
08198877
JM		 2583 TEST_c_c (cacosh, 0x1.fp-1000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2584 TEST_c_c (cacosh, 0x1.fp-1000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2585 TEST_c_c (cacosh, -0x1.fp-1000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2586 TEST_c_c (cacosh, -0x1.fp-1000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2587 TEST_c_c (cacosh, 1.0L, 0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, 4.252291453851660175550490409247739011867e-151L),
2588 TEST_c_c (cacosh, -1.0L, 0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, 3.141592653589793238462643383279502884197L),
2589 TEST_c_c (cacosh, 1.0L, -0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, -4.252291453851660175550490409247739011867e-151L),
2590 TEST_c_c (cacosh, -1.0L, -0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, -3.141592653589793238462643383279502884197L),
2591 TEST_c_c (cacosh, 0x1.fp-1025L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2592 TEST_c_c (cacosh, 0x1.fp-1025L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2593 TEST_c_c (cacosh, -0x1.fp-1025L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2594 TEST_c_c (cacosh, -0x1.fp-1025L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2595 TEST_c_c (cacosh, 1.0L, 0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, 7.340879205566679497036857179189356754017e-155L),
2596 TEST_c_c (cacosh, -1.0L, 0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, 3.141592653589793238462643383279502884197L),
2597 TEST_c_c (cacosh, 1.0L, -0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, -7.340879205566679497036857179189356754017e-155L),
2598 TEST_c_c (cacosh, -1.0L, -0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2599#endif
2600#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2601 TEST_c_c (cacosh, 0x1.fp-10000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2602 TEST_c_c (cacosh, 0x1.fp-10000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2603 TEST_c_c (cacosh, -0x1.fp-10000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2604 TEST_c_c (cacosh, -0x1.fp-10000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2605 TEST_c_c (cacosh, 1.0L, 0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, 9.854680208706673586644342922051388714633e-1506L),
2606 TEST_c_c (cacosh, -1.0L, 0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, 3.141592653589793238462643383279502884197L),
2607 TEST_c_c (cacosh, 1.0L, -0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, -9.854680208706673586644342922051388714633e-1506L),
2608 TEST_c_c (cacosh, -1.0L, -0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, -3.141592653589793238462643383279502884197L),
2609 TEST_c_c (cacosh, 0x1.fp-16385L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2610 TEST_c_c (cacosh, 0x1.fp-16385L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2611 TEST_c_c (cacosh, -0x1.fp-16385L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2612 TEST_c_c (cacosh, -0x1.fp-16385L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2613 TEST_c_c (cacosh, 1.0L, 0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, 9.023632056840860275214893047597614177639e-2467L),
2614 TEST_c_c (cacosh, -1.0L, 0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, 3.141592653589793238462643383279502884197L),
2615 TEST_c_c (cacosh, 1.0L, -0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, -9.023632056840860275214893047597614177639e-2467L),
2616 TEST_c_c (cacosh, -1.0L, -0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, -3.141592653589793238462643383279502884197L),
2617#endif
2618 TEST_c_c (cacosh, 0x1p-23L, 0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, 1.570796242501204621739026081991856762292L),
2619 TEST_c_c (cacosh, 0x1p-23L, -0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, -1.570796242501204621739026081991856762292L),
2620 TEST_c_c (cacosh, -0x1p-23L, 0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, 1.570796411088588616723617301287646121905L),
2621 TEST_c_c (cacosh, -0x1p-23L, -0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, -1.570796411088588616723617301287646121905L),
2622 TEST_c_c (cacosh, 0x1.000002p0L, 0x1p-23L, 5.364668491573609633134147164031476452679e-4L, 2.222118384408546368406374049167636760903e-4L),
2623 TEST_c_c (cacosh, -0x1.000002p0L, 0x1p-23L, 5.364668491573609633134147164031476452679e-4L, 3.141370441751352383825802745874586120521L),
2624 TEST_c_c (cacosh, 0x1.000002p0L, -0x1p-23L, 5.364668491573609633134147164031476452679e-4L, -2.222118384408546368406374049167636760903e-4L),
2625 TEST_c_c (cacosh, -0x1.000002p0L, -0x1p-23L, 5.364668491573609633134147164031476452679e-4L, -3.141370441751352383825802745874586120521L),
2626 TEST_c_c (cacosh, 0x1.fp-129L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442097L),
2627 TEST_c_c (cacosh, 0x1.fp-129L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442097L),
2628 TEST_c_c (cacosh, -0x1.fp-129L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442101L),
2629 TEST_c_c (cacosh, -0x1.fp-129L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442101L),
2630 TEST_c_c (cacosh, 0x1.000002p0L, 0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, 5.830451806317544230969669308596361881467e-36L),
2631 TEST_c_c (cacosh, -0x1.000002p0L, 0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, 3.141592653589793238462643383279502878367L),
2632 TEST_c_c (cacosh, 0x1.000002p0L, -0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, -5.830451806317544230969669308596361881467e-36L),
2633 TEST_c_c (cacosh, -0x1.000002p0L, -0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, -3.141592653589793238462643383279502878367L),
2634 TEST_c_c (cacosh, 0.0L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442099L),
2635 TEST_c_c (cacosh, 0.0L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442099L),
2636 TEST_c_c (cacosh, -0.0L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442099L),
2637 TEST_c_c (cacosh, -0.0L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442099L),
2638 TEST_c_c (cacosh, 0x1.000002p0L, 0.0L, 4.882812451493617206486388134172712975070e-4L, 0.0L),
2639 TEST_c_c (cacosh, -0x1.000002p0L, 0.0L, 4.882812451493617206486388134172712975070e-4L, 3.141592653589793238462643383279502884197L),
2640 TEST_c_c (cacosh, 0x1.000002p0L, -0.0L, 4.882812451493617206486388134172712975070e-4L, -0.0L),
2641 TEST_c_c (cacosh, -0x1.000002p0L, -0.0L, 4.882812451493617206486388134172712975070e-4L, -3.141592653589793238462643383279502884197L),
52ce4860 2642#ifndef TEST_FLOAT
08198877
JM		 2643 TEST_c_c (cacosh, 0x1p-52L, 0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, 1.570796326794896462222075823262262934288L),
2644 TEST_c_c (cacosh, 0x1p-52L, -0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, -1.570796326794896462222075823262262934288L),
2645 TEST_c_c (cacosh, -0x1p-52L, 0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, 1.570796326794896776240567560017239949909L),
2646 TEST_c_c (cacosh, -0x1p-52L, -0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, -1.570796326794896776240567560017239949909L),
2647 TEST_c_c (cacosh, 0x1.0000000000001p0L, 0x1p-52L, 2.315303644582684770975188768022139415020e-8L, 9.590301705980041385828904092662391018164e-9L),
2648 TEST_c_c (cacosh, -0x1.0000000000001p0L, 0x1p-52L, 2.315303644582684770975188768022139415020e-8L, 3.141592643999491532482601997450598791535L),
2649 TEST_c_c (cacosh, 0x1.0000000000001p0L, -0x1p-52L, 2.315303644582684770975188768022139415020e-8L, -9.590301705980041385828904092662391018164e-9L),
2650 TEST_c_c (cacosh, -0x1.0000000000001p0L, -0x1p-52L, 2.315303644582684770975188768022139415020e-8L, -3.141592643999491532482601997450598791535L),
2651 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2652 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2653 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2654 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2655 TEST_c_c (cacosh, 0x1.0000000000001p0L, 0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, 2.557178503953494342609835913586108008322e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2656 TEST_c_c (cacosh, -0x1.0000000000001p0L, 0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, 3.141592653589793238462643383279502884197L),
2657 TEST_c_c (cacosh, 0x1.0000000000001p0L, -0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, -2.557178503953494342609835913586108008322e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2658 TEST_c_c (cacosh, -0x1.0000000000001p0L, -0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, -3.141592653589793238462643383279502884197L),
2659 TEST_c_c (cacosh, 0.0L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2660 TEST_c_c (cacosh, 0.0L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2661 TEST_c_c (cacosh, -0.0L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2662 TEST_c_c (cacosh, -0.0L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2663 TEST_c_c (cacosh, 0x1.0000000000001p0L, 0.0L, 2.107342425544701550354780375182800088393e-8L, 0.0L),
2664 TEST_c_c (cacosh, -0x1.0000000000001p0L, 0.0L, 2.107342425544701550354780375182800088393e-8L, 3.141592653589793238462643383279502884197L),
2665 TEST_c_c (cacosh, 0x1.0000000000001p0L, -0.0L, 2.107342425544701550354780375182800088393e-8L, -0.0L),
2666 TEST_c_c (cacosh, -0x1.0000000000001p0L, -0.0L, 2.107342425544701550354780375182800088393e-8L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2667#endif
2668#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 2669 TEST_c_c (cacosh, 0x1p-63L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, 1.570796326794896619154657020805582738031L),
2670 TEST_c_c (cacosh, 0x1p-63L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, -1.570796326794896619154657020805582738031L),
2671 TEST_c_c (cacosh, -0x1p-63L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, 1.570796326794896619307986362473920146166L),
2672 TEST_c_c (cacosh, -0x1p-63L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, -1.570796326794896619307986362473920146166L),
2673 TEST_c_c (cacosh, 0x1.0000000000000002p0L, 0x1p-63L, 5.116146586219826555037807251857670783420e-10L, 2.119177303101063432592523199680782317447e-10L),
2674 TEST_c_c (cacosh, -0x1.0000000000000002p0L, 0x1p-63L, 5.116146586219826555037807251857670783420e-10L, 3.141592653377875508152537040020250564229L),
2675 TEST_c_c (cacosh, 0x1.0000000000000002p0L, -0x1p-63L, 5.116146586219826555037807251857670783420e-10L, -2.119177303101063432592523199680782317447e-10L),
2676 TEST_c_c (cacosh, -0x1.0000000000000002p0L, -0x1p-63L, 5.116146586219826555037807251857670783420e-10L, -3.141592653377875508152537040020250564229L),
52ce4860 2677# if LDBL_MIN_EXP <= -16381
08198877
JM		 2678 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2679 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2680 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2681 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2682 TEST_c_c (cacosh, 0x1.0000000000000002p0L, 0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, 1.748608650034385653922359120438227480943e-4923L),
2683 TEST_c_c (cacosh, -0x1.0000000000000002p0L, 0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, 3.141592653589793238462643383279502884197L),
2684 TEST_c_c (cacosh, 0x1.0000000000000002p0L, -0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, -1.748608650034385653922359120438227480943e-4923L),
2685 TEST_c_c (cacosh, -0x1.0000000000000002p0L, -0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, -3.141592653589793238462643383279502884197L),
52ce4860 2686# endif
08198877
JM		 2687 TEST_c_c (cacosh, 0.0L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2688 TEST_c_c (cacosh, 0.0L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2689 TEST_c_c (cacosh, -0.0L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2690 TEST_c_c (cacosh, -0.0L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2691 TEST_c_c (cacosh, 0x1.0000000000000002p0L, 0.0L, 4.656612873077392578082927418388212703712e-10L, 0.0L),
2692 TEST_c_c (cacosh, -0x1.0000000000000002p0L, 0.0L, 4.656612873077392578082927418388212703712e-10L, 3.141592653589793238462643383279502884197L),
2693 TEST_c_c (cacosh, 0x1.0000000000000002p0L, -0.0L, 4.656612873077392578082927418388212703712e-10L, -0.0L),
2694 TEST_c_c (cacosh, -0x1.0000000000000002p0L, -0.0L, 4.656612873077392578082927418388212703712e-10L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2695#endif
2696#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 2697 TEST_c_c (cacosh, 0x1p-106L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639742726335L),
2698 TEST_c_c (cacosh, 0x1p-106L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639742726335L),
2699 TEST_c_c (cacosh, -0x1p-106L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639760157863L),
2700 TEST_c_c (cacosh, -0x1p-106L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639760157863L),
2701 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, 0x1p-106L, 2.285028863093221674154232933662774454211e-16L, 5.394221422390606848017034778914096659726e-17L),
2702 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, 0x1p-106L, 2.285028863093221674154232933662774454211e-16L, 3.141592653589793184520429159373434404027L),
2703 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, -0x1p-106L, 2.285028863093221674154232933662774454211e-16L, -5.394221422390606848017034778914096659726e-17L),
2704 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, -0x1p-106L, 2.285028863093221674154232933662774454211e-16L, -3.141592653589793184520429159373434404027L),
2705 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2706 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2707 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2708 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2709 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, 2.426922623448365473354662093431821897807e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2710 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, 3.141592653589793238462643383279502884197L),
2711 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, -2.426922623448365473354662093431821897807e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2712 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, -3.141592653589793238462643383279502884197L),
2713 TEST_c_c (cacosh, 0.0L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2714 TEST_c_c (cacosh, 0.0L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2715 TEST_c_c (cacosh, -0.0L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2716 TEST_c_c (cacosh, -0.0L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2717 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, 0.0L, 2.220446049250313080847263336181636063482e-16L, 0.0L),
2718 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, 0.0L, 2.220446049250313080847263336181636063482e-16L, 3.141592653589793238462643383279502884197L),
2719 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, -0.0L, 2.220446049250313080847263336181636063482e-16L, -0.0L),
2720 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, -0.0L, 2.220446049250313080847263336181636063482e-16L, -3.141592653589793238462643383279502884197L),
52ce4860
JM		 2721#endif
2722#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 2723 TEST_c_c (cacosh, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751374007L),
2724 TEST_c_c (cacosh, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751374007L),
2725 TEST_c_c (cacosh, -0x1p-113L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751510190L),
2726 TEST_c_c (cacosh, -0x1p-113L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751510190L),
2727 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 2.019699255375255198156433710951064632386e-17L, 4.767863183742677481693563511435642755521e-18L),
2728 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, 0x1p-113L, 2.019699255375255198156433710951064632386e-17L, 3.141592653589793233694780199536825402504L),
2729 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 2.019699255375255198156433710951064632386e-17L, -4.767863183742677481693563511435642755521e-18L),
2730 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, -0x1p-113L, 2.019699255375255198156433710951064632386e-17L, -3.141592653589793233694780199536825402504L),
2731 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2732 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2733 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2734 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2735 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, 4.148847925325683229178506116378864361396e-4916L),
2736 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, 3.141592653589793238462643383279502884197L),
2737 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, -4.148847925325683229178506116378864361396e-4916L),
2738 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, -3.141592653589793238462643383279502884197L),
2739 TEST_c_c (cacosh, 0.0L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2740 TEST_c_c (cacosh, 0.0L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2741 TEST_c_c (cacosh, -0.0L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2742 TEST_c_c (cacosh, -0.0L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2743 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, 0.0L, 1.962615573354718824241727964954454332780e-17L, 0.0L),
2744 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, 0.0L, 1.962615573354718824241727964954454332780e-17L, 3.141592653589793238462643383279502884197L),
2745 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, -0.0L, 1.962615573354718824241727964954454332780e-17L, -0.0L),
2746 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, -0.0L, 1.962615573354718824241727964954454332780e-17L, -3.141592653589793238462643383279502884197L),
2747#endif
2748 TEST_c_c (cacosh, 0x1p-23L, 0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, 1.570796242501197085295336701632142060969L),
2749 TEST_c_c (cacosh, 0x1p-23L, -0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, -1.570796242501197085295336701632142060969L),
2750 TEST_c_c (cacosh, -0x1p-23L, 0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, 1.570796411088596153167306681647360823228L),
2751 TEST_c_c (cacosh, -0x1p-23L, -0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, -1.570796411088596153167306681647360823228L),
2752 TEST_c_c (cacosh, 0x0.ffffffp0L, 0x1p-23L, 2.714321200917194650737217746780928423385e-4L, 4.391863861910487109445187743978204002614e-4L),
2753 TEST_c_c (cacosh, -0x0.ffffffp0L, 0x1p-23L, 2.714321200917194650737217746780928423385e-4L, 3.141153467203602189751698864505105063797L),
2754 TEST_c_c (cacosh, 0x0.ffffffp0L, -0x1p-23L, 2.714321200917194650737217746780928423385e-4L, -4.391863861910487109445187743978204002614e-4L),
2755 TEST_c_c (cacosh, -0x0.ffffffp0L, -0x1p-23L, 2.714321200917194650737217746780928423385e-4L, -3.141153467203602189751698864505105063797L),
2756 TEST_c_c (cacosh, 0x1.fp-129L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442097L),
2757 TEST_c_c (cacosh, 0x1.fp-129L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442097L),
2758 TEST_c_c (cacosh, -0x1.fp-129L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442101L),
2759 TEST_c_c (cacosh, -0x1.fp-129L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442101L),
2760 TEST_c_c (cacosh, 0x0.ffffffp0L, 0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, 3.452669847162035876032494826387364972849e-4L),
2761 TEST_c_c (cacosh, -0x0.ffffffp0L, 0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, 3.141247386605077034875040133796864147700L),
2762 TEST_c_c (cacosh, 0x0.ffffffp0L, -0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, -3.452669847162035876032494826387364972849e-4L),
2763 TEST_c_c (cacosh, -0x0.ffffffp0L, -0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, -3.141247386605077034875040133796864147700L),
2764 TEST_c_c (cacosh, 0.0L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442099L),
2765 TEST_c_c (cacosh, 0.0L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442099L),
2766 TEST_c_c (cacosh, -0.0L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442099L),
2767 TEST_c_c (cacosh, -0.0L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442099L),
2768 TEST_c_c (cacosh, 0x0.ffffffp0L, 0.0L, 0.0L, 3.452669847162035876032494826387364972849e-4L),
2769 TEST_c_c (cacosh, -0x0.ffffffp0L, 0.0L, 0.0L, 3.141247386605077034875040133796864147700L),
2770 TEST_c_c (cacosh, 0x0.ffffffp0L, -0.0L, 0.0L, -3.452669847162035876032494826387364972849e-4L),
2771 TEST_c_c (cacosh, -0x0.ffffffp0L, -0.0L, 0.0L, -3.141247386605077034875040133796864147700L),
2772 TEST_c_c (cacosh, 0x1p-23L, 0.5L, 4.812118250596059896127318386463676808798e-1L, 1.570796220170866625230343643673321150378L),
2773 TEST_c_c (cacosh, 0x1p-23L, -0.5L, 4.812118250596059896127318386463676808798e-1L, -1.570796220170866625230343643673321150378L),
2774 TEST_c_c (cacosh, -0x1p-23L, 0.5L, 4.812118250596059896127318386463676808798e-1L, 1.570796433418926613232299739606181733819L),
2775 TEST_c_c (cacosh, -0x1p-23L, -0.5L, 4.812118250596059896127318386463676808798e-1L, -1.570796433418926613232299739606181733819L),
2776 TEST_c_c (cacosh, 0.5L, 0x1p-23L, 1.376510308240943236356088341381173571841e-7L, 1.047197551196603215914744618665204532273L),
2777 TEST_c_c (cacosh, -0.5L, 0x1p-23L, 1.376510308240943236356088341381173571841e-7L, 2.094395102393190022547898764614298351924L),
2778 TEST_c_c (cacosh, 0.5L, -0x1p-23L, 1.376510308240943236356088341381173571841e-7L, -1.047197551196603215914744618665204532273L),
2779 TEST_c_c (cacosh, -0.5L, -0x1p-23L, 1.376510308240943236356088341381173571841e-7L, -2.094395102393190022547898764614298351924L),
2780 TEST_c_c (cacosh, 0x1.fp-129L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442096L),
2781 TEST_c_c (cacosh, 0x1.fp-129L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442096L),
2782 TEST_c_c (cacosh, -0x1.fp-129L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442101L),
2783 TEST_c_c (cacosh, -0x1.fp-129L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442101L),
2784 TEST_c_c (cacosh, 0.5L, 0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, 1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_FLOAT),
2785 TEST_c_c (cacosh, -0.5L, 0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, 2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_FLOAT),
2786 TEST_c_c (cacosh, 0.5L, -0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, -1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_FLOAT),
2787 TEST_c_c (cacosh, -0.5L, -0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, -2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_FLOAT),
2788 TEST_c_c (cacosh, 0x1p-23L, 0x1p-23L, 1.192092895507818146886315028596704749235e-7L, 1.570796207585607068450636380271254316214L),
2789 TEST_c_c (cacosh, 0x1p-23L, -0x1p-23L, 1.192092895507818146886315028596704749235e-7L, -1.570796207585607068450636380271254316214L),
2790 TEST_c_c (cacosh, -0x1p-23L, 0x1p-23L, 1.192092895507818146886315028596704749235e-7L, 1.570796446004186170012007003008248567984L),
2791 TEST_c_c (cacosh, -0x1p-23L, -0x1p-23L, 1.192092895507818146886315028596704749235e-7L, -1.570796446004186170012007003008248567984L),
2792 TEST_c_c (cacosh, 0x1.fp-129L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442096L),
2793 TEST_c_c (cacosh, 0x1.fp-129L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442096L),
2794 TEST_c_c (cacosh, -0x1.fp-129L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442101L),
2795 TEST_c_c (cacosh, -0x1.fp-129L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442101L),
2796 TEST_c_c (cacosh, 0x1p-23L, 0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, 1.570796207585607068449789347324000006847L, UNDERFLOW_EXCEPTION_FLOAT),
2797 TEST_c_c (cacosh, -0x1p-23L, 0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, 1.570796446004186170012854035955502877351L, UNDERFLOW_EXCEPTION_FLOAT),
2798 TEST_c_c (cacosh, 0x1p-23L, -0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, -1.570796207585607068449789347324000006847L, UNDERFLOW_EXCEPTION_FLOAT),
2799 TEST_c_c (cacosh, -0x1p-23L, -0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, -1.570796446004186170012854035955502877351L, UNDERFLOW_EXCEPTION_FLOAT),
2800 TEST_c_c (cacosh, 0.0L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442099L),
2801 TEST_c_c (cacosh, 0.0L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442099L),
2802 TEST_c_c (cacosh, -0.0L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442099L),
2803 TEST_c_c (cacosh, -0.0L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442099L),
2804 TEST_c_c (cacosh, 0x1p-23L, 0.0L, 0.0L, 1.570796207585607068449789347324000006847L),
2805 TEST_c_c (cacosh, -0x1p-23L, 0.0L, 0.0L, 1.570796446004186170012854035955502877351L),
2806 TEST_c_c (cacosh, 0x1p-23L, -0.0L, 0.0L, -1.570796207585607068449789347324000006847L),
2807 TEST_c_c (cacosh, -0x1p-23L, -0.0L, 0.0L, -1.570796446004186170012854035955502877351L),
2808 TEST_c_c (cacosh, 0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 1.570796326794896619231321691639751442096L, UNDERFLOW_EXCEPTION_FLOAT),
2809 TEST_c_c (cacosh, 0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -1.570796326794896619231321691639751442096L, UNDERFLOW_EXCEPTION_FLOAT),
2810 TEST_c_c (cacosh, -0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 1.570796326794896619231321691639751442101L, UNDERFLOW_EXCEPTION_FLOAT),
2811 TEST_c_c (cacosh, -0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -1.570796326794896619231321691639751442101L, UNDERFLOW_EXCEPTION_FLOAT),
52ce4860 2812#ifndef TEST_FLOAT
08198877
JM		 2813 TEST_c_c (cacosh, 0x1p-52L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, 1.570796326794896462222075823262236786996L),
2814 TEST_c_c (cacosh, 0x1p-52L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, -1.570796326794896462222075823262236786996L),
2815 TEST_c_c (cacosh, -0x1p-52L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, 1.570796326794896776240567560017266097201L),
2816 TEST_c_c (cacosh, -0x1p-52L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, -1.570796326794896776240567560017266097201L),
2817 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, 0x1p-52L, 1.171456840272878582596796205397918831268e-8L, 1.895456983915074112227925127005564372844e-8L),
2818 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, 0x1p-52L, 1.171456840272878582596796205397918831268e-8L, 3.141592634635223399311902261000251614142L),
2819 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, -0x1p-52L, 1.171456840272878582596796205397918831268e-8L, -1.895456983915074112227925127005564372844e-8L),
2820 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, -0x1p-52L, 1.171456840272878582596796205397918831268e-8L, -3.141592634635223399311902261000251614142L),
2821 TEST_c_c (cacosh, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2822 TEST_c_c (cacosh, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2823 TEST_c_c (cacosh, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2824 TEST_c_c (cacosh, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2825 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, 1.490116119384765638786343542550461592240e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2826 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, 3.141592638688632044614986995416067458693L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2827 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, -1.490116119384765638786343542550461592240e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2828 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, -3.141592638688632044614986995416067458693L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2829 TEST_c_c (cacosh, 0.0L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2830 TEST_c_c (cacosh, 0.0L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2831 TEST_c_c (cacosh, -0.0L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2832 TEST_c_c (cacosh, -0.0L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2833 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, 0.0L, 0.0L, 1.490116119384765638786343542550461592240e-8L),
2834 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, 0.0L, 0.0L, 3.141592638688632044614986995416067458693L),
2835 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, -0.0L, 0.0L, -1.490116119384765638786343542550461592240e-8L),
2836 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, -0.0L, 0.0L, -3.141592638688632044614986995416067458693L),
2837#endif
2838 TEST_c_c (cacosh, 0x1p-52L, 0.5L, 4.812118250596034474977589134243772428682e-1L, 1.570796326794896420628589431857911675917L),
2839 TEST_c_c (cacosh, 0x1p-52L, -0.5L, 4.812118250596034474977589134243772428682e-1L, -1.570796326794896420628589431857911675917L),
2840 TEST_c_c (cacosh, -0x1p-52L, 0.5L, 4.812118250596034474977589134243772428682e-1L, 1.570796326794896817834053951421591208280L),
2841 TEST_c_c (cacosh, -0x1p-52L, -0.5L, 4.812118250596034474977589134243772428682e-1L, -1.570796326794896817834053951421591208280L),
2842 TEST_c_c (cacosh, 0.5L, 0x1p-52L, 2.563950248511418570403591756798643804971e-16L, 1.047197551196597746154214461093186605110L),
2843 TEST_c_c (cacosh, -0.5L, 0x1p-52L, 2.563950248511418570403591756798643804971e-16L, 2.094395102393195492308428922186316279087L),
2844 TEST_c_c (cacosh, 0.5L, -0x1p-52L, 2.563950248511418570403591756798643804971e-16L, -1.047197551196597746154214461093186605110L),
2845 TEST_c_c (cacosh, -0.5L, -0x1p-52L, 2.563950248511418570403591756798643804971e-16L, -2.094395102393195492308428922186316279087L),
52ce4860 2846#ifndef TEST_FLOAT
08198877
JM		 2847 TEST_c_c (cacosh, 0x1.fp-1025L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
2848 TEST_c_c (cacosh, 0x1.fp-1025L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
2849 TEST_c_c (cacosh, -0x1.fp-1025L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
2850 TEST_c_c (cacosh, -0x1.fp-1025L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
2851 TEST_c_c (cacosh, 0.5L, 0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, 1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_DOUBLE),
2852 TEST_c_c (cacosh, -0.5L, 0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, 2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_DOUBLE),
2853 TEST_c_c (cacosh, 0.5L, -0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, -1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_DOUBLE),
2854 TEST_c_c (cacosh, -0.5L, -0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, -2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_DOUBLE),
2855#endif
2856 TEST_c_c (cacosh, 0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181677117148e-16L, 1.570796326794896397186716766608443357372L),
2857 TEST_c_c (cacosh, 0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181677117148e-16L, -1.570796326794896397186716766608443357372L),
2858 TEST_c_c (cacosh, -0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181677117148e-16L, 1.570796326794896841275926616671059526825L),
2859 TEST_c_c (cacosh, -0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181677117148e-16L, -1.570796326794896841275926616671059526825L),
52ce4860 2860#ifndef TEST_FLOAT
08198877
JM		 2861 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2862 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2863 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2864 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2865 TEST_c_c (cacosh, 0x1p-52L, 0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, 1.570796326794896397186716766608443357372L, UNDERFLOW_EXCEPTION_DOUBLE),
2866 TEST_c_c (cacosh, -0x1p-52L, 0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, 1.570796326794896841275926616671059526825L, UNDERFLOW_EXCEPTION_DOUBLE),
2867 TEST_c_c (cacosh, 0x1p-52L, -0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, -1.570796326794896397186716766608443357372L, UNDERFLOW_EXCEPTION_DOUBLE),
2868 TEST_c_c (cacosh, -0x1p-52L, -0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, -1.570796326794896841275926616671059526825L, UNDERFLOW_EXCEPTION_DOUBLE),
2869#endif
2870 TEST_c_c (cacosh, 0.0L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2871 TEST_c_c (cacosh, 0.0L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2872 TEST_c_c (cacosh, -0.0L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2873 TEST_c_c (cacosh, -0.0L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2874 TEST_c_c (cacosh, 0x1p-52L, 0.0L, 0.0L, 1.570796326794896397186716766608443357372L),
2875 TEST_c_c (cacosh, -0x1p-52L, 0.0L, 0.0L, 1.570796326794896841275926616671059526825L),
2876 TEST_c_c (cacosh, 0x1p-52L, -0.0L, 0.0L, -1.570796326794896397186716766608443357372L),
2877 TEST_c_c (cacosh, -0x1p-52L, -0.0L, 0.0L, -1.570796326794896841275926616671059526825L),
52ce4860 2878#ifndef TEST_FLOAT
08198877
JM		 2879 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
2880 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
2881 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
2882 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
52ce4860
JM		 2883#endif
2884#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 2885 TEST_c_c (cacosh, 0x1p-63L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, 1.570796326794896619154657020805582738025L),
2886 TEST_c_c (cacosh, 0x1p-63L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, -1.570796326794896619154657020805582738025L),
2887 TEST_c_c (cacosh, -0x1p-63L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, 1.570796326794896619307986362473920146173L),
2888 TEST_c_c (cacosh, -0x1p-63L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, -1.570796326794896619307986362473920146173L),
2889 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, 0x1p-63L, 2.588578361325995866221775673638805081337e-10L, 4.188407771167967636741951941902992986043e-10L),
2890 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, 0x1p-63L, 2.588578361325995866221775673638805081337e-10L, 3.141592653170952461345846619605307690007L),
2891 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, -0x1p-63L, 2.588578361325995866221775673638805081337e-10L, -4.188407771167967636741951941902992986043e-10L),
2892 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, -0x1p-63L, 2.588578361325995866221775673638805081337e-10L, -3.141592653170952461345846619605307690007L),
52ce4860 2893# if LDBL_MIN_EXP <= -16381
08198877
JM		 2894 TEST_c_c (cacosh, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
2895 TEST_c_c (cacosh, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
2896 TEST_c_c (cacosh, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
2897 TEST_c_c (cacosh, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
2898 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, 3.292722539913596233371825532007990724506e-10L),
2899 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, 3.141592653260520984471283759942320330996L),
2900 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, -3.292722539913596233371825532007990724506e-10L),
2901 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, -3.141592653260520984471283759942320330996L),
52ce4860 2902# endif
08198877
JM		 2903 TEST_c_c (cacosh, 0.0L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
2904 TEST_c_c (cacosh, 0.0L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
2905 TEST_c_c (cacosh, -0.0L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
2906 TEST_c_c (cacosh, -0.0L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
2907 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, 0.0L, 0.0L, 3.292722539913596233371825532007990724506e-10L),
2908 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, 0.0L, 0.0L, 3.141592653260520984471283759942320330996L),
2909 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, -0.0L, 0.0L, -3.292722539913596233371825532007990724506e-10L),
2910 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, -0.0L, 0.0L, -3.141592653260520984471283759942320330996L),
2911#endif
2912 TEST_c_c (cacosh, 0x1p-63L, 0.5L, 4.812118250596034474977589134243684231373e-1L, 1.570796326794896619134347701278529840650L),
2913 TEST_c_c (cacosh, 0x1p-63L, -0.5L, 4.812118250596034474977589134243684231373e-1L, -1.570796326794896619134347701278529840650L),
2914 TEST_c_c (cacosh, -0x1p-63L, 0.5L, 4.812118250596034474977589134243684231373e-1L, 1.570796326794896619328295682000973043547L),
2915 TEST_c_c (cacosh, -0x1p-63L, -0.5L, 4.812118250596034474977589134243684231373e-1L, -1.570796326794896619328295682000973043547L),
2916 TEST_c_c (cacosh, 0.5L, 0x1p-63L, 1.251928832280966098829878787499365228659e-19L, 1.047197551196597746154214461093167628070L),
2917 TEST_c_c (cacosh, -0.5L, 0x1p-63L, 1.251928832280966098829878787499365228659e-19L, 2.094395102393195492308428922186335256127L),
2918 TEST_c_c (cacosh, 0.5L, -0x1p-63L, 1.251928832280966098829878787499365228659e-19L, -1.047197551196597746154214461093167628070L),
2919 TEST_c_c (cacosh, -0.5L, -0x1p-63L, 1.251928832280966098829878787499365228659e-19L, -2.094395102393195492308428922186335256127L),
52ce4860 2920#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2921 TEST_c_c (cacosh, 0x1.fp-16385L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
2922 TEST_c_c (cacosh, 0x1.fp-16385L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
2923 TEST_c_c (cacosh, -0x1.fp-16385L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
2924 TEST_c_c (cacosh, -0x1.fp-16385L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
2925 TEST_c_c (cacosh, 0.5L, 0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, 1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION),
2926 TEST_c_c (cacosh, -0.5L, 0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, 2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION),
2927 TEST_c_c (cacosh, 0.5L, -0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, -1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION),
2928 TEST_c_c (cacosh, -0.5L, -0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, -2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION),
2929#endif
2930 TEST_c_c (cacosh, 0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711430e-19L, 1.570796326794896619122901474391200998698L),
2931 TEST_c_c (cacosh, 0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711430e-19L, -1.570796326794896619122901474391200998698L),
2932 TEST_c_c (cacosh, -0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711430e-19L, 1.570796326794896619339741908888301885499L),
2933 TEST_c_c (cacosh, -0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711430e-19L, -1.570796326794896619339741908888301885499L),
52ce4860 2934#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2935 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
2936 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
2937 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
2938 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
2939 TEST_c_c (cacosh, 0x1p-63L, 0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION),
2940 TEST_c_c (cacosh, -0x1p-63L, 0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, 1.570796326794896619339741908888301885499L, UNDERFLOW_EXCEPTION),
2941 TEST_c_c (cacosh, 0x1p-63L, -0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, -1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION),
2942 TEST_c_c (cacosh, -0x1p-63L, -0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, -1.570796326794896619339741908888301885499L, UNDERFLOW_EXCEPTION),
2943#endif
2944 TEST_c_c (cacosh, 0.0L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
2945 TEST_c_c (cacosh, 0.0L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
2946 TEST_c_c (cacosh, -0.0L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
2947 TEST_c_c (cacosh, -0.0L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
2948 TEST_c_c (cacosh, 0x1p-63L, 0.0L, 0.0L, 1.570796326794896619122901474391200998698L),
2949 TEST_c_c (cacosh, -0x1p-63L, 0.0L, 0.0L, 1.570796326794896619339741908888301885499L),
2950 TEST_c_c (cacosh, 0x1p-63L, -0.0L, 0.0L, -1.570796326794896619122901474391200998698L),
2951 TEST_c_c (cacosh, -0x1p-63L, -0.0L, 0.0L, -1.570796326794896619339741908888301885499L),
52ce4860 2952#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 2953 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
2954 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
2955 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
2956 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
52ce4860
JM		 2957#endif
2958#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 2959 TEST_c_c (cacosh, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639734010571L),
2960 TEST_c_c (cacosh, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639734010571L),
2961 TEST_c_c (cacosh, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639768873627L),
2962 TEST_c_c (cacosh, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639768873627L),
2963 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.234330349600789959989661887846005659983e-16L, 1.997188458999618357060632049675702684031e-16L),
2964 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.234330349600789959989661887846005659983e-16L, 3.141592653589793038743797483317667178134L),
2965 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.234330349600789959989661887846005659983e-16L, -1.997188458999618357060632049675702684031e-16L),
2966 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.234330349600789959989661887846005659983e-16L, -3.141592653589793038743797483317667178134L),
2967 TEST_c_c (cacosh, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
2968 TEST_c_c (cacosh, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
2969 TEST_c_c (cacosh, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
2970 TEST_c_c (cacosh, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
2971 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, 1.570092458683775059393382371963565104164e-16L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2972 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, 3.141592653589793081453397514901996944859L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2973 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, -1.570092458683775059393382371963565104164e-16L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2974 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, -3.141592653589793081453397514901996944859L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2975 TEST_c_c (cacosh, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
2976 TEST_c_c (cacosh, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
2977 TEST_c_c (cacosh, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
2978 TEST_c_c (cacosh, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
2979 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 0.0L, 1.570092458683775059393382371963565104164e-16L),
2980 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 0.0L, 3.141592653589793081453397514901996944859L),
2981 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 0.0L, -1.570092458683775059393382371963565104164e-16L),
2982 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 0.0L, -3.141592653589793081453397514901996944859L),
2983#endif
2984 TEST_c_c (cacosh, 0x1p-105L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639729392766L),
2985 TEST_c_c (cacosh, 0x1p-105L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639729392766L),
2986 TEST_c_c (cacosh, -0x1p-105L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639773491431L),
2987 TEST_c_c (cacosh, -0x1p-105L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639773491431L),
2988 TEST_c_c (cacosh, 0.5L, 0x1p-105L, 2.846556599890768890940941645338546615370e-32L, 1.047197551196597746154214461093167628066L),
2989 TEST_c_c (cacosh, -0.5L, 0x1p-105L, 2.846556599890768890940941645338546615370e-32L, 2.094395102393195492308428922186335256131L),
2990 TEST_c_c (cacosh, 0.5L, -0x1p-105L, 2.846556599890768890940941645338546615370e-32L, -1.047197551196597746154214461093167628066L),
2991 TEST_c_c (cacosh, -0.5L, -0x1p-105L, 2.846556599890768890940941645338546615370e-32L, -2.094395102393195492308428922186335256131L),
2992 TEST_c_c (cacosh, 0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639726790195L),
2993 TEST_c_c (cacosh, 0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639726790195L),
2994 TEST_c_c (cacosh, -0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639776094002L),
2995 TEST_c_c (cacosh, -0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639776094002L),
52ce4860 2996#ifndef TEST_FLOAT
08198877
JM		 2997 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
2998 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
2999 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3000 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3001 TEST_c_c (cacosh, 0x1p-105L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639726790195L, UNDERFLOW_EXCEPTION_DOUBLE),
3002 TEST_c_c (cacosh, -0x1p-105L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639776094002L, UNDERFLOW_EXCEPTION_DOUBLE),
3003 TEST_c_c (cacosh, 0x1p-105L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639726790195L, UNDERFLOW_EXCEPTION_DOUBLE),
3004 TEST_c_c (cacosh, -0x1p-105L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639776094002L, UNDERFLOW_EXCEPTION_DOUBLE),
3005#endif
3006 TEST_c_c (cacosh, 0.0L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3007 TEST_c_c (cacosh, 0.0L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3008 TEST_c_c (cacosh, -0.0L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3009 TEST_c_c (cacosh, -0.0L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3010 TEST_c_c (cacosh, 0x1p-105L, 0.0L, 0.0L, 1.570796326794896619231321691639726790195L),
3011 TEST_c_c (cacosh, -0x1p-105L, 0.0L, 0.0L, 1.570796326794896619231321691639776094002L),
3012 TEST_c_c (cacosh, 0x1p-105L, -0.0L, 0.0L, -1.570796326794896619231321691639726790195L),
3013 TEST_c_c (cacosh, -0x1p-105L, -0.0L, 0.0L, -1.570796326794896619231321691639776094002L),
52ce4860 3014#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 3015 TEST_c_c (cacosh, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751305915L),
3016 TEST_c_c (cacosh, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751305915L),
3017 TEST_c_c (cacosh, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751578282L),
3018 TEST_c_c (cacosh, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751578282L),
3019 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.091004200533850618345330909857103457781e-17L, 1.765281878332676474347460257221369818872e-17L),
3020 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.091004200533850618345330909857103457781e-17L, 3.141592653589793220809824599952738140723L),
3021 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.091004200533850618345330909857103457781e-17L, -1.765281878332676474347460257221369818872e-17L),
3022 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.091004200533850618345330909857103457781e-17L, -3.141592653589793220809824599952738140723L),
3023 TEST_c_c (cacosh, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3024 TEST_c_c (cacosh, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3025 TEST_c_c (cacosh, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3026 TEST_c_c (cacosh, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3027 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, 1.387778780781445675529539585113525401762e-17L),
3028 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, 3.141592653589793224584855575465046128902L),
3029 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, -1.387778780781445675529539585113525401762e-17L),
3030 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, -3.141592653589793224584855575465046128902L),
3031 TEST_c_c (cacosh, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3032 TEST_c_c (cacosh, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3033 TEST_c_c (cacosh, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3034 TEST_c_c (cacosh, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3035 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 0.0L, 1.387778780781445675529539585113525401762e-17L),
3036 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 0.0L, 3.141592653589793224584855575465046128902L),
3037 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 0.0L, -1.387778780781445675529539585113525401762e-17L),
3038 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 0.0L, -3.141592653589793224584855575465046128902L),
3039#endif
3040 TEST_c_c (cacosh, 0x1p-112L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751269838L),
3041 TEST_c_c (cacosh, 0x1p-112L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751269838L),
3042 TEST_c_c (cacosh, -0x1p-112L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751614359L),
3043 TEST_c_c (cacosh, -0x1p-112L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751614359L),
3044 TEST_c_c (cacosh, 0.5L, 0x1p-112L, 2.223872343664663196047610660420739543258e-34L, 1.047197551196597746154214461093167628066L),
3045 TEST_c_c (cacosh, -0.5L, 0x1p-112L, 2.223872343664663196047610660420739543258e-34L, 2.094395102393195492308428922186335256131L),
3046 TEST_c_c (cacosh, 0.5L, -0x1p-112L, 2.223872343664663196047610660420739543258e-34L, -1.047197551196597746154214461093167628066L),
3047 TEST_c_c (cacosh, -0.5L, -0x1p-112L, 2.223872343664663196047610660420739543258e-34L, -2.094395102393195492308428922186335256131L),
3048 TEST_c_c (cacosh, 0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751249506L),
3049 TEST_c_c (cacosh, 0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751249506L),
3050 TEST_c_c (cacosh, -0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751634692L),
3051 TEST_c_c (cacosh, -0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751634692L),
52ce4860 3052#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3053 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3054 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3055 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3056 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3057 TEST_c_c (cacosh, 0x1p-112L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751249506L, UNDERFLOW_EXCEPTION),
3058 TEST_c_c (cacosh, -0x1p-112L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751634692L, UNDERFLOW_EXCEPTION),
3059 TEST_c_c (cacosh, 0x1p-112L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751249506L, UNDERFLOW_EXCEPTION),
3060 TEST_c_c (cacosh, -0x1p-112L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751634692L, UNDERFLOW_EXCEPTION),
3061#endif
3062 TEST_c_c (cacosh, 0.0L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3063 TEST_c_c (cacosh, 0.0L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3064 TEST_c_c (cacosh, -0.0L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3065 TEST_c_c (cacosh, -0.0L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3066 TEST_c_c (cacosh, 0x1p-112L, 0.0L, 0.0L, 1.570796326794896619231321691639751249506L),
3067 TEST_c_c (cacosh, -0x1p-112L, 0.0L, 0.0L, 1.570796326794896619231321691639751634692L),
3068 TEST_c_c (cacosh, 0x1p-112L, -0.0L, 0.0L, -1.570796326794896619231321691639751249506L),
3069 TEST_c_c (cacosh, -0x1p-112L, -0.0L, 0.0L, -1.570796326794896619231321691639751634692L),
3070
3071 TEST_c_c (cacosh, 0.75L, 1.25L, 1.13239363160530819522266333696834467L, 1.11752014915610270578240049553777969L),
3072 TEST_c_c (cacosh, -2, -3, 1.9833870299165354323470769028940395L, -2.1414491111159960199416055713254211L),
3073 END_DATA (cacosh)
3074 };
3075
3076static void
3077cacosh_test (void)
3078{
3079 errno = 0;
3080 FUNC(cacosh) (BUILD_COMPLEX (0.7L, 1.2L));
3081 if (errno == ENOSYS)
3082 /* Function not implemented. */
3083 return;
8847214f 3084
08198877
JM		 3085 START (cacosh);
3086 RUN_TEST_LOOP_c_c (cacosh, cacosh_test_data, );
6815fabc 3087 END (cacosh, complex);
8847214f
UD		 3088}
3089
2550dfe9 3090
8847214f
UD		 3091static void
3092carg_test (void)
3093{
3094 START (carg);
3095
3096 /* carg (x + iy) is specified as atan2 (y, x) */
3097
3098 /* carg (x + i 0) == 0 for x > 0. */
3099 TEST_c_f (carg, 2.0, 0, 0);
3100 /* carg (x - i 0) == -0 for x > 0. */
3101 TEST_c_f (carg, 2.0, minus_zero, minus_zero);
3102
3103 TEST_c_f (carg, 0, 0, 0);
3104 TEST_c_f (carg, 0, minus_zero, minus_zero);
3105
3106 /* carg (x + i 0) == +pi for x < 0. */
3107 TEST_c_f (carg, -2.0, 0, M_PIl);
3108
3109 /* carg (x - i 0) == -pi for x < 0. */
3110 TEST_c_f (carg, -2.0, minus_zero, -M_PIl);
3111
3112 TEST_c_f (carg, minus_zero, 0, M_PIl);
3113 TEST_c_f (carg, minus_zero, minus_zero, -M_PIl);
3114
3115 /* carg (+0 + i y) == pi/2 for y > 0. */
3116 TEST_c_f (carg, 0, 2.0, M_PI_2l);
3117
3118 /* carg (-0 + i y) == pi/2 for y > 0. */
3119 TEST_c_f (carg, minus_zero, 2.0, M_PI_2l);
3120
3121 /* carg (+0 + i y) == -pi/2 for y < 0. */
3122 TEST_c_f (carg, 0, -2.0, -M_PI_2l);
3123
3124 /* carg (-0 + i y) == -pi/2 for y < 0. */
3125 TEST_c_f (carg, minus_zero, -2.0, -M_PI_2l);
3126
3127 /* carg (inf + i y) == +0 for finite y > 0. */
3128 TEST_c_f (carg, plus_infty, 2.0, 0);
3129
3130 /* carg (inf + i y) == -0 for finite y < 0. */
3131 TEST_c_f (carg, plus_infty, -2.0, minus_zero);
3132
3133 /* carg(x + i inf) == pi/2 for finite x. */
3134 TEST_c_f (carg, 10.0, plus_infty, M_PI_2l);
3135
3136 /* carg(x - i inf) == -pi/2 for finite x. */
3137 TEST_c_f (carg, 10.0, minus_infty, -M_PI_2l);
3138
3139 /* carg (-inf + i y) == +pi for finite y > 0. */
3140 TEST_c_f (carg, minus_infty, 10.0, M_PIl);
3141
3142 /* carg (-inf + i y) == -pi for finite y < 0. */
3143 TEST_c_f (carg, minus_infty, -10.0, -M_PIl);
3144
3145 TEST_c_f (carg, plus_infty, plus_infty, M_PI_4l);
3146
3147 TEST_c_f (carg, plus_infty, minus_infty, -M_PI_4l);
3148
24f56066 3149 TEST_c_f (carg, minus_infty, plus_infty, M_PI_34l);
8847214f 3150
24f56066 3151 TEST_c_f (carg, minus_infty, minus_infty, -M_PI_34l);
8847214f 3152
67e971f1 3153 TEST_c_f (carg, qnan_value, qnan_value, qnan_value);
15daa639 3154
8847214f
UD		 3155 END (carg);
3156}
3157
08198877
JM		 3158static const struct test_c_c_data casin_test_data[] =
3159 {
3160 START_DATA (casin),
3161 TEST_c_c (casin, 0, 0, 0.0, 0.0),
3162 TEST_c_c (casin, minus_zero, 0, minus_zero, 0.0),
3163 TEST_c_c (casin, 0, minus_zero, 0.0, minus_zero),
3164 TEST_c_c (casin, minus_zero, minus_zero, minus_zero, minus_zero),
3165
3166 TEST_c_c (casin, plus_infty, plus_infty, M_PI_4l, plus_infty),
3167 TEST_c_c (casin, plus_infty, minus_infty, M_PI_4l, minus_infty),
3168 TEST_c_c (casin, minus_infty, plus_infty, -M_PI_4l, plus_infty),
3169 TEST_c_c (casin, minus_infty, minus_infty, -M_PI_4l, minus_infty),
3170
3171 TEST_c_c (casin, -10.0, plus_infty, minus_zero, plus_infty),
3172 TEST_c_c (casin, -10.0, minus_infty, minus_zero, minus_infty),
3173 TEST_c_c (casin, 0, plus_infty, 0.0, plus_infty),
3174 TEST_c_c (casin, 0, minus_infty, 0.0, minus_infty),
3175 TEST_c_c (casin, minus_zero, plus_infty, minus_zero, plus_infty),
3176 TEST_c_c (casin, minus_zero, minus_infty, minus_zero, minus_infty),
3177 TEST_c_c (casin, 0.1L, plus_infty, 0.0, plus_infty),
3178 TEST_c_c (casin, 0.1L, minus_infty, 0.0, minus_infty),
3179
3180 TEST_c_c (casin, minus_infty, 0, -M_PI_2l, plus_infty),
3181 TEST_c_c (casin, minus_infty, minus_zero, -M_PI_2l, minus_infty),
3182 TEST_c_c (casin, minus_infty, 100, -M_PI_2l, plus_infty),
3183 TEST_c_c (casin, minus_infty, -100, -M_PI_2l, minus_infty),
3184
3185 TEST_c_c (casin, plus_infty, 0, M_PI_2l, plus_infty),
3186 TEST_c_c (casin, plus_infty, minus_zero, M_PI_2l, minus_infty),
3187 TEST_c_c (casin, plus_infty, 0.5, M_PI_2l, plus_infty),
3188 TEST_c_c (casin, plus_infty, -0.5, M_PI_2l, minus_infty),
3189
3190 TEST_c_c (casin, qnan_value, plus_infty, qnan_value, plus_infty),
3191 TEST_c_c (casin, qnan_value, minus_infty, qnan_value, minus_infty),
3192
3193 TEST_c_c (casin, 0.0, qnan_value, 0.0, qnan_value),
3194 TEST_c_c (casin, minus_zero, qnan_value, minus_zero, qnan_value),
3195
3196 TEST_c_c (casin, plus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
3197 TEST_c_c (casin, minus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
3198
3199 TEST_c_c (casin, qnan_value, 10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3200 TEST_c_c (casin, qnan_value, -10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3201
3202 TEST_c_c (casin, 0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3203 TEST_c_c (casin, -0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3204
3205 TEST_c_c (casin, qnan_value, qnan_value, qnan_value, qnan_value),
3206
3207 TEST_c_c (casin, plus_zero, -1.5L, plus_zero, -1.194763217287109304111930828519090523536L),
3208 TEST_c_c (casin, minus_zero, -1.5L, minus_zero, -1.194763217287109304111930828519090523536L),
3209 TEST_c_c (casin, plus_zero, -1.0L, plus_zero, -0.8813735870195430252326093249797923090282L),
3210 TEST_c_c (casin, minus_zero, -1.0L, minus_zero, -0.8813735870195430252326093249797923090282L),
3211 TEST_c_c (casin, plus_zero, -0.5L, plus_zero, -0.4812118250596034474977589134243684231352L),
3212 TEST_c_c (casin, minus_zero, -0.5L, minus_zero, -0.4812118250596034474977589134243684231352L),
3213 TEST_c_c (casin, plus_zero, 0.5L, plus_zero, 0.4812118250596034474977589134243684231352L),
3214 TEST_c_c (casin, minus_zero, 0.5L, minus_zero, 0.4812118250596034474977589134243684231352L),
3215 TEST_c_c (casin, plus_zero, 1.0L, plus_zero, 0.8813735870195430252326093249797923090282L),
3216 TEST_c_c (casin, minus_zero, 1.0L, minus_zero, 0.8813735870195430252326093249797923090282L),
3217 TEST_c_c (casin, plus_zero, 1.5L, plus_zero, 1.194763217287109304111930828519090523536L),
3218 TEST_c_c (casin, minus_zero, 1.5L, minus_zero, 1.194763217287109304111930828519090523536L),
3219
3220 TEST_c_c (casin, -1.5L, plus_zero, -M_PI_2l, 0.9624236501192068949955178268487368462704L),
3221 TEST_c_c (casin, -1.5L, minus_zero, -M_PI_2l, -0.9624236501192068949955178268487368462704L),
3222 TEST_c_c (casin, -1.0L, plus_zero, -M_PI_2l, plus_zero),
3223 TEST_c_c (casin, -1.0L, minus_zero, -M_PI_2l, minus_zero),
3224 TEST_c_c (casin, -0.5L, plus_zero, -0.5235987755982988730771072305465838140329L, plus_zero),
3225 TEST_c_c (casin, -0.5L, minus_zero, -0.5235987755982988730771072305465838140329L, minus_zero),
3226 TEST_c_c (casin, 0.5L, plus_zero, 0.5235987755982988730771072305465838140329L, plus_zero),
3227 TEST_c_c (casin, 0.5L, minus_zero, 0.5235987755982988730771072305465838140329L, minus_zero),
3228 TEST_c_c (casin, 1.0L, plus_zero, M_PI_2l, plus_zero),
3229 TEST_c_c (casin, 1.0L, minus_zero, M_PI_2l, minus_zero),
3230 TEST_c_c (casin, 1.5L, plus_zero, M_PI_2l, 0.9624236501192068949955178268487368462704L),
3231 TEST_c_c (casin, 1.5L, minus_zero, M_PI_2l, -0.9624236501192068949955178268487368462704L),
3232
3233 TEST_c_c (casin, 0x1p50L, 1.0L, 1.570796326794895731052901991514519103193L, 3.535050620855721078027883819436720218708e1L),
3234 TEST_c_c (casin, 0x1p50L, -1.0L, 1.570796326794895731052901991514519103193L, -3.535050620855721078027883819436720218708e1L),
3235 TEST_c_c (casin, -0x1p50L, 1.0L, -1.570796326794895731052901991514519103193L, 3.535050620855721078027883819436720218708e1L),
3236 TEST_c_c (casin, -0x1p50L, -1.0L, -1.570796326794895731052901991514519103193L, -3.535050620855721078027883819436720218708e1L),
3237 TEST_c_c (casin, 1.0L, 0x1p50L, 8.881784197001252323389053344720723756399e-16L, 3.535050620855721078027883819436759661753e1L),
3238 TEST_c_c (casin, -1.0L, 0x1p50L, -8.881784197001252323389053344720723756399e-16L, 3.535050620855721078027883819436759661753e1L),
3239 TEST_c_c (casin, 1.0L, -0x1p50L, 8.881784197001252323389053344720723756399e-16L, -3.535050620855721078027883819436759661753e1L),
3240 TEST_c_c (casin, -1.0L, -0x1p50L, -8.881784197001252323389053344720723756399e-16L, -3.535050620855721078027883819436759661753e1L),
cdc1c96f 3241#ifndef TEST_FLOAT
08198877
JM		 3242 TEST_c_c (casin, 0x1p500L, 1.0L, 1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
3243 TEST_c_c (casin, 0x1p500L, -1.0L, 1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
3244 TEST_c_c (casin, -0x1p500L, 1.0L, -1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
3245 TEST_c_c (casin, -0x1p500L, -1.0L, -1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
3246 TEST_c_c (casin, 1.0L, 0x1p500L, 3.054936363499604682051979393213617699789e-151L, 3.472667374605326000180332928505464606058e2L),
3247 TEST_c_c (casin, -1.0L, 0x1p500L, -3.054936363499604682051979393213617699789e-151L, 3.472667374605326000180332928505464606058e2L),
3248 TEST_c_c (casin, 1.0L, -0x1p500L, 3.054936363499604682051979393213617699789e-151L, -3.472667374605326000180332928505464606058e2L),
3249 TEST_c_c (casin, -1.0L, -0x1p500L, -3.054936363499604682051979393213617699789e-151L, -3.472667374605326000180332928505464606058e2L),
cdc1c96f
JM		 3250#endif
3251#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 3252 TEST_c_c (casin, 0x1p5000L, 1.0L, 1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
3253 TEST_c_c (casin, 0x1p5000L, -1.0L, 1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
3254 TEST_c_c (casin, -0x1p5000L, 1.0L, -1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
3255 TEST_c_c (casin, -0x1p5000L, -1.0L, -1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
3256 TEST_c_c (casin, 1.0L, 0x1p5000L, 7.079811261048172892385615158694057552948e-1506L, 3.466429049980286492395577839412341016946e3L),
3257 TEST_c_c (casin, -1.0L, 0x1p5000L, -7.079811261048172892385615158694057552948e-1506L, 3.466429049980286492395577839412341016946e3L),
3258 TEST_c_c (casin, 1.0L, -0x1p5000L, 7.079811261048172892385615158694057552948e-1506L, -3.466429049980286492395577839412341016946e3L),
3259 TEST_c_c (casin, -1.0L, -0x1p5000L, -7.079811261048172892385615158694057552948e-1506L, -3.466429049980286492395577839412341016946e3L),
cdc1c96f
JM		 3260#endif
3261
08198877 3262 TEST_c_c (casin, 0x1.fp127L, 0x1.fp127L, 7.853981633974483096156608458198757210493e-1L, 8.973081118419833726837456344608533993585e1L),
a9708fed 3263#ifndef TEST_FLOAT
08198877 3264 TEST_c_c (casin, 0x1.fp1023L, 0x1.fp1023L, 7.853981633974483096156608458198757210493e-1L, 7.107906849659093345062145442726115449315e2L),
a9708fed
JM		 3265#endif
3266#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 3267 TEST_c_c (casin, 0x1.fp16383L, 0x1.fp16383L, 7.853981633974483096156608458198757210493e-1L, 1.135753137836666928715489992987020363057e4L),
a9708fed
JM		 3268#endif
3269
08198877
JM		 3270 TEST_c_c (casin, 0x1.fp-129L, 1.5L, 1.579176199917649005841160751101628985741e-39L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3271 TEST_c_c (casin, 0x1.fp-129L, -1.5L, 1.579176199917649005841160751101628985741e-39L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3272 TEST_c_c (casin, -0x1.fp-129L, 1.5L, -1.579176199917649005841160751101628985741e-39L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3273 TEST_c_c (casin, -0x1.fp-129L, -1.5L, -1.579176199917649005841160751101628985741e-39L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3274 TEST_c_c (casin, 1.5L, 0x1.fp-129L, 1.570796326794896619231321691639751442096L, 9.624236501192068949955178268487368462704e-1L),
3275 TEST_c_c (casin, -1.5L, 0x1.fp-129L, -1.570796326794896619231321691639751442096L, 9.624236501192068949955178268487368462704e-1L),
3276 TEST_c_c (casin, 1.5L, -0x1.fp-129L, 1.570796326794896619231321691639751442096L, -9.624236501192068949955178268487368462704e-1L),
3277 TEST_c_c (casin, -1.5L, -0x1.fp-129L, -1.570796326794896619231321691639751442096L, -9.624236501192068949955178268487368462704e-1L),
8cf28c5e 3278#ifndef TEST_FLOAT
08198877
JM		 3279 TEST_c_c (casin, 0x1.fp-1025L, 1.5L, 2.989196569048182929051881765490354365918e-309L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3280 TEST_c_c (casin, 0x1.fp-1025L, -1.5L, 2.989196569048182929051881765490354365918e-309L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3281 TEST_c_c (casin, -0x1.fp-1025L, 1.5L, -2.989196569048182929051881765490354365918e-309L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3282 TEST_c_c (casin, -0x1.fp-1025L, -1.5L, -2.989196569048182929051881765490354365918e-309L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3283 TEST_c_c (casin, 1.5L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3284 TEST_c_c (casin, -1.5L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3285 TEST_c_c (casin, 1.5L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3286 TEST_c_c (casin, -1.5L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
8cf28c5e
JM		 3287#endif
3288#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3289 TEST_c_c (casin, 0x1.fp-16385L, 1.5L, 4.516698239814521372306784062043266700598e-4933L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3290 TEST_c_c (casin, 0x1.fp-16385L, -1.5L, 4.516698239814521372306784062043266700598e-4933L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3291 TEST_c_c (casin, -0x1.fp-16385L, 1.5L, -4.516698239814521372306784062043266700598e-4933L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3292 TEST_c_c (casin, -0x1.fp-16385L, -1.5L, -4.516698239814521372306784062043266700598e-4933L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3293 TEST_c_c (casin, 1.5L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3294 TEST_c_c (casin, -1.5L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3295 TEST_c_c (casin, 1.5L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3296 TEST_c_c (casin, -1.5L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3297#endif
3298
3299 TEST_c_c (casin, 0.5L, 1.0L, 3.494390628572132936274118260753699527325e-1L, 9.261330313501824245501244453057873152694e-1L),
3300 TEST_c_c (casin, 0.5L, -1.0L, 3.494390628572132936274118260753699527325e-1L, -9.261330313501824245501244453057873152694e-1L),
3301 TEST_c_c (casin, -0.5L, 1.0L, -3.494390628572132936274118260753699527325e-1L, 9.261330313501824245501244453057873152694e-1L),
3302 TEST_c_c (casin, -0.5L, -1.0L, -3.494390628572132936274118260753699527325e-1L, -9.261330313501824245501244453057873152694e-1L),
3303 TEST_c_c (casin, 1.0L, 0.5L, 8.959074812088902390666567243275770102229e-1L, 7.328576759736452608886724437653071523305e-1L),
3304 TEST_c_c (casin, -1.0L, 0.5L, -8.959074812088902390666567243275770102229e-1L, 7.328576759736452608886724437653071523305e-1L),
3305 TEST_c_c (casin, 1.0L, -0.5L, 8.959074812088902390666567243275770102229e-1L, -7.328576759736452608886724437653071523305e-1L),
3306 TEST_c_c (casin, -1.0L, -0.5L, -8.959074812088902390666567243275770102229e-1L, -7.328576759736452608886724437653071523305e-1L),
3307 TEST_c_c (casin, 0.25L, 1.0L, 1.763024327769669304186785666360901026468e-1L, 8.924633639033482359562124741744951972772e-1L),
3308 TEST_c_c (casin, 0.25L, -1.0L, 1.763024327769669304186785666360901026468e-1L, -8.924633639033482359562124741744951972772e-1L),
3309 TEST_c_c (casin, -0.25L, 1.0L, -1.763024327769669304186785666360901026468e-1L, 8.924633639033482359562124741744951972772e-1L),
3310 TEST_c_c (casin, -0.25L, -1.0L, -1.763024327769669304186785666360901026468e-1L, -8.924633639033482359562124741744951972772e-1L),
3311 TEST_c_c (casin, 1.0L, 0.25L, 1.081751996523816326311037318425097434186L, 5.097911466811016354623559941115413499164e-1L),
3312 TEST_c_c (casin, -1.0L, 0.25L, -1.081751996523816326311037318425097434186L, 5.097911466811016354623559941115413499164e-1L),
3313 TEST_c_c (casin, 1.0L, -0.25L, 1.081751996523816326311037318425097434186L, -5.097911466811016354623559941115413499164e-1L),
3314 TEST_c_c (casin, -1.0L, -0.25L, -1.081751996523816326311037318425097434186L, -5.097911466811016354623559941115413499164e-1L),
3315 TEST_c_c (casin, 0x1.fp-10L, 1.0L, 1.337909359557740912558349531052239112857e-3L, 8.813742198809567991336704287826445879025e-1L),
3316 TEST_c_c (casin, 0x1.fp-10L, -1.0L, 1.337909359557740912558349531052239112857e-3L, -8.813742198809567991336704287826445879025e-1L),
3317 TEST_c_c (casin, -0x1.fp-10L, 1.0L, -1.337909359557740912558349531052239112857e-3L, 8.813742198809567991336704287826445879025e-1L),
3318 TEST_c_c (casin, -0x1.fp-10L, -1.0L, -1.337909359557740912558349531052239112857e-3L, -8.813742198809567991336704287826445879025e-1L),
3319 TEST_c_c (casin, 1.0L, 0x1.fp-10L, 1.527305029163877791518741192097931722508L, 4.350501469856803800217957402220976497152e-2L),
3320 TEST_c_c (casin, -1.0L, 0x1.fp-10L, -1.527305029163877791518741192097931722508L, 4.350501469856803800217957402220976497152e-2L),
3321 TEST_c_c (casin, 1.0L, -0x1.fp-10L, 1.527305029163877791518741192097931722508L, -4.350501469856803800217957402220976497152e-2L),
3322 TEST_c_c (casin, -1.0L, -0x1.fp-10L, -1.527305029163877791518741192097931722508L, -4.350501469856803800217957402220976497152e-2L),
3323 TEST_c_c (casin, 0x1.fp-30L, 1.0L, 1.275929984216518540252717485007112529021e-9L, 8.813735870195430258081932989769495326854e-1L),
3324 TEST_c_c (casin, 0x1.fp-30L, -1.0L, 1.275929984216518540252717485007112529021e-9L, -8.813735870195430258081932989769495326854e-1L),
3325 TEST_c_c (casin, -0x1.fp-30L, 1.0L, -1.275929984216518540252717485007112529021e-9L, 8.813735870195430258081932989769495326854e-1L),
3326 TEST_c_c (casin, -0x1.fp-30L, -1.0L, -1.275929984216518540252717485007112529021e-9L, -8.813735870195430258081932989769495326854e-1L),
3327 TEST_c_c (casin, 1.0L, 0x1.fp-30L, 1.570753848123921942730162693731872690232L, 4.247867098745151888768727039216644758847e-5L),
3328 TEST_c_c (casin, -1.0L, 0x1.fp-30L, -1.570753848123921942730162693731872690232L, 4.247867098745151888768727039216644758847e-5L),
3329 TEST_c_c (casin, 1.0L, -0x1.fp-30L, 1.570753848123921942730162693731872690232L, -4.247867098745151888768727039216644758847e-5L),
3330 TEST_c_c (casin, -1.0L, -0x1.fp-30L, -1.570753848123921942730162693731872690232L, -4.247867098745151888768727039216644758847e-5L),
3331 TEST_c_c (casin, 0x1.fp-100L, 1.0L, 1.080754735021050612990719608916167354321e-30L, 8.813735870195430252326093249797923090282e-1L),
3332 TEST_c_c (casin, 0x1.fp-100L, -1.0L, 1.080754735021050612990719608916167354321e-30L, -8.813735870195430252326093249797923090282e-1L),
3333 TEST_c_c (casin, -0x1.fp-100L, 1.0L, -1.080754735021050612990719608916167354321e-30L, 8.813735870195430252326093249797923090282e-1L),
3334 TEST_c_c (casin, -0x1.fp-100L, -1.0L, -1.080754735021050612990719608916167354321e-30L, -8.813735870195430252326093249797923090282e-1L),
3335 TEST_c_c (casin, 1.0L, 0x1.fp-100L, 1.570796326794895382939283431378862777584L, 1.236292038260260888664514866457202186027e-15L),
3336 TEST_c_c (casin, -1.0L, 0x1.fp-100L, -1.570796326794895382939283431378862777584L, 1.236292038260260888664514866457202186027e-15L),
3337 TEST_c_c (casin, 1.0L, -0x1.fp-100L, 1.570796326794895382939283431378862777584L, -1.236292038260260888664514866457202186027e-15L),
3338 TEST_c_c (casin, -1.0L, -0x1.fp-100L, -1.570796326794895382939283431378862777584L, -1.236292038260260888664514866457202186027e-15L),
3339 TEST_c_c (casin, 0x1.fp-129L, 1.0L, 2.013062564695348242280482517399205554874e-39L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3340 TEST_c_c (casin, 0x1.fp-129L, -1.0L, 2.013062564695348242280482517399205554874e-39L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3341 TEST_c_c (casin, -0x1.fp-129L, 1.0L, -2.013062564695348242280482517399205554874e-39L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3342 TEST_c_c (casin, -0x1.fp-129L, -1.0L, -2.013062564695348242280482517399205554874e-39L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3343 TEST_c_c (casin, 1.0L, 0x1.fp-129L, 1.570796326794896619177965338869929107115L, 5.335635276982233498398987585285818977933e-20L),
3344 TEST_c_c (casin, -1.0L, 0x1.fp-129L, -1.570796326794896619177965338869929107115L, 5.335635276982233498398987585285818977933e-20L),
3345 TEST_c_c (casin, 1.0L, -0x1.fp-129L, 1.570796326794896619177965338869929107115L, -5.335635276982233498398987585285818977933e-20L),
3346 TEST_c_c (casin, -1.0L, -0x1.fp-129L, -1.570796326794896619177965338869929107115L, -5.335635276982233498398987585285818977933e-20L),
0a1b2ae6 3347#ifndef TEST_FLOAT
08198877
JM		 3348 TEST_c_c (casin, 0x1.fp-1000L, 1.0L, 1.278589251976747242280879285935084814093e-301L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3349 TEST_c_c (casin, 0x1.fp-1000L, -1.0L, 1.278589251976747242280879285935084814093e-301L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3350 TEST_c_c (casin, -0x1.fp-1000L, 1.0L, -1.278589251976747242280879285935084814093e-301L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3351 TEST_c_c (casin, -0x1.fp-1000L, -1.0L, -1.278589251976747242280879285935084814093e-301L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3352 TEST_c_c (casin, 1.0L, 0x1.fp-1000L, 1.570796326794896619231321691639751442099L, 4.252291453851660175550490409247739011867e-151L),
3353 TEST_c_c (casin, -1.0L, 0x1.fp-1000L, -1.570796326794896619231321691639751442099L, 4.252291453851660175550490409247739011867e-151L),
3354 TEST_c_c (casin, 1.0L, -0x1.fp-1000L, 1.570796326794896619231321691639751442099L, -4.252291453851660175550490409247739011867e-151L),
3355 TEST_c_c (casin, -1.0L, -0x1.fp-1000L, -1.570796326794896619231321691639751442099L, -4.252291453851660175550490409247739011867e-151L),
3356 TEST_c_c (casin, 0x1.fp-1025L, 1.0L, 3.810492908885321743133304375216617626230e-309L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3357 TEST_c_c (casin, 0x1.fp-1025L, -1.0L, 3.810492908885321743133304375216617626230e-309L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3358 TEST_c_c (casin, -0x1.fp-1025L, 1.0L, -3.810492908885321743133304375216617626230e-309L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3359 TEST_c_c (casin, -0x1.fp-1025L, -1.0L, -3.810492908885321743133304375216617626230e-309L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3360 TEST_c_c (casin, 1.0L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 7.340879205566679497036857179189356754017e-155L),
3361 TEST_c_c (casin, -1.0L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 7.340879205566679497036857179189356754017e-155L),
3362 TEST_c_c (casin, 1.0L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -7.340879205566679497036857179189356754017e-155L),
3363 TEST_c_c (casin, -1.0L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -7.340879205566679497036857179189356754017e-155L),
0a1b2ae6
JM		 3364#endif
3365#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3366 TEST_c_c (casin, 0x1.fp-10000L, 1.0L, 6.867047849047171855399183659351043150871e-3011L, 8.813735870195430252326093249797923090282e-1L),
3367 TEST_c_c (casin, 0x1.fp-10000L, -1.0L, 6.867047849047171855399183659351043150871e-3011L, -8.813735870195430252326093249797923090282e-1L),
3368 TEST_c_c (casin, -0x1.fp-10000L, 1.0L, -6.867047849047171855399183659351043150871e-3011L, 8.813735870195430252326093249797923090282e-1L),
3369 TEST_c_c (casin, -0x1.fp-10000L, -1.0L, -6.867047849047171855399183659351043150871e-3011L, -8.813735870195430252326093249797923090282e-1L),
3370 TEST_c_c (casin, 1.0L, 0x1.fp-10000L, 1.570796326794896619231321691639751442099L, 9.854680208706673586644342922051388714633e-1506L),
3371 TEST_c_c (casin, -1.0L, 0x1.fp-10000L, -1.570796326794896619231321691639751442099L, 9.854680208706673586644342922051388714633e-1506L),
3372 TEST_c_c (casin, 1.0L, -0x1.fp-10000L, 1.570796326794896619231321691639751442099L, -9.854680208706673586644342922051388714633e-1506L),
3373 TEST_c_c (casin, -1.0L, -0x1.fp-10000L, -1.570796326794896619231321691639751442099L, -9.854680208706673586644342922051388714633e-1506L),
3374 TEST_c_c (casin, 0x1.fp-16385L, 1.0L, 5.757683115456107044131264955348448954458e-4933L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3375 TEST_c_c (casin, 0x1.fp-16385L, -1.0L, 5.757683115456107044131264955348448954458e-4933L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3376 TEST_c_c (casin, -0x1.fp-16385L, 1.0L, -5.757683115456107044131264955348448954458e-4933L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3377 TEST_c_c (casin, -0x1.fp-16385L, -1.0L, -5.757683115456107044131264955348448954458e-4933L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3378 TEST_c_c (casin, 1.0L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 9.023632056840860275214893047597614177639e-2467L),
3379 TEST_c_c (casin, -1.0L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 9.023632056840860275214893047597614177639e-2467L),
3380 TEST_c_c (casin, 1.0L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -9.023632056840860275214893047597614177639e-2467L),
3381 TEST_c_c (casin, -1.0L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -9.023632056840860275214893047597614177639e-2467L),
3382#endif
3383
3384 TEST_c_c (casin, 0x1p-23L, 0x1.000002p0L, 8.429369199749229560964789467980644296420e-8L, 8.813736713132400470205730751186547909968e-1L),
3385 TEST_c_c (casin, 0x1p-23L, -0x1.000002p0L, 8.429369199749229560964789467980644296420e-8L, -8.813736713132400470205730751186547909968e-1L),
3386 TEST_c_c (casin, -0x1p-23L, 0x1.000002p0L, -8.429369199749229560964789467980644296420e-8L, 8.813736713132400470205730751186547909968e-1L),
3387 TEST_c_c (casin, -0x1p-23L, -0x1.000002p0L, -8.429369199749229560964789467980644296420e-8L, -8.813736713132400470205730751186547909968e-1L),
3388 TEST_c_c (casin, 0x1.000002p0L, 0x1p-23L, 1.570574114956455764594481054234834678422L, 5.364668491573609633134147164031476452679e-4L),
3389 TEST_c_c (casin, -0x1.000002p0L, 0x1p-23L, -1.570574114956455764594481054234834678422L, 5.364668491573609633134147164031476452679e-4L),
3390 TEST_c_c (casin, 0x1.000002p0L, -0x1p-23L, 1.570574114956455764594481054234834678422L, -5.364668491573609633134147164031476452679e-4L),
3391 TEST_c_c (casin, -0x1.000002p0L, -0x1p-23L, -1.570574114956455764594481054234834678422L, -5.364668491573609633134147164031476452679e-4L),
3392 TEST_c_c (casin, 0x1.fp-129L, 0x1.000002p0L, 2.013062444707472738895109955455676357057e-39L, 8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3393 TEST_c_c (casin, 0x1.fp-129L, -0x1.000002p0L, 2.013062444707472738895109955455676357057e-39L, -8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3394 TEST_c_c (casin, -0x1.fp-129L, 0x1.000002p0L, -2.013062444707472738895109955455676357057e-39L, 8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3395 TEST_c_c (casin, -0x1.fp-129L, -0x1.000002p0L, -2.013062444707472738895109955455676357057e-39L, -8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3396 TEST_c_c (casin, 0x1.000002p0L, 0x1.fp-129L, 1.570796326794896619231321691639751436268L, 4.882812451493617206486388134172712975070e-4L),
3397 TEST_c_c (casin, -0x1.000002p0L, 0x1.fp-129L, -1.570796326794896619231321691639751436268L, 4.882812451493617206486388134172712975070e-4L),
3398 TEST_c_c (casin, 0x1.000002p0L, -0x1.fp-129L, 1.570796326794896619231321691639751436268L, -4.882812451493617206486388134172712975070e-4L),
3399 TEST_c_c (casin, -0x1.000002p0L, -0x1.fp-129L, -1.570796326794896619231321691639751436268L, -4.882812451493617206486388134172712975070e-4L),
3400 TEST_c_c (casin, 0.0L, 0x1.000002p0L, 0.0L, 8.813736713132375348727889167749389235161e-1L),
3401 TEST_c_c (casin, 0.0L, -0x1.000002p0L, 0.0L, -8.813736713132375348727889167749389235161e-1L),
3402 TEST_c_c (casin, -0.0L, 0x1.000002p0L, -0.0L, 8.813736713132375348727889167749389235161e-1L),
3403 TEST_c_c (casin, -0.0L, -0x1.000002p0L, -0.0L, -8.813736713132375348727889167749389235161e-1L),
3404 TEST_c_c (casin, 0x1.000002p0L, 0.0L, 1.570796326794896619231321691639751442099L, 4.882812451493617206486388134172712975070e-4L),
3405 TEST_c_c (casin, -0x1.000002p0L, 0.0L, -1.570796326794896619231321691639751442099L, 4.882812451493617206486388134172712975070e-4L),
3406 TEST_c_c (casin, 0x1.000002p0L, -0.0L, 1.570796326794896619231321691639751442099L, -4.882812451493617206486388134172712975070e-4L),
3407 TEST_c_c (casin, -0x1.000002p0L, -0.0L, -1.570796326794896619231321691639751442099L, -4.882812451493617206486388134172712975070e-4L),
3a7182a1 3408#ifndef TEST_FLOAT
08198877
JM		 3409 TEST_c_c (casin, 0x1p-52L, 0x1.0000000000001p0L, 1.570092458683774885078102529858632363236e-16L, 8.813735870195431822418551933572982483664e-1L),
3410 TEST_c_c (casin, 0x1p-52L, -0x1.0000000000001p0L, 1.570092458683774885078102529858632363236e-16L, -8.813735870195431822418551933572982483664e-1L),
3411 TEST_c_c (casin, -0x1p-52L, 0x1.0000000000001p0L, -1.570092458683774885078102529858632363236e-16L, 8.813735870195431822418551933572982483664e-1L),
3412 TEST_c_c (casin, -0x1p-52L, -0x1.0000000000001p0L, -1.570092458683774885078102529858632363236e-16L, -8.813735870195431822418551933572982483664e-1L),
3413 TEST_c_c (casin, 0x1.0000000000001p0L, 0x1p-52L, 1.570796317204594913251280305810847349436L, 2.315303644582684770975188768022139415020e-8L),
3414 TEST_c_c (casin, -0x1.0000000000001p0L, 0x1p-52L, -1.570796317204594913251280305810847349436L, 2.315303644582684770975188768022139415020e-8L),
3415 TEST_c_c (casin, 0x1.0000000000001p0L, -0x1p-52L, 1.570796317204594913251280305810847349436L, -2.315303644582684770975188768022139415020e-8L),
3416 TEST_c_c (casin, -0x1.0000000000001p0L, -0x1p-52L, -1.570796317204594913251280305810847349436L, -2.315303644582684770975188768022139415020e-8L),
3417 TEST_c_c (casin, 0x1.fp-1025L, 0x1.0000000000001p0L, 3.810492908885321320083608113679347200012e-309L, 8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3418 TEST_c_c (casin, 0x1.fp-1025L, -0x1.0000000000001p0L, 3.810492908885321320083608113679347200012e-309L, -8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3419 TEST_c_c (casin, -0x1.fp-1025L, 0x1.0000000000001p0L, -3.810492908885321320083608113679347200012e-309L, 8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3420 TEST_c_c (casin, -0x1.fp-1025L, -0x1.0000000000001p0L, -3.810492908885321320083608113679347200012e-309L, -8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3421 TEST_c_c (casin, 0x1.0000000000001p0L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3422 TEST_c_c (casin, -0x1.0000000000001p0L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3423 TEST_c_c (casin, 0x1.0000000000001p0L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3424 TEST_c_c (casin, -0x1.0000000000001p0L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3425 TEST_c_c (casin, 0.0L, 0x1.0000000000001p0L, 0.0L, 8.813735870195431822418551933572895326024e-1L),
3426 TEST_c_c (casin, 0.0L, -0x1.0000000000001p0L, 0.0L, -8.813735870195431822418551933572895326024e-1L),
3427 TEST_c_c (casin, -0.0L, 0x1.0000000000001p0L, -0.0L, 8.813735870195431822418551933572895326024e-1L),
3428 TEST_c_c (casin, -0.0L, -0x1.0000000000001p0L, -0.0L, -8.813735870195431822418551933572895326024e-1L),
3429 TEST_c_c (casin, 0x1.0000000000001p0L, 0.0L, 1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3430 TEST_c_c (casin, -0x1.0000000000001p0L, 0.0L, -1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3431 TEST_c_c (casin, 0x1.0000000000001p0L, -0.0L, 1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3432 TEST_c_c (casin, -0x1.0000000000001p0L, -0.0L, -1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3a7182a1
JM		 3433#endif
3434#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 3435 TEST_c_c (casin, 0x1p-63L, 0x1.0000000000000002p0L, 7.666467083416870406778649849746878368519e-20L, 8.813735870195430253092739958139610131001e-1L),
3436 TEST_c_c (casin, 0x1p-63L, -0x1.0000000000000002p0L, 7.666467083416870406778649849746878368519e-20L, -8.813735870195430253092739958139610131001e-1L),
3437 TEST_c_c (casin, -0x1p-63L, 0x1.0000000000000002p0L, -7.666467083416870406778649849746878368519e-20L, 8.813735870195430253092739958139610131001e-1L),
3438 TEST_c_c (casin, -0x1p-63L, -0x1.0000000000000002p0L, -7.666467083416870406778649849746878368519e-20L, -8.813735870195430253092739958139610131001e-1L),
3439 TEST_c_c (casin, 0x1.0000000000000002p0L, 0x1p-63L, 1.570796326582978888921215348380499122131L, 5.116146586219826555037807251857670783420e-10L),
3440 TEST_c_c (casin, -0x1.0000000000000002p0L, 0x1p-63L, -1.570796326582978888921215348380499122131L, 5.116146586219826555037807251857670783420e-10L),
3441 TEST_c_c (casin, 0x1.0000000000000002p0L, -0x1p-63L, 1.570796326582978888921215348380499122131L, -5.116146586219826555037807251857670783420e-10L),
3442 TEST_c_c (casin, -0x1.0000000000000002p0L, -0x1p-63L, -1.570796326582978888921215348380499122131L, -5.116146586219826555037807251857670783420e-10L),
3a7182a1 3443# if LDBL_MIN_EXP <= -16381
08198877
JM		 3444 TEST_c_c (casin, 0x1.fp-16385L, 0x1.0000000000000002p0L, 5.757683115456107043819140328235418018963e-4933L, 8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3445 TEST_c_c (casin, 0x1.fp-16385L, -0x1.0000000000000002p0L, 5.757683115456107043819140328235418018963e-4933L, -8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3446 TEST_c_c (casin, -0x1.fp-16385L, 0x1.0000000000000002p0L, -5.757683115456107043819140328235418018963e-4933L, 8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3447 TEST_c_c (casin, -0x1.fp-16385L, -0x1.0000000000000002p0L, -5.757683115456107043819140328235418018963e-4933L, -8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3448 TEST_c_c (casin, 0x1.0000000000000002p0L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3449 TEST_c_c (casin, -0x1.0000000000000002p0L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3450 TEST_c_c (casin, 0x1.0000000000000002p0L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3451 TEST_c_c (casin, -0x1.0000000000000002p0L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3a7182a1 3452# endif
08198877
JM		 3453 TEST_c_c (casin, 0.0L, 0x1.0000000000000002p0L, 0.0L, 8.813735870195430253092739958139610130980e-1L),
3454 TEST_c_c (casin, 0.0L, -0x1.0000000000000002p0L, 0.0L, -8.813735870195430253092739958139610130980e-1L),
3455 TEST_c_c (casin, -0.0L, 0x1.0000000000000002p0L, -0.0L, 8.813735870195430253092739958139610130980e-1L),
3456 TEST_c_c (casin, -0.0L, -0x1.0000000000000002p0L, -0.0L, -8.813735870195430253092739958139610130980e-1L),
3457 TEST_c_c (casin, 0x1.0000000000000002p0L, 0.0L, 1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3458 TEST_c_c (casin, -0x1.0000000000000002p0L, 0.0L, -1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3459 TEST_c_c (casin, 0x1.0000000000000002p0L, -0.0L, 1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3460 TEST_c_c (casin, -0x1.0000000000000002p0L, -0.0L, -1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3a7182a1
JM		 3461#endif
3462#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 3463 TEST_c_c (casin, 0x1p-106L, 0x1.000000000000000000000000008p0L, 8.715763992105246878957416200936726072500e-33L, 8.813735870195430252326093249798097405561e-1L),
3464 TEST_c_c (casin, 0x1p-106L, -0x1.000000000000000000000000008p0L, 8.715763992105246878957416200936726072500e-33L, -8.813735870195430252326093249798097405561e-1L),
3465 TEST_c_c (casin, -0x1p-106L, 0x1.000000000000000000000000008p0L, -8.715763992105246878957416200936726072500e-33L, 8.813735870195430252326093249798097405561e-1L),
3466 TEST_c_c (casin, -0x1p-106L, -0x1.000000000000000000000000008p0L, -8.715763992105246878957416200936726072500e-33L, -8.813735870195430252326093249798097405561e-1L),
3467 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, 0x1p-106L, 1.570796326794896565289107467733682961928L, 2.285028863093221674154232933662774454211e-16L),
3468 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, 0x1p-106L, -1.570796326794896565289107467733682961928L, 2.285028863093221674154232933662774454211e-16L),
3469 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, -0x1p-106L, 1.570796326794896565289107467733682961928L, -2.285028863093221674154232933662774454211e-16L),
3470 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, -0x1p-106L, -1.570796326794896565289107467733682961928L, -2.285028863093221674154232933662774454211e-16L),
3471 TEST_c_c (casin, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 3.810492908885321743133304375216570658278e-309L, 8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3472 TEST_c_c (casin, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 3.810492908885321743133304375216570658278e-309L, -8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3473 TEST_c_c (casin, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, -3.810492908885321743133304375216570658278e-309L, 8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3474 TEST_c_c (casin, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, -3.810492908885321743133304375216570658278e-309L, -8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3475 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3476 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3477 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3478 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3479 TEST_c_c (casin, 0.0L, 0x1.000000000000000000000000008p0L, 0.0L, 8.813735870195430252326093249798097405561e-1L),
3480 TEST_c_c (casin, 0.0L, -0x1.000000000000000000000000008p0L, 0.0L, -8.813735870195430252326093249798097405561e-1L),
3481 TEST_c_c (casin, -0.0L, 0x1.000000000000000000000000008p0L, -0.0L, 8.813735870195430252326093249798097405561e-1L),
3482 TEST_c_c (casin, -0.0L, -0x1.000000000000000000000000008p0L, -0.0L, -8.813735870195430252326093249798097405561e-1L),
3483 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, 0.0L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3484 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, 0.0L, -1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3485 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, -0.0L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3486 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, -0.0L, -1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3a7182a1
JM		 3487#endif
3488#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 3489 TEST_c_c (casin, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 6.809190618832224124185481406981900518193e-35L, 8.813735870195430252326093249797924452120e-1L),
3490 TEST_c_c (casin, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 6.809190618832224124185481406981900518193e-35L, -8.813735870195430252326093249797924452120e-1L),
3491 TEST_c_c (casin, -0x1p-113L, 0x1.0000000000000000000000000001p0L, -6.809190618832224124185481406981900518193e-35L, 8.813735870195430252326093249797924452120e-1L),
3492 TEST_c_c (casin, -0x1p-113L, -0x1.0000000000000000000000000001p0L, -6.809190618832224124185481406981900518193e-35L, -8.813735870195430252326093249797924452120e-1L),
3493 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 1.570796326794896614463458507897073960405L, 2.019699255375255198156433710951064632386e-17L),
3494 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, 0x1p-113L, -1.570796326794896614463458507897073960405L, 2.019699255375255198156433710951064632386e-17L),
3495 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 1.570796326794896614463458507897073960405L, -2.019699255375255198156433710951064632386e-17L),
3496 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, -0x1p-113L, -1.570796326794896614463458507897073960405L, -2.019699255375255198156433710951064632386e-17L),
3497 TEST_c_c (casin, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 5.757683115456107044131264955348448400014e-4933L, 8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3498 TEST_c_c (casin, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 5.757683115456107044131264955348448400014e-4933L, -8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3499 TEST_c_c (casin, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, -5.757683115456107044131264955348448400014e-4933L, 8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3500 TEST_c_c (casin, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, -5.757683115456107044131264955348448400014e-4933L, -8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3501 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3502 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3503 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3504 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3505 TEST_c_c (casin, 0.0L, 0x1.0000000000000000000000000001p0L, 0.0L, 8.813735870195430252326093249797924452120e-1L),
3506 TEST_c_c (casin, 0.0L, -0x1.0000000000000000000000000001p0L, 0.0L, -8.813735870195430252326093249797924452120e-1L),
3507 TEST_c_c (casin, -0.0L, 0x1.0000000000000000000000000001p0L, -0.0L, 8.813735870195430252326093249797924452120e-1L),
3508 TEST_c_c (casin, -0.0L, -0x1.0000000000000000000000000001p0L, -0.0L, -8.813735870195430252326093249797924452120e-1L),
3509 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, 0.0L, 1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3510 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, 0.0L, -1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3511 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, -0.0L, 1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3512 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, -0.0L, -1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3513#endif
3514
3515 TEST_c_c (casin, 0x1p-23L, 0x0.ffffffp0L, 8.429369953393598499000760938112968755257e-8L, 8.813735448726963984495965873956465777250e-1L),
3516 TEST_c_c (casin, 0x1p-23L, -0x0.ffffffp0L, 8.429369953393598499000760938112968755257e-8L, -8.813735448726963984495965873956465777250e-1L),
3517 TEST_c_c (casin, -0x1p-23L, 0x0.ffffffp0L, -8.429369953393598499000760938112968755257e-8L, 8.813735448726963984495965873956465777250e-1L),
3518 TEST_c_c (casin, -0x1p-23L, -0x0.ffffffp0L, -8.429369953393598499000760938112968755257e-8L, -8.813735448726963984495965873956465777250e-1L),
3519 TEST_c_c (casin, 0x0.ffffffp0L, 0x1p-23L, 1.570357140408705570520377172865353621698L, 2.714321200917194650737217746780928423385e-4L),
3520 TEST_c_c (casin, -0x0.ffffffp0L, 0x1p-23L, -1.570357140408705570520377172865353621698L, 2.714321200917194650737217746780928423385e-4L),
3521 TEST_c_c (casin, 0x0.ffffffp0L, -0x1p-23L, 1.570357140408705570520377172865353621698L, -2.714321200917194650737217746780928423385e-4L),
3522 TEST_c_c (casin, -0x0.ffffffp0L, -0x1p-23L, -1.570357140408705570520377172865353621698L, -2.714321200917194650737217746780928423385e-4L),
3523 TEST_c_c (casin, 0x1.fp-129L, 0x0.ffffffp0L, 2.013062624689288675911339929224634593425e-39L, 8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3524 TEST_c_c (casin, 0x1.fp-129L, -0x0.ffffffp0L, 2.013062624689288675911339929224634593425e-39L, -8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3525 TEST_c_c (casin, -0x1.fp-129L, 0x0.ffffffp0L, -2.013062624689288675911339929224634593425e-39L, 8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3526 TEST_c_c (casin, -0x1.fp-129L, -0x0.ffffffp0L, -2.013062624689288675911339929224634593425e-39L, -8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3527 TEST_c_c (casin, 0x0.ffffffp0L, 0x1.fp-129L, 1.570451059810180415643718442157112705601L, 8.245504387859737323891843603996428534945e-36L),
3528 TEST_c_c (casin, -0x0.ffffffp0L, 0x1.fp-129L, -1.570451059810180415643718442157112705601L, 8.245504387859737323891843603996428534945e-36L),
3529 TEST_c_c (casin, 0x0.ffffffp0L, -0x1.fp-129L, 1.570451059810180415643718442157112705601L, -8.245504387859737323891843603996428534945e-36L),
3530 TEST_c_c (casin, -0x0.ffffffp0L, -0x1.fp-129L, -1.570451059810180415643718442157112705601L, -8.245504387859737323891843603996428534945e-36L),
3531 TEST_c_c (casin, 0.0L, 0x0.ffffffp0L, 0.0L, 8.813735448726938863015878255140556727969e-1L),
3532 TEST_c_c (casin, 0.0L, -0x0.ffffffp0L, 0.0L, -8.813735448726938863015878255140556727969e-1L),
3533 TEST_c_c (casin, -0.0L, 0x0.ffffffp0L, -0.0L, 8.813735448726938863015878255140556727969e-1L),
3534 TEST_c_c (casin, -0.0L, -0x0.ffffffp0L, -0.0L, -8.813735448726938863015878255140556727969e-1L),
3535 TEST_c_c (casin, 0x0.ffffffp0L, 0.0L, 1.570451059810180415643718442157112705601L, 0.0L),
3536 TEST_c_c (casin, -0x0.ffffffp0L, 0.0L, -1.570451059810180415643718442157112705601L, 0.0L),
3537 TEST_c_c (casin, 0x0.ffffffp0L, -0.0L, 1.570451059810180415643718442157112705601L, -0.0L),
3538 TEST_c_c (casin, -0x0.ffffffp0L, -0.0L, -1.570451059810180415643718442157112705601L, -0.0L),
3539 TEST_c_c (casin, 0x1p-23L, 0.5L, 1.066240299940009780479664302917201696886e-7L, 4.812118250596059896127318386463676808798e-1L),
3540 TEST_c_c (casin, 0x1p-23L, -0.5L, 1.066240299940009780479664302917201696886e-7L, -4.812118250596059896127318386463676808798e-1L),
3541 TEST_c_c (casin, -0x1p-23L, 0.5L, -1.066240299940009780479664302917201696886e-7L, 4.812118250596059896127318386463676808798e-1L),
3542 TEST_c_c (casin, -0x1p-23L, -0.5L, -1.066240299940009780479664302917201696886e-7L, -4.812118250596059896127318386463676808798e-1L),
3543 TEST_c_c (casin, 0.5L, 0x1p-23L, 5.235987755982934033165770729745469098254e-1L, 1.376510308240943236356088341381173571841e-7L),
3544 TEST_c_c (casin, -0.5L, 0x1p-23L, -5.235987755982934033165770729745469098254e-1L, 1.376510308240943236356088341381173571841e-7L),
3545 TEST_c_c (casin, 0.5L, -0x1p-23L, 5.235987755982934033165770729745469098254e-1L, -1.376510308240943236356088341381173571841e-7L),
3546 TEST_c_c (casin, -0.5L, -0x1p-23L, -5.235987755982934033165770729745469098254e-1L, -1.376510308240943236356088341381173571841e-7L),
3547 TEST_c_c (casin, 0x1.fp-129L, 0.5L, 2.546345110742945032959687790021055102355e-39L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3548 TEST_c_c (casin, 0x1.fp-129L, -0.5L, 2.546345110742945032959687790021055102355e-39L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3549 TEST_c_c (casin, -0x1.fp-129L, 0.5L, -2.546345110742945032959687790021055102355e-39L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3550 TEST_c_c (casin, -0x1.fp-129L, -0.5L, -2.546345110742945032959687790021055102355e-39L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3551 TEST_c_c (casin, 0.5L, 0x1.fp-129L, 5.235987755982988730771072305465838140329e-1L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3552 TEST_c_c (casin, -0.5L, 0x1.fp-129L, -5.235987755982988730771072305465838140329e-1L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3553 TEST_c_c (casin, 0.5L, -0x1.fp-129L, 5.235987755982988730771072305465838140329e-1L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3554 TEST_c_c (casin, -0.5L, -0x1.fp-129L, -5.235987755982988730771072305465838140329e-1L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3555 TEST_c_c (casin, 0x1p-23L, 0x1p-23L, 1.192092895507806853113684971258850504935e-7L, 1.192092895507818146886315028596704749235e-7L),
3556 TEST_c_c (casin, 0x1p-23L, -0x1p-23L, 1.192092895507806853113684971258850504935e-7L, -1.192092895507818146886315028596704749235e-7L),
3557 TEST_c_c (casin, -0x1p-23L, 0x1p-23L, -1.192092895507806853113684971258850504935e-7L, 1.192092895507818146886315028596704749235e-7L),
3558 TEST_c_c (casin, -0x1p-23L, -0x1p-23L, -1.192092895507806853113684971258850504935e-7L, -1.192092895507818146886315028596704749235e-7L),
3559 /* Bug 15319: underflow exception may be missing. */
3560 TEST_c_c (casin, 0x1.fp-129L, 0x1p-23L, 2.846900380897707329917933005874691056564e-39L, 1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3561 TEST_c_c (casin, 0x1.fp-129L, -0x1p-23L, 2.846900380897707329917933005874691056564e-39L, -1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3562 TEST_c_c (casin, -0x1.fp-129L, 0x1p-23L, -2.846900380897707329917933005874691056564e-39L, 1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3563 TEST_c_c (casin, -0x1.fp-129L, -0x1p-23L, -2.846900380897707329917933005874691056564e-39L, -1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3564 TEST_c_c (casin, 0x1p-23L, 0x1.fp-129L, 1.192092895507815323443157514352519154304e-7L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3565 TEST_c_c (casin, -0x1p-23L, 0x1.fp-129L, -1.192092895507815323443157514352519154304e-7L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3566 TEST_c_c (casin, 0x1p-23L, -0x1.fp-129L, 1.192092895507815323443157514352519154304e-7L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3567 TEST_c_c (casin, -0x1p-23L, -0x1.fp-129L, -1.192092895507815323443157514352519154304e-7L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3568 TEST_c_c (casin, 0.0L, 0x1p-23L, 0.0L, 1.192092895507809676556842485683592032154e-7L),
3569 TEST_c_c (casin, 0.0L, -0x1p-23L, 0.0L, -1.192092895507809676556842485683592032154e-7L),
3570 TEST_c_c (casin, -0.0L, 0x1p-23L, -0.0L, 1.192092895507809676556842485683592032154e-7L),
3571 TEST_c_c (casin, -0.0L, -0x1p-23L, -0.0L, -1.192092895507809676556842485683592032154e-7L),
3572 TEST_c_c (casin, 0x1p-23L, 0.0L, 1.192092895507815323443157514352519154304e-7L, 0.0L),
3573 TEST_c_c (casin, -0x1p-23L, 0.0L, -1.192092895507815323443157514352519154304e-7L, 0.0L),
3574 TEST_c_c (casin, 0x1p-23L, -0.0L, 1.192092895507815323443157514352519154304e-7L, -0.0L),
3575 TEST_c_c (casin, -0x1p-23L, -0.0L, -1.192092895507815323443157514352519154304e-7L, -0.0L),
3576 TEST_c_c (casin, 0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3577 TEST_c_c (casin, 0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3578 TEST_c_c (casin, -0x1.fp-129L, 0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3579 TEST_c_c (casin, -0x1.fp-129L, -0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
ccc8cadf 3580#ifndef TEST_FLOAT
08198877
JM		 3581 TEST_c_c (casin, 0x1p-52L, 0x0.fffffffffffff8p0L, 1.570092458683775146551022293016031474627e-16L, 8.813735870195429467279863907910458761820e-1L),
3582 TEST_c_c (casin, 0x1p-52L, -0x0.fffffffffffff8p0L, 1.570092458683775146551022293016031474627e-16L, -8.813735870195429467279863907910458761820e-1L),
3583 TEST_c_c (casin, -0x1p-52L, 0x0.fffffffffffff8p0L, -1.570092458683775146551022293016031474627e-16L, 8.813735870195429467279863907910458761820e-1L),
3584 TEST_c_c (casin, -0x1p-52L, -0x0.fffffffffffff8p0L, -1.570092458683775146551022293016031474627e-16L, -8.813735870195429467279863907910458761820e-1L),
3585 TEST_c_c (casin, 0x0.fffffffffffff8p0L, 0x1p-52L, 1.570796307840326780080580569360500172043L, 1.171456840272878582596796205397918831268e-8L),
3586 TEST_c_c (casin, -0x0.fffffffffffff8p0L, 0x1p-52L, -1.570796307840326780080580569360500172043L, 1.171456840272878582596796205397918831268e-8L),
3587 TEST_c_c (casin, 0x0.fffffffffffff8p0L, -0x1p-52L, 1.570796307840326780080580569360500172043L, -1.171456840272878582596796205397918831268e-8L),
3588 TEST_c_c (casin, -0x0.fffffffffffff8p0L, -0x1p-52L, -1.570796307840326780080580569360500172043L, -1.171456840272878582596796205397918831268e-8L),
3589 TEST_c_c (casin, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 3.810492908885321954658152505985270452320e-309L, 8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3590 TEST_c_c (casin, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 3.810492908885321954658152505985270452320e-309L, -8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3591 TEST_c_c (casin, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, -3.810492908885321954658152505985270452320e-309L, 8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3592 TEST_c_c (casin, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, -3.810492908885321954658152505985270452320e-309L, -8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3593 TEST_c_c (casin, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 1.570796311893735425383665303776316016594L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3594 TEST_c_c (casin, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, -1.570796311893735425383665303776316016594L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3595 TEST_c_c (casin, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 1.570796311893735425383665303776316016594L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3596 TEST_c_c (casin, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, -1.570796311893735425383665303776316016594L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3597 TEST_c_c (casin, 0.0L, 0x0.fffffffffffff8p0L, 0.0L, 8.813735870195429467279863907910371604180e-1L),
3598 TEST_c_c (casin, 0.0L, -0x0.fffffffffffff8p0L, 0.0L, -8.813735870195429467279863907910371604180e-1L),
3599 TEST_c_c (casin, -0.0L, 0x0.fffffffffffff8p0L, -0.0L, 8.813735870195429467279863907910371604180e-1L),
3600 TEST_c_c (casin, -0.0L, -0x0.fffffffffffff8p0L, -0.0L, -8.813735870195429467279863907910371604180e-1L),
3601 TEST_c_c (casin, 0x0.fffffffffffff8p0L, 0.0L, 1.570796311893735425383665303776316016594L, 0.0L),
3602 TEST_c_c (casin, -0x0.fffffffffffff8p0L, 0.0L, -1.570796311893735425383665303776316016594L, 0.0L),
3603 TEST_c_c (casin, 0x0.fffffffffffff8p0L, -0.0L, 1.570796311893735425383665303776316016594L, -0.0L),
3604 TEST_c_c (casin, -0x0.fffffffffffff8p0L, -0.0L, -1.570796311893735425383665303776316016594L, -0.0L),
3605#endif
3606 TEST_c_c (casin, 0x1p-52L, 0.5L, 1.986027322597818397661816253158024383707e-16L, 4.812118250596034474977589134243772428682e-1L),
3607 TEST_c_c (casin, 0x1p-52L, -0.5L, 1.986027322597818397661816253158024383707e-16L, -4.812118250596034474977589134243772428682e-1L),
3608 TEST_c_c (casin, -0x1p-52L, 0.5L, -1.986027322597818397661816253158024383707e-16L, 4.812118250596034474977589134243772428682e-1L),
3609 TEST_c_c (casin, -0x1p-52L, -0.5L, -1.986027322597818397661816253158024383707e-16L, -4.812118250596034474977589134243772428682e-1L),
3610 TEST_c_c (casin, 0.5L, 0x1p-52L, 5.235987755982988730771072305465648369889e-1L, 2.563950248511418570403591756798643804971e-16L),
3611 TEST_c_c (casin, -0.5L, 0x1p-52L, -5.235987755982988730771072305465648369889e-1L, 2.563950248511418570403591756798643804971e-16L),
3612 TEST_c_c (casin, 0.5L, -0x1p-52L, 5.235987755982988730771072305465648369889e-1L, -2.563950248511418570403591756798643804971e-16L),
3613 TEST_c_c (casin, -0.5L, -0x1p-52L, -5.235987755982988730771072305465648369889e-1L, -2.563950248511418570403591756798643804971e-16L),
ccc8cadf 3614#ifndef TEST_FLOAT
08198877
JM		 3615 TEST_c_c (casin, 0x1.fp-1025L, 0.5L, 4.819934639999230680322935210539402497827e-309L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3616 TEST_c_c (casin, 0x1.fp-1025L, -0.5L, 4.819934639999230680322935210539402497827e-309L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3617 TEST_c_c (casin, -0x1.fp-1025L, 0.5L, -4.819934639999230680322935210539402497827e-309L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3618 TEST_c_c (casin, -0x1.fp-1025L, -0.5L, -4.819934639999230680322935210539402497827e-309L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3619 TEST_c_c (casin, 0.5L, 0x1.fp-1025L, 5.235987755982988730771072305465838140329e-1L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3620 TEST_c_c (casin, -0.5L, 0x1.fp-1025L, -5.235987755982988730771072305465838140329e-1L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3621 TEST_c_c (casin, 0.5L, -0x1.fp-1025L, 5.235987755982988730771072305465838140329e-1L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3622 TEST_c_c (casin, -0.5L, -0x1.fp-1025L, -5.235987755982988730771072305465838140329e-1L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3623#endif
3624 TEST_c_c (casin, 0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181604132852e-16L, 2.220446049250313080847263336181677117148e-16L),
3625 TEST_c_c (casin, 0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181604132852e-16L, -2.220446049250313080847263336181677117148e-16L),
3626 TEST_c_c (casin, -0x1p-52L, 0x1p-52L, -2.220446049250313080847263336181604132852e-16L, 2.220446049250313080847263336181677117148e-16L),
3627 TEST_c_c (casin, -0x1p-52L, -0x1p-52L, -2.220446049250313080847263336181604132852e-16L, -2.220446049250313080847263336181677117148e-16L),
ccc8cadf 3628#ifndef TEST_FLOAT
08198877
JM		 3629 /* Bug 15319: underflow exception may be missing. */
3630 TEST_c_c (casin, 0x1.fp-1025L, 0x1p-52L, 5.388850751072128349671657362289283247603e-309L, 2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3631 TEST_c_c (casin, 0x1.fp-1025L, -0x1p-52L, 5.388850751072128349671657362289283247603e-309L, -2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3632 TEST_c_c (casin, -0x1.fp-1025L, 0x1p-52L, -5.388850751072128349671657362289283247603e-309L, 2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3633 TEST_c_c (casin, -0x1.fp-1025L, -0x1p-52L, -5.388850751072128349671657362289283247603e-309L, -2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3634 TEST_c_c (casin, 0x1p-52L, 0x1.fp-1025L, 2.220446049250313080847263336181658871074e-16L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3635 TEST_c_c (casin, -0x1p-52L, 0x1.fp-1025L, -2.220446049250313080847263336181658871074e-16L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3636 TEST_c_c (casin, 0x1p-52L, -0x1.fp-1025L, 2.220446049250313080847263336181658871074e-16L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3637 TEST_c_c (casin, -0x1p-52L, -0x1.fp-1025L, -2.220446049250313080847263336181658871074e-16L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3638#endif
3639 TEST_c_c (casin, 0.0L, 0x1p-52L, 0.0L, 2.220446049250313080847263336181622378926e-16L),
3640 TEST_c_c (casin, 0.0L, -0x1p-52L, 0.0L, -2.220446049250313080847263336181622378926e-16L),
3641 TEST_c_c (casin, -0.0L, 0x1p-52L, -0.0L, 2.220446049250313080847263336181622378926e-16L),
3642 TEST_c_c (casin, -0.0L, -0x1p-52L, -0.0L, -2.220446049250313080847263336181622378926e-16L),
3643 TEST_c_c (casin, 0x1p-52L, 0.0L, 2.220446049250313080847263336181658871074e-16L, 0.0L),
3644 TEST_c_c (casin, -0x1p-52L, 0.0L, -2.220446049250313080847263336181658871074e-16L, 0.0L),
3645 TEST_c_c (casin, 0x1p-52L, -0.0L, 2.220446049250313080847263336181658871074e-16L, -0.0L),
3646 TEST_c_c (casin, -0x1p-52L, -0.0L, -2.220446049250313080847263336181658871074e-16L, -0.0L),
ccc8cadf 3647#ifndef TEST_FLOAT
08198877
JM		 3648 TEST_c_c (casin, 0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3649 TEST_c_c (casin, 0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3650 TEST_c_c (casin, -0x1.fp-1025L, 0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3651 TEST_c_c (casin, -0x1.fp-1025L, -0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
ccc8cadf
JM		 3652#endif
3653#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 3654 TEST_c_c (casin, 0x1p-63L, 0x0.ffffffffffffffffp0L, 7.666467083416870407402049869781566856442e-20L, 8.813735870195430251942769895627079569937e-1L),
3655 TEST_c_c (casin, 0x1p-63L, -0x0.ffffffffffffffffp0L, 7.666467083416870407402049869781566856442e-20L, -8.813735870195430251942769895627079569937e-1L),
3656 TEST_c_c (casin, -0x1p-63L, 0x0.ffffffffffffffffp0L, -7.666467083416870407402049869781566856442e-20L, 8.813735870195430251942769895627079569937e-1L),
3657 TEST_c_c (casin, -0x1p-63L, -0x0.ffffffffffffffffp0L, -7.666467083416870407402049869781566856442e-20L, -8.813735870195430251942769895627079569937e-1L),
3658 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, 0x1p-63L, 1.570796326376055842114524927965556247908L, 2.588578361325995866221775673638805081337e-10L),
3659 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, 0x1p-63L, -1.570796326376055842114524927965556247908L, 2.588578361325995866221775673638805081337e-10L),
3660 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, -0x1p-63L, 1.570796326376055842114524927965556247908L, -2.588578361325995866221775673638805081337e-10L),
3661 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, -0x1p-63L, -1.570796326376055842114524927965556247908L, -2.588578361325995866221775673638805081337e-10L),
ccc8cadf 3662# if LDBL_MIN_EXP <= -16381
08198877
JM		 3663 TEST_c_c (casin, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 5.757683115456107044287327268904964422212e-4933L, 8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3664 TEST_c_c (casin, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 5.757683115456107044287327268904964422212e-4933L, -8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3665 TEST_c_c (casin, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, -5.757683115456107044287327268904964422212e-4933L, 8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3666 TEST_c_c (casin, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, -5.757683115456107044287327268904964422212e-4933L, -8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3667 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 1.570796326465624365239962068302568888898L, 2.472906068161537187835415298076415423459e-4923L),
3668 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, -1.570796326465624365239962068302568888898L, 2.472906068161537187835415298076415423459e-4923L),
3669 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 1.570796326465624365239962068302568888898L, -2.472906068161537187835415298076415423459e-4923L),
3670 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, -1.570796326465624365239962068302568888898L, -2.472906068161537187835415298076415423459e-4923L),
ccc8cadf 3671# endif
08198877
JM		 3672 TEST_c_c (casin, 0.0L, 0x0.ffffffffffffffffp0L, 0.0L, 8.813735870195430251942769895627079569917e-1L),
3673 TEST_c_c (casin, 0.0L, -0x0.ffffffffffffffffp0L, 0.0L, -8.813735870195430251942769895627079569917e-1L),
3674 TEST_c_c (casin, -0.0L, 0x0.ffffffffffffffffp0L, -0.0L, 8.813735870195430251942769895627079569917e-1L),
3675 TEST_c_c (casin, -0.0L, -0x0.ffffffffffffffffp0L, -0.0L, -8.813735870195430251942769895627079569917e-1L),
3676 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, 0.0L, 1.570796326465624365239962068302568888898L, 0.0L),
3677 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, 0.0L, -1.570796326465624365239962068302568888898L, 0.0L),
3678 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, -0.0L, 1.570796326465624365239962068302568888898L, -0.0L),
3679 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, -0.0L, -1.570796326465624365239962068302568888898L, -0.0L),
3680#endif
3681 TEST_c_c (casin, 0x1p-63L, 0.5L, 9.697399036122160144833087173623140436413e-20L, 4.812118250596034474977589134243684231373e-1L),
3682 TEST_c_c (casin, 0x1p-63L, -0.5L, 9.697399036122160144833087173623140436413e-20L, -4.812118250596034474977589134243684231373e-1L),
3683 TEST_c_c (casin, -0x1p-63L, 0.5L, -9.697399036122160144833087173623140436413e-20L, 4.812118250596034474977589134243684231373e-1L),
3684 TEST_c_c (casin, -0x1p-63L, -0.5L, -9.697399036122160144833087173623140436413e-20L, -4.812118250596034474977589134243684231373e-1L),
3685 TEST_c_c (casin, 0.5L, 0x1p-63L, 5.235987755982988730771072305465838140283e-1L, 1.251928832280966098829878787499365228659e-19L),
3686 TEST_c_c (casin, -0.5L, 0x1p-63L, -5.235987755982988730771072305465838140283e-1L, 1.251928832280966098829878787499365228659e-19L),
3687 TEST_c_c (casin, 0.5L, -0x1p-63L, 5.235987755982988730771072305465838140283e-1L, -1.251928832280966098829878787499365228659e-19L),
3688 TEST_c_c (casin, -0.5L, -0x1p-63L, -5.235987755982988730771072305465838140283e-1L, -1.251928832280966098829878787499365228659e-19L),
ccc8cadf 3689#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3690 TEST_c_c (casin, 0x1.fp-16385L, 0.5L, 7.282957076134209141226696333885150260319e-4933L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3691 TEST_c_c (casin, 0x1.fp-16385L, -0.5L, 7.282957076134209141226696333885150260319e-4933L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3692 TEST_c_c (casin, -0x1.fp-16385L, 0.5L, -7.282957076134209141226696333885150260319e-4933L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3693 TEST_c_c (casin, -0x1.fp-16385L, -0.5L, -7.282957076134209141226696333885150260319e-4933L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3694 TEST_c_c (casin, 0.5L, 0x1.fp-16385L, 5.235987755982988730771072305465838140329e-1L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3695 TEST_c_c (casin, -0.5L, 0x1.fp-16385L, -5.235987755982988730771072305465838140329e-1L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3696 TEST_c_c (casin, 0.5L, -0x1.fp-16385L, 5.235987755982988730771072305465838140329e-1L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3697 TEST_c_c (casin, -0.5L, -0x1.fp-16385L, -5.235987755982988730771072305465838140329e-1L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3698#endif
3699 TEST_c_c (casin, 0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711422e-19L, 1.084202172485504434007452800869941711430e-19L),
3700 TEST_c_c (casin, 0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711422e-19L, -1.084202172485504434007452800869941711430e-19L),
3701 TEST_c_c (casin, -0x1p-63L, 0x1p-63L, -1.084202172485504434007452800869941711422e-19L, 1.084202172485504434007452800869941711430e-19L),
3702 TEST_c_c (casin, -0x1p-63L, -0x1p-63L, -1.084202172485504434007452800869941711422e-19L, -1.084202172485504434007452800869941711430e-19L),
ccc8cadf 3703#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3704 TEST_c_c (casin, 0x1.fp-16385L, 0x1p-63L, 8.142593549724601460479922838826119584369e-4933L, 1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3705 TEST_c_c (casin, 0x1.fp-16385L, -0x1p-63L, 8.142593549724601460479922838826119584369e-4933L, -1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3706 TEST_c_c (casin, -0x1.fp-16385L, 0x1p-63L, -8.142593549724601460479922838826119584369e-4933L, 1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3707 TEST_c_c (casin, -0x1.fp-16385L, -0x1p-63L, -8.142593549724601460479922838826119584369e-4933L, -1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3708 TEST_c_c (casin, 0x1p-63L, 0x1.fp-16385L, 1.084202172485504434007452800869941711428e-19L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3709 TEST_c_c (casin, -0x1p-63L, 0x1.fp-16385L, -1.084202172485504434007452800869941711428e-19L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3710 TEST_c_c (casin, 0x1p-63L, -0x1.fp-16385L, 1.084202172485504434007452800869941711428e-19L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3711 TEST_c_c (casin, -0x1p-63L, -0x1.fp-16385L, -1.084202172485504434007452800869941711428e-19L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3712#endif
3713 TEST_c_c (casin, 0.0L, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711424e-19L),
3714 TEST_c_c (casin, 0.0L, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711424e-19L),
3715 TEST_c_c (casin, -0.0L, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711424e-19L),
3716 TEST_c_c (casin, -0.0L, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711424e-19L),
3717 TEST_c_c (casin, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711428e-19L, 0.0L),
3718 TEST_c_c (casin, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711428e-19L, 0.0L),
3719 TEST_c_c (casin, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711428e-19L, -0.0L),
3720 TEST_c_c (casin, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711428e-19L, -0.0L),
ccc8cadf 3721#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3722 TEST_c_c (casin, 0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3723 TEST_c_c (casin, 0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3724 TEST_c_c (casin, -0x1.fp-16385L, 0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3725 TEST_c_c (casin, -0x1.fp-16385L, -0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf
JM		 3726#endif
3727#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 3728 TEST_c_c (casin, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.743152798421049375791483240187377443526e-32L, 8.813735870195430252326093249797835932642e-1L),
3729 TEST_c_c (casin, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.743152798421049375791483240187377443526e-32L, -8.813735870195430252326093249797835932642e-1L),
3730 TEST_c_c (casin, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, -1.743152798421049375791483240187377443526e-32L, 8.813735870195430252326093249797835932642e-1L),
3731 TEST_c_c (casin, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, -1.743152798421049375791483240187377443526e-32L, -8.813735870195430252326093249797835932642e-1L),
3732 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.570796326794896419512475791677915736035L, 1.234330349600789959989661887846005659983e-16L),
3733 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, -1.570796326794896419512475791677915736035L, 1.234330349600789959989661887846005659983e-16L),
3734 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.570796326794896419512475791677915736035L, -1.234330349600789959989661887846005659983e-16L),
3735 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, -1.570796326794896419512475791677915736035L, -1.234330349600789959989661887846005659983e-16L),
3736 TEST_c_c (casin, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 3.810492908885321743133304375216641110205e-309L, 8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3737 TEST_c_c (casin, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 3.810492908885321743133304375216641110205e-309L, -8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3738 TEST_c_c (casin, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, -3.810492908885321743133304375216641110205e-309L, 8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3739 TEST_c_c (casin, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, -3.810492908885321743133304375216641110205e-309L, -8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3740 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 1.570796326794896462222075823262245502760L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3741 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, -1.570796326794896462222075823262245502760L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3742 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 1.570796326794896462222075823262245502760L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3743 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, -1.570796326794896462222075823262245502760L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3744 TEST_c_c (casin, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 8.813735870195430252326093249797835932642e-1L),
3745 TEST_c_c (casin, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -8.813735870195430252326093249797835932642e-1L),
3746 TEST_c_c (casin, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 8.813735870195430252326093249797835932642e-1L),
3747 TEST_c_c (casin, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -8.813735870195430252326093249797835932642e-1L),
3748 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 1.570796326794896462222075823262245502760L, 0.0L),
3749 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -1.570796326794896462222075823262245502760L, 0.0L),
3750 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 1.570796326794896462222075823262245502760L, -0.0L),
3751 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -1.570796326794896462222075823262245502760L, -0.0L),
3752#endif
3753 TEST_c_c (casin, 0x1p-105L, 0.5L, 2.204933261082751447436996198490110245167e-32L, 4.812118250596034474977589134243684231352e-1L),
3754 TEST_c_c (casin, 0x1p-105L, -0.5L, 2.204933261082751447436996198490110245167e-32L, -4.812118250596034474977589134243684231352e-1L),
3755 TEST_c_c (casin, -0x1p-105L, 0.5L, -2.204933261082751447436996198490110245167e-32L, 4.812118250596034474977589134243684231352e-1L),
3756 TEST_c_c (casin, -0x1p-105L, -0.5L, -2.204933261082751447436996198490110245167e-32L, -4.812118250596034474977589134243684231352e-1L),
3757 TEST_c_c (casin, 0.5L, 0x1p-105L, 5.235987755982988730771072305465838140329e-1L, 2.846556599890768890940941645338546615370e-32L),
3758 TEST_c_c (casin, -0.5L, 0x1p-105L, -5.235987755982988730771072305465838140329e-1L, 2.846556599890768890940941645338546615370e-32L),
3759 TEST_c_c (casin, 0.5L, -0x1p-105L, 5.235987755982988730771072305465838140329e-1L, -2.846556599890768890940941645338546615370e-32L),
3760 TEST_c_c (casin, -0.5L, -0x1p-105L, -5.235987755982988730771072305465838140329e-1L, -2.846556599890768890940941645338546615370e-32L),
3761 TEST_c_c (casin, 0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
3762 TEST_c_c (casin, 0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
3763 TEST_c_c (casin, -0x1p-105L, 0x1p-105L, -2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
3764 TEST_c_c (casin, -0x1p-105L, -0x1p-105L, -2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
ccc8cadf 3765#ifndef TEST_FLOAT
08198877
JM		 3766 /* Bug 15319: underflow exception may be missing. */
3767 TEST_c_c (casin, 0x1.fp-1025L, 0x1p-105L, 5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3768 TEST_c_c (casin, 0x1.fp-1025L, -0x1p-105L, 5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3769 TEST_c_c (casin, -0x1.fp-1025L, 0x1p-105L, -5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3770 TEST_c_c (casin, -0x1.fp-1025L, -0x1p-105L, -5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3771 TEST_c_c (casin, 0x1p-105L, 0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3772 TEST_c_c (casin, -0x1p-105L, 0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3773 TEST_c_c (casin, 0x1p-105L, -0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3774 TEST_c_c (casin, -0x1p-105L, -0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3775#endif
3776 TEST_c_c (casin, 0.0L, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L),
3777 TEST_c_c (casin, 0.0L, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L),
3778 TEST_c_c (casin, -0.0L, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L),
3779 TEST_c_c (casin, -0.0L, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L),
3780 TEST_c_c (casin, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L, 0.0L),
3781 TEST_c_c (casin, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L, 0.0L),
3782 TEST_c_c (casin, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L, -0.0L),
3783 TEST_c_c (casin, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L, -0.0L),
ccc8cadf 3784#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 3785 TEST_c_c (casin, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.361838123766444824837096281396380300349e-34L, 8.813735870195430252326093249797922409363e-1L),
3786 TEST_c_c (casin, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.361838123766444824837096281396380300349e-34L, -8.813735870195430252326093249797922409363e-1L),
3787 TEST_c_c (casin, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.361838123766444824837096281396380300349e-34L, 8.813735870195430252326093249797922409363e-1L),
3788 TEST_c_c (casin, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.361838123766444824837096281396380300349e-34L, -8.813735870195430252326093249797922409363e-1L),
3789 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.570796326794896601578502908312986698624L, 1.091004200533850618345330909857103457781e-17L),
3790 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, -1.570796326794896601578502908312986698624L, 1.091004200533850618345330909857103457781e-17L),
3791 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.570796326794896601578502908312986698624L, -1.091004200533850618345330909857103457781e-17L),
3792 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, -1.570796326794896601578502908312986698624L, -1.091004200533850618345330909857103457781e-17L),
3793 TEST_c_c (casin, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 5.757683115456107044131264955348449231681e-4933L, 8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3794 TEST_c_c (casin, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 5.757683115456107044131264955348449231681e-4933L, -8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3795 TEST_c_c (casin, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, -5.757683115456107044131264955348449231681e-4933L, 8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3796 TEST_c_c (casin, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, -5.757683115456107044131264955348449231681e-4933L, -8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3797 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 1.570796326794896605353533883825294686803L, 5.867357004219059108790368268900490184505e-4916L),
3798 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, -1.570796326794896605353533883825294686803L, 5.867357004219059108790368268900490184505e-4916L),
3799 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 1.570796326794896605353533883825294686803L, -5.867357004219059108790368268900490184505e-4916L),
3800 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, -1.570796326794896605353533883825294686803L, -5.867357004219059108790368268900490184505e-4916L),
3801 TEST_c_c (casin, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 8.813735870195430252326093249797922409363e-1L),
3802 TEST_c_c (casin, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -8.813735870195430252326093249797922409363e-1L),
3803 TEST_c_c (casin, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 8.813735870195430252326093249797922409363e-1L),
3804 TEST_c_c (casin, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -8.813735870195430252326093249797922409363e-1L),
3805 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 1.570796326794896605353533883825294686803L, 0.0L),
3806 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -1.570796326794896605353533883825294686803L, 0.0L),
3807 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 1.570796326794896605353533883825294686803L, -0.0L),
3808 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -1.570796326794896605353533883825294686803L, -0.0L),
3809#endif
3810 TEST_c_c (casin, 0x1p-112L, 0.5L, 1.722604110220899568310153280070398629037e-34L, 4.812118250596034474977589134243684231352e-1L),
3811 TEST_c_c (casin, 0x1p-112L, -0.5L, 1.722604110220899568310153280070398629037e-34L, -4.812118250596034474977589134243684231352e-1L),
3812 TEST_c_c (casin, -0x1p-112L, 0.5L, -1.722604110220899568310153280070398629037e-34L, 4.812118250596034474977589134243684231352e-1L),
3813 TEST_c_c (casin, -0x1p-112L, -0.5L, -1.722604110220899568310153280070398629037e-34L, -4.812118250596034474977589134243684231352e-1L),
3814 TEST_c_c (casin, 0.5L, 0x1p-112L, 5.235987755982988730771072305465838140329e-1L, 2.223872343664663196047610660420739543258e-34L),
3815 TEST_c_c (casin, -0.5L, 0x1p-112L, -5.235987755982988730771072305465838140329e-1L, 2.223872343664663196047610660420739543258e-34L),
3816 TEST_c_c (casin, 0.5L, -0x1p-112L, 5.235987755982988730771072305465838140329e-1L, -2.223872343664663196047610660420739543258e-34L),
3817 TEST_c_c (casin, -0.5L, -0x1p-112L, -5.235987755982988730771072305465838140329e-1L, -2.223872343664663196047610660420739543258e-34L),
3818 TEST_c_c (casin, 0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
3819 TEST_c_c (casin, 0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
3820 TEST_c_c (casin, -0x1p-112L, 0x1p-112L, -1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
3821 TEST_c_c (casin, -0x1p-112L, -0x1p-112L, -1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
ccc8cadf 3822#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3823 TEST_c_c (casin, 0x1.fp-16385L, 0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3824 TEST_c_c (casin, 0x1.fp-16385L, -0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3825 TEST_c_c (casin, -0x1.fp-16385L, 0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3826 TEST_c_c (casin, -0x1.fp-16385L, -0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3827 TEST_c_c (casin, 0x1p-112L, 0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3828 TEST_c_c (casin, -0x1p-112L, 0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3829 TEST_c_c (casin, 0x1p-112L, -0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3830 TEST_c_c (casin, -0x1p-112L, -0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3831#endif
3832 TEST_c_c (casin, 0.0L, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L),
3833 TEST_c_c (casin, 0.0L, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L),
3834 TEST_c_c (casin, -0.0L, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L),
3835 TEST_c_c (casin, -0.0L, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L),
3836 TEST_c_c (casin, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L, 0.0L),
3837 TEST_c_c (casin, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L, 0.0L),
3838 TEST_c_c (casin, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L, -0.0L),
3839 TEST_c_c (casin, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L, -0.0L),
3840
3841 TEST_c_c (casin, 0.75L, 1.25L, 0.453276177638793913448921196101971749L, 1.13239363160530819522266333696834467L),
3842 TEST_c_c (casin, -2, -3, -0.57065278432109940071028387968566963L, -1.9833870299165354323470769028940395L),
3843 END_DATA (casin)
3844 };
8847214f
UD		 3845
3846static void
08198877 3847casin_test (void)
8847214f 3848{
aaca11d8 3849 errno = 0;
08198877 3850 FUNC(casin) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 3851 if (errno == ENOSYS)
3852 /* Function not implemented. */
3853 return;
3854
08198877
JM		 3855 START (casin);
3856 RUN_TEST_LOOP_c_c (casin, casin_test_data, );
3857 END (casin, complex);
3858}
8847214f 3859
08198877
JM		 3860
3861static const struct test_c_c_data casinh_test_data[] =
3862 {
3863 START_DATA (casinh),
3864 TEST_c_c (casinh, 0, 0, 0.0, 0.0),
3865 TEST_c_c (casinh, minus_zero, 0, minus_zero, 0),
3866 TEST_c_c (casinh, 0, minus_zero, 0.0, minus_zero),
3867 TEST_c_c (casinh, minus_zero, minus_zero, minus_zero, minus_zero),
3868
3869 TEST_c_c (casinh, plus_infty, plus_infty, plus_infty, M_PI_4l),
3870 TEST_c_c (casinh, plus_infty, minus_infty, plus_infty, -M_PI_4l),
3871 TEST_c_c (casinh, minus_infty, plus_infty, minus_infty, M_PI_4l),
3872 TEST_c_c (casinh, minus_infty, minus_infty, minus_infty, -M_PI_4l),
3873
3874 TEST_c_c (casinh, -10.0, plus_infty, minus_infty, M_PI_2l),
3875 TEST_c_c (casinh, -10.0, minus_infty, minus_infty, -M_PI_2l),
3876 TEST_c_c (casinh, 0, plus_infty, plus_infty, M_PI_2l),
3877 TEST_c_c (casinh, 0, minus_infty, plus_infty, -M_PI_2l),
3878 TEST_c_c (casinh, minus_zero, plus_infty, minus_infty, M_PI_2l),
3879 TEST_c_c (casinh, minus_zero, minus_infty, minus_infty, -M_PI_2l),
3880 TEST_c_c (casinh, 0.1L, plus_infty, plus_infty, M_PI_2l),
3881 TEST_c_c (casinh, 0.1L, minus_infty, plus_infty, -M_PI_2l),
3882
3883 TEST_c_c (casinh, minus_infty, 0, minus_infty, 0.0),
3884 TEST_c_c (casinh, minus_infty, minus_zero, minus_infty, minus_zero),
3885 TEST_c_c (casinh, minus_infty, 100, minus_infty, 0.0),
3886 TEST_c_c (casinh, minus_infty, -100, minus_infty, minus_zero),
3887
3888 TEST_c_c (casinh, plus_infty, 0, plus_infty, 0.0),
3889 TEST_c_c (casinh, plus_infty, minus_zero, plus_infty, minus_zero),
3890 TEST_c_c (casinh, plus_infty, 0.5, plus_infty, 0.0),
3891 TEST_c_c (casinh, plus_infty, -0.5, plus_infty, minus_zero),
3892
3893 TEST_c_c (casinh, plus_infty, qnan_value, plus_infty, qnan_value),
3894 TEST_c_c (casinh, minus_infty, qnan_value, minus_infty, qnan_value),
3895
3896 TEST_c_c (casinh, qnan_value, 0, qnan_value, 0.0),
3897 TEST_c_c (casinh, qnan_value, minus_zero, qnan_value, minus_zero),
3898
3899 TEST_c_c (casinh, qnan_value, plus_infty, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
3900 TEST_c_c (casinh, qnan_value, minus_infty, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
3901
3902 TEST_c_c (casinh, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3903 TEST_c_c (casinh, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3904
3905 TEST_c_c (casinh, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3906 TEST_c_c (casinh, -0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3907
3908 TEST_c_c (casinh, qnan_value, qnan_value, qnan_value, qnan_value),
3909
3910 TEST_c_c (casinh, plus_zero, -1.5L, 0.9624236501192068949955178268487368462704L, -M_PI_2l),
3911 TEST_c_c (casinh, minus_zero, -1.5L, -0.9624236501192068949955178268487368462704L, -M_PI_2l),
3912 TEST_c_c (casinh, plus_zero, -1.0L, plus_zero, -M_PI_2l),
3913 TEST_c_c (casinh, minus_zero, -1.0L, minus_zero, -M_PI_2l),
3914 TEST_c_c (casinh, plus_zero, -0.5L, plus_zero, -0.5235987755982988730771072305465838140329L),
3915 TEST_c_c (casinh, minus_zero, -0.5L, minus_zero, -0.5235987755982988730771072305465838140329L),
3916 TEST_c_c (casinh, plus_zero, 0.5L, plus_zero, 0.5235987755982988730771072305465838140329L),
3917 TEST_c_c (casinh, minus_zero, 0.5L, minus_zero, 0.5235987755982988730771072305465838140329L),
3918 TEST_c_c (casinh, plus_zero, 1.0L, plus_zero, M_PI_2l),
3919 TEST_c_c (casinh, minus_zero, 1.0L, minus_zero, M_PI_2l),
3920 TEST_c_c (casinh, plus_zero, 1.5L, 0.9624236501192068949955178268487368462704L, M_PI_2l),
3921 TEST_c_c (casinh, minus_zero, 1.5L, -0.9624236501192068949955178268487368462704L, M_PI_2l),
3922
3923 TEST_c_c (casinh, -1.5L, plus_zero, -1.194763217287109304111930828519090523536L, plus_zero),
3924 TEST_c_c (casinh, -1.5L, minus_zero, -1.194763217287109304111930828519090523536L, minus_zero),
3925 TEST_c_c (casinh, -1.0L, plus_zero, -0.8813735870195430252326093249797923090282L, plus_zero),
3926 TEST_c_c (casinh, -1.0L, minus_zero, -0.8813735870195430252326093249797923090282L, minus_zero),
3927 TEST_c_c (casinh, -0.5L, plus_zero, -0.4812118250596034474977589134243684231352L, plus_zero),
3928 TEST_c_c (casinh, -0.5L, minus_zero, -0.4812118250596034474977589134243684231352L, minus_zero),
3929 TEST_c_c (casinh, 0.5L, plus_zero, 0.4812118250596034474977589134243684231352L, plus_zero),
3930 TEST_c_c (casinh, 0.5L, minus_zero, 0.4812118250596034474977589134243684231352L, minus_zero),
3931 TEST_c_c (casinh, 1.0L, plus_zero, 0.8813735870195430252326093249797923090282L, plus_zero),
3932 TEST_c_c (casinh, 1.0L, minus_zero, 0.8813735870195430252326093249797923090282L, minus_zero),
3933 TEST_c_c (casinh, 1.5L, plus_zero, 1.194763217287109304111930828519090523536L, plus_zero),
3934 TEST_c_c (casinh, 1.5L, minus_zero, 1.194763217287109304111930828519090523536L, minus_zero),
3935
3936 TEST_c_c (casinh, 0x1p50L, 1.0L, 3.535050620855721078027883819436759661753e1L, 8.881784197001252323389053344720723756399e-16L),
3937 TEST_c_c (casinh, 0x1p50L, -1.0L, 3.535050620855721078027883819436759661753e1L, -8.881784197001252323389053344720723756399e-16L),
3938 TEST_c_c (casinh, -0x1p50L, 1.0L, -3.535050620855721078027883819436759661753e1L, 8.881784197001252323389053344720723756399e-16L),
3939 TEST_c_c (casinh, -0x1p50L, -1.0L, -3.535050620855721078027883819436759661753e1L, -8.881784197001252323389053344720723756399e-16L),
3940 TEST_c_c (casinh, 1.0L, 0x1p50L, 3.535050620855721078027883819436720218708e1L, 1.570796326794895731052901991514519103193L),
3941 TEST_c_c (casinh, -1.0L, 0x1p50L, -3.535050620855721078027883819436720218708e1L, 1.570796326794895731052901991514519103193L),
3942 TEST_c_c (casinh, 1.0L, -0x1p50L, 3.535050620855721078027883819436720218708e1L, -1.570796326794895731052901991514519103193L),
3943 TEST_c_c (casinh, -1.0L, -0x1p50L, -3.535050620855721078027883819436720218708e1L, -1.570796326794895731052901991514519103193L),
cdc1c96f 3944#ifndef TEST_FLOAT
08198877
JM		 3945 TEST_c_c (casinh, 0x1p500L, 1.0L, 3.472667374605326000180332928505464606058e2L, 3.054936363499604682051979393213617699789e-151L),
3946 TEST_c_c (casinh, 0x1p500L, -1.0L, 3.472667374605326000180332928505464606058e2L, -3.054936363499604682051979393213617699789e-151L),
3947 TEST_c_c (casinh, -0x1p500L, 1.0L, -3.472667374605326000180332928505464606058e2L, 3.054936363499604682051979393213617699789e-151L),
3948 TEST_c_c (casinh, -0x1p500L, -1.0L, -3.472667374605326000180332928505464606058e2L, -3.054936363499604682051979393213617699789e-151L),
3949 TEST_c_c (casinh, 1.0L, 0x1p500L, 3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
3950 TEST_c_c (casinh, -1.0L, 0x1p500L, -3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
3951 TEST_c_c (casinh, 1.0L, -0x1p500L, 3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
3952 TEST_c_c (casinh, -1.0L, -0x1p500L, -3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
cdc1c96f
JM		 3953#endif
3954#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 3955 TEST_c_c (casinh, 0x1p5000L, 1.0L, 3.466429049980286492395577839412341016946e3L, 7.079811261048172892385615158694057552948e-1506L),
3956 TEST_c_c (casinh, 0x1p5000L, -1.0L, 3.466429049980286492395577839412341016946e3L, -7.079811261048172892385615158694057552948e-1506L),
3957 TEST_c_c (casinh, -0x1p5000L, 1.0L, -3.466429049980286492395577839412341016946e3L, 7.079811261048172892385615158694057552948e-1506L),
3958 TEST_c_c (casinh, -0x1p5000L, -1.0L, -3.466429049980286492395577839412341016946e3L, -7.079811261048172892385615158694057552948e-1506L),
3959 TEST_c_c (casinh, 1.0L, 0x1p5000L, 3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
3960 TEST_c_c (casinh, -1.0L, 0x1p5000L, -3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
3961 TEST_c_c (casinh, 1.0L, -0x1p5000L, 3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
3962 TEST_c_c (casinh, -1.0L, -0x1p5000L, -3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
cdc1c96f
JM		 3963#endif
3964
08198877 3965 TEST_c_c (casinh, 0x1.fp127L, 0x1.fp127L, 8.973081118419833726837456344608533993585e1L, 7.853981633974483096156608458198757210493e-1L),
a9708fed 3966#ifndef TEST_FLOAT
08198877 3967 TEST_c_c (casinh, 0x1.fp1023L, 0x1.fp1023L, 7.107906849659093345062145442726115449315e2L, 7.853981633974483096156608458198757210493e-1L),
a9708fed
JM		 3968#endif
3969#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 3970 TEST_c_c (casinh, 0x1.fp16383L, 0x1.fp16383L, 1.135753137836666928715489992987020363057e4L, 7.853981633974483096156608458198757210493e-1L),
a9708fed
JM		 3971#endif
3972
08198877
JM		 3973 TEST_c_c (casinh, 0x1.fp-129L, 1.5L, 9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442096L),
3974 TEST_c_c (casinh, 0x1.fp-129L, -1.5L, 9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442096L),
3975 TEST_c_c (casinh, -0x1.fp-129L, 1.5L, -9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442096L),
3976 TEST_c_c (casinh, -0x1.fp-129L, -1.5L, -9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442096L),
3977 TEST_c_c (casinh, 1.5L, 0x1.fp-129L, 1.194763217287109304111930828519090523536L, 1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3978 TEST_c_c (casinh, -1.5L, 0x1.fp-129L, -1.194763217287109304111930828519090523536L, 1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3979 TEST_c_c (casinh, 1.5L, -0x1.fp-129L, 1.194763217287109304111930828519090523536L, -1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3980 TEST_c_c (casinh, -1.5L, -0x1.fp-129L, -1.194763217287109304111930828519090523536L, -1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
8cf28c5e 3981#ifndef TEST_FLOAT
08198877
JM		 3982 TEST_c_c (casinh, 0x1.fp-1025L, 1.5L, 9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
3983 TEST_c_c (casinh, 0x1.fp-1025L, -1.5L, 9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
3984 TEST_c_c (casinh, -0x1.fp-1025L, 1.5L, -9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
3985 TEST_c_c (casinh, -0x1.fp-1025L, -1.5L, -9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
3986 TEST_c_c (casinh, 1.5L, 0x1.fp-1025L, 1.194763217287109304111930828519090523536L, 2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3987 TEST_c_c (casinh, -1.5L, 0x1.fp-1025L, -1.194763217287109304111930828519090523536L, 2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3988 TEST_c_c (casinh, 1.5L, -0x1.fp-1025L, 1.194763217287109304111930828519090523536L, -2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3989 TEST_c_c (casinh, -1.5L, -0x1.fp-1025L, -1.194763217287109304111930828519090523536L, -2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
8cf28c5e
JM		 3990#endif
3991#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 3992 TEST_c_c (casinh, 0x1.fp-16385L, 1.5L, 9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
3993 TEST_c_c (casinh, 0x1.fp-16385L, -1.5L, 9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
3994 TEST_c_c (casinh, -0x1.fp-16385L, 1.5L, -9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
3995 TEST_c_c (casinh, -0x1.fp-16385L, -1.5L, -9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
3996 TEST_c_c (casinh, 1.5L, 0x1.fp-16385L, 1.194763217287109304111930828519090523536L, 4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
3997 TEST_c_c (casinh, -1.5L, 0x1.fp-16385L, -1.194763217287109304111930828519090523536L, 4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
3998 TEST_c_c (casinh, 1.5L, -0x1.fp-16385L, 1.194763217287109304111930828519090523536L, -4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
3999 TEST_c_c (casinh, -1.5L, -0x1.fp-16385L, -1.194763217287109304111930828519090523536L, -4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4000#endif
4001
4002 TEST_c_c (casinh, 0.5L, 1.0L, 7.328576759736452608886724437653071523305e-1L, 8.959074812088902390666567243275770102229e-1L),
4003 TEST_c_c (casinh, 0.5L, -1.0L, 7.328576759736452608886724437653071523305e-1L, -8.959074812088902390666567243275770102229e-1L),
4004 TEST_c_c (casinh, -0.5L, 1.0L, -7.328576759736452608886724437653071523305e-1L, 8.959074812088902390666567243275770102229e-1L),
4005 TEST_c_c (casinh, -0.5L, -1.0L, -7.328576759736452608886724437653071523305e-1L, -8.959074812088902390666567243275770102229e-1L),
4006 TEST_c_c (casinh, 1.0L, 0.5L, 9.261330313501824245501244453057873152694e-1L, 3.494390628572132936274118260753699527325e-1L),
4007 TEST_c_c (casinh, -1.0L, 0.5L, -9.261330313501824245501244453057873152694e-1L, 3.494390628572132936274118260753699527325e-1L),
4008 TEST_c_c (casinh, 1.0L, -0.5L, 9.261330313501824245501244453057873152694e-1L, -3.494390628572132936274118260753699527325e-1L),
4009 TEST_c_c (casinh, -1.0L, -0.5L, -9.261330313501824245501244453057873152694e-1L, -3.494390628572132936274118260753699527325e-1L),
4010 TEST_c_c (casinh, 0.25L, 1.0L, 5.097911466811016354623559941115413499164e-1L, 1.081751996523816326311037318425097434186L),
4011 TEST_c_c (casinh, 0.25L, -1.0L, 5.097911466811016354623559941115413499164e-1L, -1.081751996523816326311037318425097434186L),
4012 TEST_c_c (casinh, -0.25L, 1.0L, -5.097911466811016354623559941115413499164e-1L, 1.081751996523816326311037318425097434186L),
4013 TEST_c_c (casinh, -0.25L, -1.0L, -5.097911466811016354623559941115413499164e-1L, -1.081751996523816326311037318425097434186L),
4014 TEST_c_c (casinh, 1.0L, 0.25L, 8.924633639033482359562124741744951972772e-1L, 1.763024327769669304186785666360901026468e-1L),
4015 TEST_c_c (casinh, -1.0L, 0.25L, -8.924633639033482359562124741744951972772e-1L, 1.763024327769669304186785666360901026468e-1L),
4016 TEST_c_c (casinh, 1.0L, -0.25L, 8.924633639033482359562124741744951972772e-1L, -1.763024327769669304186785666360901026468e-1L),
4017 TEST_c_c (casinh, -1.0L, -0.25L, -8.924633639033482359562124741744951972772e-1L, -1.763024327769669304186785666360901026468e-1L),
4018 TEST_c_c (casinh, 0x1.fp-10L, 1.0L, 4.350501469856803800217957402220976497152e-2L, 1.527305029163877791518741192097931722508L),
4019 TEST_c_c (casinh, 0x1.fp-10L, -1.0L, 4.350501469856803800217957402220976497152e-2L, -1.527305029163877791518741192097931722508L),
4020 TEST_c_c (casinh, -0x1.fp-10L, 1.0L, -4.350501469856803800217957402220976497152e-2L, 1.527305029163877791518741192097931722508L),
4021 TEST_c_c (casinh, -0x1.fp-10L, -1.0L, -4.350501469856803800217957402220976497152e-2L, -1.527305029163877791518741192097931722508L),
4022 TEST_c_c (casinh, 1.0L, 0x1.fp-10L, 8.813742198809567991336704287826445879025e-1L, 1.337909359557740912558349531052239112857e-3L),
4023 TEST_c_c (casinh, -1.0L, 0x1.fp-10L, -8.813742198809567991336704287826445879025e-1L, 1.337909359557740912558349531052239112857e-3L),
4024 TEST_c_c (casinh, 1.0L, -0x1.fp-10L, 8.813742198809567991336704287826445879025e-1L, -1.337909359557740912558349531052239112857e-3L),
4025 TEST_c_c (casinh, -1.0L, -0x1.fp-10L, -8.813742198809567991336704287826445879025e-1L, -1.337909359557740912558349531052239112857e-3L),
4026 TEST_c_c (casinh, 0x1.fp-30L, 1.0L, 4.247867098745151888768727039216644758847e-5L, 1.570753848123921942730162693731872690232L),
4027 TEST_c_c (casinh, 0x1.fp-30L, -1.0L, 4.247867098745151888768727039216644758847e-5L, -1.570753848123921942730162693731872690232L),
4028 TEST_c_c (casinh, -0x1.fp-30L, 1.0L, -4.247867098745151888768727039216644758847e-5L, 1.570753848123921942730162693731872690232L),
4029 TEST_c_c (casinh, -0x1.fp-30L, -1.0L, -4.247867098745151888768727039216644758847e-5L, -1.570753848123921942730162693731872690232L),
4030 TEST_c_c (casinh, 1.0L, 0x1.fp-30L, 8.813735870195430258081932989769495326854e-1L, 1.275929984216518540252717485007112529021e-9L),
4031 TEST_c_c (casinh, -1.0L, 0x1.fp-30L, -8.813735870195430258081932989769495326854e-1L, 1.275929984216518540252717485007112529021e-9L),
4032 TEST_c_c (casinh, 1.0L, -0x1.fp-30L, 8.813735870195430258081932989769495326854e-1L, -1.275929984216518540252717485007112529021e-9L),
4033 TEST_c_c (casinh, -1.0L, -0x1.fp-30L, -8.813735870195430258081932989769495326854e-1L, -1.275929984216518540252717485007112529021e-9L),
4034 TEST_c_c (casinh, 0x1.fp-100L, 1.0L, 1.236292038260260888664514866457202186027e-15L, 1.570796326794895382939283431378862777584L),
4035 TEST_c_c (casinh, 0x1.fp-100L, -1.0L, 1.236292038260260888664514866457202186027e-15L, -1.570796326794895382939283431378862777584L),
4036 TEST_c_c (casinh, -0x1.fp-100L, 1.0L, -1.236292038260260888664514866457202186027e-15L, 1.570796326794895382939283431378862777584L),
4037 TEST_c_c (casinh, -0x1.fp-100L, -1.0L, -1.236292038260260888664514866457202186027e-15L, -1.570796326794895382939283431378862777584L),
4038 TEST_c_c (casinh, 1.0L, 0x1.fp-100L, 8.813735870195430252326093249797923090282e-1L, 1.080754735021050612990719608916167354321e-30L),
4039 TEST_c_c (casinh, -1.0L, 0x1.fp-100L, -8.813735870195430252326093249797923090282e-1L, 1.080754735021050612990719608916167354321e-30L),
4040 TEST_c_c (casinh, 1.0L, -0x1.fp-100L, 8.813735870195430252326093249797923090282e-1L, -1.080754735021050612990719608916167354321e-30L),
4041 TEST_c_c (casinh, -1.0L, -0x1.fp-100L, -8.813735870195430252326093249797923090282e-1L, -1.080754735021050612990719608916167354321e-30L),
4042 TEST_c_c (casinh, 0x1.fp-129L, 1.0L, 5.335635276982233498398987585285818977933e-20L, 1.570796326794896619177965338869929107115L),
4043 TEST_c_c (casinh, 0x1.fp-129L, -1.0L, 5.335635276982233498398987585285818977933e-20L, -1.570796326794896619177965338869929107115L),
4044 TEST_c_c (casinh, -0x1.fp-129L, 1.0L, -5.335635276982233498398987585285818977933e-20L, 1.570796326794896619177965338869929107115L),
4045 TEST_c_c (casinh, -0x1.fp-129L, -1.0L, -5.335635276982233498398987585285818977933e-20L, -1.570796326794896619177965338869929107115L),
4046 TEST_c_c (casinh, 1.0L, 0x1.fp-129L, 8.813735870195430252326093249797923090282e-1L, 2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4047 TEST_c_c (casinh, -1.0L, 0x1.fp-129L, -8.813735870195430252326093249797923090282e-1L, 2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4048 TEST_c_c (casinh, 1.0L, -0x1.fp-129L, 8.813735870195430252326093249797923090282e-1L, -2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4049 TEST_c_c (casinh, -1.0L, -0x1.fp-129L, -8.813735870195430252326093249797923090282e-1L, -2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
0a1b2ae6 4050#ifndef TEST_FLOAT
08198877
JM		 4051 TEST_c_c (casinh, 0x1.fp-1000L, 1.0L, 4.252291453851660175550490409247739011867e-151L, 1.570796326794896619231321691639751442099L),
4052 TEST_c_c (casinh, 0x1.fp-1000L, -1.0L, 4.252291453851660175550490409247739011867e-151L, -1.570796326794896619231321691639751442099L),
4053 TEST_c_c (casinh, -0x1.fp-1000L, 1.0L, -4.252291453851660175550490409247739011867e-151L, 1.570796326794896619231321691639751442099L),
4054 TEST_c_c (casinh, -0x1.fp-1000L, -1.0L, -4.252291453851660175550490409247739011867e-151L, -1.570796326794896619231321691639751442099L),
4055 TEST_c_c (casinh, 1.0L, 0x1.fp-1000L, 8.813735870195430252326093249797923090282e-1L, 1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4056 TEST_c_c (casinh, -1.0L, 0x1.fp-1000L, -8.813735870195430252326093249797923090282e-1L, 1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4057 TEST_c_c (casinh, 1.0L, -0x1.fp-1000L, 8.813735870195430252326093249797923090282e-1L, -1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4058 TEST_c_c (casinh, -1.0L, -0x1.fp-1000L, -8.813735870195430252326093249797923090282e-1L, -1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4059 TEST_c_c (casinh, 0x1.fp-1025L, 1.0L, 7.340879205566679497036857179189356754017e-155L, 1.570796326794896619231321691639751442099L),
4060 TEST_c_c (casinh, 0x1.fp-1025L, -1.0L, 7.340879205566679497036857179189356754017e-155L, -1.570796326794896619231321691639751442099L),
4061 TEST_c_c (casinh, -0x1.fp-1025L, 1.0L, -7.340879205566679497036857179189356754017e-155L, 1.570796326794896619231321691639751442099L),
4062 TEST_c_c (casinh, -0x1.fp-1025L, -1.0L, -7.340879205566679497036857179189356754017e-155L, -1.570796326794896619231321691639751442099L),
4063 TEST_c_c (casinh, 1.0L, 0x1.fp-1025L, 8.813735870195430252326093249797923090282e-1L, 3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4064 TEST_c_c (casinh, -1.0L, 0x1.fp-1025L, -8.813735870195430252326093249797923090282e-1L, 3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4065 TEST_c_c (casinh, 1.0L, -0x1.fp-1025L, 8.813735870195430252326093249797923090282e-1L, -3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4066 TEST_c_c (casinh, -1.0L, -0x1.fp-1025L, -8.813735870195430252326093249797923090282e-1L, -3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
0a1b2ae6
JM		 4067#endif
4068#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4069 TEST_c_c (casinh, 0x1.fp-10000L, 1.0L, 9.854680208706673586644342922051388714633e-1506L, 1.570796326794896619231321691639751442099L),
4070 TEST_c_c (casinh, 0x1.fp-10000L, -1.0L, 9.854680208706673586644342922051388714633e-1506L, -1.570796326794896619231321691639751442099L),
4071 TEST_c_c (casinh, -0x1.fp-10000L, 1.0L, -9.854680208706673586644342922051388714633e-1506L, 1.570796326794896619231321691639751442099L),
4072 TEST_c_c (casinh, -0x1.fp-10000L, -1.0L, -9.854680208706673586644342922051388714633e-1506L, -1.570796326794896619231321691639751442099L),
4073 TEST_c_c (casinh, 1.0L, 0x1.fp-10000L, 8.813735870195430252326093249797923090282e-1L, 6.867047849047171855399183659351043150871e-3011L),
4074 TEST_c_c (casinh, -1.0L, 0x1.fp-10000L, -8.813735870195430252326093249797923090282e-1L, 6.867047849047171855399183659351043150871e-3011L),
4075 TEST_c_c (casinh, 1.0L, -0x1.fp-10000L, 8.813735870195430252326093249797923090282e-1L, -6.867047849047171855399183659351043150871e-3011L),
4076 TEST_c_c (casinh, -1.0L, -0x1.fp-10000L, -8.813735870195430252326093249797923090282e-1L, -6.867047849047171855399183659351043150871e-3011L),
4077 TEST_c_c (casinh, 0x1.fp-16385L, 1.0L, 9.023632056840860275214893047597614177639e-2467L, 1.570796326794896619231321691639751442099L),
4078 TEST_c_c (casinh, 0x1.fp-16385L, -1.0L, 9.023632056840860275214893047597614177639e-2467L, -1.570796326794896619231321691639751442099L),
4079 TEST_c_c (casinh, -0x1.fp-16385L, 1.0L, -9.023632056840860275214893047597614177639e-2467L, 1.570796326794896619231321691639751442099L),
4080 TEST_c_c (casinh, -0x1.fp-16385L, -1.0L, -9.023632056840860275214893047597614177639e-2467L, -1.570796326794896619231321691639751442099L),
4081 TEST_c_c (casinh, 1.0L, 0x1.fp-16385L, 8.813735870195430252326093249797923090282e-1L, 5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4082 TEST_c_c (casinh, -1.0L, 0x1.fp-16385L, -8.813735870195430252326093249797923090282e-1L, 5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4083 TEST_c_c (casinh, 1.0L, -0x1.fp-16385L, 8.813735870195430252326093249797923090282e-1L, -5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4084 TEST_c_c (casinh, -1.0L, -0x1.fp-16385L, -8.813735870195430252326093249797923090282e-1L, -5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4085#endif
4086
4087 TEST_c_c (casinh, 0x1p-23L, 0x1.000002p0L, 5.364668491573609633134147164031476452679e-4L, 1.570574114956455764594481054234834678422L),
4088 TEST_c_c (casinh, 0x1p-23L, -0x1.000002p0L, 5.364668491573609633134147164031476452679e-4L, -1.570574114956455764594481054234834678422L),
4089 TEST_c_c (casinh, -0x1p-23L, 0x1.000002p0L, -5.364668491573609633134147164031476452679e-4L, 1.570574114956455764594481054234834678422L),
4090 TEST_c_c (casinh, -0x1p-23L, -0x1.000002p0L, -5.364668491573609633134147164031476452679e-4L, -1.570574114956455764594481054234834678422L),
4091 TEST_c_c (casinh, 0x1.000002p0L, 0x1p-23L, 8.813736713132400470205730751186547909968e-1L, 8.429369199749229560964789467980644296420e-8L),
4092 TEST_c_c (casinh, -0x1.000002p0L, 0x1p-23L, -8.813736713132400470205730751186547909968e-1L, 8.429369199749229560964789467980644296420e-8L),
4093 TEST_c_c (casinh, 0x1.000002p0L, -0x1p-23L, 8.813736713132400470205730751186547909968e-1L, -8.429369199749229560964789467980644296420e-8L),
4094 TEST_c_c (casinh, -0x1.000002p0L, -0x1p-23L, -8.813736713132400470205730751186547909968e-1L, -8.429369199749229560964789467980644296420e-8L),
4095 TEST_c_c (casinh, 0x1.fp-129L, 0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751436268L),
4096 TEST_c_c (casinh, 0x1.fp-129L, -0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751436268L),
4097 TEST_c_c (casinh, -0x1.fp-129L, 0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751436268L),
4098 TEST_c_c (casinh, -0x1.fp-129L, -0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751436268L),
4099 TEST_c_c (casinh, 0x1.000002p0L, 0x1.fp-129L, 8.813736713132375348727889167749389235161e-1L, 2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4100 TEST_c_c (casinh, -0x1.000002p0L, 0x1.fp-129L, -8.813736713132375348727889167749389235161e-1L, 2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4101 TEST_c_c (casinh, 0x1.000002p0L, -0x1.fp-129L, 8.813736713132375348727889167749389235161e-1L, -2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4102 TEST_c_c (casinh, -0x1.000002p0L, -0x1.fp-129L, -8.813736713132375348727889167749389235161e-1L, -2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4103 TEST_c_c (casinh, 0.0L, 0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751442099L),
4104 TEST_c_c (casinh, 0.0L, -0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751442099L),
4105 TEST_c_c (casinh, -0.0L, 0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751442099L),
4106 TEST_c_c (casinh, -0.0L, -0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751442099L),
4107 TEST_c_c (casinh, 0x1.000002p0L, 0.0L, 8.813736713132375348727889167749389235161e-1L, 0.0L),
4108 TEST_c_c (casinh, -0x1.000002p0L, 0.0L, -8.813736713132375348727889167749389235161e-1L, 0.0L),
4109 TEST_c_c (casinh, 0x1.000002p0L, -0.0L, 8.813736713132375348727889167749389235161e-1L, -0.0L),
4110 TEST_c_c (casinh, -0x1.000002p0L, -0.0L, -8.813736713132375348727889167749389235161e-1L, -0.0L),
3a7182a1 4111#ifndef TEST_FLOAT
08198877
JM		 4112 TEST_c_c (casinh, 0x1p-52L, 0x1.0000000000001p0L, 2.315303644582684770975188768022139415020e-8L, 1.570796317204594913251280305810847349436L),
4113 TEST_c_c (casinh, 0x1p-52L, -0x1.0000000000001p0L, 2.315303644582684770975188768022139415020e-8L, -1.570796317204594913251280305810847349436L),
4114 TEST_c_c (casinh, -0x1p-52L, 0x1.0000000000001p0L, -2.315303644582684770975188768022139415020e-8L, 1.570796317204594913251280305810847349436L),
4115 TEST_c_c (casinh, -0x1p-52L, -0x1.0000000000001p0L, -2.315303644582684770975188768022139415020e-8L, -1.570796317204594913251280305810847349436L),
4116 TEST_c_c (casinh, 0x1.0000000000001p0L, 0x1p-52L, 8.813735870195431822418551933572982483664e-1L, 1.570092458683774885078102529858632363236e-16L),
4117 TEST_c_c (casinh, -0x1.0000000000001p0L, 0x1p-52L, -8.813735870195431822418551933572982483664e-1L, 1.570092458683774885078102529858632363236e-16L),
4118 TEST_c_c (casinh, 0x1.0000000000001p0L, -0x1p-52L, 8.813735870195431822418551933572982483664e-1L, -1.570092458683774885078102529858632363236e-16L),
4119 TEST_c_c (casinh, -0x1.0000000000001p0L, -0x1p-52L, -8.813735870195431822418551933572982483664e-1L, -1.570092458683774885078102529858632363236e-16L),
4120 TEST_c_c (casinh, 0x1.fp-1025L, 0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4121 TEST_c_c (casinh, 0x1.fp-1025L, -0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4122 TEST_c_c (casinh, -0x1.fp-1025L, 0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4123 TEST_c_c (casinh, -0x1.fp-1025L, -0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4124 TEST_c_c (casinh, 0x1.0000000000001p0L, 0x1.fp-1025L, 8.813735870195431822418551933572895326024e-1L, 3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4125 TEST_c_c (casinh, -0x1.0000000000001p0L, 0x1.fp-1025L, -8.813735870195431822418551933572895326024e-1L, 3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4126 TEST_c_c (casinh, 0x1.0000000000001p0L, -0x1.fp-1025L, 8.813735870195431822418551933572895326024e-1L, -3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4127 TEST_c_c (casinh, -0x1.0000000000001p0L, -0x1.fp-1025L, -8.813735870195431822418551933572895326024e-1L, -3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4128 TEST_c_c (casinh, 0.0L, 0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4129 TEST_c_c (casinh, 0.0L, -0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4130 TEST_c_c (casinh, -0.0L, 0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4131 TEST_c_c (casinh, -0.0L, -0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4132 TEST_c_c (casinh, 0x1.0000000000001p0L, 0.0L, 8.813735870195431822418551933572895326024e-1L, 0.0L),
4133 TEST_c_c (casinh, -0x1.0000000000001p0L, 0.0L, -8.813735870195431822418551933572895326024e-1L, 0.0L),
4134 TEST_c_c (casinh, 0x1.0000000000001p0L, -0.0L, 8.813735870195431822418551933572895326024e-1L, -0.0L),
4135 TEST_c_c (casinh, -0x1.0000000000001p0L, -0.0L, -8.813735870195431822418551933572895326024e-1L, -0.0L),
3a7182a1
JM		 4136#endif
4137#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 4138 TEST_c_c (casinh, 0x1p-63L, 0x1.0000000000000002p0L, 5.116146586219826555037807251857670783420e-10L, 1.570796326582978888921215348380499122131L),
4139 TEST_c_c (casinh, 0x1p-63L, -0x1.0000000000000002p0L, 5.116146586219826555037807251857670783420e-10L, -1.570796326582978888921215348380499122131L),
4140 TEST_c_c (casinh, -0x1p-63L, 0x1.0000000000000002p0L, -5.116146586219826555037807251857670783420e-10L, 1.570796326582978888921215348380499122131L),
4141 TEST_c_c (casinh, -0x1p-63L, -0x1.0000000000000002p0L, -5.116146586219826555037807251857670783420e-10L, -1.570796326582978888921215348380499122131L),
4142 TEST_c_c (casinh, 0x1.0000000000000002p0L, 0x1p-63L, 8.813735870195430253092739958139610131001e-1L, 7.666467083416870406778649849746878368519e-20L),
4143 TEST_c_c (casinh, -0x1.0000000000000002p0L, 0x1p-63L, -8.813735870195430253092739958139610131001e-1L, 7.666467083416870406778649849746878368519e-20L),
4144 TEST_c_c (casinh, 0x1.0000000000000002p0L, -0x1p-63L, 8.813735870195430253092739958139610131001e-1L, -7.666467083416870406778649849746878368519e-20L),
4145 TEST_c_c (casinh, -0x1.0000000000000002p0L, -0x1p-63L, -8.813735870195430253092739958139610131001e-1L, -7.666467083416870406778649849746878368519e-20L),
3a7182a1 4146# if LDBL_MIN_EXP <= -16381
08198877
JM		 4147 TEST_c_c (casinh, 0x1.fp-16385L, 0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4148 TEST_c_c (casinh, 0x1.fp-16385L, -0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4149 TEST_c_c (casinh, -0x1.fp-16385L, 0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4150 TEST_c_c (casinh, -0x1.fp-16385L, -0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4151 TEST_c_c (casinh, 0x1.0000000000000002p0L, 0x1.fp-16385L, 8.813735870195430253092739958139610130980e-1L, 5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4152 TEST_c_c (casinh, -0x1.0000000000000002p0L, 0x1.fp-16385L, -8.813735870195430253092739958139610130980e-1L, 5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4153 TEST_c_c (casinh, 0x1.0000000000000002p0L, -0x1.fp-16385L, 8.813735870195430253092739958139610130980e-1L, -5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4154 TEST_c_c (casinh, -0x1.0000000000000002p0L, -0x1.fp-16385L, -8.813735870195430253092739958139610130980e-1L, -5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
3a7182a1 4155# endif
08198877
JM		 4156 TEST_c_c (casinh, 0.0L, 0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4157 TEST_c_c (casinh, 0.0L, -0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4158 TEST_c_c (casinh, -0.0L, 0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4159 TEST_c_c (casinh, -0.0L, -0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4160 TEST_c_c (casinh, 0x1.0000000000000002p0L, 0.0L, 8.813735870195430253092739958139610130980e-1L, 0.0L),
4161 TEST_c_c (casinh, -0x1.0000000000000002p0L, 0.0L, -8.813735870195430253092739958139610130980e-1L, 0.0L),
4162 TEST_c_c (casinh, 0x1.0000000000000002p0L, -0.0L, 8.813735870195430253092739958139610130980e-1L, -0.0L),
4163 TEST_c_c (casinh, -0x1.0000000000000002p0L, -0.0L, -8.813735870195430253092739958139610130980e-1L, -0.0L),
3a7182a1
JM		 4164#endif
4165#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 4166 TEST_c_c (casinh, 0x1p-106L, 0x1.000000000000000000000000008p0L, 2.285028863093221674154232933662774454211e-16L, 1.570796326794896565289107467733682961928L),
4167 TEST_c_c (casinh, 0x1p-106L, -0x1.000000000000000000000000008p0L, 2.285028863093221674154232933662774454211e-16L, -1.570796326794896565289107467733682961928L),
4168 TEST_c_c (casinh, -0x1p-106L, 0x1.000000000000000000000000008p0L, -2.285028863093221674154232933662774454211e-16L, 1.570796326794896565289107467733682961928L),
4169 TEST_c_c (casinh, -0x1p-106L, -0x1.000000000000000000000000008p0L, -2.285028863093221674154232933662774454211e-16L, -1.570796326794896565289107467733682961928L),
4170 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, 0x1p-106L, 8.813735870195430252326093249798097405561e-1L, 8.715763992105246878957416200936726072500e-33L),
4171 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, 0x1p-106L, -8.813735870195430252326093249798097405561e-1L, 8.715763992105246878957416200936726072500e-33L),
4172 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, -0x1p-106L, 8.813735870195430252326093249798097405561e-1L, -8.715763992105246878957416200936726072500e-33L),
4173 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, -0x1p-106L, -8.813735870195430252326093249798097405561e-1L, -8.715763992105246878957416200936726072500e-33L),
4174 TEST_c_c (casinh, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4175 TEST_c_c (casinh, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4176 TEST_c_c (casinh, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4177 TEST_c_c (casinh, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4178 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 8.813735870195430252326093249798097405561e-1L, 3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4179 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, -8.813735870195430252326093249798097405561e-1L, 3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4180 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 8.813735870195430252326093249798097405561e-1L, -3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4181 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, -8.813735870195430252326093249798097405561e-1L, -3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4182 TEST_c_c (casinh, 0.0L, 0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4183 TEST_c_c (casinh, 0.0L, -0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4184 TEST_c_c (casinh, -0.0L, 0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4185 TEST_c_c (casinh, -0.0L, -0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4186 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, 0.0L, 8.813735870195430252326093249798097405561e-1L, 0.0L),
4187 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, 0.0L, -8.813735870195430252326093249798097405561e-1L, 0.0L),
4188 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, -0.0L, 8.813735870195430252326093249798097405561e-1L, -0.0L),
4189 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, -0.0L, -8.813735870195430252326093249798097405561e-1L, -0.0L),
3a7182a1
JM		 4190#endif
4191#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 4192 TEST_c_c (casinh, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 2.019699255375255198156433710951064632386e-17L, 1.570796326794896614463458507897073960405L),
4193 TEST_c_c (casinh, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 2.019699255375255198156433710951064632386e-17L, -1.570796326794896614463458507897073960405L),
4194 TEST_c_c (casinh, -0x1p-113L, 0x1.0000000000000000000000000001p0L, -2.019699255375255198156433710951064632386e-17L, 1.570796326794896614463458507897073960405L),
4195 TEST_c_c (casinh, -0x1p-113L, -0x1.0000000000000000000000000001p0L, -2.019699255375255198156433710951064632386e-17L, -1.570796326794896614463458507897073960405L),
4196 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 8.813735870195430252326093249797924452120e-1L, 6.809190618832224124185481406981900518193e-35L),
4197 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, 0x1p-113L, -8.813735870195430252326093249797924452120e-1L, 6.809190618832224124185481406981900518193e-35L),
4198 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 8.813735870195430252326093249797924452120e-1L, -6.809190618832224124185481406981900518193e-35L),
4199 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, -0x1p-113L, -8.813735870195430252326093249797924452120e-1L, -6.809190618832224124185481406981900518193e-35L),
4200 TEST_c_c (casinh, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4201 TEST_c_c (casinh, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4202 TEST_c_c (casinh, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4203 TEST_c_c (casinh, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4204 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 8.813735870195430252326093249797924452120e-1L, 5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4205 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, -8.813735870195430252326093249797924452120e-1L, 5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4206 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 8.813735870195430252326093249797924452120e-1L, -5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4207 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, -8.813735870195430252326093249797924452120e-1L, -5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4208 TEST_c_c (casinh, 0.0L, 0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4209 TEST_c_c (casinh, 0.0L, -0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4210 TEST_c_c (casinh, -0.0L, 0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4211 TEST_c_c (casinh, -0.0L, -0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4212 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, 0.0L, 8.813735870195430252326093249797924452120e-1L, 0.0L),
4213 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, 0.0L, -8.813735870195430252326093249797924452120e-1L, 0.0L),
4214 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, -0.0L, 8.813735870195430252326093249797924452120e-1L, -0.0L),
4215 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, -0.0L, -8.813735870195430252326093249797924452120e-1L, -0.0L),
4216#endif
4217
4218 TEST_c_c (casinh, 0x1p-23L, 0x0.ffffffp0L, 2.714321200917194650737217746780928423385e-4L, 1.570357140408705570520377172865353621698L),
4219 TEST_c_c (casinh, 0x1p-23L, -0x0.ffffffp0L, 2.714321200917194650737217746780928423385e-4L, -1.570357140408705570520377172865353621698L),
4220 TEST_c_c (casinh, -0x1p-23L, 0x0.ffffffp0L, -2.714321200917194650737217746780928423385e-4L, 1.570357140408705570520377172865353621698L),
4221 TEST_c_c (casinh, -0x1p-23L, -0x0.ffffffp0L, -2.714321200917194650737217746780928423385e-4L, -1.570357140408705570520377172865353621698L),
4222 TEST_c_c (casinh, 0x0.ffffffp0L, 0x1p-23L, 8.813735448726963984495965873956465777250e-1L, 8.429369953393598499000760938112968755257e-8L),
4223 TEST_c_c (casinh, -0x0.ffffffp0L, 0x1p-23L, -8.813735448726963984495965873956465777250e-1L, 8.429369953393598499000760938112968755257e-8L),
4224 TEST_c_c (casinh, 0x0.ffffffp0L, -0x1p-23L, 8.813735448726963984495965873956465777250e-1L, -8.429369953393598499000760938112968755257e-8L),
4225 TEST_c_c (casinh, -0x0.ffffffp0L, -0x1p-23L, -8.813735448726963984495965873956465777250e-1L, -8.429369953393598499000760938112968755257e-8L),
4226 TEST_c_c (casinh, 0x1.fp-129L, 0x0.ffffffp0L, 8.245504387859737323891843603996428534945e-36L, 1.570451059810180415643718442157112705601L),
4227 TEST_c_c (casinh, 0x1.fp-129L, -0x0.ffffffp0L, 8.245504387859737323891843603996428534945e-36L, -1.570451059810180415643718442157112705601L),
4228 TEST_c_c (casinh, -0x1.fp-129L, 0x0.ffffffp0L, -8.245504387859737323891843603996428534945e-36L, 1.570451059810180415643718442157112705601L),
4229 TEST_c_c (casinh, -0x1.fp-129L, -0x0.ffffffp0L, -8.245504387859737323891843603996428534945e-36L, -1.570451059810180415643718442157112705601L),
4230 TEST_c_c (casinh, 0x0.ffffffp0L, 0x1.fp-129L, 8.813735448726938863015878255140556727969e-1L, 2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4231 TEST_c_c (casinh, -0x0.ffffffp0L, 0x1.fp-129L, -8.813735448726938863015878255140556727969e-1L, 2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4232 TEST_c_c (casinh, 0x0.ffffffp0L, -0x1.fp-129L, 8.813735448726938863015878255140556727969e-1L, -2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4233 TEST_c_c (casinh, -0x0.ffffffp0L, -0x1.fp-129L, -8.813735448726938863015878255140556727969e-1L, -2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4234 TEST_c_c (casinh, 0.0L, 0x0.ffffffp0L, 0.0L, 1.570451059810180415643718442157112705601L),
4235 TEST_c_c (casinh, 0.0L, -0x0.ffffffp0L, 0.0L, -1.570451059810180415643718442157112705601L),
4236 TEST_c_c (casinh, -0.0L, 0x0.ffffffp0L, -0.0L, 1.570451059810180415643718442157112705601L),
4237 TEST_c_c (casinh, -0.0L, -0x0.ffffffp0L, -0.0L, -1.570451059810180415643718442157112705601L),
4238 TEST_c_c (casinh, 0x0.ffffffp0L, 0.0L, 8.813735448726938863015878255140556727969e-1L, 0.0L),
4239 TEST_c_c (casinh, -0x0.ffffffp0L, 0.0L, -8.813735448726938863015878255140556727969e-1L, 0.0L),
4240 TEST_c_c (casinh, 0x0.ffffffp0L, -0.0L, 8.813735448726938863015878255140556727969e-1L, -0.0L),
4241 TEST_c_c (casinh, -0x0.ffffffp0L, -0.0L, -8.813735448726938863015878255140556727969e-1L, -0.0L),
4242 TEST_c_c (casinh, 0x1p-23L, 0.5L, 1.376510308240943236356088341381173571841e-7L, 5.235987755982934033165770729745469098254e-1L),
4243 TEST_c_c (casinh, 0x1p-23L, -0.5L, 1.376510308240943236356088341381173571841e-7L, -5.235987755982934033165770729745469098254e-1L),
4244 TEST_c_c (casinh, -0x1p-23L, 0.5L, -1.376510308240943236356088341381173571841e-7L, 5.235987755982934033165770729745469098254e-1L),
4245 TEST_c_c (casinh, -0x1p-23L, -0.5L, -1.376510308240943236356088341381173571841e-7L, -5.235987755982934033165770729745469098254e-1L),
4246 TEST_c_c (casinh, 0.5L, 0x1p-23L, 4.812118250596059896127318386463676808798e-1L, 1.066240299940009780479664302917201696886e-7L),
4247 TEST_c_c (casinh, -0.5L, 0x1p-23L, -4.812118250596059896127318386463676808798e-1L, 1.066240299940009780479664302917201696886e-7L),
4248 TEST_c_c (casinh, 0.5L, -0x1p-23L, 4.812118250596059896127318386463676808798e-1L, -1.066240299940009780479664302917201696886e-7L),
4249 TEST_c_c (casinh, -0.5L, -0x1p-23L, -4.812118250596059896127318386463676808798e-1L, -1.066240299940009780479664302917201696886e-7L),
4250 TEST_c_c (casinh, 0x1.fp-129L, 0.5L, 3.287317402534702257036015056278368274737e-39L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4251 TEST_c_c (casinh, 0x1.fp-129L, -0.5L, 3.287317402534702257036015056278368274737e-39L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4252 TEST_c_c (casinh, -0x1.fp-129L, 0.5L, -3.287317402534702257036015056278368274737e-39L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4253 TEST_c_c (casinh, -0x1.fp-129L, -0.5L, -3.287317402534702257036015056278368274737e-39L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4254 TEST_c_c (casinh, 0.5L, 0x1.fp-129L, 4.812118250596034474977589134243684231352e-1L, 2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4255 TEST_c_c (casinh, -0.5L, 0x1.fp-129L, -4.812118250596034474977589134243684231352e-1L, 2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4256 TEST_c_c (casinh, 0.5L, -0x1.fp-129L, 4.812118250596034474977589134243684231352e-1L, -2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4257 TEST_c_c (casinh, -0.5L, -0x1.fp-129L, -4.812118250596034474977589134243684231352e-1L, -2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4258 TEST_c_c (casinh, 0x1p-23L, 0x1p-23L, 1.192092895507818146886315028596704749235e-7L, 1.192092895507806853113684971258850504935e-7L),
4259 TEST_c_c (casinh, 0x1p-23L, -0x1p-23L, 1.192092895507818146886315028596704749235e-7L, -1.192092895507806853113684971258850504935e-7L),
4260 TEST_c_c (casinh, -0x1p-23L, 0x1p-23L, -1.192092895507818146886315028596704749235e-7L, 1.192092895507806853113684971258850504935e-7L),
4261 TEST_c_c (casinh, -0x1p-23L, -0x1p-23L, -1.192092895507818146886315028596704749235e-7L, -1.192092895507806853113684971258850504935e-7L),
4262 TEST_c_c (casinh, 0x1.fp-129L, 0x1p-23L, 2.846900380897747786805634596726756660388e-39L, 1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4263 TEST_c_c (casinh, 0x1.fp-129L, -0x1p-23L, 2.846900380897747786805634596726756660388e-39L, -1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4264 TEST_c_c (casinh, -0x1.fp-129L, 0x1p-23L, -2.846900380897747786805634596726756660388e-39L, 1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4265 TEST_c_c (casinh, -0x1.fp-129L, -0x1p-23L, -2.846900380897747786805634596726756660388e-39L, -1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4266 /* Bug 15319: underflow exception may be missing. */
4267 TEST_c_c (casinh, 0x1p-23L, 0x1.fp-129L, 1.192092895507809676556842485683592032154e-7L, 2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4268 TEST_c_c (casinh, -0x1p-23L, 0x1.fp-129L, -1.192092895507809676556842485683592032154e-7L, 2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4269 TEST_c_c (casinh, 0x1p-23L, -0x1.fp-129L, 1.192092895507809676556842485683592032154e-7L, -2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4270 TEST_c_c (casinh, -0x1p-23L, -0x1.fp-129L, -1.192092895507809676556842485683592032154e-7L, -2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4271 TEST_c_c (casinh, 0.0L, 0x1p-23L, 0.0L, 1.192092895507815323443157514352519154304e-7L),
4272 TEST_c_c (casinh, 0.0L, -0x1p-23L, 0.0L, -1.192092895507815323443157514352519154304e-7L),
4273 TEST_c_c (casinh, -0.0L, 0x1p-23L, -0.0L, 1.192092895507815323443157514352519154304e-7L),
4274 TEST_c_c (casinh, -0.0L, -0x1p-23L, -0.0L, -1.192092895507815323443157514352519154304e-7L),
4275 TEST_c_c (casinh, 0x1p-23L, 0.0L, 1.192092895507809676556842485683592032154e-7L, 0.0L),
4276 TEST_c_c (casinh, -0x1p-23L, 0.0L, -1.192092895507809676556842485683592032154e-7L, 0.0L),
4277 TEST_c_c (casinh, 0x1p-23L, -0.0L, 1.192092895507809676556842485683592032154e-7L, -0.0L),
4278 TEST_c_c (casinh, -0x1p-23L, -0.0L, -1.192092895507809676556842485683592032154e-7L, -0.0L),
4279 TEST_c_c (casinh, 0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4280 TEST_c_c (casinh, 0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4281 TEST_c_c (casinh, -0x1.fp-129L, 0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4282 TEST_c_c (casinh, -0x1.fp-129L, -0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
ccc8cadf 4283#ifndef TEST_FLOAT
08198877
JM		 4284 TEST_c_c (casinh, 0x1p-52L, 0x0.fffffffffffff8p0L, 1.171456840272878582596796205397918831268e-8L, 1.570796307840326780080580569360500172043L),
4285 TEST_c_c (casinh, 0x1p-52L, -0x0.fffffffffffff8p0L, 1.171456840272878582596796205397918831268e-8L, -1.570796307840326780080580569360500172043L),
4286 TEST_c_c (casinh, -0x1p-52L, 0x0.fffffffffffff8p0L, -1.171456840272878582596796205397918831268e-8L, 1.570796307840326780080580569360500172043L),
4287 TEST_c_c (casinh, -0x1p-52L, -0x0.fffffffffffff8p0L, -1.171456840272878582596796205397918831268e-8L, -1.570796307840326780080580569360500172043L),
4288 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, 0x1p-52L, 8.813735870195429467279863907910458761820e-1L, 1.570092458683775146551022293016031474627e-16L),
4289 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, 0x1p-52L, -8.813735870195429467279863907910458761820e-1L, 1.570092458683775146551022293016031474627e-16L),
4290 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, -0x1p-52L, 8.813735870195429467279863907910458761820e-1L, -1.570092458683775146551022293016031474627e-16L),
4291 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, -0x1p-52L, -8.813735870195429467279863907910458761820e-1L, -1.570092458683775146551022293016031474627e-16L),
4292 TEST_c_c (casinh, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 3.616396521699973256461764099945789620604e-301L, 1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4293 TEST_c_c (casinh, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 3.616396521699973256461764099945789620604e-301L, -1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4294 TEST_c_c (casinh, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, -3.616396521699973256461764099945789620604e-301L, 1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4295 TEST_c_c (casinh, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, -3.616396521699973256461764099945789620604e-301L, -1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4296 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 8.813735870195429467279863907910371604180e-1L, 3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4297 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, -8.813735870195429467279863907910371604180e-1L, 3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4298 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 8.813735870195429467279863907910371604180e-1L, -3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4299 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, -8.813735870195429467279863907910371604180e-1L, -3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4300 TEST_c_c (casinh, 0.0L, 0x0.fffffffffffff8p0L, 0.0L, 1.570796311893735425383665303776316016594L),
4301 TEST_c_c (casinh, 0.0L, -0x0.fffffffffffff8p0L, 0.0L, -1.570796311893735425383665303776316016594L),
4302 TEST_c_c (casinh, -0.0L, 0x0.fffffffffffff8p0L, -0.0L, 1.570796311893735425383665303776316016594L),
4303 TEST_c_c (casinh, -0.0L, -0x0.fffffffffffff8p0L, -0.0L, -1.570796311893735425383665303776316016594L),
4304 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, 0.0L, 8.813735870195429467279863907910371604180e-1L, 0.0L),
4305 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, 0.0L, -8.813735870195429467279863907910371604180e-1L, 0.0L),
4306 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, -0.0L, 8.813735870195429467279863907910371604180e-1L, -0.0L),
4307 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, -0.0L, -8.813735870195429467279863907910371604180e-1L, -0.0L),
4308#endif
4309 TEST_c_c (casinh, 0x1p-52L, 0.5L, 2.563950248511418570403591756798643804971e-16L, 5.235987755982988730771072305465648369889e-1L),
4310 TEST_c_c (casinh, 0x1p-52L, -0.5L, 2.563950248511418570403591756798643804971e-16L, -5.235987755982988730771072305465648369889e-1L),
4311 TEST_c_c (casinh, -0x1p-52L, 0.5L, -2.563950248511418570403591756798643804971e-16L, 5.235987755982988730771072305465648369889e-1L),
4312 TEST_c_c (casinh, -0x1p-52L, -0.5L, -2.563950248511418570403591756798643804971e-16L, -5.235987755982988730771072305465648369889e-1L),
4313 TEST_c_c (casinh, 0.5L, 0x1p-52L, 4.812118250596034474977589134243772428682e-1L, 1.986027322597818397661816253158024383707e-16L),
4314 TEST_c_c (casinh, -0.5L, 0x1p-52L, -4.812118250596034474977589134243772428682e-1L, 1.986027322597818397661816253158024383707e-16L),
4315 TEST_c_c (casinh, 0.5L, -0x1p-52L, 4.812118250596034474977589134243772428682e-1L, -1.986027322597818397661816253158024383707e-16L),
4316 TEST_c_c (casinh, -0.5L, -0x1p-52L, -4.812118250596034474977589134243772428682e-1L, -1.986027322597818397661816253158024383707e-16L),
ccc8cadf 4317#ifndef TEST_FLOAT
08198877
JM		 4318 TEST_c_c (casinh, 0x1.fp-1025L, 0.5L, 6.222508863508420569166420770843207333493e-309L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4319 TEST_c_c (casinh, 0x1.fp-1025L, -0.5L, 6.222508863508420569166420770843207333493e-309L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4320 TEST_c_c (casinh, -0x1.fp-1025L, 0.5L, -6.222508863508420569166420770843207333493e-309L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4321 TEST_c_c (casinh, -0x1.fp-1025L, -0.5L, -6.222508863508420569166420770843207333493e-309L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4322 TEST_c_c (casinh, 0.5L, 0x1.fp-1025L, 4.812118250596034474977589134243684231352e-1L, 4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4323 TEST_c_c (casinh, -0.5L, 0x1.fp-1025L, -4.812118250596034474977589134243684231352e-1L, 4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4324 TEST_c_c (casinh, 0.5L, -0x1.fp-1025L, 4.812118250596034474977589134243684231352e-1L, -4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4325 TEST_c_c (casinh, -0.5L, -0x1.fp-1025L, -4.812118250596034474977589134243684231352e-1L, -4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4326#endif
4327 TEST_c_c (casinh, 0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181677117148e-16L, 2.220446049250313080847263336181604132852e-16L),
4328 TEST_c_c (casinh, 0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181677117148e-16L, -2.220446049250313080847263336181604132852e-16L),
4329 TEST_c_c (casinh, -0x1p-52L, 0x1p-52L, -2.220446049250313080847263336181677117148e-16L, 2.220446049250313080847263336181604132852e-16L),
4330 TEST_c_c (casinh, -0x1p-52L, -0x1p-52L, -2.220446049250313080847263336181677117148e-16L, -2.220446049250313080847263336181604132852e-16L),
ccc8cadf 4331#ifndef TEST_FLOAT
08198877
JM		 4332 TEST_c_c (casinh, 0x1.fp-1025L, 0x1p-52L, 5.388850751072128349671657362289548938458e-309L, 2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4333 TEST_c_c (casinh, 0x1.fp-1025L, -0x1p-52L, 5.388850751072128349671657362289548938458e-309L, -2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4334 TEST_c_c (casinh, -0x1.fp-1025L, 0x1p-52L, -5.388850751072128349671657362289548938458e-309L, 2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4335 TEST_c_c (casinh, -0x1.fp-1025L, -0x1p-52L, -5.388850751072128349671657362289548938458e-309L, -2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4336 /* Bug 15319: underflow exception may be missing. */
4337 TEST_c_c (casinh, 0x1p-52L, 0x1.fp-1025L, 2.220446049250313080847263336181622378926e-16L, 5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4338 TEST_c_c (casinh, -0x1p-52L, 0x1.fp-1025L, -2.220446049250313080847263336181622378926e-16L, 5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4339 TEST_c_c (casinh, 0x1p-52L, -0x1.fp-1025L, 2.220446049250313080847263336181622378926e-16L, -5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4340 TEST_c_c (casinh, -0x1p-52L, -0x1.fp-1025L, -2.220446049250313080847263336181622378926e-16L, -5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4341#endif
4342 TEST_c_c (casinh, 0.0L, 0x1p-52L, 0.0L, 2.220446049250313080847263336181658871074e-16L),
4343 TEST_c_c (casinh, 0.0L, -0x1p-52L, 0.0L, -2.220446049250313080847263336181658871074e-16L),
4344 TEST_c_c (casinh, -0.0L, 0x1p-52L, -0.0L, 2.220446049250313080847263336181658871074e-16L),
4345 TEST_c_c (casinh, -0.0L, -0x1p-52L, -0.0L, -2.220446049250313080847263336181658871074e-16L),
4346 TEST_c_c (casinh, 0x1p-52L, 0.0L, 2.220446049250313080847263336181622378926e-16L, 0.0L),
4347 TEST_c_c (casinh, -0x1p-52L, 0.0L, -2.220446049250313080847263336181622378926e-16L, 0.0L),
4348 TEST_c_c (casinh, 0x1p-52L, -0.0L, 2.220446049250313080847263336181622378926e-16L, -0.0L),
4349 TEST_c_c (casinh, -0x1p-52L, -0.0L, -2.220446049250313080847263336181622378926e-16L, -0.0L),
ccc8cadf 4350#ifndef TEST_FLOAT
08198877
JM		 4351 TEST_c_c (casinh, 0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4352 TEST_c_c (casinh, 0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4353 TEST_c_c (casinh, -0x1.fp-1025L, 0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4354 TEST_c_c (casinh, -0x1.fp-1025L, -0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
ccc8cadf
JM		 4355#endif
4356#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 4357 TEST_c_c (casinh, 0x1p-63L, 0x0.ffffffffffffffffp0L, 2.588578361325995866221775673638805081337e-10L, 1.570796326376055842114524927965556247908L),
4358 TEST_c_c (casinh, 0x1p-63L, -0x0.ffffffffffffffffp0L, 2.588578361325995866221775673638805081337e-10L, -1.570796326376055842114524927965556247908L),
4359 TEST_c_c (casinh, -0x1p-63L, 0x0.ffffffffffffffffp0L, -2.588578361325995866221775673638805081337e-10L, 1.570796326376055842114524927965556247908L),
4360 TEST_c_c (casinh, -0x1p-63L, -0x0.ffffffffffffffffp0L, -2.588578361325995866221775673638805081337e-10L, -1.570796326376055842114524927965556247908L),
4361 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, 0x1p-63L, 8.813735870195430251942769895627079569937e-1L, 7.666467083416870407402049869781566856442e-20L),
4362 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, 0x1p-63L, -8.813735870195430251942769895627079569937e-1L, 7.666467083416870407402049869781566856442e-20L),
4363 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, -0x1p-63L, 8.813735870195430251942769895627079569937e-1L, -7.666467083416870407402049869781566856442e-20L),
4364 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, -0x1p-63L, -8.813735870195430251942769895627079569937e-1L, -7.666467083416870407402049869781566856442e-20L),
ccc8cadf 4365# if LDBL_MIN_EXP <= -16381
08198877
JM		 4366 TEST_c_c (casinh, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 2.472906068161537187835415298076415423459e-4923L, 1.570796326465624365239962068302568888898L),
4367 TEST_c_c (casinh, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 2.472906068161537187835415298076415423459e-4923L, -1.570796326465624365239962068302568888898L),
4368 TEST_c_c (casinh, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, -2.472906068161537187835415298076415423459e-4923L, 1.570796326465624365239962068302568888898L),
4369 TEST_c_c (casinh, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, -2.472906068161537187835415298076415423459e-4923L, -1.570796326465624365239962068302568888898L),
4370 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 8.813735870195430251942769895627079569917e-1L, 5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4371 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, -8.813735870195430251942769895627079569917e-1L, 5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4372 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 8.813735870195430251942769895627079569917e-1L, -5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4373 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, -8.813735870195430251942769895627079569917e-1L, -5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf 4374# endif
08198877
JM		 4375 TEST_c_c (casinh, 0.0L, 0x0.ffffffffffffffffp0L, 0.0L, 1.570796326465624365239962068302568888898L),
4376 TEST_c_c (casinh, 0.0L, -0x0.ffffffffffffffffp0L, 0.0L, -1.570796326465624365239962068302568888898L),
4377 TEST_c_c (casinh, -0.0L, 0x0.ffffffffffffffffp0L, -0.0L, 1.570796326465624365239962068302568888898L),
4378 TEST_c_c (casinh, -0.0L, -0x0.ffffffffffffffffp0L, -0.0L, -1.570796326465624365239962068302568888898L),
4379 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, 0.0L, 8.813735870195430251942769895627079569917e-1L, 0.0L),
4380 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, 0.0L, -8.813735870195430251942769895627079569917e-1L, 0.0L),
4381 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, -0.0L, 8.813735870195430251942769895627079569917e-1L, -0.0L),
4382 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, -0.0L, -8.813735870195430251942769895627079569917e-1L, -0.0L),
4383#endif
4384 TEST_c_c (casinh, 0x1p-63L, 0.5L, 1.251928832280966098829878787499365228659e-19L, 5.235987755982988730771072305465838140283e-1L),
4385 TEST_c_c (casinh, 0x1p-63L, -0.5L, 1.251928832280966098829878787499365228659e-19L, -5.235987755982988730771072305465838140283e-1L),
4386 TEST_c_c (casinh, -0x1p-63L, 0.5L, -1.251928832280966098829878787499365228659e-19L, 5.235987755982988730771072305465838140283e-1L),
4387 TEST_c_c (casinh, -0x1p-63L, -0.5L, -1.251928832280966098829878787499365228659e-19L, -5.235987755982988730771072305465838140283e-1L),
4388 TEST_c_c (casinh, 0.5L, 0x1p-63L, 4.812118250596034474977589134243684231373e-1L, 9.697399036122160144833087173623140436413e-20L),
4389 TEST_c_c (casinh, -0.5L, 0x1p-63L, -4.812118250596034474977589134243684231373e-1L, 9.697399036122160144833087173623140436413e-20L),
4390 TEST_c_c (casinh, 0.5L, -0x1p-63L, 4.812118250596034474977589134243684231373e-1L, -9.697399036122160144833087173623140436413e-20L),
4391 TEST_c_c (casinh, -0.5L, -0x1p-63L, -4.812118250596034474977589134243684231373e-1L, -9.697399036122160144833087173623140436413e-20L),
ccc8cadf 4392#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4393 TEST_c_c (casinh, 0x1.fp-16385L, 0.5L, 9.402257155670418112159334875199821342890e-4933L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4394 TEST_c_c (casinh, 0x1.fp-16385L, -0.5L, 9.402257155670418112159334875199821342890e-4933L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4395 TEST_c_c (casinh, -0x1.fp-16385L, 0.5L, -9.402257155670418112159334875199821342890e-4933L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4396 TEST_c_c (casinh, -0x1.fp-16385L, -0.5L, -9.402257155670418112159334875199821342890e-4933L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4397 TEST_c_c (casinh, 0.5L, 0x1.fp-16385L, 4.812118250596034474977589134243684231352e-1L, 7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4398 TEST_c_c (casinh, -0.5L, 0x1.fp-16385L, -4.812118250596034474977589134243684231352e-1L, 7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4399 TEST_c_c (casinh, 0.5L, -0x1.fp-16385L, 4.812118250596034474977589134243684231352e-1L, -7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4400 TEST_c_c (casinh, -0.5L, -0x1.fp-16385L, -4.812118250596034474977589134243684231352e-1L, -7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4401#endif
4402 TEST_c_c (casinh, 0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711430e-19L, 1.084202172485504434007452800869941711422e-19L),
4403 TEST_c_c (casinh, 0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711430e-19L, -1.084202172485504434007452800869941711422e-19L),
4404 TEST_c_c (casinh, -0x1p-63L, 0x1p-63L, -1.084202172485504434007452800869941711430e-19L, 1.084202172485504434007452800869941711422e-19L),
4405 TEST_c_c (casinh, -0x1p-63L, -0x1p-63L, -1.084202172485504434007452800869941711430e-19L, -1.084202172485504434007452800869941711422e-19L),
ccc8cadf 4406#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4407 TEST_c_c (casinh, 0x1.fp-16385L, 0x1p-63L, 8.142593549724601460479922838826119584465e-4933L, 1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4408 TEST_c_c (casinh, 0x1.fp-16385L, -0x1p-63L, 8.142593549724601460479922838826119584465e-4933L, -1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4409 TEST_c_c (casinh, -0x1.fp-16385L, 0x1p-63L, -8.142593549724601460479922838826119584465e-4933L, 1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4410 TEST_c_c (casinh, -0x1.fp-16385L, -0x1p-63L, -8.142593549724601460479922838826119584465e-4933L, -1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4411 TEST_c_c (casinh, 0x1p-63L, 0x1.fp-16385L, 1.084202172485504434007452800869941711424e-19L, 8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4412 TEST_c_c (casinh, -0x1p-63L, 0x1.fp-16385L, -1.084202172485504434007452800869941711424e-19L, 8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4413 TEST_c_c (casinh, 0x1p-63L, -0x1.fp-16385L, 1.084202172485504434007452800869941711424e-19L, -8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4414 TEST_c_c (casinh, -0x1p-63L, -0x1.fp-16385L, -1.084202172485504434007452800869941711424e-19L, -8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4415#endif
4416 TEST_c_c (casinh, 0.0L, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711428e-19L),
4417 TEST_c_c (casinh, 0.0L, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711428e-19L),
4418 TEST_c_c (casinh, -0.0L, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711428e-19L),
4419 TEST_c_c (casinh, -0.0L, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711428e-19L),
4420 TEST_c_c (casinh, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711424e-19L, 0.0L),
4421 TEST_c_c (casinh, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711424e-19L, 0.0L),
4422 TEST_c_c (casinh, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711424e-19L, -0.0L),
4423 TEST_c_c (casinh, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711424e-19L, -0.0L),
ccc8cadf 4424#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4425 TEST_c_c (casinh, 0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4426 TEST_c_c (casinh, 0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4427 TEST_c_c (casinh, -0x1.fp-16385L, 0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4428 TEST_c_c (casinh, -0x1.fp-16385L, -0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf
JM		 4429#endif
4430#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 4431 TEST_c_c (casinh, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.234330349600789959989661887846005659983e-16L, 1.570796326794896419512475791677915736035L),
4432 TEST_c_c (casinh, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.234330349600789959989661887846005659983e-16L, -1.570796326794896419512475791677915736035L),
4433 TEST_c_c (casinh, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, -1.234330349600789959989661887846005659983e-16L, 1.570796326794896419512475791677915736035L),
4434 TEST_c_c (casinh, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, -1.234330349600789959989661887846005659983e-16L, -1.570796326794896419512475791677915736035L),
4435 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 8.813735870195430252326093249797835932642e-1L, 1.743152798421049375791483240187377443526e-32L),
4436 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, -8.813735870195430252326093249797835932642e-1L, 1.743152798421049375791483240187377443526e-32L),
4437 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 8.813735870195430252326093249797835932642e-1L, -1.743152798421049375791483240187377443526e-32L),
4438 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, -8.813735870195430252326093249797835932642e-1L, -1.743152798421049375791483240187377443526e-32L),
4439 TEST_c_c (casinh, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 3.432186888910770473784103112009399360940e-293L, 1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4440 TEST_c_c (casinh, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 3.432186888910770473784103112009399360940e-293L, -1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4441 TEST_c_c (casinh, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, -3.432186888910770473784103112009399360940e-293L, 1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4442 TEST_c_c (casinh, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, -3.432186888910770473784103112009399360940e-293L, -1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4443 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 8.813735870195430252326093249797835932642e-1L, 3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4444 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, -8.813735870195430252326093249797835932642e-1L, 3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4445 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 8.813735870195430252326093249797835932642e-1L, -3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4446 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, -8.813735870195430252326093249797835932642e-1L, -3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4447 TEST_c_c (casinh, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 1.570796326794896462222075823262245502760L),
4448 TEST_c_c (casinh, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -1.570796326794896462222075823262245502760L),
4449 TEST_c_c (casinh, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 1.570796326794896462222075823262245502760L),
4450 TEST_c_c (casinh, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -1.570796326794896462222075823262245502760L),
4451 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 8.813735870195430252326093249797835932642e-1L, 0.0L),
4452 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -8.813735870195430252326093249797835932642e-1L, 0.0L),
4453 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 8.813735870195430252326093249797835932642e-1L, -0.0L),
4454 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -8.813735870195430252326093249797835932642e-1L, -0.0L),
4455#endif
4456 TEST_c_c (casinh, 0x1p-105L, 0.5L, 2.846556599890768890940941645338546615370e-32L, 5.235987755982988730771072305465838140329e-1L),
4457 TEST_c_c (casinh, 0x1p-105L, -0.5L, 2.846556599890768890940941645338546615370e-32L, -5.235987755982988730771072305465838140329e-1L),
4458 TEST_c_c (casinh, -0x1p-105L, 0.5L, -2.846556599890768890940941645338546615370e-32L, 5.235987755982988730771072305465838140329e-1L),
4459 TEST_c_c (casinh, -0x1p-105L, -0.5L, -2.846556599890768890940941645338546615370e-32L, -5.235987755982988730771072305465838140329e-1L),
4460 TEST_c_c (casinh, 0.5L, 0x1p-105L, 4.812118250596034474977589134243684231352e-1L, 2.204933261082751447436996198490110245167e-32L),
4461 TEST_c_c (casinh, -0.5L, 0x1p-105L, -4.812118250596034474977589134243684231352e-1L, 2.204933261082751447436996198490110245167e-32L),
4462 TEST_c_c (casinh, 0.5L, -0x1p-105L, 4.812118250596034474977589134243684231352e-1L, -2.204933261082751447436996198490110245167e-32L),
4463 TEST_c_c (casinh, -0.5L, -0x1p-105L, -4.812118250596034474977589134243684231352e-1L, -2.204933261082751447436996198490110245167e-32L),
4464 TEST_c_c (casinh, 0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
4465 TEST_c_c (casinh, 0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
4466 TEST_c_c (casinh, -0x1p-105L, 0x1p-105L, -2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
4467 TEST_c_c (casinh, -0x1p-105L, -0x1p-105L, -2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
ccc8cadf 4468#ifndef TEST_FLOAT
08198877
JM		 4469 TEST_c_c (casinh, 0x1.fp-1025L, 0x1p-105L, 5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4470 TEST_c_c (casinh, 0x1.fp-1025L, -0x1p-105L, 5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4471 TEST_c_c (casinh, -0x1.fp-1025L, 0x1p-105L, -5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4472 TEST_c_c (casinh, -0x1.fp-1025L, -0x1p-105L, -5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4473 /* Bug 15319: underflow exception may be missing. */
4474 TEST_c_c (casinh, 0x1p-105L, 0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4475 TEST_c_c (casinh, -0x1p-105L, 0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4476 TEST_c_c (casinh, 0x1p-105L, -0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4477 TEST_c_c (casinh, -0x1p-105L, -0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4478#endif
4479 TEST_c_c (casinh, 0.0L, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L),
4480 TEST_c_c (casinh, 0.0L, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L),
4481 TEST_c_c (casinh, -0.0L, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L),
4482 TEST_c_c (casinh, -0.0L, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L),
4483 TEST_c_c (casinh, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L, 0.0L),
4484 TEST_c_c (casinh, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L, 0.0L),
4485 TEST_c_c (casinh, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L, -0.0L),
4486 TEST_c_c (casinh, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L, -0.0L),
ccc8cadf 4487#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 4488 TEST_c_c (casinh, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.091004200533850618345330909857103457781e-17L, 1.570796326794896601578502908312986698624L),
4489 TEST_c_c (casinh, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.091004200533850618345330909857103457781e-17L, -1.570796326794896601578502908312986698624L),
4490 TEST_c_c (casinh, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.091004200533850618345330909857103457781e-17L, 1.570796326794896601578502908312986698624L),
4491 TEST_c_c (casinh, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.091004200533850618345330909857103457781e-17L, -1.570796326794896601578502908312986698624L),
4492 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 8.813735870195430252326093249797922409363e-1L, 1.361838123766444824837096281396380300349e-34L),
4493 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, -8.813735870195430252326093249797922409363e-1L, 1.361838123766444824837096281396380300349e-34L),
4494 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 8.813735870195430252326093249797922409363e-1L, -1.361838123766444824837096281396380300349e-34L),
4495 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, -8.813735870195430252326093249797922409363e-1L, -1.361838123766444824837096281396380300349e-34L),
4496 TEST_c_c (casinh, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 5.867357004219059108790368268900490184505e-4916L, 1.570796326794896605353533883825294686803L),
4497 TEST_c_c (casinh, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 5.867357004219059108790368268900490184505e-4916L, -1.570796326794896605353533883825294686803L),
4498 TEST_c_c (casinh, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, -5.867357004219059108790368268900490184505e-4916L, 1.570796326794896605353533883825294686803L),
4499 TEST_c_c (casinh, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, -5.867357004219059108790368268900490184505e-4916L, -1.570796326794896605353533883825294686803L),
4500 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 8.813735870195430252326093249797922409363e-1L, 5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4501 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, -8.813735870195430252326093249797922409363e-1L, 5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4502 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 8.813735870195430252326093249797922409363e-1L, -5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4503 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, -8.813735870195430252326093249797922409363e-1L, -5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4504 TEST_c_c (casinh, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 1.570796326794896605353533883825294686803L),
4505 TEST_c_c (casinh, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -1.570796326794896605353533883825294686803L),
4506 TEST_c_c (casinh, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 1.570796326794896605353533883825294686803L),
4507 TEST_c_c (casinh, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -1.570796326794896605353533883825294686803L),
4508 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 8.813735870195430252326093249797922409363e-1L, 0.0L),
4509 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -8.813735870195430252326093249797922409363e-1L, 0.0L),
4510 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 8.813735870195430252326093249797922409363e-1L, -0.0L),
4511 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -8.813735870195430252326093249797922409363e-1L, -0.0L),
4512#endif
4513 TEST_c_c (casinh, 0x1p-112L, 0.5L, 2.223872343664663196047610660420739543258e-34L, 5.235987755982988730771072305465838140329e-1L),
4514 TEST_c_c (casinh, 0x1p-112L, -0.5L, 2.223872343664663196047610660420739543258e-34L, -5.235987755982988730771072305465838140329e-1L),
4515 TEST_c_c (casinh, -0x1p-112L, 0.5L, -2.223872343664663196047610660420739543258e-34L, 5.235987755982988730771072305465838140329e-1L),
4516 TEST_c_c (casinh, -0x1p-112L, -0.5L, -2.223872343664663196047610660420739543258e-34L, -5.235987755982988730771072305465838140329e-1L),
4517 TEST_c_c (casinh, 0.5L, 0x1p-112L, 4.812118250596034474977589134243684231352e-1L, 1.722604110220899568310153280070398629037e-34L),
4518 TEST_c_c (casinh, -0.5L, 0x1p-112L, -4.812118250596034474977589134243684231352e-1L, 1.722604110220899568310153280070398629037e-34L),
4519 TEST_c_c (casinh, 0.5L, -0x1p-112L, 4.812118250596034474977589134243684231352e-1L, -1.722604110220899568310153280070398629037e-34L),
4520 TEST_c_c (casinh, -0.5L, -0x1p-112L, -4.812118250596034474977589134243684231352e-1L, -1.722604110220899568310153280070398629037e-34L),
4521 TEST_c_c (casinh, 0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
4522 TEST_c_c (casinh, 0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
4523 TEST_c_c (casinh, -0x1p-112L, 0x1p-112L, -1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
4524 TEST_c_c (casinh, -0x1p-112L, -0x1p-112L, -1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
ccc8cadf 4525#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 4526 TEST_c_c (casinh, 0x1.fp-16385L, 0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4527 TEST_c_c (casinh, 0x1.fp-16385L, -0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4528 TEST_c_c (casinh, -0x1.fp-16385L, 0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4529 TEST_c_c (casinh, -0x1.fp-16385L, -0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4530 TEST_c_c (casinh, 0x1p-112L, 0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4531 TEST_c_c (casinh, -0x1p-112L, 0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4532 TEST_c_c (casinh, 0x1p-112L, -0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4533 TEST_c_c (casinh, -0x1p-112L, -0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4534#endif
4535 TEST_c_c (casinh, 0.0L, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L),
4536 TEST_c_c (casinh, 0.0L, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L),
4537 TEST_c_c (casinh, -0.0L, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L),
4538 TEST_c_c (casinh, -0.0L, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L),
4539 TEST_c_c (casinh, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L, 0.0L),
4540 TEST_c_c (casinh, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L, 0.0L),
4541 TEST_c_c (casinh, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L, -0.0L),
4542 TEST_c_c (casinh, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L, -0.0L),
4543
4544 TEST_c_c (casinh, 0.75L, 1.25L, 1.03171853444778027336364058631006594L, 0.911738290968487636358489564316731207L),
4545 TEST_c_c (casinh, -2, -3, -1.9686379257930962917886650952454982L, -0.96465850440760279204541105949953237L),
4546 END_DATA (casinh)
4547 };
8847214f
UD		 4548
4549static void
08198877 4550casinh_test (void)
8847214f 4551{
aaca11d8 4552 errno = 0;
08198877 4553 FUNC(casinh) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 4554 if (errno == ENOSYS)
4555 /* Function not implemented. */
4556 return;
4557
08198877
JM		 4558 START (casinh);
4559 RUN_TEST_LOOP_c_c (casinh, casinh_test_data, );
4560 END (casinh, complex);
4561}
4562
8847214f 4563
08198877
JM		 4564static const struct test_c_c_data catan_test_data[] =
4565 {
4566 START_DATA (catan),
4567 TEST_c_c (catan, 0, 0, 0, 0),
4568 TEST_c_c (catan, minus_zero, 0, minus_zero, 0),
4569 TEST_c_c (catan, 0, minus_zero, 0, minus_zero),
4570 TEST_c_c (catan, minus_zero, minus_zero, minus_zero, minus_zero),
4571
4572 TEST_c_c (catan, 1.0L, plus_zero, M_PI_4l, plus_zero),
4573 TEST_c_c (catan, 1.0L, minus_zero, M_PI_4l, minus_zero),
4574 TEST_c_c (catan, -1.0L, plus_zero, -M_PI_4l, plus_zero),
4575 TEST_c_c (catan, -1.0L, minus_zero, -M_PI_4l, minus_zero),
4576 TEST_c_c (catan, plus_zero, 1.0L, plus_zero, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4577 TEST_c_c (catan, minus_zero, 1.0L, minus_zero, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4578 TEST_c_c (catan, plus_zero, -1.0L, plus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4579 TEST_c_c (catan, minus_zero, -1.0L, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4580
4581 TEST_c_c (catan, plus_infty, plus_infty, M_PI_2l, 0),
4582 TEST_c_c (catan, plus_infty, minus_infty, M_PI_2l, minus_zero),
4583 TEST_c_c (catan, minus_infty, plus_infty, -M_PI_2l, 0),
4584 TEST_c_c (catan, minus_infty, minus_infty, -M_PI_2l, minus_zero),
4585
4586
4587 TEST_c_c (catan, plus_infty, -10.0, M_PI_2l, minus_zero),
4588 TEST_c_c (catan, minus_infty, -10.0, -M_PI_2l, minus_zero),
4589 TEST_c_c (catan, plus_infty, minus_zero, M_PI_2l, minus_zero),
4590 TEST_c_c (catan, minus_infty, minus_zero, -M_PI_2l, minus_zero),
4591 TEST_c_c (catan, plus_infty, 0.0, M_PI_2l, 0),
4592 TEST_c_c (catan, minus_infty, 0.0, -M_PI_2l, 0),
4593 TEST_c_c (catan, plus_infty, 0.1L, M_PI_2l, 0),
4594 TEST_c_c (catan, minus_infty, 0.1L, -M_PI_2l, 0),
4595
4596 TEST_c_c (catan, 0.0, minus_infty, M_PI_2l, minus_zero),
4597 TEST_c_c (catan, minus_zero, minus_infty, -M_PI_2l, minus_zero),
4598 TEST_c_c (catan, 100.0, minus_infty, M_PI_2l, minus_zero),
4599 TEST_c_c (catan, -100.0, minus_infty, -M_PI_2l, minus_zero),
4600
4601 TEST_c_c (catan, 0.0, plus_infty, M_PI_2l, 0),
4602 TEST_c_c (catan, minus_zero, plus_infty, -M_PI_2l, 0),
4603 TEST_c_c (catan, 0.5, plus_infty, M_PI_2l, 0),
4604 TEST_c_c (catan, -0.5, plus_infty, -M_PI_2l, 0),
4605
4606 TEST_c_c (catan, qnan_value, 0.0, qnan_value, 0),
4607 TEST_c_c (catan, qnan_value, minus_zero, qnan_value, minus_zero),
4608
4609 TEST_c_c (catan, qnan_value, plus_infty, qnan_value, 0),
4610 TEST_c_c (catan, qnan_value, minus_infty, qnan_value, minus_zero),
4611
4612 TEST_c_c (catan, 0.0, qnan_value, qnan_value, qnan_value),
4613 TEST_c_c (catan, minus_zero, qnan_value, qnan_value, qnan_value),
4614
4615 TEST_c_c (catan, plus_infty, qnan_value, M_PI_2l, 0, IGNORE_ZERO_INF_SIGN),
4616 TEST_c_c (catan, minus_infty, qnan_value, -M_PI_2l, 0, IGNORE_ZERO_INF_SIGN),
4617
4618 TEST_c_c (catan, qnan_value, 10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4619 TEST_c_c (catan, qnan_value, -10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4620
4621 TEST_c_c (catan, 0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4622 TEST_c_c (catan, -0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4623
4624 TEST_c_c (catan, qnan_value, qnan_value, qnan_value, qnan_value),
4625
4626 TEST_c_c (catan, 0x1p50L, 0.0L, 1.570796326794895731052901991514519103193L, 0.0L),
4627 TEST_c_c (catan, 0x1p50L, -0.0L, 1.570796326794895731052901991514519103193L, -0.0L),
4628 TEST_c_c (catan, -0x1p50L, 0.0L, -1.570796326794895731052901991514519103193L, 0.0L),
4629 TEST_c_c (catan, -0x1p50L, -0.0L, -1.570796326794895731052901991514519103193L, -0.0L),
4630 TEST_c_c (catan, 0.0L, 0x1p50L, 1.570796326794896619231321691639751442099L, 8.881784197001252323389053344728897997441e-16L),
4631 TEST_c_c (catan, -0.0L, 0x1p50L, -1.570796326794896619231321691639751442099L, 8.881784197001252323389053344728897997441e-16L),
4632 TEST_c_c (catan, 0.0L, -0x1p50L, 1.570796326794896619231321691639751442099L, -8.881784197001252323389053344728897997441e-16L),
4633 TEST_c_c (catan, -0.0L, -0x1p50L, -1.570796326794896619231321691639751442099L, -8.881784197001252323389053344728897997441e-16L),
2f38fbfe 4634#ifndef TEST_FLOAT
08198877
JM		 4635 TEST_c_c (catan, 0x1p500L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4636 TEST_c_c (catan, 0x1p500L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4637 TEST_c_c (catan, -0x1p500L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4638 TEST_c_c (catan, -0x1p500L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4639 TEST_c_c (catan, 0.0L, 0x1p500L, 1.570796326794896619231321691639751442099L, 3.054936363499604682051979393213617699789e-151L),
4640 TEST_c_c (catan, -0.0L, 0x1p500L, -1.570796326794896619231321691639751442099L, 3.054936363499604682051979393213617699789e-151L),
4641 TEST_c_c (catan, 0.0L, -0x1p500L, 1.570796326794896619231321691639751442099L, -3.054936363499604682051979393213617699789e-151L),
4642 TEST_c_c (catan, -0.0L, -0x1p500L, -1.570796326794896619231321691639751442099L, -3.054936363499604682051979393213617699789e-151L),
2f38fbfe
JM		 4643#endif
4644#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 4645 TEST_c_c (catan, 0x1p5000L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4646 TEST_c_c (catan, 0x1p5000L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4647 TEST_c_c (catan, -0x1p5000L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4648 TEST_c_c (catan, -0x1p5000L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4649 TEST_c_c (catan, 0.0L, 0x1p5000L, 1.570796326794896619231321691639751442099L, 7.079811261048172892385615158694057552948e-1506L),
4650 TEST_c_c (catan, -0.0L, 0x1p5000L, -1.570796326794896619231321691639751442099L, 7.079811261048172892385615158694057552948e-1506L),
4651 TEST_c_c (catan, 0.0L, -0x1p5000L, 1.570796326794896619231321691639751442099L, -7.079811261048172892385615158694057552948e-1506L),
4652 TEST_c_c (catan, -0.0L, -0x1p5000L, -1.570796326794896619231321691639751442099L, -7.079811261048172892385615158694057552948e-1506L),
4653#endif
4654 TEST_c_c (catan, 0x1p63L, 0.5L, 1.570796326794896619122901474391200998698L, 5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4655 TEST_c_c (catan, 0x1p63L, -0.5L, 1.570796326794896619122901474391200998698L, -5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4656 TEST_c_c (catan, -0x1p63L, 0.5L, -1.570796326794896619122901474391200998698L, 5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4657 TEST_c_c (catan, -0x1p63L, -0.5L, -1.570796326794896619122901474391200998698L, -5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4658 TEST_c_c (catan, 0.5L, 0x1p63L, 1.570796326794896619231321691639751442093L, 1.084202172485504434007452800869941711427e-19L),
4659 TEST_c_c (catan, -0.5L, 0x1p63L, -1.570796326794896619231321691639751442093L, 1.084202172485504434007452800869941711427e-19L),
4660 TEST_c_c (catan, 0.5L, -0x1p63L, 1.570796326794896619231321691639751442093L, -1.084202172485504434007452800869941711427e-19L),
4661 TEST_c_c (catan, -0.5L, -0x1p63L, -1.570796326794896619231321691639751442093L, -1.084202172485504434007452800869941711427e-19L),
9457fd95 4662#ifndef TEST_FLOAT
08198877
JM		 4663 TEST_c_c (catan, 0x1p511L, 0.5L, 1.570796326794896619231321691639751442099L, 1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4664 TEST_c_c (catan, 0x1p511L, -0.5L, 1.570796326794896619231321691639751442099L, -1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4665 TEST_c_c (catan, -0x1p511L, 0.5L, -1.570796326794896619231321691639751442099L, 1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4666 TEST_c_c (catan, -0x1p511L, -0.5L, -1.570796326794896619231321691639751442099L, -1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4667 TEST_c_c (catan, 0.5L, 0x1p511L, 1.570796326794896619231321691639751442099L, 1.491668146240041348658193063092586767475e-154L),
4668 TEST_c_c (catan, -0.5L, 0x1p511L, -1.570796326794896619231321691639751442099L, 1.491668146240041348658193063092586767475e-154L),
4669 TEST_c_c (catan, 0.5L, -0x1p511L, 1.570796326794896619231321691639751442099L, -1.491668146240041348658193063092586767475e-154L),
4670 TEST_c_c (catan, -0.5L, -0x1p511L, -1.570796326794896619231321691639751442099L, -1.491668146240041348658193063092586767475e-154L),
9457fd95
JM		 4671#endif
4672#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 4673 TEST_c_c (catan, 0x1p8191L, 0.5L, 1.570796326794896619231321691639751442099L, 1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4674 TEST_c_c (catan, 0x1p8191L, -0.5L, 1.570796326794896619231321691639751442099L, -1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4675 TEST_c_c (catan, -0x1p8191L, 0.5L, -1.570796326794896619231321691639751442099L, 1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4676 TEST_c_c (catan, -0x1p8191L, -0.5L, -1.570796326794896619231321691639751442099L, -1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4677 TEST_c_c (catan, 0.5L, 0x1p8191L, 1.570796326794896619231321691639751442099L, 1.833603867554847165621412392048483165956e-2466L),
4678 TEST_c_c (catan, -0.5L, 0x1p8191L, -1.570796326794896619231321691639751442099L, 1.833603867554847165621412392048483165956e-2466L),
4679 TEST_c_c (catan, 0.5L, -0x1p8191L, 1.570796326794896619231321691639751442099L, -1.833603867554847165621412392048483165956e-2466L),
4680 TEST_c_c (catan, -0.5L, -0x1p8191L, -1.570796326794896619231321691639751442099L, -1.833603867554847165621412392048483165956e-2466L),
4681#endif
4682 TEST_c_c (catan, 0x1p100L, 0.0L, 1.570796326794896619231321691638962581193L, 0.0L),
4683 TEST_c_c (catan, 0x1p100L, -0.0L, 1.570796326794896619231321691638962581193L, -0.0L),
4684 TEST_c_c (catan, -0x1p100L, 0.0L, -1.570796326794896619231321691638962581193L, 0.0L),
4685 TEST_c_c (catan, -0x1p100L, -0.0L, -1.570796326794896619231321691638962581193L, -0.0L),
4686 TEST_c_c (catan, 0.0L, 0x1p100L, 1.570796326794896619231321691639751442099L, 7.888609052210118054117285652827862296732e-31L),
4687 TEST_c_c (catan, -0.0L, 0x1p100L, -1.570796326794896619231321691639751442099L, 7.888609052210118054117285652827862296732e-31L),
4688 TEST_c_c (catan, 0.0L, -0x1p100L, 1.570796326794896619231321691639751442099L, -7.888609052210118054117285652827862296732e-31L),
4689 TEST_c_c (catan, -0.0L, -0x1p100L, -1.570796326794896619231321691639751442099L, -7.888609052210118054117285652827862296732e-31L),
4690 TEST_c_c (catan, 0x1.fp127L, 0.0L, 1.570796326794896619231321691639751442096L, 0.0L),
4691 TEST_c_c (catan, 0x1.fp127L, -0.0L, 1.570796326794896619231321691639751442096L, -0.0L),
4692 TEST_c_c (catan, -0x1.fp127L, 0.0L, -1.570796326794896619231321691639751442096L, 0.0L),
4693 TEST_c_c (catan, -0x1.fp127L, -0.0L, -1.570796326794896619231321691639751442096L, -0.0L),
4694 TEST_c_c (catan, 0.0L, 0x1.fp127L, 1.570796326794896619231321691639751442099L, 3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4695 TEST_c_c (catan, -0.0L, 0x1.fp127L, -1.570796326794896619231321691639751442099L, 3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4696 TEST_c_c (catan, 0.0L, -0x1.fp127L, 1.570796326794896619231321691639751442099L, -3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4697 TEST_c_c (catan, -0.0L, -0x1.fp127L, -1.570796326794896619231321691639751442099L, -3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4698 TEST_c_c (catan, 0x1.fp127L, 0x1.fp127L, 1.570796326794896619231321691639751442097L, 1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4699 TEST_c_c (catan, 0x1.fp127L, -0x1.fp127L, 1.570796326794896619231321691639751442097L, -1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4700 TEST_c_c (catan, -0x1.fp127L, 0x1.fp127L, -1.570796326794896619231321691639751442097L, 1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4701 TEST_c_c (catan, -0x1.fp127L, -0x1.fp127L, -1.570796326794896619231321691639751442097L, -1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5b4217d7 4702#ifndef TEST_FLOAT
08198877
JM		 4703 TEST_c_c (catan, 0x1p900L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4704 TEST_c_c (catan, 0x1p900L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4705 TEST_c_c (catan, -0x1p900L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4706 TEST_c_c (catan, -0x1p900L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4707 TEST_c_c (catan, 0.0L, 0x1p900L, 1.570796326794896619231321691639751442099L, 1.183052186166774710972751597518026531652e-271L),
4708 TEST_c_c (catan, -0.0L, 0x1p900L, -1.570796326794896619231321691639751442099L, 1.183052186166774710972751597518026531652e-271L),
4709 TEST_c_c (catan, 0.0L, -0x1p900L, 1.570796326794896619231321691639751442099L, -1.183052186166774710972751597518026531652e-271L),
4710 TEST_c_c (catan, -0.0L, -0x1p900L, -1.570796326794896619231321691639751442099L, -1.183052186166774710972751597518026531652e-271L),
4711 TEST_c_c (catan, 0x1.fp1023L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4712 TEST_c_c (catan, 0x1.fp1023L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4713 TEST_c_c (catan, -0x1.fp1023L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4714 TEST_c_c (catan, -0x1.fp1023L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4715 TEST_c_c (catan, 0.0L, 0x1.fp1023L, 1.570796326794896619231321691639751442099L, 5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4716 TEST_c_c (catan, -0.0L, 0x1.fp1023L, -1.570796326794896619231321691639751442099L, 5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4717 TEST_c_c (catan, 0.0L, -0x1.fp1023L, 1.570796326794896619231321691639751442099L, -5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4718 TEST_c_c (catan, -0.0L, -0x1.fp1023L, -1.570796326794896619231321691639751442099L, -5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4719 TEST_c_c (catan, 0x1.fp1023L, 0x1.fp1023L, 1.570796326794896619231321691639751442099L, 2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4720 TEST_c_c (catan, 0x1.fp1023L, -0x1.fp1023L, 1.570796326794896619231321691639751442099L, -2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4721 TEST_c_c (catan, -0x1.fp1023L, 0x1.fp1023L, -1.570796326794896619231321691639751442099L, 2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4722 TEST_c_c (catan, -0x1.fp1023L, -0x1.fp1023L, -1.570796326794896619231321691639751442099L, -2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
5b4217d7
JM		 4723#endif
4724#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 4725 TEST_c_c (catan, 0x1p10000L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4726 TEST_c_c (catan, 0x1p10000L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4727 TEST_c_c (catan, -0x1p10000L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4728 TEST_c_c (catan, -0x1p10000L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4729 TEST_c_c (catan, 0.0L, 0x1p10000L, 1.570796326794896619231321691639751442099L, 5.012372749206452009297555933742977749322e-3011L),
4730 TEST_c_c (catan, -0.0L, 0x1p10000L, -1.570796326794896619231321691639751442099L, 5.012372749206452009297555933742977749322e-3011L),
4731 TEST_c_c (catan, 0.0L, -0x1p10000L, 1.570796326794896619231321691639751442099L, -5.012372749206452009297555933742977749322e-3011L),
4732 TEST_c_c (catan, -0.0L, -0x1p10000L, -1.570796326794896619231321691639751442099L, -5.012372749206452009297555933742977749322e-3011L),
4733 TEST_c_c (catan, 0x1.fp16383L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4734 TEST_c_c (catan, 0x1.fp16383L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4735 TEST_c_c (catan, -0x1.fp16383L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4736 TEST_c_c (catan, -0x1.fp16383L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4737 TEST_c_c (catan, 0.0L, 0x1.fp16383L, 1.570796326794896619231321691639751442099L, 8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4738 TEST_c_c (catan, -0.0L, 0x1.fp16383L, -1.570796326794896619231321691639751442099L, 8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4739 TEST_c_c (catan, 0.0L, -0x1.fp16383L, 1.570796326794896619231321691639751442099L, -8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4740 TEST_c_c (catan, -0.0L, -0x1.fp16383L, -1.570796326794896619231321691639751442099L, -8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4741 TEST_c_c (catan, 0x1.fp16383L, 0x1.fp16383L, 1.570796326794896619231321691639751442099L, 4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4742 TEST_c_c (catan, 0x1.fp16383L, -0x1.fp16383L, 1.570796326794896619231321691639751442099L, -4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4743 TEST_c_c (catan, -0x1.fp16383L, 0x1.fp16383L, -1.570796326794896619231321691639751442099L, 4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4744 TEST_c_c (catan, -0x1.fp16383L, -0x1.fp16383L, -1.570796326794896619231321691639751442099L, -4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4745#endif
4746 TEST_c_c (catan, 0x1p-13L, 1.0L, 7.854286809755354140031716771044626356262e-1L, 4.852030264850939738801379894163661227127L),
4747 TEST_c_c (catan, 0x1p-13L, -1.0L, 7.854286809755354140031716771044626356262e-1L, -4.852030264850939738801379894163661227127L),
4748 TEST_c_c (catan, -0x1p-13L, 1.0L, -7.854286809755354140031716771044626356262e-1L, 4.852030264850939738801379894163661227127L),
4749 TEST_c_c (catan, -0x1p-13L, -1.0L, -7.854286809755354140031716771044626356262e-1L, -4.852030264850939738801379894163661227127L),
4750 TEST_c_c (catan, 1.0L, 0x1p-13L, 7.853981671227386080775748393881580082970e-1L, 6.103515609841754902688560615027452023669e-5L),
4751 TEST_c_c (catan, -1.0L, 0x1p-13L, -7.853981671227386080775748393881580082970e-1L, 6.103515609841754902688560615027452023669e-5L),
4752 TEST_c_c (catan, 1.0L, -0x1p-13L, 7.853981671227386080775748393881580082970e-1L, -6.103515609841754902688560615027452023669e-5L),
4753 TEST_c_c (catan, -1.0L, -0x1p-13L, -7.853981671227386080775748393881580082970e-1L, -6.103515609841754902688560615027452023669e-5L),
4754 TEST_c_c (catan, 0x1p-27L, 1.0L, 7.853981652600934588466178684534110069553e-1L, 9.704060527839234335310696652368086117807L),
4755 TEST_c_c (catan, 0x1p-27L, -1.0L, 7.853981652600934588466178684534110069553e-1L, -9.704060527839234335310696652368086117807L),
4756 TEST_c_c (catan, -0x1p-27L, 1.0L, -7.853981652600934588466178684534110069553e-1L, 9.704060527839234335310696652368086117807L),
4757 TEST_c_c (catan, -0x1p-27L, -1.0L, -7.853981652600934588466178684534110069553e-1L, -9.704060527839234335310696652368086117807L),
4758 TEST_c_c (catan, 1.0L, 0x1p-27L, 7.853981633974483234934486536343324763447e-1L, 3.725290298461914028034141143623846306386e-9L),
4759 TEST_c_c (catan, -1.0L, 0x1p-27L, -7.853981633974483234934486536343324763447e-1L, 3.725290298461914028034141143623846306386e-9L),
4760 TEST_c_c (catan, 1.0L, -0x1p-27L, 7.853981633974483234934486536343324763447e-1L, -3.725290298461914028034141143623846306386e-9L),
4761 TEST_c_c (catan, -1.0L, -0x1p-27L, -7.853981633974483234934486536343324763447e-1L, -3.725290298461914028034141143623846306386e-9L),
4762 TEST_c_c (catan, 0x1p-33L, 1.0L, 7.853981634265521400723945494331241018449e-1L, 1.178350206951907026009379309773625595762e1L),
4763 TEST_c_c (catan, 0x1p-33L, -1.0L, 7.853981634265521400723945494331241018449e-1L, -1.178350206951907026009379309773625595762e1L),
4764 TEST_c_c (catan, -0x1p-33L, 1.0L, -7.853981634265521400723945494331241018449e-1L, 1.178350206951907026009379309773625595762e1L),
4765 TEST_c_c (catan, -0x1p-33L, -1.0L, -7.853981634265521400723945494331241018449e-1L, -1.178350206951907026009379309773625595762e1L),
4766 TEST_c_c (catan, 1.0L, 0x1p-33L, 7.853981633974483096190489776088929224056e-1L, 5.820766091346740722643102318246316469910e-11L),
4767 TEST_c_c (catan, -1.0L, 0x1p-33L, -7.853981633974483096190489776088929224056e-1L, 5.820766091346740722643102318246316469910e-11L),
4768 TEST_c_c (catan, 1.0L, -0x1p-33L, 7.853981633974483096190489776088929224056e-1L, -5.820766091346740722643102318246316469910e-11L),
4769 TEST_c_c (catan, -1.0L, -0x1p-33L, -7.853981633974483096190489776088929224056e-1L, -5.820766091346740722643102318246316469910e-11L),
4770 TEST_c_c (catan, 0x1p-54L, 1.0L, 7.853981633974483234934486536343324763447e-1L, 1.906154746539849600897388334009985581467e1L),
4771 TEST_c_c (catan, 0x1p-54L, -1.0L, 7.853981633974483234934486536343324763447e-1L, -1.906154746539849600897388334009985581467e1L),
4772 TEST_c_c (catan, -0x1p-54L, 1.0L, -7.853981633974483234934486536343324763447e-1L, 1.906154746539849600897388334009985581467e1L),
4773 TEST_c_c (catan, -0x1p-54L, -1.0L, -7.853981633974483234934486536343324763447e-1L, -1.906154746539849600897388334009985581467e1L),
4774 TEST_c_c (catan, 1.0L, 0x1p-54L, 7.853981633974483096156608458198764914213e-1L, 2.775557561562891351059079170227049355775e-17L),
4775 TEST_c_c (catan, -1.0L, 0x1p-54L, -7.853981633974483096156608458198764914213e-1L, 2.775557561562891351059079170227049355775e-17L),
4776 TEST_c_c (catan, 1.0L, -0x1p-54L, 7.853981633974483096156608458198764914213e-1L, -2.775557561562891351059079170227049355775e-17L),
4777 TEST_c_c (catan, -1.0L, -0x1p-54L, -7.853981633974483096156608458198764914213e-1L, -2.775557561562891351059079170227049355775e-17L),
4778 TEST_c_c (catan, 0x1p-57L, 1.0L, 7.853981633974483113503843217966828154612e-1L, 2.010126823623841397309973152228712047720e1L),
4779 TEST_c_c (catan, 0x1p-57L, -1.0L, 7.853981633974483113503843217966828154612e-1L, -2.010126823623841397309973152228712047720e1L),
4780 TEST_c_c (catan, -0x1p-57L, 1.0L, -7.853981633974483113503843217966828154612e-1L, 2.010126823623841397309973152228712047720e1L),
4781 TEST_c_c (catan, -0x1p-57L, -1.0L, -7.853981633974483113503843217966828154612e-1L, -2.010126823623841397309973152228712047720e1L),
4782 TEST_c_c (catan, 1.0L, 0x1p-57L, 7.853981633974483096156608458198757330864e-1L, 3.469446951953614188823848962783813448721e-18L),
4783 TEST_c_c (catan, -1.0L, 0x1p-57L, -7.853981633974483096156608458198757330864e-1L, 3.469446951953614188823848962783813448721e-18L),
4784 TEST_c_c (catan, 1.0L, -0x1p-57L, 7.853981633974483096156608458198757330864e-1L, -3.469446951953614188823848962783813448721e-18L),
4785 TEST_c_c (catan, -1.0L, -0x1p-57L, -7.853981633974483096156608458198757330864e-1L, -3.469446951953614188823848962783813448721e-18L),
4786 TEST_c_c (catan, 0x1p-13L, 0x1.000002p0L, 7.859169620684960844300240092596908675974e-1L, 4.852030056234795712498957387213592193975L),
4787 TEST_c_c (catan, 0x1p-13L, -0x1.000002p0L, 7.859169620684960844300240092596908675974e-1L, -4.852030056234795712498957387213592193975L),
4788 TEST_c_c (catan, -0x1p-13L, 0x1.000002p0L, -7.859169620684960844300240092596908675974e-1L, 4.852030056234795712498957387213592193975L),
4789 TEST_c_c (catan, -0x1p-13L, -0x1.000002p0L, -7.859169620684960844300240092596908675974e-1L, -4.852030056234795712498957387213592193975L),
4790 TEST_c_c (catan, 0x1.000002p0L, 0x1p-13L, 7.853982267273793866654490522673596014524e-1L, 6.103514882246036852433556327261700380577e-5L),
4791 TEST_c_c (catan, -0x1.000002p0L, 0x1p-13L, -7.853982267273793866654490522673596014524e-1L, 6.103514882246036852433556327261700380577e-5L),
4792 TEST_c_c (catan, 0x1.000002p0L, -0x1p-13L, 7.853982267273793866654490522673596014524e-1L, -6.103514882246036852433556327261700380577e-5L),
4793 TEST_c_c (catan, -0x1.000002p0L, -0x1p-13L, -7.853982267273793866654490522673596014524e-1L, -6.103514882246036852433556327261700380577e-5L),
4794 TEST_c_c (catan, 0x1p-13L, 0x0.ffffffp0L, 7.851845403708474595909269086711426246675e-1L, 4.852030190345140708455871037447717761868L),
4795 TEST_c_c (catan, 0x1p-13L, -0x0.ffffffp0L, 7.851845403708474595909269086711426246675e-1L, -4.852030190345140708455871037447717761868L),
4796 TEST_c_c (catan, -0x1p-13L, 0x0.ffffffp0L, -7.851845403708474595909269086711426246675e-1L, 4.852030190345140708455871037447717761868L),
4797 TEST_c_c (catan, -0x1p-13L, -0x0.ffffffp0L, -7.851845403708474595909269086711426246675e-1L, -4.852030190345140708455871037447717761868L),
4798 TEST_c_c (catan, 0x0.ffffffp0L, 0x1p-13L, 7.853981373204155542484315721351697277336e-1L, 6.103515973639646453881721999956617260502e-5L),
4799 TEST_c_c (catan, -0x0.ffffffp0L, 0x1p-13L, -7.853981373204155542484315721351697277336e-1L, 6.103515973639646453881721999956617260502e-5L),
4800 TEST_c_c (catan, 0x0.ffffffp0L, -0x1p-13L, 7.853981373204155542484315721351697277336e-1L, -6.103515973639646453881721999956617260502e-5L),
4801 TEST_c_c (catan, -0x0.ffffffp0L, -0x1p-13L, -7.853981373204155542484315721351697277336e-1L, -6.103515973639646453881721999956617260502e-5L),
caf84319 4802#ifndef TEST_FLOAT
08198877
JM		 4803 TEST_c_c (catan, 0x1p-27L, 0x1.0000000000001p0L, 7.853981801612546526942695000283242525531e-1L, 9.704060527839234168777242958594699810015L),
4804 TEST_c_c (catan, 0x1p-27L, -0x1.0000000000001p0L, 7.853981801612546526942695000283242525531e-1L, -9.704060527839234168777242958594699810015L),
4805 TEST_c_c (catan, -0x1p-27L, 0x1.0000000000001p0L, -7.853981801612546526942695000283242525531e-1L, 9.704060527839234168777242958594699810015L),
4806 TEST_c_c (catan, -0x1p-27L, -0x1.0000000000001p0L, -7.853981801612546526942695000283242525531e-1L, -9.704060527839234168777242958594699810015L),
4807 TEST_c_c (catan, 0x1.0000000000001p0L, 0x1p-27L, 7.853981633974484345157511161499711112683e-1L, 3.725290298461913200853528590596263270474e-9L),
4808 TEST_c_c (catan, -0x1.0000000000001p0L, 0x1p-27L, -7.853981633974484345157511161499711112683e-1L, 3.725290298461913200853528590596263270474e-9L),
4809 TEST_c_c (catan, 0x1.0000000000001p0L, -0x1p-27L, 7.853981633974484345157511161499711112683e-1L, -3.725290298461913200853528590596263270474e-9L),
4810 TEST_c_c (catan, -0x1.0000000000001p0L, -0x1p-27L, -7.853981633974484345157511161499711112683e-1L, -3.725290298461913200853528590596263270474e-9L),
4811 TEST_c_c (catan, 0x1p-27L, 0x0.fffffffffffff8p0L, 7.853981578095128619227903983047292781021e-1L, 9.704060527839234252043969805481351363824L),
4812 TEST_c_c (catan, 0x1p-27L, -0x0.fffffffffffff8p0L, 7.853981578095128619227903983047292781021e-1L, -9.704060527839234252043969805481351363824L),
4813 TEST_c_c (catan, -0x1p-27L, 0x0.fffffffffffff8p0L, -7.853981578095128619227903983047292781021e-1L, 9.704060527839234252043969805481351363824L),
4814 TEST_c_c (catan, -0x1p-27L, -0x0.fffffffffffff8p0L, -7.853981578095128619227903983047292781021e-1L, -9.704060527839234252043969805481351363824L),
4815 TEST_c_c (catan, 0x0.fffffffffffff8p0L, 0x1p-27L, 7.853981633974482679822974223765039144191e-1L, 3.725290298461914441624447420137706700965e-9L),
4816 TEST_c_c (catan, -0x0.fffffffffffff8p0L, 0x1p-27L, -7.853981633974482679822974223765039144191e-1L, 3.725290298461914441624447420137706700965e-9L),
4817 TEST_c_c (catan, 0x0.fffffffffffff8p0L, -0x1p-27L, 7.853981633974482679822974223765039144191e-1L, -3.725290298461914441624447420137706700965e-9L),
4818 TEST_c_c (catan, -0x0.fffffffffffff8p0L, -0x1p-27L, -7.853981633974482679822974223765039144191e-1L, -3.725290298461914441624447420137706700965e-9L),
caf84319
JM		 4819#endif
4820#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 4821 TEST_c_c (catan, 0x1p-33L, 0x1.0000000000000002p0L, 7.853981638922134273801338071094141188767e-1L, 1.178350206951907025990405771755129268176e1L),
4822 TEST_c_c (catan, 0x1p-33L, -0x1.0000000000000002p0L, 7.853981638922134273801338071094141188767e-1L, -1.178350206951907025990405771755129268176e1L),
4823 TEST_c_c (catan, -0x1p-33L, 0x1.0000000000000002p0L, -7.853981638922134273801338071094141188767e-1L, 1.178350206951907025990405771755129268176e1L),
4824 TEST_c_c (catan, -0x1p-33L, -0x1.0000000000000002p0L, -7.853981638922134273801338071094141188767e-1L, -1.178350206951907025990405771755129268176e1L),
4825 TEST_c_c (catan, 0x1.0000000000000002p0L, 0x1p-33L, 7.853981633974483096732590862331681441026e-1L, 5.820766091346740722012013594069507025615e-11L),
4826 TEST_c_c (catan, -0x1.0000000000000002p0L, 0x1p-33L, -7.853981633974483096732590862331681441026e-1L, 5.820766091346740722012013594069507025615e-11L),
4827 TEST_c_c (catan, 0x1.0000000000000002p0L, -0x1p-33L, 7.853981633974483096732590862331681441026e-1L, -5.820766091346740722012013594069507025615e-11L),
4828 TEST_c_c (catan, -0x1.0000000000000002p0L, -0x1p-33L, -7.853981633974483096732590862331681441026e-1L, -5.820766091346740722012013594069507025615e-11L),
4829 TEST_c_c (catan, 0x1p-33L, 0x0.ffffffffffffffffp0L, 7.853981631937214964185249205444919953948e-1L, 1.178350206951907026002603046195591193050e1L),
4830 TEST_c_c (catan, 0x1p-33L, -0x0.ffffffffffffffffp0L, 7.853981631937214964185249205444919953948e-1L, -1.178350206951907026002603046195591193050e1L),
4831 TEST_c_c (catan, -0x1p-33L, 0x0.ffffffffffffffffp0L, -7.853981631937214964185249205444919953948e-1L, 1.178350206951907026002603046195591193050e1L),
4832 TEST_c_c (catan, -0x1p-33L, -0x0.ffffffffffffffffp0L, -7.853981631937214964185249205444919953948e-1L, -1.178350206951907026002603046195591193050e1L),
4833 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, 0x1p-33L, 7.853981633974483095919439232967553115548e-1L, 5.820766091346740722958646680334721192083e-11L),
4834 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, 0x1p-33L, -7.853981633974483095919439232967553115548e-1L, 5.820766091346740722958646680334721192083e-11L),
4835 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, -0x1p-33L, 7.853981633974483095919439232967553115548e-1L, -5.820766091346740722958646680334721192083e-11L),
4836 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, -0x1p-33L, -7.853981633974483095919439232967553115548e-1L, -5.820766091346740722958646680334721192083e-11L),
caf84319
JM		 4837#endif
4838#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 4839 TEST_c_c (catan, 0x1p-54L, 0x1.000000000000000000000000008p0L, 7.853981633974485455380535786656405610710e-1L, 1.906154746539849600897388334009981267384e1L),
4840 TEST_c_c (catan, 0x1p-54L, -0x1.000000000000000000000000008p0L, 7.853981633974485455380535786656405610710e-1L, -1.906154746539849600897388334009981267384e1L),
4841 TEST_c_c (catan, -0x1p-54L, 0x1.000000000000000000000000008p0L, -7.853981633974485455380535786656405610710e-1L, 1.906154746539849600897388334009981267384e1L),
4842 TEST_c_c (catan, -0x1p-54L, -0x1.000000000000000000000000008p0L, -7.853981633974485455380535786656405610710e-1L, -1.906154746539849600897388334009981267384e1L),
4843 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, 0x1p-54L, 7.853981633974483096156608458198888173729e-1L, 2.775557561562891351059079170226980932999e-17L),
4844 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, 0x1p-54L, -7.853981633974483096156608458198888173729e-1L, 2.775557561562891351059079170226980932999e-17L),
4845 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, -0x1p-54L, 7.853981633974483096156608458198888173729e-1L, -2.775557561562891351059079170226980932999e-17L),
4846 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, -0x1p-54L, -7.853981633974483096156608458198888173729e-1L, -2.775557561562891351059079170226980932999e-17L),
4847 TEST_c_c (catan, 0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, 7.853981633974482124711461911186784339815e-1L, 1.906154746539849600897388334009984040723e1L),
4848 TEST_c_c (catan, 0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, 7.853981633974482124711461911186784339815e-1L, -1.906154746539849600897388334009984040723e1L),
4849 TEST_c_c (catan, -0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, -7.853981633974482124711461911186784339815e-1L, 1.906154746539849600897388334009984040723e1L),
4850 TEST_c_c (catan, -0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, -7.853981633974482124711461911186784339815e-1L, -1.906154746539849600897388334009984040723e1L),
4851 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, 7.853981633974483096156608458198703284454e-1L, 2.775557561562891351059079170227083567164e-17L),
4852 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, -7.853981633974483096156608458198703284454e-1L, 2.775557561562891351059079170227083567164e-17L),
4853 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, 7.853981633974483096156608458198703284454e-1L, -2.775557561562891351059079170227083567164e-17L),
4854 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, -7.853981633974483096156608458198703284454e-1L, -2.775557561562891351059079170227083567164e-17L),
caf84319
JM		 4855#endif
4856#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 4857 TEST_c_c (catan, 0x1p-57L, 0x1.0000000000000000000000000001p0L, 7.853981633974483252281721296111395707566e-1L, 2.010126823623841397309973152228712033275e1L),
4858 TEST_c_c (catan, 0x1p-57L, -0x1.0000000000000000000000000001p0L, 7.853981633974483252281721296111395707566e-1L, -2.010126823623841397309973152228712033275e1L),
4859 TEST_c_c (catan, -0x1p-57L, 0x1.0000000000000000000000000001p0L, -7.853981633974483252281721296111395707566e-1L, 2.010126823623841397309973152228712033275e1L),
4860 TEST_c_c (catan, -0x1p-57L, -0x1.0000000000000000000000000001p0L, -7.853981633974483252281721296111395707566e-1L, -2.010126823623841397309973152228712033275e1L),
4861 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, 0x1p-57L, 7.853981633974483096156608458198758293829e-1L, 3.469446951953614188823848962783812780530e-18L),
4862 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, 0x1p-57L, -7.853981633974483096156608458198758293829e-1L, 3.469446951953614188823848962783812780530e-18L),
4863 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, -0x1p-57L, 7.853981633974483096156608458198758293829e-1L, -3.469446951953614188823848962783812780530e-18L),
4864 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, -0x1p-57L, -7.853981633974483096156608458198758293829e-1L, -3.469446951953614188823848962783812780530e-18L),
4865 TEST_c_c (catan, 0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, 7.853981633974483044114904178894544378135e-1L, 2.010126823623841397309973152228712040498e1L),
4866 TEST_c_c (catan, 0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, 7.853981633974483044114904178894544378135e-1L, -2.010126823623841397309973152228712040498e1L),
4867 TEST_c_c (catan, -0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, -7.853981633974483044114904178894544378135e-1L, 2.010126823623841397309973152228712040498e1L),
4868 TEST_c_c (catan, -0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, -7.853981633974483044114904178894544378135e-1L, -2.010126823623841397309973152228712040498e1L),
4869 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, 7.853981633974483096156608458198756849381e-1L, 3.469446951953614188823848962783813782817e-18L),
4870 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, -7.853981633974483096156608458198756849381e-1L, 3.469446951953614188823848962783813782817e-18L),
4871 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, 7.853981633974483096156608458198756849381e-1L, -3.469446951953614188823848962783813782817e-18L),
4872 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, -7.853981633974483096156608458198756849381e-1L, -3.469446951953614188823848962783813782817e-18L),
4873#endif
4874 TEST_c_c (catan, 1.0L, 0x1p-64L, 7.853981633974483096156608458198757210500e-1L, 2.710505431213761085018632002174854278563e-20L),
4875 TEST_c_c (catan, 1.0L, -0x1p-64L, 7.853981633974483096156608458198757210500e-1L, -2.710505431213761085018632002174854278563e-20L),
4876 TEST_c_c (catan, -1.0L, 0x1p-64L, -7.853981633974483096156608458198757210500e-1L, 2.710505431213761085018632002174854278563e-20L),
4877 TEST_c_c (catan, -1.0L, -0x1p-64L, -7.853981633974483096156608458198757210500e-1L, -2.710505431213761085018632002174854278563e-20L),
4878 TEST_c_c (catan, 0x1p-64L, 1.0L, 7.853981633974483096292133729759445264744e-1L, 2.252728336819822255606004394739073846245e1L),
4879 TEST_c_c (catan, -0x1p-64L, 1.0L, -7.853981633974483096292133729759445264744e-1L, 2.252728336819822255606004394739073846245e1L),
4880 TEST_c_c (catan, 0x1p-64L, -1.0L, 7.853981633974483096292133729759445264744e-1L, -2.252728336819822255606004394739073846245e1L),
4881 TEST_c_c (catan, -0x1p-64L, -1.0L, -7.853981633974483096292133729759445264744e-1L, -2.252728336819822255606004394739073846245e1L),
4882 TEST_c_c (catan, 1.0L, 0x1.3p-73L, 7.853981633974483096156608458198757210493e-1L, 6.286572655403010329022706059731717687100e-23L),
4883 TEST_c_c (catan, 1.0L, -0x1.3p-73L, 7.853981633974483096156608458198757210493e-1L, -6.286572655403010329022706059731717687100e-23L),
4884 TEST_c_c (catan, -1.0L, 0x1.3p-73L, -7.853981633974483096156608458198757210493e-1L, 6.286572655403010329022706059731717687100e-23L),
4885 TEST_c_c (catan, -1.0L, -0x1.3p-73L, -7.853981633974483096156608458198757210493e-1L, -6.286572655403010329022706059731717687100e-23L),
4886 TEST_c_c (catan, 0x1.3p-73L, 1.0L, 7.853981633974483096156922786831527361009e-1L, 2.556052055225464683726753902092495938633e1L),
4887 TEST_c_c (catan, -0x1.3p-73L, 1.0L, -7.853981633974483096156922786831527361009e-1L, 2.556052055225464683726753902092495938633e1L),
4888 TEST_c_c (catan, 0x1.3p-73L, -1.0L, 7.853981633974483096156922786831527361009e-1L, -2.556052055225464683726753902092495938633e1L),
4889 TEST_c_c (catan, -0x1.3p-73L, -1.0L, -7.853981633974483096156922786831527361009e-1L, -2.556052055225464683726753902092495938633e1L),
4890 TEST_c_c (catan, 1.0L, 0x1p-124L, 7.853981633974483096156608458198757210493e-1L, 2.350988701644575015937473074444491355637e-38L),
4891 TEST_c_c (catan, 1.0L, -0x1p-124L, 7.853981633974483096156608458198757210493e-1L, -2.350988701644575015937473074444491355637e-38L),
4892 TEST_c_c (catan, -1.0L, 0x1p-124L, -7.853981633974483096156608458198757210493e-1L, 2.350988701644575015937473074444491355637e-38L),
4893 TEST_c_c (catan, -1.0L, -0x1p-124L, -7.853981633974483096156608458198757210493e-1L, -2.350988701644575015937473074444491355637e-38L),
4894 TEST_c_c (catan, 0x1p-124L, 1.0L, 7.853981633974483096156608458198757210610e-1L, 4.332169878499658183857700759113603550472e1L),
4895 TEST_c_c (catan, -0x1p-124L, 1.0L, -7.853981633974483096156608458198757210610e-1L, 4.332169878499658183857700759113603550472e1L),
4896 TEST_c_c (catan, 0x1p-124L, -1.0L, 7.853981633974483096156608458198757210610e-1L, -4.332169878499658183857700759113603550472e1L),
4897 TEST_c_c (catan, -0x1p-124L, -1.0L, -7.853981633974483096156608458198757210610e-1L, -4.332169878499658183857700759113603550472e1L),
4898 TEST_c_c (catan, 0x1.000002p0L, 0x1p-126L, 7.853982230020895322927482174768220815493e-1L, 5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4899 TEST_c_c (catan, 0x1.000002p0L, -0x1p-126L, 7.853982230020895322927482174768220815493e-1L, -5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4900 TEST_c_c (catan, -0x1.000002p0L, 0x1p-126L, -7.853982230020895322927482174768220815493e-1L, 5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4901 TEST_c_c (catan, -0x1.000002p0L, -0x1p-126L, -7.853982230020895322927482174768220815493e-1L, -5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4902 TEST_c_c (catan, 0x1p-126L, 0x1.000002p0L, 1.570796326794896619231321691639702138295L, 8.317766196521665212523713550410777685446L),
4903 TEST_c_c (catan, -0x1p-126L, 0x1.000002p0L, -1.570796326794896619231321691639702138295L, 8.317766196521665212523713550410777685446L),
4904 TEST_c_c (catan, 0x1p-126L, -0x1.000002p0L, 1.570796326794896619231321691639702138295L, -8.317766196521665212523713550410777685446L),
4905 TEST_c_c (catan, -0x1p-126L, -0x1.000002p0L, -1.570796326794896619231321691639702138295L, -8.317766196521665212523713550410777685446L),
4906 TEST_c_c (catan, 0x0.ffffffp0L, 0x1p-126L, 7.853981335951250337419109991749089175724e-1L, 5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4907 TEST_c_c (catan, 0x0.ffffffp0L, -0x1p-126L, 7.853981335951250337419109991749089175724e-1L, -5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4908 TEST_c_c (catan, -0x0.ffffffp0L, 0x1p-126L, -7.853981335951250337419109991749089175724e-1L, 5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4909 TEST_c_c (catan, -0x0.ffffffp0L, -0x1p-126L, -7.853981335951250337419109991749089175724e-1L, -5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4910 TEST_c_c (catan, 0x1p-126L, 0x0.ffffffp0L, 9.860761609136244031334147100512154160097e-32L, 8.664339742098154951823135931565866792454L),
4911 TEST_c_c (catan, -0x1p-126L, 0x0.ffffffp0L, -9.860761609136244031334147100512154160097e-32L, 8.664339742098154951823135931565866792454L),
4912 TEST_c_c (catan, 0x1p-126L, -0x0.ffffffp0L, 9.860761609136244031334147100512154160097e-32L, -8.664339742098154951823135931565866792454L),
4913 TEST_c_c (catan, -0x1p-126L, -0x0.ffffffp0L, -9.860761609136244031334147100512154160097e-32L, -8.664339742098154951823135931565866792454L),
10de07f5 4914#ifndef TEST_FLOAT
08198877
JM		 4915 TEST_c_c (catan, 1.0L, 0x1p-512L, 7.853981633974483096156608458198757210493e-1L, 3.729170365600103371645482657731466918688e-155L),
4916 TEST_c_c (catan, 1.0L, -0x1p-512L, 7.853981633974483096156608458198757210493e-1L, -3.729170365600103371645482657731466918688e-155L),
4917 TEST_c_c (catan, -1.0L, 0x1p-512L, -7.853981633974483096156608458198757210493e-1L, 3.729170365600103371645482657731466918688e-155L),
4918 TEST_c_c (catan, -1.0L, -0x1p-512L, -7.853981633974483096156608458198757210493e-1L, -3.729170365600103371645482657731466918688e-155L),
4919 TEST_c_c (catan, 0x1p-512L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 1.777922518136259718655200391540222897114e2L),
4920 TEST_c_c (catan, -0x1p-512L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 1.777922518136259718655200391540222897114e2L),
4921 TEST_c_c (catan, 0x1p-512L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -1.777922518136259718655200391540222897114e2L),
4922 TEST_c_c (catan, -0x1p-512L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -1.777922518136259718655200391540222897114e2L),
4923 TEST_c_c (catan, 1.0L, 0x1.3p-536L, 7.853981633974483096156608458198757210493e-1L, 2.639526015013529511588222179446290115084e-162L),
4924 TEST_c_c (catan, 1.0L, -0x1.3p-536L, 7.853981633974483096156608458198757210493e-1L, -2.639526015013529511588222179446290115084e-162L),
4925 TEST_c_c (catan, -1.0L, 0x1.3p-536L, -7.853981633974483096156608458198757210493e-1L, 2.639526015013529511588222179446290115084e-162L),
4926 TEST_c_c (catan, -1.0L, -0x1.3p-536L, -7.853981633974483096156608458198757210493e-1L, -2.639526015013529511588222179446290115084e-162L),
4927 TEST_c_c (catan, 0x1.3p-536L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 1.860240928518819859673567751384928348958e2L),
4928 TEST_c_c (catan, -0x1.3p-536L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 1.860240928518819859673567751384928348958e2L),
4929 TEST_c_c (catan, 0x1.3p-536L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -1.860240928518819859673567751384928348958e2L),
4930 TEST_c_c (catan, -0x1.3p-536L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -1.860240928518819859673567751384928348958e2L),
4931 TEST_c_c (catan, 1.0L, 0x1p-1020L, 7.853981633974483096156608458198757210493e-1L, 4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4932 TEST_c_c (catan, 1.0L, -0x1p-1020L, 7.853981633974483096156608458198757210493e-1L, -4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4933 TEST_c_c (catan, -1.0L, 0x1p-1020L, -7.853981633974483096156608458198757210493e-1L, 4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4934 TEST_c_c (catan, -1.0L, -0x1p-1020L, -7.853981633974483096156608458198757210493e-1L, -4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4935 TEST_c_c (catan, 0x1p-1020L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 3.538516356758520804574969980043991380025e2L),
4936 TEST_c_c (catan, -0x1p-1020L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 3.538516356758520804574969980043991380025e2L),
4937 TEST_c_c (catan, 0x1p-1020L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -3.538516356758520804574969980043991380025e2L),
4938 TEST_c_c (catan, -0x1p-1020L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -3.538516356758520804574969980043991380025e2L),
4939 TEST_c_c (catan, 0x1.0000000000001p0L, 0x1p-1022L, 7.853981633974484206379633083355174374608e-1L, 1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4940 TEST_c_c (catan, 0x1.0000000000001p0L, -0x1p-1022L, 7.853981633974484206379633083355174374608e-1L, -1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4941 TEST_c_c (catan, -0x1.0000000000001p0L, 0x1p-1022L, -7.853981633974484206379633083355174374608e-1L, 1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4942 TEST_c_c (catan, -0x1.0000000000001p0L, -0x1p-1022L, -7.853981633974484206379633083355174374608e-1L, -1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4943 TEST_c_c (catan, 0x1p-1022L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 1.836840028483855075506780244989950299369e1L),
4944 TEST_c_c (catan, -0x1p-1022L, 0x1.0000000000001p0L, -1.570796326794896619231321691639751442099L, 1.836840028483855075506780244989950299369e1L),
4945 TEST_c_c (catan, 0x1p-1022L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -1.836840028483855075506780244989950299369e1L),
4946 TEST_c_c (catan, -0x1p-1022L, -0x1.0000000000001p0L, -1.570796326794896619231321691639751442099L, -1.836840028483855075506780244989950299369e1L),
4947 TEST_c_c (catan, 0x0.fffffffffffff8p0L, 0x1p-1022L, 7.853981633974482541045096145620456183798e-1L, 1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4948 TEST_c_c (catan, 0x0.fffffffffffff8p0L, -0x1p-1022L, 7.853981633974482541045096145620456183798e-1L, -1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4949 TEST_c_c (catan, -0x0.fffffffffffff8p0L, 0x1p-1022L, -7.853981633974482541045096145620456183798e-1L, 1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4950 TEST_c_c (catan, -0x0.fffffffffffff8p0L, -0x1p-1022L, -7.853981633974482541045096145620456183798e-1L, -1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4951 TEST_c_c (catan, 0x1p-1022L, 0x0.fffffffffffff8p0L, 1.002084180004486444624900488355118689113e-292L, 1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4952 TEST_c_c (catan, -0x1p-1022L, 0x0.fffffffffffff8p0L, -1.002084180004486444624900488355118689113e-292L, 1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4953 TEST_c_c (catan, 0x1p-1022L, -0x0.fffffffffffff8p0L, 1.002084180004486444624900488355118689113e-292L, -1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4954 TEST_c_c (catan, -0x1p-1022L, -0x0.fffffffffffff8p0L, -1.002084180004486444624900488355118689113e-292L, -1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
10de07f5
JM		 4955#endif
4956#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 4957 TEST_c_c (catan, 0x1.0000000000000002p0L, 0x1p-1022L, 7.853981633974483096698709544441509427467e-1L, 1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4958 TEST_c_c (catan, 0x1.0000000000000002p0L, -0x1p-1022L, 7.853981633974483096698709544441509427467e-1L, -1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4959 TEST_c_c (catan, -0x1.0000000000000002p0L, 0x1p-1022L, -7.853981633974483096698709544441509427467e-1L, 1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4960 TEST_c_c (catan, -0x1.0000000000000002p0L, -0x1p-1022L, -7.853981633974483096698709544441509427467e-1L, -1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4961 TEST_c_c (catan, 0x1p-1022L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
4962 TEST_c_c (catan, -0x1p-1022L, 0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
4963 TEST_c_c (catan, 0x1p-1022L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
4964 TEST_c_c (catan, -0x1p-1022L, -0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
4965 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, 0x1p-1022L, 7.853981633974483095885557915077381101984e-1L, 1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4966 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, -0x1p-1022L, 7.853981633974483095885557915077381101984e-1L, -1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4967 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, 0x1p-1022L, -7.853981633974483095885557915077381101984e-1L, 1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4968 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, -0x1p-1022L, -7.853981633974483095885557915077381101984e-1L, -1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4969 TEST_c_c (catan, 0x1p-1022L, 0x0.ffffffffffffffffp0L, 2.052268400649188124723641491045245971623e-289L, 2.252728336819822255604649142023466965703e1L),
4970 TEST_c_c (catan, -0x1p-1022L, 0x0.ffffffffffffffffp0L, -2.052268400649188124723641491045245971623e-289L, 2.252728336819822255604649142023466965703e1L),
4971 TEST_c_c (catan, 0x1p-1022L, -0x0.ffffffffffffffffp0L, 2.052268400649188124723641491045245971623e-289L, -2.252728336819822255604649142023466965703e1L),
4972 TEST_c_c (catan, -0x1p-1022L, -0x0.ffffffffffffffffp0L, -2.052268400649188124723641491045245971623e-289L, -2.252728336819822255604649142023466965703e1L),
10de07f5
JM		 4973#endif
4974#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 4975 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, 0x1p-1022L, 7.853981633974483096156608458198880470009e-1L, 1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4976 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, -0x1p-1022L, 7.853981633974483096156608458198880470009e-1L, -1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4977 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, 0x1p-1022L, -7.853981633974483096156608458198880470009e-1L, 1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4978 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, -0x1p-1022L, -7.853981633974483096156608458198880470009e-1L, -1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4979 TEST_c_c (catan, 0x1p-1022L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 3.673680056967710139911330243728336427098e1L),
4980 TEST_c_c (catan, -0x1p-1022L, 0x1.000000000000000000000000008p0L, -1.570796326794896619231321691639751442099L, 3.673680056967710139911330243728336427098e1L),
4981 TEST_c_c (catan, 0x1p-1022L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -3.673680056967710139911330243728336427098e1L),
4982 TEST_c_c (catan, -0x1p-1022L, -0x1.000000000000000000000000008p0L, -1.570796326794896619231321691639751442099L, -3.673680056967710139911330243728336427098e1L),
4983 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, 7.853981633974483096156608458198695580735e-1L, 1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4984 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, 7.853981633974483096156608458198695580735e-1L, -1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4985 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, -7.853981633974483096156608458198695580735e-1L, 1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4986 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, -7.853981633974483096156608458198695580735e-1L, -1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4987 TEST_c_c (catan, 0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, 9.025971879324147880346310405868788320726e-277L, 3.708337415995707405382191849801244331055e1L),
4988 TEST_c_c (catan, -0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, -9.025971879324147880346310405868788320726e-277L, 3.708337415995707405382191849801244331055e1L),
4989 TEST_c_c (catan, 0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, 9.025971879324147880346310405868788320726e-277L, -3.708337415995707405382191849801244331055e1L),
4990 TEST_c_c (catan, -0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, -9.025971879324147880346310405868788320726e-277L, -3.708337415995707405382191849801244331055e1L),
10de07f5
JM		 4991#endif
4992#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 4993 TEST_c_c (catan, 1.0L, 0x1p-8192L, 7.853981633974483096156608458198757210493e-1L, 4.584009668887117914053530980121207914891e-2467L),
4994 TEST_c_c (catan, 1.0L, -0x1p-8192L, 7.853981633974483096156608458198757210493e-1L, -4.584009668887117914053530980121207914891e-2467L),
4995 TEST_c_c (catan, -1.0L, 0x1p-8192L, -7.853981633974483096156608458198757210493e-1L, 4.584009668887117914053530980121207914891e-2467L),
4996 TEST_c_c (catan, -1.0L, -0x1p-8192L, -7.853981633974483096156608458198757210493e-1L, -4.584009668887117914053530980121207914891e-2467L),
4997 TEST_c_c (catan, 0x1p-8192L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 2.839477425163815960027691385553420311121e3L),
4998 TEST_c_c (catan, -0x1p-8192L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 2.839477425163815960027691385553420311121e3L),
4999 TEST_c_c (catan, 0x1p-8192L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -2.839477425163815960027691385553420311121e3L),
5000 TEST_c_c (catan, -0x1p-8192L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -2.839477425163815960027691385553420311121e3L),
5001 TEST_c_c (catan, 1.0L, 0x1.3p-8221L, 7.853981633974483096156608458198757210493e-1L, 1.013933025636421986471594877335044443409e-2475L),
5002 TEST_c_c (catan, 1.0L, -0x1.3p-8221L, 7.853981633974483096156608458198757210493e-1L, -1.013933025636421986471594877335044443409e-2475L),
5003 TEST_c_c (catan, -1.0L, 0x1.3p-8221L, -7.853981633974483096156608458198757210493e-1L, 1.013933025636421986471594877335044443409e-2475L),
5004 TEST_c_c (catan, -1.0L, -0x1.3p-8221L, -7.853981633974483096156608458198757210493e-1L, -1.013933025636421986471594877335044443409e-2475L),
5005 TEST_c_c (catan, 0x1.3p-8221L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 2.849442134153471837403071201841536297726e3L),
5006 TEST_c_c (catan, -0x1.3p-8221L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 2.849442134153471837403071201841536297726e3L),
5007 TEST_c_c (catan, 0x1.3p-8221L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -2.849442134153471837403071201841536297726e3L),
5008 TEST_c_c (catan, -0x1.3p-8221L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -2.849442134153471837403071201841536297726e3L),
5009 TEST_c_c (catan, 1.0L, 0x1.3p-8246L, 7.853981633974483096156608458198757210493e-1L, 3.021755890954798419688924781486524472858e-2483L),
5010 TEST_c_c (catan, 1.0L, -0x1.3p-8246L, 7.853981633974483096156608458198757210493e-1L, -3.021755890954798419688924781486524472858e-2483L),
5011 TEST_c_c (catan, -1.0L, 0x1.3p-8246L, -7.853981633974483096156608458198757210493e-1L, 3.021755890954798419688924781486524472858e-2483L),
5012 TEST_c_c (catan, -1.0L, -0x1.3p-8246L, -7.853981633974483096156608458198757210493e-1L, -3.021755890954798419688924781486524472858e-2483L),
5013 TEST_c_c (catan, 0x1.3p-8246L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 2.858106473910471153770786603359763504827e3L),
5014 TEST_c_c (catan, -0x1.3p-8246L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 2.858106473910471153770786603359763504827e3L),
5015 TEST_c_c (catan, 0x1.3p-8246L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -2.858106473910471153770786603359763504827e3L),
5016 TEST_c_c (catan, -0x1.3p-8246L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -2.858106473910471153770786603359763504827e3L),
5017 TEST_c_c (catan, 1.0L, 0x1p-16380L, 7.853981633974483096156608458198757210493e-1L, 6.724206286224187012525355634643505205196e-4932L),
5018 TEST_c_c (catan, 1.0L, -0x1p-16380L, 7.853981633974483096156608458198757210493e-1L, -6.724206286224187012525355634643505205196e-4932L),
5019 TEST_c_c (catan, -1.0L, 0x1p-16380L, -7.853981633974483096156608458198757210493e-1L, 6.724206286224187012525355634643505205196e-4932L),
5020 TEST_c_c (catan, -1.0L, -0x1p-16380L, -7.853981633974483096156608458198757210493e-1L, -6.724206286224187012525355634643505205196e-4932L),
5021 TEST_c_c (catan, 0x1p-16380L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 5.677221982376232056781839690803195180822e3L),
5022 TEST_c_c (catan, -0x1p-16380L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 5.677221982376232056781839690803195180822e3L),
5023 TEST_c_c (catan, 0x1p-16380L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -5.677221982376232056781839690803195180822e3L),
5024 TEST_c_c (catan, -0x1p-16380L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -5.677221982376232056781839690803195180822e3L),
5025 TEST_c_c (catan, 0x1.0000000000000002p0L, 0x1p-16382L, 7.853981633974483096698709544441509427467e-1L, 1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5026 TEST_c_c (catan, 0x1.0000000000000002p0L, -0x1p-16382L, 7.853981633974483096698709544441509427467e-1L, -1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5027 TEST_c_c (catan, -0x1.0000000000000002p0L, 0x1p-16382L, -7.853981633974483096698709544441509427467e-1L, 1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5028 TEST_c_c (catan, -0x1.0000000000000002p0L, -0x1p-16382L, -7.853981633974483096698709544441509427467e-1L, -1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5029 TEST_c_c (catan, 0x1p-16382L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
5030 TEST_c_c (catan, -0x1p-16382L, 0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
5031 TEST_c_c (catan, 0x1p-16382L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
5032 TEST_c_c (catan, -0x1p-16382L, -0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
5033 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, 0x1p-16382L, 7.853981633974483095885557915077381101984e-1L, 1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5034 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, -0x1p-16382L, 7.853981633974483095885557915077381101984e-1L, -1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5035 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, 0x1p-16382L, -7.853981633974483095885557915077381101984e-1L, 1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5036 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, -0x1p-16382L, -7.853981633974483095885557915077381101984e-1L, -1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5037 TEST_c_c (catan, 0x1p-16382L, 0x0.ffffffffffffffffp0L, 3.100992811520163369065387859792822623745e-4913L, 2.252728336819822255604649142023466965703e1L),
5038 TEST_c_c (catan, -0x1p-16382L, 0x0.ffffffffffffffffp0L, -3.100992811520163369065387859792822623745e-4913L, 2.252728336819822255604649142023466965703e1L),
5039 TEST_c_c (catan, 0x1p-16382L, -0x0.ffffffffffffffffp0L, 3.100992811520163369065387859792822623745e-4913L, -2.252728336819822255604649142023466965703e1L),
5040 TEST_c_c (catan, -0x1p-16382L, -0x0.ffffffffffffffffp0L, -3.100992811520163369065387859792822623745e-4913L, -2.252728336819822255604649142023466965703e1L),
10de07f5 5041# if LDBL_MANT_DIG >= 113
08198877
JM		 5042 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, 0x1p-16382L, 7.853981633974483096156608458198758173458e-1L, 1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5043 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, -0x1p-16382L, 7.853981633974483096156608458198758173458e-1L, -1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5044 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, 0x1p-16382L, -7.853981633974483096156608458198758173458e-1L, 1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5045 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, -0x1p-16382L, -7.853981633974483096156608458198758173458e-1L, -1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5046 TEST_c_c (catan, 0x1p-16382L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 3.916281570163690998207361486238697614441e1L),
5047 TEST_c_c (catan, -0x1p-16382L, 0x1.0000000000000000000000000001p0L, -1.570796326794896619231321691639751442099L, 3.916281570163690998207361486238697614441e1L),
5048 TEST_c_c (catan, 0x1p-16382L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -3.916281570163690998207361486238697614441e1L),
5049 TEST_c_c (catan, -0x1p-16382L, -0x1.0000000000000000000000000001p0L, -1.570796326794896619231321691639751442099L, -3.916281570163690998207361486238697614441e1L),
5050 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, 7.853981633974483096156608458198756729010e-1L, 1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5051 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, 7.853981633974483096156608458198756729010e-1L, -1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5052 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, -7.853981633974483096156608458198756729010e-1L, 1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5053 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, -7.853981633974483096156608458198756729010e-1L, -1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5054 TEST_c_c (catan, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.745703758805099310527547423749501866998e-4898L, 3.950938929191688263678223092311606435623e1L),
5055 TEST_c_c (catan, -0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.745703758805099310527547423749501866998e-4898L, 3.950938929191688263678223092311606435623e1L),
5056 TEST_c_c (catan, 0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.745703758805099310527547423749501866998e-4898L, -3.950938929191688263678223092311606435623e1L),
5057 TEST_c_c (catan, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.745703758805099310527547423749501866998e-4898L, -3.950938929191688263678223092311606435623e1L),
10de07f5 5058# endif
caf84319 5059#endif
2f38fbfe 5060
08198877
JM		 5061 TEST_c_c (catan, 0.75L, 1.25L, 1.10714871779409050301706546017853704L, 0.549306144334054845697622618461262852L),
5062 TEST_c_c (catan, -2, -3, -1.4099210495965755225306193844604208L, -0.22907268296853876629588180294200276L),
5063 END_DATA (catan)
5064 };
8847214f
UD		 5065
5066static void
08198877 5067catan_test (void)
8847214f 5068{
aaca11d8 5069 errno = 0;
08198877 5070 FUNC(catan) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 5071 if (errno == ENOSYS)
5072 /* Function not implemented. */
5073 return;
5074
08198877
JM		 5075 START (catan);
5076 RUN_TEST_LOOP_c_c (catan, catan_test_data, );
5077 END (catan, complex);
5078}
8847214f 5079
08198877
JM		 5080static const struct test_c_c_data catanh_test_data[] =
5081 {
5082 START_DATA (catanh),
5083 TEST_c_c (catanh, 0, 0, 0.0, 0.0),
5084 TEST_c_c (catanh, minus_zero, 0, minus_zero, 0.0),
5085 TEST_c_c (catanh, 0, minus_zero, 0.0, minus_zero),
5086 TEST_c_c (catanh, minus_zero, minus_zero, minus_zero, minus_zero),
5087
5088 TEST_c_c (catanh, 1.0L, plus_zero, plus_infty, plus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5089 TEST_c_c (catanh, 1.0L, minus_zero, plus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5090 TEST_c_c (catanh, -1.0L, plus_zero, minus_infty, plus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5091 TEST_c_c (catanh, -1.0L, minus_zero, minus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5092 TEST_c_c (catanh, plus_zero, 1.0L, plus_zero, M_PI_4l),
5093 TEST_c_c (catanh, minus_zero, 1.0L, minus_zero, M_PI_4l),
5094 TEST_c_c (catanh, plus_zero, -1.0L, plus_zero, -M_PI_4l),
5095 TEST_c_c (catanh, minus_zero, -1.0L, minus_zero, -M_PI_4l),
5096
5097 TEST_c_c (catanh, plus_infty, plus_infty, 0.0, M_PI_2l),
5098 TEST_c_c (catanh, plus_infty, minus_infty, 0.0, -M_PI_2l),
5099 TEST_c_c (catanh, minus_infty, plus_infty, minus_zero, M_PI_2l),
5100 TEST_c_c (catanh, minus_infty, minus_infty, minus_zero, -M_PI_2l),
5101
5102 TEST_c_c (catanh, -10.0, plus_infty, minus_zero, M_PI_2l),
5103 TEST_c_c (catanh, -10.0, minus_infty, minus_zero, -M_PI_2l),
5104 TEST_c_c (catanh, minus_zero, plus_infty, minus_zero, M_PI_2l),
5105 TEST_c_c (catanh, minus_zero, minus_infty, minus_zero, -M_PI_2l),
5106 TEST_c_c (catanh, 0, plus_infty, 0.0, M_PI_2l),
5107 TEST_c_c (catanh, 0, minus_infty, 0.0, -M_PI_2l),
5108 TEST_c_c (catanh, 0.1L, plus_infty, 0.0, M_PI_2l),
5109 TEST_c_c (catanh, 0.1L, minus_infty, 0.0, -M_PI_2l),
5110
5111 TEST_c_c (catanh, minus_infty, 0, minus_zero, M_PI_2l),
5112 TEST_c_c (catanh, minus_infty, minus_zero, minus_zero, -M_PI_2l),
5113 TEST_c_c (catanh, minus_infty, 100, minus_zero, M_PI_2l),
5114 TEST_c_c (catanh, minus_infty, -100, minus_zero, -M_PI_2l),
5115
5116 TEST_c_c (catanh, plus_infty, 0, 0.0, M_PI_2l),
5117 TEST_c_c (catanh, plus_infty, minus_zero, 0.0, -M_PI_2l),
5118 TEST_c_c (catanh, plus_infty, 0.5, 0.0, M_PI_2l),
5119 TEST_c_c (catanh, plus_infty, -0.5, 0.0, -M_PI_2l),
5120
5121 TEST_c_c (catanh, 0, qnan_value, 0.0, qnan_value),
5122 TEST_c_c (catanh, minus_zero, qnan_value, minus_zero, qnan_value),
5123
5124 TEST_c_c (catanh, plus_infty, qnan_value, 0.0, qnan_value),
5125 TEST_c_c (catanh, minus_infty, qnan_value, minus_zero, qnan_value),
5126
5127 TEST_c_c (catanh, qnan_value, 0, qnan_value, qnan_value),
5128 TEST_c_c (catanh, qnan_value, minus_zero, qnan_value, qnan_value),
5129
5130 TEST_c_c (catanh, qnan_value, plus_infty, 0.0, M_PI_2l, IGNORE_ZERO_INF_SIGN),
5131 TEST_c_c (catanh, qnan_value, minus_infty, 0.0, -M_PI_2l, IGNORE_ZERO_INF_SIGN),
5132
5133 TEST_c_c (catanh, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5134 TEST_c_c (catanh, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5135
5136 TEST_c_c (catanh, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5137 TEST_c_c (catanh, qnan_value, -0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5138
5139 TEST_c_c (catanh, qnan_value, qnan_value, qnan_value, qnan_value),
5140
5141 TEST_c_c (catanh, 0x1p50L, 0.0L, 8.881784197001252323389053344728897997441e-16L, 1.570796326794896619231321691639751442099L),
5142 TEST_c_c (catanh, 0x1p50L, -0.0L, 8.881784197001252323389053344728897997441e-16L, -1.570796326794896619231321691639751442099L),
5143 TEST_c_c (catanh, -0x1p50L, 0.0L, -8.881784197001252323389053344728897997441e-16L, 1.570796326794896619231321691639751442099L),
5144 TEST_c_c (catanh, -0x1p50L, -0.0L, -8.881784197001252323389053344728897997441e-16L, -1.570796326794896619231321691639751442099L),
5145 TEST_c_c (catanh, 0.0L, 0x1p50L, 0.0L, 1.570796326794895731052901991514519103193L),
5146 TEST_c_c (catanh, -0.0L, 0x1p50L, -0.0L, 1.570796326794895731052901991514519103193L),
5147 TEST_c_c (catanh, 0.0L, -0x1p50L, 0.0L, -1.570796326794895731052901991514519103193L),
5148 TEST_c_c (catanh, -0.0L, -0x1p50L, -0.0L, -1.570796326794895731052901991514519103193L),
2f38fbfe 5149#ifndef TEST_FLOAT
08198877
JM		 5150 TEST_c_c (catanh, 0x1p500L, 0.0L, 3.054936363499604682051979393213617699789e-151L, 1.570796326794896619231321691639751442099L),
5151 TEST_c_c (catanh, 0x1p500L, -0.0L, 3.054936363499604682051979393213617699789e-151L, -1.570796326794896619231321691639751442099L),
5152 TEST_c_c (catanh, -0x1p500L, 0.0L, -3.054936363499604682051979393213617699789e-151L, 1.570796326794896619231321691639751442099L),
5153 TEST_c_c (catanh, -0x1p500L, -0.0L, -3.054936363499604682051979393213617699789e-151L, -1.570796326794896619231321691639751442099L),
5154 TEST_c_c (catanh, 0.0L, 0x1p500L, 0.0L, 1.570796326794896619231321691639751442099L),
5155 TEST_c_c (catanh, -0.0L, 0x1p500L, -0.0L, 1.570796326794896619231321691639751442099L),
5156 TEST_c_c (catanh, 0.0L, -0x1p500L, 0.0L, -1.570796326794896619231321691639751442099L),
5157 TEST_c_c (catanh, -0.0L, -0x1p500L, -0.0L, -1.570796326794896619231321691639751442099L),
2f38fbfe
JM		 5158#endif
5159#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5160 TEST_c_c (catanh, 0x1p5000L, 0.0L, 7.079811261048172892385615158694057552948e-1506L, 1.570796326794896619231321691639751442099L),
5161 TEST_c_c (catanh, 0x1p5000L, -0.0L, 7.079811261048172892385615158694057552948e-1506L, -1.570796326794896619231321691639751442099L),
5162 TEST_c_c (catanh, -0x1p5000L, 0.0L, -7.079811261048172892385615158694057552948e-1506L, 1.570796326794896619231321691639751442099L),
5163 TEST_c_c (catanh, -0x1p5000L, -0.0L, -7.079811261048172892385615158694057552948e-1506L, -1.570796326794896619231321691639751442099L),
5164 TEST_c_c (catanh, 0.0L, 0x1p5000L, 0.0L, 1.570796326794896619231321691639751442099L),
5165 TEST_c_c (catanh, -0.0L, 0x1p5000L, -0.0L, 1.570796326794896619231321691639751442099L),
5166 TEST_c_c (catanh, 0.0L, -0x1p5000L, 0.0L, -1.570796326794896619231321691639751442099L),
5167 TEST_c_c (catanh, -0.0L, -0x1p5000L, -0.0L, -1.570796326794896619231321691639751442099L),
5168#endif
5169 TEST_c_c (catanh, 0x1p63L, 0.5L, 1.084202172485504434007452800869941711427e-19L, 1.570796326794896619231321691639751442093L),
5170 TEST_c_c (catanh, 0x1p63L, -0.5L, 1.084202172485504434007452800869941711427e-19L, -1.570796326794896619231321691639751442093L),
5171 TEST_c_c (catanh, -0x1p63L, 0.5L, -1.084202172485504434007452800869941711427e-19L, 1.570796326794896619231321691639751442093L),
5172 TEST_c_c (catanh, -0x1p63L, -0.5L, -1.084202172485504434007452800869941711427e-19L, -1.570796326794896619231321691639751442093L),
5173 TEST_c_c (catanh, 0.5L, 0x1p63L, 5.877471754111437539843682686111228389007e-39L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5174 TEST_c_c (catanh, -0.5L, 0x1p63L, -5.877471754111437539843682686111228389007e-39L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5175 TEST_c_c (catanh, 0.5L, -0x1p63L, 5.877471754111437539843682686111228389007e-39L, -1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5176 TEST_c_c (catanh, -0.5L, -0x1p63L, -5.877471754111437539843682686111228389007e-39L, -1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
9457fd95 5177#ifndef TEST_FLOAT
08198877
JM		 5178 TEST_c_c (catanh, 0x1p511L, 0.5L, 1.491668146240041348658193063092586767475e-154L, 1.570796326794896619231321691639751442099L),
5179 TEST_c_c (catanh, 0x1p511L, -0.5L, 1.491668146240041348658193063092586767475e-154L, -1.570796326794896619231321691639751442099L),
5180 TEST_c_c (catanh, -0x1p511L, 0.5L, -1.491668146240041348658193063092586767475e-154L, 1.570796326794896619231321691639751442099L),
5181 TEST_c_c (catanh, -0x1p511L, -0.5L, -1.491668146240041348658193063092586767475e-154L, -1.570796326794896619231321691639751442099L),
5182 TEST_c_c (catanh, 0.5L, 0x1p511L, 1.112536929253600691545116358666202032110e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5183 TEST_c_c (catanh, -0.5L, 0x1p511L, -1.112536929253600691545116358666202032110e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5184 TEST_c_c (catanh, 0.5L, -0x1p511L, 1.112536929253600691545116358666202032110e-308L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5185 TEST_c_c (catanh, -0.5L, -0x1p511L, -1.112536929253600691545116358666202032110e-308L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
9457fd95
JM		 5186#endif
5187#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5188 TEST_c_c (catanh, 0x1p8191L, 0.5L, 1.833603867554847165621412392048483165956e-2466L, 1.570796326794896619231321691639751442099L),
5189 TEST_c_c (catanh, 0x1p8191L, -0.5L, 1.833603867554847165621412392048483165956e-2466L, -1.570796326794896619231321691639751442099L),
5190 TEST_c_c (catanh, -0x1p8191L, 0.5L, -1.833603867554847165621412392048483165956e-2466L, 1.570796326794896619231321691639751442099L),
5191 TEST_c_c (catanh, -0x1p8191L, -0.5L, -1.833603867554847165621412392048483165956e-2466L, -1.570796326794896619231321691639751442099L),
5192 TEST_c_c (catanh, 0.5L, 0x1p8191L, 1.681051571556046753131338908660876301299e-4932L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5193 TEST_c_c (catanh, -0.5L, 0x1p8191L, -1.681051571556046753131338908660876301299e-4932L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5194 TEST_c_c (catanh, 0.5L, -0x1p8191L, 1.681051571556046753131338908660876301299e-4932L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5195 TEST_c_c (catanh, -0.5L, -0x1p8191L, -1.681051571556046753131338908660876301299e-4932L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5196#endif
5197 TEST_c_c (catanh, 0x1p100L, 0.0L, 7.888609052210118054117285652827862296732e-31L, 1.570796326794896619231321691639751442099L),
5198 TEST_c_c (catanh, 0x1p100L, -0.0L, 7.888609052210118054117285652827862296732e-31L, -1.570796326794896619231321691639751442099L),
5199 TEST_c_c (catanh, -0x1p100L, 0.0L, -7.888609052210118054117285652827862296732e-31L, 1.570796326794896619231321691639751442099L),
5200 TEST_c_c (catanh, -0x1p100L, -0.0L, -7.888609052210118054117285652827862296732e-31L, -1.570796326794896619231321691639751442099L),
5201 TEST_c_c (catanh, 0.0L, 0x1p100L, 0.0L, 1.570796326794896619231321691638962581193L),
5202 TEST_c_c (catanh, -0.0L, 0x1p100L, -0.0L, 1.570796326794896619231321691638962581193L),
5203 TEST_c_c (catanh, 0.0L, -0x1p100L, 0.0L, -1.570796326794896619231321691638962581193L),
5204 TEST_c_c (catanh, -0.0L, -0x1p100L, -0.0L, -1.570796326794896619231321691638962581193L),
5205 TEST_c_c (catanh, 0x1.fp127L, 0.0L, 3.033533808573645181854803967025150136306e-39L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5206 TEST_c_c (catanh, 0x1.fp127L, -0.0L, 3.033533808573645181854803967025150136306e-39L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5207 TEST_c_c (catanh, -0x1.fp127L, 0.0L, -3.033533808573645181854803967025150136306e-39L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5208 TEST_c_c (catanh, -0x1.fp127L, -0.0L, -3.033533808573645181854803967025150136306e-39L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5209 TEST_c_c (catanh, 0.0L, 0x1.fp127L, 0.0L, 1.570796326794896619231321691639751442096L),
5210 TEST_c_c (catanh, -0.0L, 0x1.fp127L, -0.0L, 1.570796326794896619231321691639751442096L),
5211 TEST_c_c (catanh, 0.0L, -0x1.fp127L, 0.0L, -1.570796326794896619231321691639751442096L),
5212 TEST_c_c (catanh, -0.0L, -0x1.fp127L, -0.0L, -1.570796326794896619231321691639751442096L),
5213 TEST_c_c (catanh, 0x1.fp127L, 0x1.fp127L, 1.516766904286822590927401983512575068153e-39L, 1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5214 TEST_c_c (catanh, 0x1.fp127L, -0x1.fp127L, 1.516766904286822590927401983512575068153e-39L, -1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5215 TEST_c_c (catanh, -0x1.fp127L, 0x1.fp127L, -1.516766904286822590927401983512575068153e-39L, 1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5216 TEST_c_c (catanh, -0x1.fp127L, -0x1.fp127L, -1.516766904286822590927401983512575068153e-39L, -1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5b4217d7 5217#ifndef TEST_FLOAT
08198877
JM		 5218 TEST_c_c (catanh, 0x1p900L, 0.0L, 1.183052186166774710972751597518026531652e-271L, 1.570796326794896619231321691639751442099L),
5219 TEST_c_c (catanh, 0x1p900L, -0.0L, 1.183052186166774710972751597518026531652e-271L, -1.570796326794896619231321691639751442099L),
5220 TEST_c_c (catanh, -0x1p900L, 0.0L, -1.183052186166774710972751597518026531652e-271L, 1.570796326794896619231321691639751442099L),
5221 TEST_c_c (catanh, -0x1p900L, -0.0L, -1.183052186166774710972751597518026531652e-271L, -1.570796326794896619231321691639751442099L),
5222 TEST_c_c (catanh, 0.0L, 0x1p900L, 0.0L, 1.570796326794896619231321691639751442099L),
5223 TEST_c_c (catanh, -0.0L, 0x1p900L, -0.0L, 1.570796326794896619231321691639751442099L),
5224 TEST_c_c (catanh, 0.0L, -0x1p900L, 0.0L, -1.570796326794896619231321691639751442099L),
5225 TEST_c_c (catanh, -0.0L, -0x1p900L, -0.0L, -1.570796326794896619231321691639751442099L),
5226 TEST_c_c (catanh, 0x1.fp1023L, 0.0L, 5.742126086470197117652213464083623391533e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5227 TEST_c_c (catanh, 0x1.fp1023L, -0.0L, 5.742126086470197117652213464083623391533e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5228 TEST_c_c (catanh, -0x1.fp1023L, 0.0L, -5.742126086470197117652213464083623391533e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5229 TEST_c_c (catanh, -0x1.fp1023L, -0.0L, -5.742126086470197117652213464083623391533e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5230 TEST_c_c (catanh, 0.0L, 0x1.fp1023L, 0.0L, 1.570796326794896619231321691639751442099L),
5231 TEST_c_c (catanh, -0.0L, 0x1.fp1023L, -0.0L, 1.570796326794896619231321691639751442099L),
5232 TEST_c_c (catanh, 0.0L, -0x1.fp1023L, 0.0L, -1.570796326794896619231321691639751442099L),
5233 TEST_c_c (catanh, -0.0L, -0x1.fp1023L, -0.0L, -1.570796326794896619231321691639751442099L),
5234 TEST_c_c (catanh, 0x1.fp1023L, 0x1.fp1023L, 2.871063043235098558826106732041811695767e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5235 TEST_c_c (catanh, 0x1.fp1023L, -0x1.fp1023L, 2.871063043235098558826106732041811695767e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5236 TEST_c_c (catanh, -0x1.fp1023L, 0x1.fp1023L, -2.871063043235098558826106732041811695767e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5237 TEST_c_c (catanh, -0x1.fp1023L, -0x1.fp1023L, -2.871063043235098558826106732041811695767e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5b4217d7
JM		 5238#endif
5239#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5240 TEST_c_c (catanh, 0x1p10000L, 0.0L, 5.012372749206452009297555933742977749322e-3011L, 1.570796326794896619231321691639751442099L),
5241 TEST_c_c (catanh, 0x1p10000L, -0.0L, 5.012372749206452009297555933742977749322e-3011L, -1.570796326794896619231321691639751442099L),
5242 TEST_c_c (catanh, -0x1p10000L, 0.0L, -5.012372749206452009297555933742977749322e-3011L, 1.570796326794896619231321691639751442099L),
5243 TEST_c_c (catanh, -0x1p10000L, -0.0L, -5.012372749206452009297555933742977749322e-3011L, -1.570796326794896619231321691639751442099L),
5244 TEST_c_c (catanh, 0.0L, 0x1p10000L, 0.0L, 1.570796326794896619231321691639751442099L),
5245 TEST_c_c (catanh, -0.0L, 0x1p10000L, -0.0L, 1.570796326794896619231321691639751442099L),
5246 TEST_c_c (catanh, 0.0L, -0x1p10000L, 0.0L, -1.570796326794896619231321691639751442099L),
5247 TEST_c_c (catanh, -0.0L, -0x1p10000L, -0.0L, -1.570796326794896619231321691639751442099L),
5248 TEST_c_c (catanh, 0x1.fp16383L, 0.0L, 8.676395208031209048419813722120651877672e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5249 TEST_c_c (catanh, 0x1.fp16383L, -0.0L, 8.676395208031209048419813722120651877672e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5250 TEST_c_c (catanh, -0x1.fp16383L, 0.0L, -8.676395208031209048419813722120651877672e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5251 TEST_c_c (catanh, -0x1.fp16383L, -0.0L, -8.676395208031209048419813722120651877672e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5252 TEST_c_c (catanh, 0.0L, 0x1.fp16383L, 0.0L, 1.570796326794896619231321691639751442099L),
5253 TEST_c_c (catanh, -0.0L, 0x1.fp16383L, -0.0L, 1.570796326794896619231321691639751442099L),
5254 TEST_c_c (catanh, 0.0L, -0x1.fp16383L, 0.0L, -1.570796326794896619231321691639751442099L),
5255 TEST_c_c (catanh, -0.0L, -0x1.fp16383L, -0.0L, -1.570796326794896619231321691639751442099L),
5256 TEST_c_c (catanh, 0x1.fp16383L, 0x1.fp16383L, 4.338197604015604524209906861060325938836e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5257 TEST_c_c (catanh, 0x1.fp16383L, -0x1.fp16383L, 4.338197604015604524209906861060325938836e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5258 TEST_c_c (catanh, -0x1.fp16383L, 0x1.fp16383L, -4.338197604015604524209906861060325938836e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5259 TEST_c_c (catanh, -0x1.fp16383L, -0x1.fp16383L, -4.338197604015604524209906861060325938836e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5260#endif
5261 TEST_c_c (catanh, 0x1p-13L, 1.0L, 6.103515609841754902688560615027452023669e-5L, 7.853981671227386080775748393881580082970e-1L),
5262 TEST_c_c (catanh, 0x1p-13L, -1.0L, 6.103515609841754902688560615027452023669e-5L, -7.853981671227386080775748393881580082970e-1L),
5263 TEST_c_c (catanh, -0x1p-13L, 1.0L, -6.103515609841754902688560615027452023669e-5L, 7.853981671227386080775748393881580082970e-1L),
5264 TEST_c_c (catanh, -0x1p-13L, -1.0L, -6.103515609841754902688560615027452023669e-5L, -7.853981671227386080775748393881580082970e-1L),
5265 TEST_c_c (catanh, 1.0L, 0x1p-13L, 4.852030264850939738801379894163661227127L, 7.854286809755354140031716771044626356262e-1L),
5266 TEST_c_c (catanh, -1.0L, 0x1p-13L, -4.852030264850939738801379894163661227127L, 7.854286809755354140031716771044626356262e-1L),
5267 TEST_c_c (catanh, 1.0L, -0x1p-13L, 4.852030264850939738801379894163661227127L, -7.854286809755354140031716771044626356262e-1L),
5268 TEST_c_c (catanh, -1.0L, -0x1p-13L, -4.852030264850939738801379894163661227127L, -7.854286809755354140031716771044626356262e-1L),
5269 TEST_c_c (catanh, 0x1p-27L, 1.0L, 3.725290298461914028034141143623846306386e-9L, 7.853981633974483234934486536343324763447e-1L),
5270 TEST_c_c (catanh, 0x1p-27L, -1.0L, 3.725290298461914028034141143623846306386e-9L, -7.853981633974483234934486536343324763447e-1L),
5271 TEST_c_c (catanh, -0x1p-27L, 1.0L, -3.725290298461914028034141143623846306386e-9L, 7.853981633974483234934486536343324763447e-1L),
5272 TEST_c_c (catanh, -0x1p-27L, -1.0L, -3.725290298461914028034141143623846306386e-9L, -7.853981633974483234934486536343324763447e-1L),
5273 TEST_c_c (catanh, 1.0L, 0x1p-27L, 9.704060527839234335310696652368086117807L, 7.853981652600934588466178684534110069553e-1L),
5274 TEST_c_c (catanh, -1.0L, 0x1p-27L, -9.704060527839234335310696652368086117807L, 7.853981652600934588466178684534110069553e-1L),
5275 TEST_c_c (catanh, 1.0L, -0x1p-27L, 9.704060527839234335310696652368086117807L, -7.853981652600934588466178684534110069553e-1L),
5276 TEST_c_c (catanh, -1.0L, -0x1p-27L, -9.704060527839234335310696652368086117807L, -7.853981652600934588466178684534110069553e-1L),
5277 TEST_c_c (catanh, 0x1p-33L, 1.0L, 5.820766091346740722643102318246316469910e-11L, 7.853981633974483096190489776088929224056e-1L),
5278 TEST_c_c (catanh, 0x1p-33L, -1.0L, 5.820766091346740722643102318246316469910e-11L, -7.853981633974483096190489776088929224056e-1L),
5279 TEST_c_c (catanh, -0x1p-33L, 1.0L, -5.820766091346740722643102318246316469910e-11L, 7.853981633974483096190489776088929224056e-1L),
5280 TEST_c_c (catanh, -0x1p-33L, -1.0L, -5.820766091346740722643102318246316469910e-11L, -7.853981633974483096190489776088929224056e-1L),
5281 TEST_c_c (catanh, 1.0L, 0x1p-33L, 1.178350206951907026009379309773625595762e1L, 7.853981634265521400723945494331241018449e-1L),
5282 TEST_c_c (catanh, -1.0L, 0x1p-33L, -1.178350206951907026009379309773625595762e1L, 7.853981634265521400723945494331241018449e-1L),
5283 TEST_c_c (catanh, 1.0L, -0x1p-33L, 1.178350206951907026009379309773625595762e1L, -7.853981634265521400723945494331241018449e-1L),
5284 TEST_c_c (catanh, -1.0L, -0x1p-33L, -1.178350206951907026009379309773625595762e1L, -7.853981634265521400723945494331241018449e-1L),
5285 TEST_c_c (catanh, 0x1p-54L, 1.0L, 2.775557561562891351059079170227049355775e-17L, 7.853981633974483096156608458198764914213e-1L),
5286 TEST_c_c (catanh, 0x1p-54L, -1.0L, 2.775557561562891351059079170227049355775e-17L, -7.853981633974483096156608458198764914213e-1L),
5287 TEST_c_c (catanh, -0x1p-54L, 1.0L, -2.775557561562891351059079170227049355775e-17L, 7.853981633974483096156608458198764914213e-1L),
5288 TEST_c_c (catanh, -0x1p-54L, -1.0L, -2.775557561562891351059079170227049355775e-17L, -7.853981633974483096156608458198764914213e-1L),
5289 TEST_c_c (catanh, 1.0L, 0x1p-54L, 1.906154746539849600897388334009985581467e1L, 7.853981633974483234934486536343324763447e-1L),
5290 TEST_c_c (catanh, -1.0L, 0x1p-54L, -1.906154746539849600897388334009985581467e1L, 7.853981633974483234934486536343324763447e-1L),
5291 TEST_c_c (catanh, 1.0L, -0x1p-54L, 1.906154746539849600897388334009985581467e1L, -7.853981633974483234934486536343324763447e-1L),
5292 TEST_c_c (catanh, -1.0L, -0x1p-54L, -1.906154746539849600897388334009985581467e1L, -7.853981633974483234934486536343324763447e-1L),
5293 TEST_c_c (catanh, 0x1p-57L, 1.0L, 3.469446951953614188823848962783813448721e-18L, 7.853981633974483096156608458198757330864e-1L),
5294 TEST_c_c (catanh, 0x1p-57L, -1.0L, 3.469446951953614188823848962783813448721e-18L, -7.853981633974483096156608458198757330864e-1L),
5295 TEST_c_c (catanh, -0x1p-57L, 1.0L, -3.469446951953614188823848962783813448721e-18L, 7.853981633974483096156608458198757330864e-1L),
5296 TEST_c_c (catanh, -0x1p-57L, -1.0L, -3.469446951953614188823848962783813448721e-18L, -7.853981633974483096156608458198757330864e-1L),
5297 TEST_c_c (catanh, 1.0L, 0x1p-57L, 2.010126823623841397309973152228712047720e1L, 7.853981633974483113503843217966828154612e-1L),
5298 TEST_c_c (catanh, -1.0L, 0x1p-57L, -2.010126823623841397309973152228712047720e1L, 7.853981633974483113503843217966828154612e-1L),
5299 TEST_c_c (catanh, 1.0L, -0x1p-57L, 2.010126823623841397309973152228712047720e1L, -7.853981633974483113503843217966828154612e-1L),
5300 TEST_c_c (catanh, -1.0L, -0x1p-57L, -2.010126823623841397309973152228712047720e1L, -7.853981633974483113503843217966828154612e-1L),
5301 TEST_c_c (catanh, 0x1p-13L, 0x1.000002p0L, 6.103514882246036852433556327261700380577e-5L, 7.853982267273793866654490522673596014524e-1L),
5302 TEST_c_c (catanh, 0x1p-13L, -0x1.000002p0L, 6.103514882246036852433556327261700380577e-5L, -7.853982267273793866654490522673596014524e-1L),
5303 TEST_c_c (catanh, -0x1p-13L, 0x1.000002p0L, -6.103514882246036852433556327261700380577e-5L, 7.853982267273793866654490522673596014524e-1L),
5304 TEST_c_c (catanh, -0x1p-13L, -0x1.000002p0L, -6.103514882246036852433556327261700380577e-5L, -7.853982267273793866654490522673596014524e-1L),
5305 TEST_c_c (catanh, 0x1.000002p0L, 0x1p-13L, 4.852030056234795712498957387213592193975L, 7.859169620684960844300240092596908675974e-1L),
5306 TEST_c_c (catanh, -0x1.000002p0L, 0x1p-13L, -4.852030056234795712498957387213592193975L, 7.859169620684960844300240092596908675974e-1L),
5307 TEST_c_c (catanh, 0x1.000002p0L, -0x1p-13L, 4.852030056234795712498957387213592193975L, -7.859169620684960844300240092596908675974e-1L),
5308 TEST_c_c (catanh, -0x1.000002p0L, -0x1p-13L, -4.852030056234795712498957387213592193975L, -7.859169620684960844300240092596908675974e-1L),
5309 TEST_c_c (catanh, 0x1p-13L, 0x0.ffffffp0L, 6.103515973639646453881721999956617260502e-5L, 7.853981373204155542484315721351697277336e-1L),
5310 TEST_c_c (catanh, 0x1p-13L, -0x0.ffffffp0L, 6.103515973639646453881721999956617260502e-5L, -7.853981373204155542484315721351697277336e-1L),
5311 TEST_c_c (catanh, -0x1p-13L, 0x0.ffffffp0L, -6.103515973639646453881721999956617260502e-5L, 7.853981373204155542484315721351697277336e-1L),
5312 TEST_c_c (catanh, -0x1p-13L, -0x0.ffffffp0L, -6.103515973639646453881721999956617260502e-5L, -7.853981373204155542484315721351697277336e-1L),
5313 TEST_c_c (catanh, 0x0.ffffffp0L, 0x1p-13L, 4.852030190345140708455871037447717761868L, 7.851845403708474595909269086711426246675e-1L),
5314 TEST_c_c (catanh, -0x0.ffffffp0L, 0x1p-13L, -4.852030190345140708455871037447717761868L, 7.851845403708474595909269086711426246675e-1L),
5315 TEST_c_c (catanh, 0x0.ffffffp0L, -0x1p-13L, 4.852030190345140708455871037447717761868L, -7.851845403708474595909269086711426246675e-1L),
5316 TEST_c_c (catanh, -0x0.ffffffp0L, -0x1p-13L, -4.852030190345140708455871037447717761868L, -7.851845403708474595909269086711426246675e-1L),
caf84319 5317#ifndef TEST_FLOAT
08198877
JM		 5318 TEST_c_c (catanh, 0x1p-27L, 0x1.0000000000001p0L, 3.725290298461913200853528590596263270474e-9L, 7.853981633974484345157511161499711112683e-1L),
5319 TEST_c_c (catanh, 0x1p-27L, -0x1.0000000000001p0L, 3.725290298461913200853528590596263270474e-9L, -7.853981633974484345157511161499711112683e-1L),
5320 TEST_c_c (catanh, -0x1p-27L, 0x1.0000000000001p0L, -3.725290298461913200853528590596263270474e-9L, 7.853981633974484345157511161499711112683e-1L),
5321 TEST_c_c (catanh, -0x1p-27L, -0x1.0000000000001p0L, -3.725290298461913200853528590596263270474e-9L, -7.853981633974484345157511161499711112683e-1L),
5322 TEST_c_c (catanh, 0x1.0000000000001p0L, 0x1p-27L, 9.704060527839234168777242958594699810015L, 7.853981801612546526942695000283242525531e-1L),
5323 TEST_c_c (catanh, -0x1.0000000000001p0L, 0x1p-27L, -9.704060527839234168777242958594699810015L, 7.853981801612546526942695000283242525531e-1L),
5324 TEST_c_c (catanh, 0x1.0000000000001p0L, -0x1p-27L, 9.704060527839234168777242958594699810015L, -7.853981801612546526942695000283242525531e-1L),
5325 TEST_c_c (catanh, -0x1.0000000000001p0L, -0x1p-27L, -9.704060527839234168777242958594699810015L, -7.853981801612546526942695000283242525531e-1L),
5326 TEST_c_c (catanh, 0x1p-27L, 0x0.fffffffffffff8p0L, 3.725290298461914441624447420137706700965e-9L, 7.853981633974482679822974223765039144191e-1L),
5327 TEST_c_c (catanh, 0x1p-27L, -0x0.fffffffffffff8p0L, 3.725290298461914441624447420137706700965e-9L, -7.853981633974482679822974223765039144191e-1L),
5328 TEST_c_c (catanh, -0x1p-27L, 0x0.fffffffffffff8p0L, -3.725290298461914441624447420137706700965e-9L, 7.853981633974482679822974223765039144191e-1L),
5329 TEST_c_c (catanh, -0x1p-27L, -0x0.fffffffffffff8p0L, -3.725290298461914441624447420137706700965e-9L, -7.853981633974482679822974223765039144191e-1L),
5330 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, 0x1p-27L, 9.704060527839234252043969805481351363824L, 7.853981578095128619227903983047292781021e-1L),
5331 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, 0x1p-27L, -9.704060527839234252043969805481351363824L, 7.853981578095128619227903983047292781021e-1L),
5332 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, -0x1p-27L, 9.704060527839234252043969805481351363824L, -7.853981578095128619227903983047292781021e-1L),
5333 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, -0x1p-27L, -9.704060527839234252043969805481351363824L, -7.853981578095128619227903983047292781021e-1L),
caf84319
JM		 5334#endif
5335#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 5336 TEST_c_c (catanh, 0x1p-33L, 0x1.0000000000000002p0L, 5.820766091346740722012013594069507025615e-11L, 7.853981633974483096732590862331681441026e-1L),
5337 TEST_c_c (catanh, 0x1p-33L, -0x1.0000000000000002p0L, 5.820766091346740722012013594069507025615e-11L, -7.853981633974483096732590862331681441026e-1L),
5338 TEST_c_c (catanh, -0x1p-33L, 0x1.0000000000000002p0L, -5.820766091346740722012013594069507025615e-11L, 7.853981633974483096732590862331681441026e-1L),
5339 TEST_c_c (catanh, -0x1p-33L, -0x1.0000000000000002p0L, -5.820766091346740722012013594069507025615e-11L, -7.853981633974483096732590862331681441026e-1L),
5340 TEST_c_c (catanh, 0x1.0000000000000002p0L, 0x1p-33L, 1.178350206951907025990405771755129268176e1L, 7.853981638922134273801338071094141188767e-1L),
5341 TEST_c_c (catanh, -0x1.0000000000000002p0L, 0x1p-33L, -1.178350206951907025990405771755129268176e1L, 7.853981638922134273801338071094141188767e-1L),
5342 TEST_c_c (catanh, 0x1.0000000000000002p0L, -0x1p-33L, 1.178350206951907025990405771755129268176e1L, -7.853981638922134273801338071094141188767e-1L),
5343 TEST_c_c (catanh, -0x1.0000000000000002p0L, -0x1p-33L, -1.178350206951907025990405771755129268176e1L, -7.853981638922134273801338071094141188767e-1L),
5344 TEST_c_c (catanh, 0x1p-33L, 0x0.ffffffffffffffffp0L, 5.820766091346740722958646680334721192083e-11L, 7.853981633974483095919439232967553115548e-1L),
5345 TEST_c_c (catanh, 0x1p-33L, -0x0.ffffffffffffffffp0L, 5.820766091346740722958646680334721192083e-11L, -7.853981633974483095919439232967553115548e-1L),
5346 TEST_c_c (catanh, -0x1p-33L, 0x0.ffffffffffffffffp0L, -5.820766091346740722958646680334721192083e-11L, 7.853981633974483095919439232967553115548e-1L),
5347 TEST_c_c (catanh, -0x1p-33L, -0x0.ffffffffffffffffp0L, -5.820766091346740722958646680334721192083e-11L, -7.853981633974483095919439232967553115548e-1L),
5348 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, 0x1p-33L, 1.178350206951907026002603046195591193050e1L, 7.853981631937214964185249205444919953948e-1L),
5349 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, 0x1p-33L, -1.178350206951907026002603046195591193050e1L, 7.853981631937214964185249205444919953948e-1L),
5350 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, -0x1p-33L, 1.178350206951907026002603046195591193050e1L, -7.853981631937214964185249205444919953948e-1L),
5351 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, -0x1p-33L, -1.178350206951907026002603046195591193050e1L, -7.853981631937214964185249205444919953948e-1L),
caf84319
JM		 5352#endif
5353#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 5354 TEST_c_c (catanh, 0x1p-54L, 0x1.000000000000000000000000008p0L, 2.775557561562891351059079170226980932999e-17L, 7.853981633974483096156608458198888173729e-1L),
5355 TEST_c_c (catanh, 0x1p-54L, -0x1.000000000000000000000000008p0L, 2.775557561562891351059079170226980932999e-17L, -7.853981633974483096156608458198888173729e-1L),
5356 TEST_c_c (catanh, -0x1p-54L, 0x1.000000000000000000000000008p0L, -2.775557561562891351059079170226980932999e-17L, 7.853981633974483096156608458198888173729e-1L),
5357 TEST_c_c (catanh, -0x1p-54L, -0x1.000000000000000000000000008p0L, -2.775557561562891351059079170226980932999e-17L, -7.853981633974483096156608458198888173729e-1L),
5358 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, 0x1p-54L, 1.906154746539849600897388334009981267384e1L, 7.853981633974485455380535786656405610710e-1L),
5359 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, 0x1p-54L, -1.906154746539849600897388334009981267384e1L, 7.853981633974485455380535786656405610710e-1L),
5360 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, -0x1p-54L, 1.906154746539849600897388334009981267384e1L, -7.853981633974485455380535786656405610710e-1L),
5361 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, -0x1p-54L, -1.906154746539849600897388334009981267384e1L, -7.853981633974485455380535786656405610710e-1L),
5362 TEST_c_c (catanh, 0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, 2.775557561562891351059079170227083567164e-17L, 7.853981633974483096156608458198703284454e-1L),
5363 TEST_c_c (catanh, 0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, 2.775557561562891351059079170227083567164e-17L, -7.853981633974483096156608458198703284454e-1L),
5364 TEST_c_c (catanh, -0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, -2.775557561562891351059079170227083567164e-17L, 7.853981633974483096156608458198703284454e-1L),
5365 TEST_c_c (catanh, -0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, -2.775557561562891351059079170227083567164e-17L, -7.853981633974483096156608458198703284454e-1L),
5366 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, 1.906154746539849600897388334009984040723e1L, 7.853981633974482124711461911186784339815e-1L),
5367 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, -1.906154746539849600897388334009984040723e1L, 7.853981633974482124711461911186784339815e-1L),
5368 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, 1.906154746539849600897388334009984040723e1L, -7.853981633974482124711461911186784339815e-1L),
5369 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, -1.906154746539849600897388334009984040723e1L, -7.853981633974482124711461911186784339815e-1L),
caf84319
JM		 5370#endif
5371#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 5372 TEST_c_c (catanh, 0x1p-57L, 0x1.0000000000000000000000000001p0L, 3.469446951953614188823848962783812780530e-18L, 7.853981633974483096156608458198758293829e-1L),
5373 TEST_c_c (catanh, 0x1p-57L, -0x1.0000000000000000000000000001p0L, 3.469446951953614188823848962783812780530e-18L, -7.853981633974483096156608458198758293829e-1L),
5374 TEST_c_c (catanh, -0x1p-57L, 0x1.0000000000000000000000000001p0L, -3.469446951953614188823848962783812780530e-18L, 7.853981633974483096156608458198758293829e-1L),
5375 TEST_c_c (catanh, -0x1p-57L, -0x1.0000000000000000000000000001p0L, -3.469446951953614188823848962783812780530e-18L, -7.853981633974483096156608458198758293829e-1L),
5376 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, 0x1p-57L, 2.010126823623841397309973152228712033275e1L, 7.853981633974483252281721296111395707566e-1L),
5377 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, 0x1p-57L, -2.010126823623841397309973152228712033275e1L, 7.853981633974483252281721296111395707566e-1L),
5378 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, -0x1p-57L, 2.010126823623841397309973152228712033275e1L, -7.853981633974483252281721296111395707566e-1L),
5379 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, -0x1p-57L, -2.010126823623841397309973152228712033275e1L, -7.853981633974483252281721296111395707566e-1L),
5380 TEST_c_c (catanh, 0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, 3.469446951953614188823848962783813782817e-18L, 7.853981633974483096156608458198756849381e-1L),
5381 TEST_c_c (catanh, 0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, 3.469446951953614188823848962783813782817e-18L, -7.853981633974483096156608458198756849381e-1L),
5382 TEST_c_c (catanh, -0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, -3.469446951953614188823848962783813782817e-18L, 7.853981633974483096156608458198756849381e-1L),
5383 TEST_c_c (catanh, -0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, -3.469446951953614188823848962783813782817e-18L, -7.853981633974483096156608458198756849381e-1L),
5384 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, 2.010126823623841397309973152228712040498e1L, 7.853981633974483044114904178894544378135e-1L),
5385 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, -2.010126823623841397309973152228712040498e1L, 7.853981633974483044114904178894544378135e-1L),
5386 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, 2.010126823623841397309973152228712040498e1L, -7.853981633974483044114904178894544378135e-1L),
5387 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, -2.010126823623841397309973152228712040498e1L, -7.853981633974483044114904178894544378135e-1L),
5388#endif
5389 TEST_c_c (catanh, 1.0L, 0x1p-64L, 2.252728336819822255606004394739073846245e1L, 7.853981633974483096292133729759445264744e-1L),
5390 TEST_c_c (catanh, 1.0L, -0x1p-64L, 2.252728336819822255606004394739073846245e1L, -7.853981633974483096292133729759445264744e-1L),
5391 TEST_c_c (catanh, -1.0L, 0x1p-64L, -2.252728336819822255606004394739073846245e1L, 7.853981633974483096292133729759445264744e-1L),
5392 TEST_c_c (catanh, -1.0L, -0x1p-64L, -2.252728336819822255606004394739073846245e1L, -7.853981633974483096292133729759445264744e-1L),
5393 TEST_c_c (catanh, 0x1p-64L, 1.0L, 2.710505431213761085018632002174854278563e-20L, 7.853981633974483096156608458198757210500e-1L),
5394 TEST_c_c (catanh, -0x1p-64L, 1.0L, -2.710505431213761085018632002174854278563e-20L, 7.853981633974483096156608458198757210500e-1L),
5395 TEST_c_c (catanh, 0x1p-64L, -1.0L, 2.710505431213761085018632002174854278563e-20L, -7.853981633974483096156608458198757210500e-1L),
5396 TEST_c_c (catanh, -0x1p-64L, -1.0L, -2.710505431213761085018632002174854278563e-20L, -7.853981633974483096156608458198757210500e-1L),
5397 TEST_c_c (catanh, 1.0L, 0x1.3p-73L, 2.556052055225464683726753902092495938633e1L, 7.853981633974483096156922786831527361009e-1L),
5398 TEST_c_c (catanh, 1.0L, -0x1.3p-73L, 2.556052055225464683726753902092495938633e1L, -7.853981633974483096156922786831527361009e-1L),
5399 TEST_c_c (catanh, -1.0L, 0x1.3p-73L, -2.556052055225464683726753902092495938633e1L, 7.853981633974483096156922786831527361009e-1L),
5400 TEST_c_c (catanh, -1.0L, -0x1.3p-73L, -2.556052055225464683726753902092495938633e1L, -7.853981633974483096156922786831527361009e-1L),
5401 TEST_c_c (catanh, 0x1.3p-73L, 1.0L, 6.286572655403010329022706059731717687100e-23L, 7.853981633974483096156608458198757210493e-1L),
5402 TEST_c_c (catanh, -0x1.3p-73L, 1.0L, -6.286572655403010329022706059731717687100e-23L, 7.853981633974483096156608458198757210493e-1L),
5403 TEST_c_c (catanh, 0x1.3p-73L, -1.0L, 6.286572655403010329022706059731717687100e-23L, -7.853981633974483096156608458198757210493e-1L),
5404 TEST_c_c (catanh, -0x1.3p-73L, -1.0L, -6.286572655403010329022706059731717687100e-23L, -7.853981633974483096156608458198757210493e-1L),
5405 TEST_c_c (catanh, 1.0L, 0x1p-124L, 4.332169878499658183857700759113603550472e1L, 7.853981633974483096156608458198757210610e-1L),
5406 TEST_c_c (catanh, 1.0L, -0x1p-124L, 4.332169878499658183857700759113603550472e1L, -7.853981633974483096156608458198757210610e-1L),
5407 TEST_c_c (catanh, -1.0L, 0x1p-124L, -4.332169878499658183857700759113603550472e1L, 7.853981633974483096156608458198757210610e-1L),
5408 TEST_c_c (catanh, -1.0L, -0x1p-124L, -4.332169878499658183857700759113603550472e1L, -7.853981633974483096156608458198757210610e-1L),
5409 TEST_c_c (catanh, 0x1p-124L, 1.0L, 2.350988701644575015937473074444491355637e-38L, 7.853981633974483096156608458198757210493e-1L),
5410 TEST_c_c (catanh, -0x1p-124L, 1.0L, -2.350988701644575015937473074444491355637e-38L, 7.853981633974483096156608458198757210493e-1L),
5411 TEST_c_c (catanh, 0x1p-124L, -1.0L, 2.350988701644575015937473074444491355637e-38L, -7.853981633974483096156608458198757210493e-1L),
5412 TEST_c_c (catanh, -0x1p-124L, -1.0L, -2.350988701644575015937473074444491355637e-38L, -7.853981633974483096156608458198757210493e-1L),
5413 TEST_c_c (catanh, 0x1.000002p0L, 0x1p-126L, 8.317766196521665212523713550410777685446L, 1.570796326794896619231321691639702138295L),
5414 TEST_c_c (catanh, 0x1.000002p0L, -0x1p-126L, 8.317766196521665212523713550410777685446L, -1.570796326794896619231321691639702138295L),
5415 TEST_c_c (catanh, -0x1.000002p0L, 0x1p-126L, -8.317766196521665212523713550410777685446L, 1.570796326794896619231321691639702138295L),
5416 TEST_c_c (catanh, -0x1.000002p0L, -0x1p-126L, -8.317766196521665212523713550410777685446L, -1.570796326794896619231321691639702138295L),
5417 TEST_c_c (catanh, 0x1p-126L, 0x1.000002p0L, 5.877471053462247139383742414506671233336e-39L, 7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5418 TEST_c_c (catanh, -0x1p-126L, 0x1.000002p0L, -5.877471053462247139383742414506671233336e-39L, 7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5419 TEST_c_c (catanh, 0x1p-126L, -0x1.000002p0L, 5.877471053462247139383742414506671233336e-39L, -7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5420 TEST_c_c (catanh, -0x1p-126L, -0x1.000002p0L, -5.877471053462247139383742414506671233336e-39L, -7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5421 TEST_c_c (catanh, 0x0.ffffffp0L, 0x1p-126L, 8.664339742098154951823135931565866792454L, 9.860761609136244031334147100512154160097e-32L),
5422 TEST_c_c (catanh, 0x0.ffffffp0L, -0x1p-126L, 8.664339742098154951823135931565866792454L, -9.860761609136244031334147100512154160097e-32L),
5423 TEST_c_c (catanh, -0x0.ffffffp0L, 0x1p-126L, -8.664339742098154951823135931565866792454L, 9.860761609136244031334147100512154160097e-32L),
5424 TEST_c_c (catanh, -0x0.ffffffp0L, -0x1p-126L, -8.664339742098154951823135931565866792454L, -9.860761609136244031334147100512154160097e-32L),
5425 TEST_c_c (catanh, 0x1p-126L, 0x0.ffffffp0L, 5.877472104436064061535099214664320916184e-39L, 7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5426 TEST_c_c (catanh, -0x1p-126L, 0x0.ffffffp0L, -5.877472104436064061535099214664320916184e-39L, 7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5427 TEST_c_c (catanh, 0x1p-126L, -0x0.ffffffp0L, 5.877472104436064061535099214664320916184e-39L, -7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5428 TEST_c_c (catanh, -0x1p-126L, -0x0.ffffffp0L, -5.877472104436064061535099214664320916184e-39L, -7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
10de07f5 5429#ifndef TEST_FLOAT
08198877
JM		 5430 TEST_c_c (catanh, 1.0L, 0x1p-512L, 1.777922518136259718655200391540222897114e2L, 7.853981633974483096156608458198757210493e-1L),
5431 TEST_c_c (catanh, 1.0L, -0x1p-512L, 1.777922518136259718655200391540222897114e2L, -7.853981633974483096156608458198757210493e-1L),
5432 TEST_c_c (catanh, -1.0L, 0x1p-512L, -1.777922518136259718655200391540222897114e2L, 7.853981633974483096156608458198757210493e-1L),
5433 TEST_c_c (catanh, -1.0L, -0x1p-512L, -1.777922518136259718655200391540222897114e2L, -7.853981633974483096156608458198757210493e-1L),
5434 TEST_c_c (catanh, 0x1p-512L, 1.0L, 3.729170365600103371645482657731466918688e-155L, 7.853981633974483096156608458198757210493e-1L),
5435 TEST_c_c (catanh, -0x1p-512L, 1.0L, -3.729170365600103371645482657731466918688e-155L, 7.853981633974483096156608458198757210493e-1L),
5436 TEST_c_c (catanh, 0x1p-512L, -1.0L, 3.729170365600103371645482657731466918688e-155L, -7.853981633974483096156608458198757210493e-1L),
5437 TEST_c_c (catanh, -0x1p-512L, -1.0L, -3.729170365600103371645482657731466918688e-155L, -7.853981633974483096156608458198757210493e-1L),
5438 TEST_c_c (catanh, 1.0L, 0x1.3p-536L, 1.860240928518819859673567751384928348958e2L, 7.853981633974483096156608458198757210493e-1L),
5439 TEST_c_c (catanh, 1.0L, -0x1.3p-536L, 1.860240928518819859673567751384928348958e2L, -7.853981633974483096156608458198757210493e-1L),
5440 TEST_c_c (catanh, -1.0L, 0x1.3p-536L, -1.860240928518819859673567751384928348958e2L, 7.853981633974483096156608458198757210493e-1L),
5441 TEST_c_c (catanh, -1.0L, -0x1.3p-536L, -1.860240928518819859673567751384928348958e2L, -7.853981633974483096156608458198757210493e-1L),
5442 TEST_c_c (catanh, 0x1.3p-536L, 1.0L, 2.639526015013529511588222179446290115084e-162L, 7.853981633974483096156608458198757210493e-1L),
5443 TEST_c_c (catanh, -0x1.3p-536L, 1.0L, -2.639526015013529511588222179446290115084e-162L, 7.853981633974483096156608458198757210493e-1L),
5444 TEST_c_c (catanh, 0x1.3p-536L, -1.0L, 2.639526015013529511588222179446290115084e-162L, -7.853981633974483096156608458198757210493e-1L),
5445 TEST_c_c (catanh, -0x1.3p-536L, -1.0L, -2.639526015013529511588222179446290115084e-162L, -7.853981633974483096156608458198757210493e-1L),
5446 TEST_c_c (catanh, 1.0L, 0x1p-1020L, 3.538516356758520804574969980043991380025e2L, 7.853981633974483096156608458198757210493e-1L),
5447 TEST_c_c (catanh, 1.0L, -0x1p-1020L, 3.538516356758520804574969980043991380025e2L, -7.853981633974483096156608458198757210493e-1L),
5448 TEST_c_c (catanh, -1.0L, 0x1p-1020L, -3.538516356758520804574969980043991380025e2L, 7.853981633974483096156608458198757210493e-1L),
5449 TEST_c_c (catanh, -1.0L, -0x1p-1020L, -3.538516356758520804574969980043991380025e2L, -7.853981633974483096156608458198757210493e-1L),
5450 TEST_c_c (catanh, 0x1p-1020L, 1.0L, 4.450147717014402766180465434664808128438e-308L, 7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5451 TEST_c_c (catanh, -0x1p-1020L, 1.0L, -4.450147717014402766180465434664808128438e-308L, 7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5452 TEST_c_c (catanh, 0x1p-1020L, -1.0L, 4.450147717014402766180465434664808128438e-308L, -7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5453 TEST_c_c (catanh, -0x1p-1020L, -1.0L, -4.450147717014402766180465434664808128438e-308L, -7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5454 TEST_c_c (catanh, 0x1.0000000000001p0L, 0x1p-1022L, 1.836840028483855075506780244989950299369e1L, 1.570796326794896619231321691639751442099L),
5455 TEST_c_c (catanh, 0x1.0000000000001p0L, -0x1p-1022L, 1.836840028483855075506780244989950299369e1L, -1.570796326794896619231321691639751442099L),
5456 TEST_c_c (catanh, -0x1.0000000000001p0L, 0x1p-1022L, -1.836840028483855075506780244989950299369e1L, 1.570796326794896619231321691639751442099L),
5457 TEST_c_c (catanh, -0x1.0000000000001p0L, -0x1p-1022L, -1.836840028483855075506780244989950299369e1L, -1.570796326794896619231321691639751442099L),
5458 TEST_c_c (catanh, 0x1p-1022L, 0x1.0000000000001p0L, 1.112536929253600444512293438042957369978e-308L, 7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5459 TEST_c_c (catanh, -0x1p-1022L, 0x1.0000000000001p0L, -1.112536929253600444512293438042957369978e-308L, 7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5460 TEST_c_c (catanh, 0x1p-1022L, -0x1.0000000000001p0L, 1.112536929253600444512293438042957369978e-308L, -7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5461 TEST_c_c (catanh, -0x1p-1022L, -0x1.0000000000001p0L, -1.112536929253600444512293438042957369978e-308L, -7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5462 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, 0x1p-1022L, 1.871497387511852332650969166374185305708e1L, 1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5463 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, -0x1p-1022L, 1.871497387511852332650969166374185305708e1L, -1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5464 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, 0x1p-1022L, -1.871497387511852332650969166374185305708e1L, 1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5465 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, -0x1p-1022L, -1.871497387511852332650969166374185305708e1L, -1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5466 TEST_c_c (catanh, 0x1p-1022L, 0x0.fffffffffffff8p0L, 1.112536929253600815061527818977844932790e-308L, 7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5467 TEST_c_c (catanh, -0x1p-1022L, 0x0.fffffffffffff8p0L, -1.112536929253600815061527818977844932790e-308L, 7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5468 TEST_c_c (catanh, 0x1p-1022L, -0x0.fffffffffffff8p0L, 1.112536929253600815061527818977844932790e-308L, -7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5469 TEST_c_c (catanh, -0x1p-1022L, -0x0.fffffffffffff8p0L, -1.112536929253600815061527818977844932790e-308L, -7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
10de07f5
JM		 5470#endif
5471#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 5472 TEST_c_c (catanh, 0x1.0000000000000002p0L, 0x1p-1022L, 2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5473 TEST_c_c (catanh, 0x1.0000000000000002p0L, -0x1p-1022L, 2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5474 TEST_c_c (catanh, -0x1.0000000000000002p0L, 0x1p-1022L, -2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5475 TEST_c_c (catanh, -0x1.0000000000000002p0L, -0x1p-1022L, -2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5476 TEST_c_c (catanh, 0x1p-1022L, 0x1.0000000000000002p0L, 1.112536929253600691424494863099491450042e-308L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5477 TEST_c_c (catanh, -0x1p-1022L, 0x1.0000000000000002p0L, -1.112536929253600691424494863099491450042e-308L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5478 TEST_c_c (catanh, 0x1p-1022L, -0x1.0000000000000002p0L, 1.112536929253600691424494863099491450042e-308L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5479 TEST_c_c (catanh, -0x1p-1022L, -0x1.0000000000000002p0L, -1.112536929253600691424494863099491450042e-308L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5480 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, 0x1p-1022L, 2.252728336819822255604649142023466965703e1L, 2.052268400649188124723641491045245971623e-289L),
5481 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, -0x1p-1022L, 2.252728336819822255604649142023466965703e1L, -2.052268400649188124723641491045245971623e-289L),
5482 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, 0x1p-1022L, -2.252728336819822255604649142023466965703e1L, 2.052268400649188124723641491045245971623e-289L),
5483 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, -0x1p-1022L, -2.252728336819822255604649142023466965703e1L, -2.052268400649188124723641491045245971623e-289L),
5484 TEST_c_c (catanh, 0x1p-1022L, 0x0.ffffffffffffffffp0L, 1.112536929253600691605427106449557323148e-308L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5485 TEST_c_c (catanh, -0x1p-1022L, 0x0.ffffffffffffffffp0L, -1.112536929253600691605427106449557323148e-308L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5486 TEST_c_c (catanh, 0x1p-1022L, -0x0.ffffffffffffffffp0L, 1.112536929253600691605427106449557323148e-308L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5487 TEST_c_c (catanh, -0x1p-1022L, -0x0.ffffffffffffffffp0L, -1.112536929253600691605427106449557323148e-308L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
10de07f5
JM		 5488#endif
5489#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 5490 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, 0x1p-1022L, 3.673680056967710139911330243728336427098e1L, 1.570796326794896619231321691639751442099L),
5491 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, -0x1p-1022L, 3.673680056967710139911330243728336427098e1L, -1.570796326794896619231321691639751442099L),
5492 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, 0x1p-1022L, -3.673680056967710139911330243728336427098e1L, 1.570796326794896619231321691639751442099L),
5493 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, -0x1p-1022L, -3.673680056967710139911330243728336427098e1L, -1.570796326794896619231321691639751442099L),
5494 TEST_c_c (catanh, 0x1p-1022L, 0x1.000000000000000000000000008p0L, 1.112536929253600691545116358666174605957e-308L, 7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5495 TEST_c_c (catanh, -0x1p-1022L, 0x1.000000000000000000000000008p0L, -1.112536929253600691545116358666174605957e-308L, 7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5496 TEST_c_c (catanh, 0x1p-1022L, -0x1.000000000000000000000000008p0L, 1.112536929253600691545116358666174605957e-308L, -7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5497 TEST_c_c (catanh, -0x1p-1022L, -0x1.000000000000000000000000008p0L, -1.112536929253600691545116358666174605957e-308L, -7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5498 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, 3.708337415995707405382191849801244331055e1L, 9.025971879324147880346310405868788320726e-277L),
5499 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, 3.708337415995707405382191849801244331055e1L, -9.025971879324147880346310405868788320726e-277L),
5500 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, -3.708337415995707405382191849801244331055e1L, 9.025971879324147880346310405868788320726e-277L),
5501 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, -3.708337415995707405382191849801244331055e1L, -9.025971879324147880346310405868788320726e-277L),
5502 TEST_c_c (catanh, 0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, 1.112536929253600691545116358666215745186e-308L, 7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5503 TEST_c_c (catanh, -0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, -1.112536929253600691545116358666215745186e-308L, 7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5504 TEST_c_c (catanh, 0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, 1.112536929253600691545116358666215745186e-308L, -7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5505 TEST_c_c (catanh, -0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, -1.112536929253600691545116358666215745186e-308L, -7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
10de07f5
JM		 5506#endif
5507#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5508 TEST_c_c (catanh, 1.0L, 0x1p-8192L, 2.839477425163815960027691385553420311121e3L, 7.853981633974483096156608458198757210493e-1L),
5509 TEST_c_c (catanh, 1.0L, -0x1p-8192L, 2.839477425163815960027691385553420311121e3L, -7.853981633974483096156608458198757210493e-1L),
5510 TEST_c_c (catanh, -1.0L, 0x1p-8192L, -2.839477425163815960027691385553420311121e3L, 7.853981633974483096156608458198757210493e-1L),
5511 TEST_c_c (catanh, -1.0L, -0x1p-8192L, -2.839477425163815960027691385553420311121e3L, -7.853981633974483096156608458198757210493e-1L),
5512 TEST_c_c (catanh, 0x1p-8192L, 1.0L, 4.584009668887117914053530980121207914891e-2467L, 7.853981633974483096156608458198757210493e-1L),
5513 TEST_c_c (catanh, -0x1p-8192L, 1.0L, -4.584009668887117914053530980121207914891e-2467L, 7.853981633974483096156608458198757210493e-1L),
5514 TEST_c_c (catanh, 0x1p-8192L, -1.0L, 4.584009668887117914053530980121207914891e-2467L, -7.853981633974483096156608458198757210493e-1L),
5515 TEST_c_c (catanh, -0x1p-8192L, -1.0L, -4.584009668887117914053530980121207914891e-2467L, -7.853981633974483096156608458198757210493e-1L),
5516 TEST_c_c (catanh, 1.0L, 0x1.3p-8221L, 2.849442134153471837403071201841536297726e3L, 7.853981633974483096156608458198757210493e-1L),
5517 TEST_c_c (catanh, 1.0L, -0x1.3p-8221L, 2.849442134153471837403071201841536297726e3L, -7.853981633974483096156608458198757210493e-1L),
5518 TEST_c_c (catanh, -1.0L, 0x1.3p-8221L, -2.849442134153471837403071201841536297726e3L, 7.853981633974483096156608458198757210493e-1L),
5519 TEST_c_c (catanh, -1.0L, -0x1.3p-8221L, -2.849442134153471837403071201841536297726e3L, -7.853981633974483096156608458198757210493e-1L),
5520 TEST_c_c (catanh, 0x1.3p-8221L, 1.0L, 1.013933025636421986471594877335044443409e-2475L, 7.853981633974483096156608458198757210493e-1L),
5521 TEST_c_c (catanh, -0x1.3p-8221L, 1.0L, -1.013933025636421986471594877335044443409e-2475L, 7.853981633974483096156608458198757210493e-1L),
5522 TEST_c_c (catanh, 0x1.3p-8221L, -1.0L, 1.013933025636421986471594877335044443409e-2475L, -7.853981633974483096156608458198757210493e-1L),
5523 TEST_c_c (catanh, -0x1.3p-8221L, -1.0L, -1.013933025636421986471594877335044443409e-2475L, -7.853981633974483096156608458198757210493e-1L),
5524 TEST_c_c (catanh, 1.0L, 0x1.3p-8246L, 2.858106473910471153770786603359763504827e3L, 7.853981633974483096156608458198757210493e-1L),
5525 TEST_c_c (catanh, 1.0L, -0x1.3p-8246L, 2.858106473910471153770786603359763504827e3L, -7.853981633974483096156608458198757210493e-1L),
5526 TEST_c_c (catanh, -1.0L, 0x1.3p-8246L, -2.858106473910471153770786603359763504827e3L, 7.853981633974483096156608458198757210493e-1L),
5527 TEST_c_c (catanh, -1.0L, -0x1.3p-8246L, -2.858106473910471153770786603359763504827e3L, -7.853981633974483096156608458198757210493e-1L),
5528 TEST_c_c (catanh, 0x1.3p-8246L, 1.0L, 3.021755890954798419688924781486524472858e-2483L, 7.853981633974483096156608458198757210493e-1L),
5529 TEST_c_c (catanh, -0x1.3p-8246L, 1.0L, -3.021755890954798419688924781486524472858e-2483L, 7.853981633974483096156608458198757210493e-1L),
5530 TEST_c_c (catanh, 0x1.3p-8246L, -1.0L, 3.021755890954798419688924781486524472858e-2483L, -7.853981633974483096156608458198757210493e-1L),
5531 TEST_c_c (catanh, -0x1.3p-8246L, -1.0L, -3.021755890954798419688924781486524472858e-2483L, -7.853981633974483096156608458198757210493e-1L),
5532 TEST_c_c (catanh, 1.0L, 0x1p-16380L, 5.677221982376232056781839690803195180822e3L, 7.853981633974483096156608458198757210493e-1L),
5533 TEST_c_c (catanh, 1.0L, -0x1p-16380L, 5.677221982376232056781839690803195180822e3L, -7.853981633974483096156608458198757210493e-1L),
5534 TEST_c_c (catanh, -1.0L, 0x1p-16380L, -5.677221982376232056781839690803195180822e3L, 7.853981633974483096156608458198757210493e-1L),
5535 TEST_c_c (catanh, -1.0L, -0x1p-16380L, -5.677221982376232056781839690803195180822e3L, -7.853981633974483096156608458198757210493e-1L),
5536 TEST_c_c (catanh, 0x1p-16380L, 1.0L, 6.724206286224187012525355634643505205196e-4932L, 7.853981633974483096156608458198757210493e-1L),
5537 TEST_c_c (catanh, -0x1p-16380L, 1.0L, -6.724206286224187012525355634643505205196e-4932L, 7.853981633974483096156608458198757210493e-1L),
5538 TEST_c_c (catanh, 0x1p-16380L, -1.0L, 6.724206286224187012525355634643505205196e-4932L, -7.853981633974483096156608458198757210493e-1L),
5539 TEST_c_c (catanh, -0x1p-16380L, -1.0L, -6.724206286224187012525355634643505205196e-4932L, -7.853981633974483096156608458198757210493e-1L),
5540 TEST_c_c (catanh, 0x1.0000000000000002p0L, 0x1p-16382L, 2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5541 TEST_c_c (catanh, 0x1.0000000000000002p0L, -0x1p-16382L, 2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5542 TEST_c_c (catanh, -0x1.0000000000000002p0L, 0x1p-16382L, -2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5543 TEST_c_c (catanh, -0x1.0000000000000002p0L, -0x1p-16382L, -2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5544 TEST_c_c (catanh, 0x1p-16382L, 0x1.0000000000000002p0L, 1.681051571556046752949078932066752571182e-4932L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5545 TEST_c_c (catanh, -0x1p-16382L, 0x1.0000000000000002p0L, -1.681051571556046752949078932066752571182e-4932L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5546 TEST_c_c (catanh, 0x1p-16382L, -0x1.0000000000000002p0L, 1.681051571556046752949078932066752571182e-4932L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5547 TEST_c_c (catanh, -0x1p-16382L, -0x1.0000000000000002p0L, -1.681051571556046752949078932066752571182e-4932L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5548 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, 0x1p-16382L, 2.252728336819822255604649142023466965703e1L, 3.100992811520163369065387859792822623745e-4913L),
5549 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, -0x1p-16382L, 2.252728336819822255604649142023466965703e1L, -3.100992811520163369065387859792822623745e-4913L),
5550 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, 0x1p-16382L, -2.252728336819822255604649142023466965703e1L, 3.100992811520163369065387859792822623745e-4913L),
5551 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, -0x1p-16382L, -2.252728336819822255604649142023466965703e1L, -3.100992811520163369065387859792822623745e-4913L),
5552 TEST_c_c (catanh, 0x1p-16382L, 0x0.ffffffffffffffffp0L, 1.681051571556046753222468896957938166365e-4932L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5553 TEST_c_c (catanh, -0x1p-16382L, 0x0.ffffffffffffffffp0L, -1.681051571556046753222468896957938166365e-4932L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5554 TEST_c_c (catanh, 0x1p-16382L, -0x0.ffffffffffffffffp0L, 1.681051571556046753222468896957938166365e-4932L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5555 TEST_c_c (catanh, -0x1p-16382L, -0x0.ffffffffffffffffp0L, -1.681051571556046753222468896957938166365e-4932L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
10de07f5 5556# if LDBL_MANT_DIG >= 113
08198877
JM		 5557 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, 0x1p-16382L, 3.916281570163690998207361486238697614441e1L, 1.570796326794896619231321691639751442099L),
5558 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, -0x1p-16382L, 3.916281570163690998207361486238697614441e1L, -1.570796326794896619231321691639751442099L),
5559 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, 0x1p-16382L, -3.916281570163690998207361486238697614441e1L, 1.570796326794896619231321691639751442099L),
5560 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, -0x1p-16382L, -3.916281570163690998207361486238697614441e1L, -1.570796326794896619231321691639751442099L),
5561 TEST_c_c (catanh, 0x1p-16382L, 0x1.0000000000000000000000000001p0L, 1.681051571556046753131338908660875977540e-4932L, 7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5562 TEST_c_c (catanh, -0x1p-16382L, 0x1.0000000000000000000000000001p0L, -1.681051571556046753131338908660875977540e-4932L, 7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5563 TEST_c_c (catanh, 0x1p-16382L, -0x1.0000000000000000000000000001p0L, 1.681051571556046753131338908660875977540e-4932L, -7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5564 TEST_c_c (catanh, -0x1p-16382L, -0x1.0000000000000000000000000001p0L, -1.681051571556046753131338908660875977540e-4932L, -7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5565 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, 3.950938929191688263678223092311606435623e1L, 1.745703758805099310527547423749501866998e-4898L),
5566 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, 3.950938929191688263678223092311606435623e1L, -1.745703758805099310527547423749501866998e-4898L),
5567 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, -3.950938929191688263678223092311606435623e1L, 1.745703758805099310527547423749501866998e-4898L),
5568 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, -3.950938929191688263678223092311606435623e1L, -1.745703758805099310527547423749501866998e-4898L),
5569 TEST_c_c (catanh, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.681051571556046753131338908660876463178e-4932L, 7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5570 TEST_c_c (catanh, -0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.681051571556046753131338908660876463178e-4932L, 7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5571 TEST_c_c (catanh, 0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.681051571556046753131338908660876463178e-4932L, -7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5572 TEST_c_c (catanh, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.681051571556046753131338908660876463178e-4932L, -7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
10de07f5 5573# endif
caf84319 5574#endif
2f38fbfe 5575
08198877
JM		 5576 TEST_c_c (catanh, 0.75L, 1.25L, 0.261492138795671927078652057366532140L, 0.996825126463918666098902241310446708L),
5577 TEST_c_c (catanh, -2, -3, -0.14694666622552975204743278515471595L, -1.3389725222944935611241935759091443L),
5578 END_DATA (catanh)
5579 };
8847214f 5580
08198877
JM		 5581static void
5582catanh_test (void)
5583{
5584 errno = 0;
5585 FUNC(catanh) (BUILD_COMPLEX (0.7L, 1.2L));
5586 if (errno == ENOSYS)
5587 /* Function not implemented. */
5588 return;
5589
5590 START (catanh);
5591 RUN_TEST_LOOP_c_c (catanh, catanh_test_data, );
6815fabc 5592 END (catanh, complex);
8847214f
UD		 5593}
5594
74c57478
JM		 5595static const struct test_f_f_data cbrt_test_data[] =
5596 {
5597 START_DATA (cbrt),
5598 TEST_f_f (cbrt, 0.0, 0.0),
5599 TEST_f_f (cbrt, minus_zero, minus_zero),
5600
5601 TEST_f_f (cbrt, plus_infty, plus_infty),
5602 TEST_f_f (cbrt, minus_infty, minus_infty),
5603 TEST_f_f (cbrt, qnan_value, qnan_value),
5604
5605 TEST_f_f (cbrt, -0.001L, -0.1L),
5606 TEST_f_f (cbrt, 8, 2),
5607 TEST_f_f (cbrt, -27.0, -3.0),
5608 TEST_f_f (cbrt, 0.9921875L, 0.997389022060725270579075195353955217L),
5609 TEST_f_f (cbrt, 0.75L, 0.908560296416069829445605878163630251L),
5610 END_DATA (cbrt)
5611 };
5612
8847214f
UD		 5613static void
5614cbrt_test (void)
5615{
42be70d4
UD		 5616 errno = 0;
5617 FUNC(cbrt) (8);
5618 if (errno == ENOSYS)
5619 /* Function not implemented. */
5620 return;
5621
8847214f 5622 START (cbrt);
74c57478 5623 RUN_TEST_LOOP_f_f (cbrt, cbrt_test_data, );
8847214f
UD		 5624 END (cbrt);
5625}
5626
2550dfe9 5627
08198877
JM		 5628static const struct test_c_c_data ccos_test_data[] =
5629 {
5630 START_DATA (ccos),
5631 TEST_c_c (ccos, 0.0, 0.0, 1.0, minus_zero),
5632 TEST_c_c (ccos, minus_zero, 0.0, 1.0, 0.0),
5633 TEST_c_c (ccos, 0.0, minus_zero, 1.0, 0.0),
5634 TEST_c_c (ccos, minus_zero, minus_zero, 1.0, minus_zero),
8847214f 5635
08198877
JM		 5636 TEST_c_c (ccos, plus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5637 TEST_c_c (ccos, plus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5638 TEST_c_c (ccos, minus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5639 TEST_c_c (ccos, minus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 5640
08198877
JM		 5641 TEST_c_c (ccos, 0.0, plus_infty, plus_infty, minus_zero),
5642 TEST_c_c (ccos, 0.0, minus_infty, plus_infty, 0.0),
5643 TEST_c_c (ccos, minus_zero, plus_infty, plus_infty, 0.0),
5644 TEST_c_c (ccos, minus_zero, minus_infty, plus_infty, minus_zero),
8847214f 5645
08198877
JM		 5646 TEST_c_c (ccos, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5647 TEST_c_c (ccos, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5648 TEST_c_c (ccos, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5649 TEST_c_c (ccos, minus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 5650
08198877
JM		 5651 TEST_c_c (ccos, 4.625, plus_infty, minus_infty, plus_infty),
5652 TEST_c_c (ccos, 4.625, minus_infty, minus_infty, minus_infty),
5653 TEST_c_c (ccos, -4.625, plus_infty, minus_infty, minus_infty),
5654 TEST_c_c (ccos, -4.625, minus_infty, minus_infty, plus_infty),
8847214f 5655
08198877
JM		 5656 TEST_c_c (ccos, plus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5657 TEST_c_c (ccos, plus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5658 TEST_c_c (ccos, minus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5659 TEST_c_c (ccos, minus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 5660
08198877
JM		 5661 TEST_c_c (ccos, qnan_value, 0.0, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5662 TEST_c_c (ccos, qnan_value, minus_zero, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 5663
08198877
JM		 5664 TEST_c_c (ccos, qnan_value, plus_infty, plus_infty, qnan_value),
5665 TEST_c_c (ccos, qnan_value, minus_infty, plus_infty, qnan_value),
8847214f 5666
08198877
JM		 5667 TEST_c_c (ccos, qnan_value, 9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5668 TEST_c_c (ccos, qnan_value, -9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5669
08198877
JM		 5670 TEST_c_c (ccos, 0.0, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5671 TEST_c_c (ccos, minus_zero, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 5672
08198877
JM		 5673 TEST_c_c (ccos, 10.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5674 TEST_c_c (ccos, -10.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5675
08198877
JM		 5676 TEST_c_c (ccos, plus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5677 TEST_c_c (ccos, minus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5678
08198877 5679 TEST_c_c (ccos, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 5680
08198877
JM		 5681 TEST_c_c (ccos, 0.75L, 1.25L, 1.38173873063425888530729933139078645L, -1.09193013555397466170919531722024128L),
5682 TEST_c_c (ccos, -2, -3, -4.18962569096880723013255501961597373L, -9.10922789375533659797919726277886212L),
8847214f 5683
08198877
JM		 5684 TEST_c_c (ccos, 0.75, 89.5, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
5685 TEST_c_c (ccos, 0.75, -89.5, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
5686 TEST_c_c (ccos, -0.75, 89.5, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
5687 TEST_c_c (ccos, -0.75, -89.5, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
e0b16cc2
JM		 5688
5689#ifndef TEST_FLOAT
08198877
JM		 5690 TEST_c_c (ccos, 0.75, 710.5, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
5691 TEST_c_c (ccos, 0.75, -710.5, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
5692 TEST_c_c (ccos, -0.75, 710.5, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
5693 TEST_c_c (ccos, -0.75, -710.5, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
e0b16cc2
JM		 5694#endif
5695
5696#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5697 TEST_c_c (ccos, 0.75, 11357.25, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
5698 TEST_c_c (ccos, 0.75, -11357.25, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
5699 TEST_c_c (ccos, -0.75, 11357.25, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
5700 TEST_c_c (ccos, -0.75, -11357.25, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
e0b16cc2
JM		 5701#endif
5702
5703#ifdef TEST_FLOAT
08198877 5704 TEST_c_c (ccos, 0x1p-149, 180, plus_infty, -1.043535896672617552965983803453927655332e33L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5705#endif
5706
5707#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 5708 TEST_c_c (ccos, 0x1p-1074, 1440, plus_infty, -5.981479269486130556466515778180916082415e301L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5709#endif
5710
5711#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 5712 TEST_c_c (ccos, 0x1p-16434L, 22730, plus_infty, -1.217853148905605987081057582351152052687e4924L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5713#endif
5714
08198877
JM		 5715 TEST_c_c (ccos, min_subnorm_value * 0x1p120, 0x1p-120, 1.0, -min_subnorm_value, UNDERFLOW_EXCEPTION),
5716 TEST_c_c (ccos, 0x1p-120, min_subnorm_value * 0x1p120, 1.0, -min_subnorm_value, UNDERFLOW_EXCEPTION),
5717 END_DATA (ccos)
5718 };
8847214f
UD		 5719
5720static void
08198877 5721ccos_test (void)
8847214f 5722{
aaca11d8 5723 errno = 0;
08198877 5724 FUNC(ccos) (BUILD_COMPLEX (0, 0));
aaca11d8
UD		 5725 if (errno == ENOSYS)
5726 /* Function not implemented. */
5727 return;
8847214f 5728
08198877
JM		 5729 START (ccos);
5730 RUN_TEST_LOOP_c_c (ccos, ccos_test_data, );
5731 END (ccos, complex);
5732}
8847214f 5733
8847214f 5734
08198877
JM		 5735static const struct test_c_c_data ccosh_test_data[] =
5736 {
5737 START_DATA (ccosh),
5738 TEST_c_c (ccosh, 0.0, 0.0, 1.0, 0.0),
5739 TEST_c_c (ccosh, minus_zero, 0.0, 1.0, minus_zero),
5740 TEST_c_c (ccosh, 0.0, minus_zero, 1.0, minus_zero),
5741 TEST_c_c (ccosh, minus_zero, minus_zero, 1.0, 0.0),
5742
5743 TEST_c_c (ccosh, 0.0, plus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5744 TEST_c_c (ccosh, minus_zero, plus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5745 TEST_c_c (ccosh, 0.0, minus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5746 TEST_c_c (ccosh, minus_zero, minus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 5747
08198877
JM		 5748 TEST_c_c (ccosh, plus_infty, 0.0, plus_infty, 0.0),
5749 TEST_c_c (ccosh, minus_infty, 0.0, plus_infty, minus_zero),
5750 TEST_c_c (ccosh, plus_infty, minus_zero, plus_infty, minus_zero),
5751 TEST_c_c (ccosh, minus_infty, minus_zero, plus_infty, 0.0),
8847214f 5752
08198877
JM		 5753 TEST_c_c (ccosh, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5754 TEST_c_c (ccosh, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5755 TEST_c_c (ccosh, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5756 TEST_c_c (ccosh, minus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 5757
08198877
JM		 5758 TEST_c_c (ccosh, plus_infty, 4.625, minus_infty, minus_infty),
5759 TEST_c_c (ccosh, minus_infty, 4.625, minus_infty, plus_infty),
5760 TEST_c_c (ccosh, plus_infty, -4.625, minus_infty, plus_infty),
5761 TEST_c_c (ccosh, minus_infty, -4.625, minus_infty, minus_infty),
8847214f 5762
08198877
JM		 5763 TEST_c_c (ccosh, 6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5764 TEST_c_c (ccosh, -6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5765 TEST_c_c (ccosh, 6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5766 TEST_c_c (ccosh, -6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 5767
08198877
JM		 5768 TEST_c_c (ccosh, 0.0, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5769 TEST_c_c (ccosh, minus_zero, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 5770
08198877
JM		 5771 TEST_c_c (ccosh, plus_infty, qnan_value, plus_infty, qnan_value),
5772 TEST_c_c (ccosh, minus_infty, qnan_value, plus_infty, qnan_value),
8847214f 5773
08198877
JM		 5774 TEST_c_c (ccosh, 9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5775 TEST_c_c (ccosh, -9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5776
08198877
JM		 5777 TEST_c_c (ccosh, qnan_value, 0.0, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5778 TEST_c_c (ccosh, qnan_value, minus_zero, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 5779
08198877
JM		 5780 TEST_c_c (ccosh, qnan_value, 10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5781 TEST_c_c (ccosh, qnan_value, -10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5782
08198877
JM		 5783 TEST_c_c (ccosh, qnan_value, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5784 TEST_c_c (ccosh, qnan_value, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5785
08198877 5786 TEST_c_c (ccosh, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 5787
08198877 5788 TEST_c_c (ccosh, 0.75L, 1.25L, 0.408242591877968807788852146397499084L, 0.780365930845853240391326216300863152L),
8847214f 5789
08198877 5790 TEST_c_c (ccosh, -2, -3, -3.72454550491532256547397070325597253L, 0.511822569987384608834463849801875634L),
8847214f 5791
08198877
JM		 5792 TEST_c_c (ccosh, 89.5, 0.75, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
5793 TEST_c_c (ccosh, -89.5, 0.75, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
5794 TEST_c_c (ccosh, 89.5, -0.75, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
5795 TEST_c_c (ccosh, -89.5, -0.75, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
e0b16cc2
JM		 5796
5797#ifndef TEST_FLOAT
08198877
JM		 5798 TEST_c_c (ccosh, 710.5, 0.75, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
5799 TEST_c_c (ccosh, -710.5, 0.75, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
5800 TEST_c_c (ccosh, 710.5, -0.75, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
5801 TEST_c_c (ccosh, -710.5, -0.75, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
e0b16cc2
JM		 5802#endif
5803
5804#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 5805 TEST_c_c (ccosh, 11357.25, 0.75, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
5806 TEST_c_c (ccosh, -11357.25, 0.75, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
5807 TEST_c_c (ccosh, 11357.25, -0.75, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
5808 TEST_c_c (ccosh, -11357.25, -0.75, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
e0b16cc2
JM		 5809#endif
5810
5811#ifdef TEST_FLOAT
08198877 5812 TEST_c_c (ccosh, 180, 0x1p-149, plus_infty, 1.043535896672617552965983803453927655332e33L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5813#endif
5814
5815#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 5816 TEST_c_c (ccosh, 1440, 0x1p-1074, plus_infty, 5.981479269486130556466515778180916082415e301L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5817#endif
5818
5819#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 5820 TEST_c_c (ccosh, 22730, 0x1p-16434L, plus_infty, 1.217853148905605987081057582351152052687e4924L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 5821#endif
5822
08198877
JM		 5823 TEST_c_c (ccosh, min_subnorm_value * 0x1p120, 0x1p-120, 1.0, min_subnorm_value, UNDERFLOW_EXCEPTION),
5824 TEST_c_c (ccosh, 0x1p-120, min_subnorm_value * 0x1p120, 1.0, min_subnorm_value, UNDERFLOW_EXCEPTION),
5825 END_DATA (ccosh)
5826 };
5827
5828static void
5829ccosh_test (void)
5830{
5831 errno = 0;
5832 FUNC(ccosh) (BUILD_COMPLEX (0.7L, 1.2L));
5833 if (errno == ENOSYS)
5834 /* Function not implemented. */
5835 return;
f0302940 5836
08198877
JM		 5837 START (ccosh);
5838 RUN_TEST_LOOP_c_c (ccosh, ccosh_test_data, );
6815fabc 5839 END (ccosh, complex);
8847214f
UD		 5840}
5841
5842
74c57478
JM		 5843static const struct test_f_f_data ceil_test_data[] =
5844 {
5845 START_DATA (ceil),
5846 TEST_f_f (ceil, 0.0, 0.0),
5847 TEST_f_f (ceil, minus_zero, minus_zero),
5848 TEST_f_f (ceil, plus_infty, plus_infty),
5849 TEST_f_f (ceil, minus_infty, minus_infty),
5850 TEST_f_f (ceil, qnan_value, qnan_value),
5851
5852 TEST_f_f (ceil, M_PIl, 4.0),
5853 TEST_f_f (ceil, -M_PIl, -3.0),
5854 TEST_f_f (ceil, 0.1, 1.0),
5855 TEST_f_f (ceil, 0.25, 1.0),
5856 TEST_f_f (ceil, 0.625, 1.0),
5857 TEST_f_f (ceil, -0.1, minus_zero),
5858 TEST_f_f (ceil, -0.25, minus_zero),
5859 TEST_f_f (ceil, -0.625, minus_zero),
8847214f 5860
f964490f 5861#ifdef TEST_LDOUBLE
74c57478
JM		 5862 /* The result can only be represented in long double. */
5863 TEST_f_f (ceil, 4503599627370495.5L, 4503599627370496.0L),
5864 TEST_f_f (ceil, 4503599627370496.25L, 4503599627370497.0L),
5865 TEST_f_f (ceil, 4503599627370496.5L, 4503599627370497.0L),
5866 TEST_f_f (ceil, 4503599627370496.75L, 4503599627370497.0L),
5867 TEST_f_f (ceil, 4503599627370497.5L, 4503599627370498.0L),
5868
5869 TEST_f_f (ceil, -4503599627370495.5L, -4503599627370495.0L),
5870 TEST_f_f (ceil, -4503599627370496.25L, -4503599627370496.0L),
5871 TEST_f_f (ceil, -4503599627370496.5L, -4503599627370496.0L),
5872 TEST_f_f (ceil, -4503599627370496.75L, -4503599627370496.0L),
5873 TEST_f_f (ceil, -4503599627370497.5L, -4503599627370497.0L),
f964490f 5874
5c68d401 5875# if LDBL_MANT_DIG > 100
74c57478
JM		 5876 TEST_f_f (ceil, 4503599627370494.5000000000001L, 4503599627370495.0L),
5877 TEST_f_f (ceil, 4503599627370495.5000000000001L, 4503599627370496.0L),
5878 TEST_f_f (ceil, 4503599627370496.5000000000001L, 4503599627370497.0L),
5879 TEST_f_f (ceil, -4503599627370494.5000000000001L, -4503599627370494.0L),
5880 TEST_f_f (ceil, -4503599627370495.5000000000001L, -4503599627370495.0L),
5881 TEST_f_f (ceil, -4503599627370496.5000000000001L, -4503599627370496.0L),
5c68d401
RM		 5882# endif
5883
74c57478
JM		 5884 TEST_f_f (ceil, 9007199254740991.5L, 9007199254740992.0L),
5885 TEST_f_f (ceil, 9007199254740992.25L, 9007199254740993.0L),
5886 TEST_f_f (ceil, 9007199254740992.5L, 9007199254740993.0L),
5887 TEST_f_f (ceil, 9007199254740992.75L, 9007199254740993.0L),
5888 TEST_f_f (ceil, 9007199254740993.5L, 9007199254740994.0L),
f964490f 5889
74c57478
JM		 5890 TEST_f_f (ceil, -9007199254740991.5L, -9007199254740991.0L),
5891 TEST_f_f (ceil, -9007199254740992.25L, -9007199254740992.0L),
5892 TEST_f_f (ceil, -9007199254740992.5L, -9007199254740992.0L),
5893 TEST_f_f (ceil, -9007199254740992.75L, -9007199254740992.0L),
5894 TEST_f_f (ceil, -9007199254740993.5L, -9007199254740993.0L),
f964490f 5895
5c68d401 5896# if LDBL_MANT_DIG > 100
74c57478
JM		 5897 TEST_f_f (ceil, 9007199254740991.0000000000001L, 9007199254740992.0L),
5898 TEST_f_f (ceil, 9007199254740992.0000000000001L, 9007199254740993.0L),
5899 TEST_f_f (ceil, 9007199254740993.0000000000001L, 9007199254740994.0L),
5900 TEST_f_f (ceil, 9007199254740991.5000000000001L, 9007199254740992.0L),
5901 TEST_f_f (ceil, 9007199254740992.5000000000001L, 9007199254740993.0L),
5902 TEST_f_f (ceil, 9007199254740993.5000000000001L, 9007199254740994.0L),
5903
5904 TEST_f_f (ceil, -9007199254740991.0000000000001L, -9007199254740991.0L),
5905 TEST_f_f (ceil, -9007199254740992.0000000000001L, -9007199254740992.0L),
5906 TEST_f_f (ceil, -9007199254740993.0000000000001L, -9007199254740993.0L),
5907 TEST_f_f (ceil, -9007199254740991.5000000000001L, -9007199254740991.0L),
5908 TEST_f_f (ceil, -9007199254740992.5000000000001L, -9007199254740992.0L),
5909 TEST_f_f (ceil, -9007199254740993.5000000000001L, -9007199254740993.0L),
5c68d401
RM		 5910# endif
5911
74c57478
JM		 5912 TEST_f_f (ceil, 72057594037927935.5L, 72057594037927936.0L),
5913 TEST_f_f (ceil, 72057594037927936.25L, 72057594037927937.0L),
5914 TEST_f_f (ceil, 72057594037927936.5L, 72057594037927937.0L),
5915 TEST_f_f (ceil, 72057594037927936.75L, 72057594037927937.0L),
5916 TEST_f_f (ceil, 72057594037927937.5L, 72057594037927938.0L),
5917
5918 TEST_f_f (ceil, -72057594037927935.5L, -72057594037927935.0L),
5919 TEST_f_f (ceil, -72057594037927936.25L, -72057594037927936.0L),
5920 TEST_f_f (ceil, -72057594037927936.5L, -72057594037927936.0L),
5921 TEST_f_f (ceil, -72057594037927936.75L, -72057594037927936.0L),
5922 TEST_f_f (ceil, -72057594037927937.5L, -72057594037927937.0L),
5923
5924 TEST_f_f (ceil, 10141204801825835211973625643007.5L, 10141204801825835211973625643008.0L),
5925 TEST_f_f (ceil, 10141204801825835211973625643008.25L, 10141204801825835211973625643009.0L),
5926 TEST_f_f (ceil, 10141204801825835211973625643008.5L, 10141204801825835211973625643009.0L),
5927 TEST_f_f (ceil, 10141204801825835211973625643008.75L, 10141204801825835211973625643009.0L),
5928 TEST_f_f (ceil, 10141204801825835211973625643009.5L, 10141204801825835211973625643010.0L),
5929#endif
5930 END_DATA (ceil)
5931 };
f964490f 5932
74c57478
JM		 5933static void
5934ceil_test (void)
5935{
5936 START (ceil);
5937 RUN_TEST_LOOP_f_f (ceil, ceil_test_data, );
8847214f
UD		 5938 END (ceil);
5939}
5940
5941
08198877
JM		 5942static const struct test_c_c_data cexp_test_data[] =
5943 {
5944 START_DATA (cexp),
5945 TEST_c_c (cexp, plus_zero, plus_zero, 1, 0.0),
5946 TEST_c_c (cexp, minus_zero, plus_zero, 1, 0.0),
5947 TEST_c_c (cexp, plus_zero, minus_zero, 1, minus_zero),
5948 TEST_c_c (cexp, minus_zero, minus_zero, 1, minus_zero),
8847214f 5949
08198877
JM		 5950 TEST_c_c (cexp, plus_infty, plus_zero, plus_infty, 0.0),
5951 TEST_c_c (cexp, plus_infty, minus_zero, plus_infty, minus_zero),
8847214f 5952
08198877
JM		 5953 TEST_c_c (cexp, minus_infty, plus_zero, 0.0, 0.0),
5954 TEST_c_c (cexp, minus_infty, minus_zero, 0.0, minus_zero),
8847214f 5955
08198877
JM		 5956 TEST_c_c (cexp, 0.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5957 TEST_c_c (cexp, minus_zero, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 5958
08198877
JM		 5959 TEST_c_c (cexp, 0.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5960 TEST_c_c (cexp, minus_zero, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 5961
08198877
JM		 5962 TEST_c_c (cexp, 100.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5963 TEST_c_c (cexp, -100.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 5964
08198877
JM		 5965 TEST_c_c (cexp, 100.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5966 TEST_c_c (cexp, -100.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 5967
08198877
JM		 5968 TEST_c_c (cexp, minus_infty, 2.0, minus_zero, 0.0),
5969 TEST_c_c (cexp, minus_infty, 4.0, minus_zero, minus_zero),
5970 TEST_c_c (cexp, plus_infty, 2.0, minus_infty, plus_infty),
5971 TEST_c_c (cexp, plus_infty, 4.0, minus_infty, minus_infty),
8847214f 5972
08198877
JM		 5973 TEST_c_c (cexp, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5974 TEST_c_c (cexp, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 5975
08198877
JM		 5976 TEST_c_c (cexp, minus_infty, plus_infty, 0.0, 0.0, IGNORE_ZERO_INF_SIGN),
5977 TEST_c_c (cexp, minus_infty, minus_infty, 0.0, minus_zero, IGNORE_ZERO_INF_SIGN),
8847214f 5978
08198877 5979 TEST_c_c (cexp, minus_infty, qnan_value, 0, 0, IGNORE_ZERO_INF_SIGN),
8847214f 5980
08198877 5981 TEST_c_c (cexp, plus_infty, qnan_value, plus_infty, qnan_value),
8847214f 5982
08198877
JM		 5983 TEST_c_c (cexp, qnan_value, 0.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5984 TEST_c_c (cexp, qnan_value, 1.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5985
08198877
JM		 5986 TEST_c_c (cexp, qnan_value, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5987 TEST_c_c (cexp, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5988 TEST_c_c (cexp, 1, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5989 TEST_c_c (cexp, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 5990
08198877
JM		 5991 TEST_c_c (cexp, 0.75L, 1.25L, 0.667537446429131586942201977015932112L, 2.00900045494094876258347228145863909L),
5992 TEST_c_c (cexp, -2.0, -3.0, -0.13398091492954261346140525546115575L, -0.019098516261135196432576240858800925L),
8847214f 5993
08198877
JM		 5994 TEST_c_c (cexp, 0, 0x1p65, 0.99888622066058013610642172179340364209972L, -0.047183876212354673805106149805700013943218L),
5995 TEST_c_c (cexp, 0, -0x1p65, 0.99888622066058013610642172179340364209972L, 0.047183876212354673805106149805700013943218L),
5996 TEST_c_c (cexp, 50, 0x1p127, 4.053997150228616856622417636046265337193e21L, 3.232070315463388524466674772633810238819e21L),
1a4ac776
JM		 5997
5998#ifndef TEST_FLOAT
08198877
JM		 5999 TEST_c_c (cexp, 0, 1e22, 0.5232147853951389454975944733847094921409L, -0.8522008497671888017727058937530293682618L),
6000 TEST_c_c (cexp, 0, 0x1p1023, -0.826369834614147994500785680811743734805L, 0.5631277798508840134529434079444683477104L),
6001 TEST_c_c (cexp, 500, 0x1p1023, -1.159886268932754433233243794561351783426e217L, 7.904017694554466595359379965081774849708e216L),
1a4ac776
JM		 6002#endif
6003
6004#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6005 TEST_c_c (cexp, 0, 0x1p16383L, 0.9210843909921906206874509522505756251609L, 0.3893629985894208126948115852610595405563L),
6006 TEST_c_c (cexp, -10000, 0x1p16383L, 1.045876464564882298442774542991176546722e-4343L, 4.421154026488516836023811173959413420548e-4344L),
1a4ac776
JM		 6007#endif
6008
08198877
JM		 6009 TEST_c_c (cexp, 88.75, 0.75, 2.558360358486542817001900410314204322891e38L, 2.383359453227311447654736314679677655100e38L),
6010 TEST_c_c (cexp, -95, 0.75, 4.039714446238306526889476684000081624047e-42L, 3.763383677300535390271646960780570275931e-42L, UNDERFLOW_EXCEPTION_FLOAT),
7c69cd14
JM		 6011
6012#ifndef TEST_FLOAT
08198877
JM		 6013 TEST_c_c (cexp, 709.8125, 0.75, 1.355121963080879535248452862759108365762e308L, 1.262426823598609432507811340856186873507e308L),
6014 TEST_c_c (cexp, -720, 0.75, 1.486960657116368433685753325516638551722e-313L, 1.385247284245720590980701226843815229385e-313L, UNDERFLOW_EXCEPTION_DOUBLE),
7c69cd14
JM		 6015#endif
6016
6017#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6018 TEST_c_c (cexp, 11356.5625, 0.75, 9.052188470850960144814815984311663764287e4931L, 8.432986734191301036267148978260970230200e4931L),
6019 TEST_c_c (cexp, -11370, 0.75, 8.631121063182211587489310508568170739592e-4939L, 8.040721827809267291427062346918413482824e-4939L, UNDERFLOW_EXCEPTION),
7c69cd14
JM		 6020#endif
6021
6022#ifdef TEST_FLOAT
08198877 6023 TEST_c_c (cexp, 180, 0x1p-149, plus_infty, 2.087071793345235105931967606907855310664e33L, OVERFLOW_EXCEPTION),
7c69cd14
JM		 6024#endif
6025
6026#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 6027 TEST_c_c (cexp, 1440, 0x1p-1074, plus_infty, 1.196295853897226111293303155636183216483e302L, OVERFLOW_EXCEPTION),
7c69cd14
JM		 6028#endif
6029
6030#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 6031 TEST_c_c (cexp, 22730, 0x1p-16434L, plus_infty, 2.435706297811211974162115164702304105374e4924L, OVERFLOW_EXCEPTION),
7c69cd14
JM		 6032#endif
6033
08198877
JM		 6034 TEST_c_c (cexp, 1e6, 0, plus_infty, 0, OVERFLOW_EXCEPTION),
6035 TEST_c_c (cexp, 1e6, min_value, plus_infty, plus_infty, OVERFLOW_EXCEPTION),
6036 TEST_c_c (cexp, 1e6, -min_value, plus_infty, minus_infty, OVERFLOW_EXCEPTION),
7c69cd14 6037
08198877
JM		 6038 TEST_c_c (cexp, min_value, min_subnorm_value, 1.0, min_subnorm_value, UNDERFLOW_EXCEPTION),
6039 TEST_c_c (cexp, min_value, -min_subnorm_value, 1.0, -min_subnorm_value, UNDERFLOW_EXCEPTION),
6040 END_DATA (cexp)
6041 };
6042
6043static void
6044cexp_test (void)
6045{
6046 errno = 0;
6047 FUNC(cexp) (BUILD_COMPLEX (0, 0));
6048 if (errno == ENOSYS)
6049 /* Function not implemented. */
6050 return;
05e166c8 6051
08198877
JM		 6052 START (cexp);
6053 RUN_TEST_LOOP_c_c (cexp, cexp_test_data, );
6815fabc 6054 END (cexp, complex);
8847214f
UD		 6055}
6056
2550dfe9 6057
0cdc8e6f
UD		 6058static void
6059cimag_test (void)
6060{
6061 START (cimag);
6062 TEST_c_f (cimag, 1.0, 0.0, 0.0);
6063 TEST_c_f (cimag, 1.0, minus_zero, minus_zero);
67e971f1
TS		 6064 TEST_c_f (cimag, 1.0, qnan_value, qnan_value);
6065 TEST_c_f (cimag, qnan_value, qnan_value, qnan_value);
0cdc8e6f
UD		 6066 TEST_c_f (cimag, 1.0, plus_infty, plus_infty);
6067 TEST_c_f (cimag, 1.0, minus_infty, minus_infty);
6068 TEST_c_f (cimag, 2.0, 3.0, 3.0);
6069
6070 END (cimag);
6071}
6072
08198877
JM		 6073static const struct test_c_c_data clog_test_data[] =
6074 {
6075 START_DATA (clog),
6076 TEST_c_c (clog, minus_zero, 0, minus_infty, M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
6077 TEST_c_c (clog, minus_zero, minus_zero, minus_infty, -M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6078
08198877
JM		 6079 TEST_c_c (clog, 0, 0, minus_infty, 0.0, DIVIDE_BY_ZERO_EXCEPTION),
6080 TEST_c_c (clog, 0, minus_zero, minus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6081
08198877
JM		 6082 TEST_c_c (clog, minus_infty, plus_infty, plus_infty, M_PI_34l),
6083 TEST_c_c (clog, minus_infty, minus_infty, plus_infty, -M_PI_34l),
8847214f 6084
08198877
JM		 6085 TEST_c_c (clog, plus_infty, plus_infty, plus_infty, M_PI_4l),
6086 TEST_c_c (clog, plus_infty, minus_infty, plus_infty, -M_PI_4l),
8847214f 6087
08198877
JM		 6088 TEST_c_c (clog, 0, plus_infty, plus_infty, M_PI_2l),
6089 TEST_c_c (clog, 3, plus_infty, plus_infty, M_PI_2l),
6090 TEST_c_c (clog, minus_zero, plus_infty, plus_infty, M_PI_2l),
6091 TEST_c_c (clog, -3, plus_infty, plus_infty, M_PI_2l),
6092 TEST_c_c (clog, 0, minus_infty, plus_infty, -M_PI_2l),
6093 TEST_c_c (clog, 3, minus_infty, plus_infty, -M_PI_2l),
6094 TEST_c_c (clog, minus_zero, minus_infty, plus_infty, -M_PI_2l),
6095 TEST_c_c (clog, -3, minus_infty, plus_infty, -M_PI_2l),
8847214f 6096
08198877
JM		 6097 TEST_c_c (clog, minus_infty, 0, plus_infty, M_PIl),
6098 TEST_c_c (clog, minus_infty, 1, plus_infty, M_PIl),
6099 TEST_c_c (clog, minus_infty, minus_zero, plus_infty, -M_PIl),
6100 TEST_c_c (clog, minus_infty, -1, plus_infty, -M_PIl),
8847214f 6101
08198877
JM		 6102 TEST_c_c (clog, plus_infty, 0, plus_infty, 0.0),
6103 TEST_c_c (clog, plus_infty, 1, plus_infty, 0.0),
6104 TEST_c_c (clog, plus_infty, minus_zero, plus_infty, minus_zero),
6105 TEST_c_c (clog, plus_infty, -1, plus_infty, minus_zero),
8847214f 6106
08198877
JM		 6107 TEST_c_c (clog, plus_infty, qnan_value, plus_infty, qnan_value),
6108 TEST_c_c (clog, minus_infty, qnan_value, plus_infty, qnan_value),
8847214f 6109
08198877
JM		 6110 TEST_c_c (clog, qnan_value, plus_infty, plus_infty, qnan_value),
6111 TEST_c_c (clog, qnan_value, minus_infty, plus_infty, qnan_value),
8847214f 6112
08198877
JM		 6113 TEST_c_c (clog, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6114 TEST_c_c (clog, 3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6115 TEST_c_c (clog, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6116 TEST_c_c (clog, -3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6117
08198877
JM		 6118 TEST_c_c (clog, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6119 TEST_c_c (clog, qnan_value, 5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6120 TEST_c_c (clog, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6121 TEST_c_c (clog, qnan_value, -5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6122
08198877 6123 TEST_c_c (clog, qnan_value, qnan_value, qnan_value, qnan_value),
2550dfe9 6124
08198877
JM		 6125 TEST_c_c (clog, 0.75L, 1.25L, 0.376885901188190075998919126749298416L, 1.03037682652431246378774332703115153L),
6126 TEST_c_c (clog, -2, -3, 1.2824746787307683680267437207826593L, -2.1587989303424641704769327722648368L),
8847214f 6127
08198877
JM		 6128 TEST_c_c (clog, 0x1.fffffep+127L, 0x1.fffffep+127L, 89.06941264234832570836679262104313101776L, M_PI_4l),
6129 TEST_c_c (clog, 0x1.fffffep+127L, 1.0L, 88.72283905206835305365817656031404273372L, 2.938736052218037251011746307725933020145e-39L, UNDERFLOW_EXCEPTION_FLOAT),
6130 TEST_c_c (clog, 0x1p-149L, 0x1p-149L, -102.9323563131518784484589700365392203592L, M_PI_4l),
6131 TEST_c_c (clog, 0x1p-147L, 0x1p-147L, -101.5460619520319878296245057936228672231L, M_PI_4l),
1897ad44
JM		 6132
6133#ifndef TEST_FLOAT
08198877
JM		 6134 TEST_c_c (clog, 0x1.fffffffffffffp+1023L, 0x1.fffffffffffffp+1023L, 710.1292864836639693869320059713862337880L, M_PI_4l),
6135 TEST_c_c (clog, 0x1.fffffffffffffp+1023L, 0x1p+1023L, 709.8942846690411016323109979483151967689L, 0.4636476090008061606231772164674799632783L),
6136 TEST_c_c (clog, 0x1p-1074L, 0x1p-1074L, -744.0934983311012896593986823853525458290L, M_PI_4l),
6137 TEST_c_c (clog, 0x1p-1073L, 0x1p-1073L, -743.4003511505413443499814502638943692610L, M_PI_4l),
1897ad44
JM		 6138#endif
6139
6140#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6141 TEST_c_c (clog, 0x1.fp+16383L, 0x1.fp+16383L, 11356.83823118610934184548269774874545400L, M_PI_4l),
6142 TEST_c_c (clog, 0x1.fp+16383L, 0x1p+16383L, 11356.60974243783798653123798337822335902L, 0.4764674194737066993385333770295162295856L),
6143 TEST_c_c (clog, 0x1p-16440L, 0x1p-16441L, -11395.22807662984378194141292922726786191L, 0.4636476090008061162142562314612144020285L),
1897ad44
JM		 6144#endif
6145
08198877
JM		 6146 TEST_c_c (clog, 0x1p-149L, 0x1.fp+127L, 88.69109041335841930424871526389807508374L, M_PI_2l),
6147 TEST_c_c (clog, -0x1p-149L, 0x1.fp+127L, 88.69109041335841930424871526389807508374L, M_PI_2l),
6148 TEST_c_c (clog, 0x1p-149L, -0x1.fp+127L, 88.69109041335841930424871526389807508374L, -M_PI_2l),
6149 TEST_c_c (clog, -0x1p-149L, -0x1.fp+127L, 88.69109041335841930424871526389807508374L, -M_PI_2l),
6150 TEST_c_c (clog, -0x1.fp+127L, 0x1p-149L, 88.69109041335841930424871526389807508374L, M_PIl),
6151 TEST_c_c (clog, -0x1.fp+127L, -0x1p-149L, 88.69109041335841930424871526389807508374L, -M_PIl),
638a572e 6152#ifdef TEST_FLOAT
08198877
JM		 6153 TEST_c_c (clog, 0x1.fp+127L, 0x1p-149L, 88.69109041335841930424871526389807508374L, plus_zero, UNDERFLOW_EXCEPTION),
6154 TEST_c_c (clog, 0x1.fp+127L, -0x1p-149L, 88.69109041335841930424871526389807508374L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6155#endif
6156
6157#ifndef TEST_FLOAT
08198877
JM		 6158 TEST_c_c (clog, 0x1p-1074L, 0x1.fp+1023L, 709.7509641950694165420886960904242800794L, M_PI_2l),
6159 TEST_c_c (clog, -0x1p-1074L, 0x1.fp+1023L, 709.7509641950694165420886960904242800794L, M_PI_2l),
6160 TEST_c_c (clog, 0x1p-1074L, -0x1.fp+1023L, 709.7509641950694165420886960904242800794L, -M_PI_2l),
6161 TEST_c_c (clog, -0x1p-1074L, -0x1.fp+1023L, 709.7509641950694165420886960904242800794L, -M_PI_2l),
6162 TEST_c_c (clog, -0x1.fp+1023L, 0x1p-1074L, 709.7509641950694165420886960904242800794L, M_PIl),
6163 TEST_c_c (clog, -0x1.fp+1023L, -0x1p-1074L, 709.7509641950694165420886960904242800794L, -M_PIl),
638a572e
JM		 6164#endif
6165#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877
JM		 6166 TEST_c_c (clog, 0x1.fp+1023L, 0x1p-1074L, 709.7509641950694165420886960904242800794L, plus_zero, UNDERFLOW_EXCEPTION),
6167 TEST_c_c (clog, 0x1.fp+1023L, -0x1p-1074L, 709.7509641950694165420886960904242800794L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6168#endif
6169
6170#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6171 TEST_c_c (clog, 0x1p-16445L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6172 TEST_c_c (clog, -0x1p-16445L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6173 TEST_c_c (clog, 0x1p-16445L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6174 TEST_c_c (clog, -0x1p-16445L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6175 TEST_c_c (clog, -0x1.fp+16383L, 0x1p-16445L, 11356.49165759582936919077408168801636572L, M_PIl),
6176 TEST_c_c (clog, -0x1.fp+16383L, -0x1p-16445L, 11356.49165759582936919077408168801636572L, -M_PIl),
6177 TEST_c_c (clog, 0x1.fp+16383L, 0x1p-16445L, 11356.49165759582936919077408168801636572L, plus_zero, UNDERFLOW_EXCEPTION),
6178 TEST_c_c (clog, 0x1.fp+16383L, -0x1p-16445L, 11356.49165759582936919077408168801636572L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e 6179# if LDBL_MANT_DIG >= 113
08198877
JM		 6180 TEST_c_c (clog, 0x1p-16494L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6181 TEST_c_c (clog, -0x1p-16494L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6182 TEST_c_c (clog, 0x1p-16494L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6183 TEST_c_c (clog, -0x1p-16494L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6184 TEST_c_c (clog, -0x1.fp+16383L, 0x1p-16494L, 11356.49165759582936919077408168801636572L, M_PIl),
6185 TEST_c_c (clog, -0x1.fp+16383L, -0x1p-16494L, 11356.49165759582936919077408168801636572L, -M_PIl),
6186 TEST_c_c (clog, 0x1.fp+16383L, 0x1p-16494L, 11356.49165759582936919077408168801636572L, plus_zero, UNDERFLOW_EXCEPTION),
6187 TEST_c_c (clog, 0x1.fp+16383L, -0x1p-16494L, 11356.49165759582936919077408168801636572L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6188# endif
6189#endif
6190
08198877
JM		 6191 TEST_c_c (clog, 1.0L, 0x1.234566p-10L, 6.172834701221959432440126967147726538097e-7L, 1.111110564353742042376451655136933182201e-3L),
6192 TEST_c_c (clog, -1.0L, 0x1.234566p-20L, 5.886877547844618300918562490463748605537e-13L, 3.141591568520436206990380699322226378452L),
6193 TEST_c_c (clog, 0x1.234566p-30L, 1.0L, 5.614163921211322622623353961365728040115e-19L, 1.570796325735258575254858696548386439740L),
6194 TEST_c_c (clog, -0x1.234566p-40L, -1.0L, 5.354083939753840089583620652120903838944e-25L, -1.570796326795931422008642456283782656359L),
6195 TEST_c_c (clog, 0x1.234566p-50L, 1.0L, 5.106052341226425256332038420428899201070e-31L, 1.570796326794895608681734464330528755366L),
6196 TEST_c_c (clog, 0x1.234566p-60L, 1.0L, 4.869510976053643471080816669875627875933e-37L, 1.570796326794896618244456860363082279319L),
6197 TEST_c_c (clog, 0x1p-62L, 1.0L, 2.350988701644575015937473074444491355582e-38L, 1.570796326794896619014481257142650555297L),
6198 TEST_c_c (clog, 0x1p-63L, 1.0L, 5.877471754111437539843682686111228389059e-39L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
6199 TEST_c_c (clog, 0x1p-64L, 1.0L, 1.469367938527859384960920671527807097271e-39L, 1.570796326794896619177111583015476220398L, UNDERFLOW_EXCEPTION_FLOAT),
da865e95 6200#ifndef TEST_FLOAT
08198877
JM		 6201 TEST_c_c (clog, 0x1p-510L, 1.0L, 4.450147717014402766180465434664808128438e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
6202 TEST_c_c (clog, 0x1p-511L, 1.0L, 1.112536929253600691545116358666202032110e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
6203 TEST_c_c (clog, 0x1p-512L, 1.0L, 2.781342323134001728862790896665505080274e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
da865e95
JM		 6204#endif
6205#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6206 TEST_c_c (clog, 0x1p-8190L, 1.0L, 6.724206286224187012525355634643505205196e-4932L, 1.570796326794896619231321691639751442099L),
6207 TEST_c_c (clog, 0x1p-8191L, 1.0L, 1.681051571556046753131338908660876301299e-4932L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
6208 TEST_c_c (clog, 0x1p-8192L, 1.0L, 4.202628928890116882828347271652190753248e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
da865e95
JM		 6209#endif
6210
08198877
JM		 6211 TEST_c_c (clog, 0x1.000566p0L, 0x1.234p-10L, 8.298731898331237038231468223024422855654e-5L, 1.110938609507128729312743251313024793990e-3L),
6212 TEST_c_c (clog, 0x1.000566p0L, 0x1.234p-100L, 8.237022655933121125560939513260027133767e-5L, 8.974094312218060110948251664314290484113e-31L),
d0419dbf 6213#ifndef TEST_FLOAT
08198877
JM		 6214 TEST_c_c (clog, -0x1.0000000123456p0L, 0x1.2345678p-30L, 2.649094282537168795982991778475646793277e-10L, 3.141592652530155111500161671113150737892L),
6215 TEST_c_c (clog, -0x1.0000000123456p0L, 0x1.2345678p-1000L, 2.649094276923003995420209214900915462737e-10L, 3.141592653589793238462643383279502884197L),
d0419dbf
JM		 6216#endif
6217#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 6218 TEST_c_c (clog, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-60L, 9.868649107778739757272772275265050767867e-19L, 9.868649106423871142816660980898339912137e-19L),
6219 TEST_c_c (clog, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-1000L, 9.868649107778739752403260515979017248596e-19L, 1.061846605795612822522063052130030717368e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d0419dbf
JM		 6220#endif
6221
08198877 6222 TEST_c_c (clog, 0x0.ffffffp0L, 0x0.ffffffp-100L, -5.960464655174753498633255797994360530379e-8L, 7.888609052210118054117285652827862296732e-31L),
d032e0d2 6223#ifndef TEST_FLOAT
08198877 6224 TEST_c_c (clog, 0x0.fffffffffffff8p0L, 0x0.fffffffffffff8p-1000L, -1.110223024625156602053389888482372171810e-16L, 9.332636185032188789900895447238171696171e-302L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d032e0d2
JM		 6225#endif
6226#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 6227 TEST_c_c (clog, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp-15000L, -5.421010862427522170184200798202494495630e-20L, 3.548665303440282824232502561095699343814e-4516L),
6228#endif
6229
6230 TEST_c_c (clog, 0x1a6p-10L, 0x3a5p-10L, -1.4305135209763571252847059962654228661815e-06L, 1.1460277178115757370775644871674016684074L),
6231 TEST_c_c (clog, 0xf2p-10L, 0x3e3p-10L, 6.1988446308070710970664736815277450078106e-06L, 1.3322126499153926210226335249558203898460L),
6232 TEST_c_c (clog, 0x4d4ep-15L, 0x6605p-15L, -1.6298145321400412054744424587143483169412e-08L, 0.9223574537155056772124552172295398141249L),
6233 TEST_c_c (clog, 0x2818p-15L, 0x798fp-15L, 1.5366822245016167178749091974664853785194e-08L, 1.2522014929038946066987318471922169174157L),
6234 TEST_c_c (clog, 0x9b57bp-20L, 0xcb7b4p-20L, -3.9563019528687610863490232935890272740908e-11L, 0.9187593477446338910857133065497364950682L),
6235 TEST_c_c (clog, 0x2731p-20L, 0xfffd0p-20L, 4.4110493034041283943115971658295280288115e-11L, 1.5612279663766352262688735061954290528838L),
6236 TEST_c_c (clog, 0x2ede88p-23L, 0x771c3fp-23L, -4.4764192352906350039050902870893173560494e-13L, 1.1959106857549200806818600493552847793381L),
6237 TEST_c_c (clog, 0x11682p-23L, 0x7ffed1p-23L, 1.1723955140027907954461000991619077811832e-12L, 1.5622968405332756349813737986164832897108L),
6238 TEST_c_c (clog, 0xa1f2c1p-24L, 0xc643aep-24L, -1.0480505352462576151523512837107080269981e-13L, 0.8858771987699967480545613322309315260313L),
6239 TEST_c_c (clog, 0x659feap-24L, 0xeaf6f9p-24L, 3.7303493627403868207597214252239749960738e-14L, 1.1625816408046866464773042283673653469061L),
d032e0d2 6240#ifndef TEST_FLOAT
08198877
JM		 6241 TEST_c_c (clog, 0x4447d7175p-35L, 0x6c445e00ap-35L, -1.4823076576950255933915367361099865652625e-20L, 1.0081311552703893116404606212158840190615L),
6242 TEST_c_c (clog, 0x2dd46725bp-35L, 0x7783a1284p-35L, 4.4469229730850767799109418892826021157328e-20L, 1.2046235979300843056806465045930070146351L),
6243 TEST_c_c (clog, 0x164c74eea876p-45L, 0x16f393482f77p-45L, -3.0292258760486853327810377824479932031744e-26L, 0.7998237934177411746093524982030330293980L),
6244 TEST_c_c (clog, 0xfe961079616p-45L, 0x1bc37e09e6d1p-45L, 5.3718272201930019901317065495843842735179e-26L, 1.0503831592447830576186444373011142397404L),
6245 TEST_c_c (clog, 0xa4722f19346cp-51L, 0x7f9631c5e7f07p-51L, -6.2122796286154679676173624516405339768606e-30L, 1.4904138780720095276446375492434049214172L),
6246 TEST_c_c (clog, 0x10673dd0f2481p-51L, 0x7ef1d17cefbd2p-51L, 3.2047474274603604594851472963586149973093e-29L, 1.4422922682185099608731642353544207976604L),
6247 TEST_c_c (clog, 0x8ecbf810c4ae6p-52L, 0xd479468b09a37p-52L, -9.7375017988218644730510244778042114638107e-30L, 0.9790637929494922564724108399524154766631L),
6248 TEST_c_c (clog, 0x5b06b680ea2ccp-52L, 0xef452b965da9fp-52L, 8.3076914081087805757422664530653247447136e-30L, 1.2072712126771536614482822173033535043206L),
6249 TEST_c_c (clog, 0x659b70ab7971bp-53L, 0x1f5d111e08abecp-53L, -2.5083311595699359750201056724289010648701e-30L, 1.3710185432462268491534742969536240564640L),
6250 TEST_c_c (clog, 0x15cfbd1990d1ffp-53L, 0x176a3973e09a9ap-53L, 1.0168910106364605304135563536838075568606e-30L, 0.8208373755522359859870890246475340086663L),
6251 TEST_c_c (clog, 0x1367a310575591p-54L, 0x3cfcc0a0541f60p-54L, 5.0844550531823026520677817684239496041087e-32L, 1.2627468605458094918919206628466016525397L),
6252 TEST_c_c (clog, 0x55cb6d0c83af5p-55L, 0x7fe33c0c7c4e90p-55L, -5.2000108498455368032511404449795741611813e-32L, 1.5288921536982513453421343495466824420259L),
d032e0d2
JM		 6253#endif
6254#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 6255 TEST_c_c (clog, 0x298c62cb546588a7p-63L, 0x7911b1dfcc4ecdaep-63L, -1.1931267660846218205882675852805793644095e-36L, 1.2402109774337032400594953899784058127412L),
6256 TEST_c_c (clog, 0x4d9c37e2b5cb4533p-63L, 0x65c98be2385a042ep-63L, 6.4064442119814669184296141278612389400075e-37L, 0.9193591364645830864185131402313014890145L),
6257 TEST_c_c (clog, 0x602fd5037c4792efp-64L, 0xed3e2086dcca80b8p-64L, -2.3362950222592964220878638677292132852104e-37L, 1.1856121127236268105413184264288408265852L),
6258 TEST_c_c (clog, 0x6b10b4f3520217b6p-64L, 0xe8893cbb449253a1p-64L, 2.4244570985709679851855191080208817099132e-37L, 1.1393074519572050614551047548718495655972L),
6259 TEST_c_c (clog, 0x81b7efa81fc35ad1p-65L, 0x1ef4b835f1c79d812p-65L, -9.9182335850630508484862145328126979066934e-39L, 1.3146479888794807046338799047003947008804L),
d032e0d2
JM		 6260#endif
6261#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 6262 TEST_c_c (clog, 0x3f96469050f650869c2p-75L, 0x6f16b2c9c8b05988335p-75L, -1.0509738482436128031927971874674370984602e-45L, 1.0509191467640012308402149909370784281448L),
6263 TEST_c_c (clog, 0x3157fc1d73233e580c8p-75L, 0x761b52ccd435d7c7f5fp-75L, 1.3487497719126364307640897239165442763573e-43L, 1.1750493008528425228929764149024375035382L),
6264 TEST_c_c (clog, 0x155f8afc4c48685bf63610p-85L, 0x17d0cf2652cdbeb1294e19p-85L, -4.7775669192897997174762089350332738583822e-50L, 0.8393953487996880419413728440067635213372L),
6265 TEST_c_c (clog, 0x13836d58a13448d750b4b9p-85L, 0x195ca7bc3ab4f9161edbe6p-85L, 2.8398125044729578740243199963484494962411e-50L, 0.9149964976334130461795060758257083099706L),
6266 TEST_c_c (clog, 0x1df515eb171a808b9e400266p-95L, 0x7c71eb0cd4688dfe98581c77p-95L, -3.5048022044913950094635368750889659723004e-57L, 1.3345633256521815205858155673950177421079L),
6267 TEST_c_c (clog, 0xe33f66c9542ca25cc43c867p-95L, 0x7f35a68ebd3704a43c465864p-95L, 4.1101771307217268747345114262406964584250e-56L, 1.4596065864518742494094402406719567059585L),
6268 TEST_c_c (clog, 0x6771f22c64ed551b857c128b4cp-105L, 0x1f570e7a13cc3cf2f44fd793ea1p-105L, -1.4281333889622737316199756373421183559948e-62L, 1.3673546561165378090903506783353927980633L),
6269 TEST_c_c (clog, 0x15d8ab6ed05ca514086ac3a1e84p-105L, 0x1761e480aa094c0b10b34b09ce9p-105L, 1.0027319539522347477331743836657426754857e-62L, 0.8193464073721167323313606647411269414759L),
6270 TEST_c_c (clog, 0x187190c1a334497bdbde5a95f48p-106L, 0x3b25f08062d0a095c4cfbbc338dp-106L, -1.7471844652198029695350765775994001163767e-63L, 1.1789110097072986038243729592318526094314L),
6271 TEST_c_c (clog, 0x6241ef0da53f539f02fad67dabp-106L, 0x3fb46641182f7efd9caa769dac0p-106L, 4.3299788920664682288477984749202524623248e-63L, 1.4746938237585656250866370987773473745867L),
d032e0d2
JM		 6272#endif
6273#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 6274 TEST_c_c (clog, 0x3e1d0a105ac4ebeacd9c6952d34cp-112L, 0xf859b3d1b06d005dcbb5516d5479p-112L, -1.1683999374665377365054966073875064467108e-66L, 1.3257197596350832748781065387304444940172L),
6275 TEST_c_c (clog, 0x47017a2e36807acb1e5214b209dep-112L, 0xf5f4a550c9d75e3bb1839d865f0dp-112L, 1.5077923002544367932999503838191154621839e-65L, 1.2897445708311412721399861948957141824914L),
6276 TEST_c_c (clog, 0x148f818cb7a9258fca942ade2a0cap-113L, 0x18854a34780b8333ec53310ad7001p-113L, -7.1865869169568789348552370692485515571497e-67L, 0.8730167479365994646287897223471819363668L),
6277 TEST_c_c (clog, 0xfd95243681c055c2632286921092p-113L, 0x1bccabcd29ca2152860ec29e34ef7p-113L, 6.6255694866654064502633121109394710807528e-66L, 1.0526409614996288387567810726095850312049L),
6278 TEST_c_c (clog, 0xdb85c467ee2aadd5f425fe0f4b8dp-114L, 0x3e83162a0f95f1dcbf97dddf410eap-114L, 4.6017338806965821566734340588575402712716e-67L, 1.3547418904611758959096647942223384691728L),
6279 TEST_c_c (clog, 0x1415bcaf2105940d49a636e98ae59p-115L, 0x7e6a150adfcd1b0921d44b31f40f4p-115L, 2.5993421227864195179698176012564317527271e-67L, 1.4132318089683022770487383611430906982461L),
6280#endif
6281 END_DATA (clog)
6282 };
8847214f
UD		 6283
6284static void
08198877 6285clog_test (void)
8847214f 6286{
aaca11d8 6287 errno = 0;
08198877 6288 FUNC(clog) (BUILD_COMPLEX (-2, -3));
aaca11d8
UD		 6289 if (errno == ENOSYS)
6290 /* Function not implemented. */
6291 return;
6292
08198877
JM		 6293 START (clog);
6294 RUN_TEST_LOOP_c_c (clog, clog_test_data, );
6295 END (clog, complex);
6296}
6297
8847214f 6298
08198877
JM		 6299static const struct test_c_c_data clog10_test_data[] =
6300 {
6301 START_DATA (clog10),
6302 TEST_c_c (clog10, minus_zero, 0, minus_infty, M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
6303 TEST_c_c (clog10, minus_zero, minus_zero, minus_infty, -M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6304
08198877
JM		 6305 TEST_c_c (clog10, 0, 0, minus_infty, 0.0, DIVIDE_BY_ZERO_EXCEPTION),
6306 TEST_c_c (clog10, 0, minus_zero, minus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6307
08198877 6308 TEST_c_c (clog10, minus_infty, plus_infty, plus_infty, M_PI_34_LOG10El),
8847214f 6309
08198877
JM		 6310 TEST_c_c (clog10, plus_infty, plus_infty, plus_infty, M_PI4_LOG10El),
6311 TEST_c_c (clog10, plus_infty, minus_infty, plus_infty, -M_PI4_LOG10El),
8847214f 6312
08198877
JM		 6313 TEST_c_c (clog10, 0, plus_infty, plus_infty, M_PI2_LOG10El),
6314 TEST_c_c (clog10, 3, plus_infty, plus_infty, M_PI2_LOG10El),
6315 TEST_c_c (clog10, minus_zero, plus_infty, plus_infty, M_PI2_LOG10El),
6316 TEST_c_c (clog10, -3, plus_infty, plus_infty, M_PI2_LOG10El),
6317 TEST_c_c (clog10, 0, minus_infty, plus_infty, -M_PI2_LOG10El),
6318 TEST_c_c (clog10, 3, minus_infty, plus_infty, -M_PI2_LOG10El),
6319 TEST_c_c (clog10, minus_zero, minus_infty, plus_infty, -M_PI2_LOG10El),
6320 TEST_c_c (clog10, -3, minus_infty, plus_infty, -M_PI2_LOG10El),
8847214f 6321
08198877
JM		 6322 TEST_c_c (clog10, minus_infty, 0, plus_infty, M_PI_LOG10El),
6323 TEST_c_c (clog10, minus_infty, 1, plus_infty, M_PI_LOG10El),
6324 TEST_c_c (clog10, minus_infty, minus_zero, plus_infty, -M_PI_LOG10El),
6325 TEST_c_c (clog10, minus_infty, -1, plus_infty, -M_PI_LOG10El),
8847214f 6326
08198877
JM		 6327 TEST_c_c (clog10, plus_infty, 0, plus_infty, 0.0),
6328 TEST_c_c (clog10, plus_infty, 1, plus_infty, 0.0),
6329 TEST_c_c (clog10, plus_infty, minus_zero, plus_infty, minus_zero),
6330 TEST_c_c (clog10, plus_infty, -1, plus_infty, minus_zero),
8847214f 6331
08198877
JM		 6332 TEST_c_c (clog10, plus_infty, qnan_value, plus_infty, qnan_value),
6333 TEST_c_c (clog10, minus_infty, qnan_value, plus_infty, qnan_value),
8847214f 6334
08198877
JM		 6335 TEST_c_c (clog10, qnan_value, plus_infty, plus_infty, qnan_value),
6336 TEST_c_c (clog10, qnan_value, minus_infty, plus_infty, qnan_value),
8847214f 6337
08198877
JM		 6338 TEST_c_c (clog10, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6339 TEST_c_c (clog10, 3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6340 TEST_c_c (clog10, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6341 TEST_c_c (clog10, -3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6342
08198877
JM		 6343 TEST_c_c (clog10, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6344 TEST_c_c (clog10, qnan_value, 5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6345 TEST_c_c (clog10, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6346 TEST_c_c (clog10, qnan_value, -5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6347
08198877 6348 TEST_c_c (clog10, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 6349
08198877
JM		 6350 TEST_c_c (clog10, 0.75L, 1.25L, 0.163679467193165171449476605077428975L, 0.447486970040493067069984724340855636L),
6351 TEST_c_c (clog10, -2, -3, 0.556971676153418384603252578971164214L, -0.937554462986374708541507952140189646L),
8847214f 6352
08198877
JM		 6353 TEST_c_c (clog10, 0x1.fffffep+127L, 0x1.fffffep+127L, 38.68235441693561449174780668781319348761L, M_PI4_LOG10El),
6354 TEST_c_c (clog10, 0x1.fffffep+127L, 1.0L, 38.53183941910362389414093724045094697423L, 1.276276851248440096917018665609900318458e-39L, UNDERFLOW_EXCEPTION_FLOAT),
6355 TEST_c_c (clog10, 0x1p-149L, 0x1p-149L, -44.70295435610120748924022586658721447508L, M_PI4_LOG10El),
6356 TEST_c_c (clog10, 0x1p-147L, 0x1p-147L, -44.10089436477324509881274807713822842154L, M_PI4_LOG10El),
1897ad44
JM		 6357
6358#ifndef TEST_FLOAT
08198877
JM		 6359 TEST_c_c (clog10, 0x1.fffffffffffffp+1023L, 0x1.fffffffffffffp+1023L, 308.4052305577487344482591243175787477115L, M_PI4_LOG10El),
6360 TEST_c_c (clog10, 0x1.fffffffffffffp+1023L, 0x1p+1023L, 308.3031705664207720674749211936626341569L, 0.2013595981366865903254995612594728746470L),
6361 TEST_c_c (clog10, 0x1p-1074L, 0x1p-1074L, -323.1557003452838130619487034867432642357L, M_PI4_LOG10El),
6362 TEST_c_c (clog10, 0x1p-1073L, 0x1p-1073L, -322.8546703496198318667349645920187712089L, M_PI4_LOG10El),
1897ad44
JM		 6363#endif
6364
6365#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6366 TEST_c_c (clog10, 0x1.fp+16383L, 0x1.fp+16383L, 4932.212175672014259683102930239951947672L, M_PI4_LOG10El),
6367 TEST_c_c (clog10, 0x1.fp+16383L, 0x1p+16383L, 4932.112944269463028900262609694408579449L, 0.2069271710841128115912940666587802677383L),
6368 TEST_c_c (clog10, 0x1p-16440L, 0x1p-16441L, -4948.884673709346821106688037612752099609L, 0.2013595981366865710389502301937289472543L),
1897ad44
JM		 6369#endif
6370
08198877
JM		 6371 TEST_c_c (clog10, 0x1p-149L, 0x1.fp+127L, 38.51805116050395969095658815123105801479L, 0.6821881769209206737428918127156778851051L),
6372 TEST_c_c (clog10, -0x1p-149L, 0x1.fp+127L, 38.51805116050395969095658815123105801479L, 0.6821881769209206737428918127156778851051L),
6373 TEST_c_c (clog10, 0x1p-149L, -0x1.fp+127L, 38.51805116050395969095658815123105801479L, -0.6821881769209206737428918127156778851051L),
6374 TEST_c_c (clog10, -0x1p-149L, -0x1.fp+127L, 38.51805116050395969095658815123105801479L, -0.6821881769209206737428918127156778851051L),
6375 TEST_c_c (clog10, -0x1.fp+127L, 0x1p-149L, 38.51805116050395969095658815123105801479L, 1.364376353841841347485783625431355770210L),
6376 TEST_c_c (clog10, -0x1.fp+127L, -0x1p-149L, 38.51805116050395969095658815123105801479L, -1.364376353841841347485783625431355770210L),
638a572e 6377#ifdef TEST_FLOAT
08198877
JM		 6378 TEST_c_c (clog10, 0x1.fp+127L, 0x1p-149L, 38.51805116050395969095658815123105801479L, plus_zero, UNDERFLOW_EXCEPTION),
6379 TEST_c_c (clog10, 0x1.fp+127L, -0x1p-149L, 38.51805116050395969095658815123105801479L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6380#endif
6381
6382#ifndef TEST_FLOAT
08198877
JM		 6383 TEST_c_c (clog10, 0x1p-1074L, 0x1.fp+1023L, 308.2409272754311106024666378243768099991L, 0.6821881769209206737428918127156778851051L),
6384 TEST_c_c (clog10, -0x1p-1074L, 0x1.fp+1023L, 308.2409272754311106024666378243768099991L, 0.6821881769209206737428918127156778851051L),
6385 TEST_c_c (clog10, 0x1p-1074L, -0x1.fp+1023L, 308.2409272754311106024666378243768099991L, -0.6821881769209206737428918127156778851051L),
6386 TEST_c_c (clog10, -0x1p-1074L, -0x1.fp+1023L, 308.2409272754311106024666378243768099991L, -0.6821881769209206737428918127156778851051L),
6387 TEST_c_c (clog10, -0x1.fp+1023L, 0x1p-1074L, 308.2409272754311106024666378243768099991L, 1.364376353841841347485783625431355770210L),
6388 TEST_c_c (clog10, -0x1.fp+1023L, -0x1p-1074L, 308.2409272754311106024666378243768099991L, -1.364376353841841347485783625431355770210L),
638a572e
JM		 6389#endif
6390#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877
JM		 6391 TEST_c_c (clog10, 0x1.fp+1023L, 0x1p-1074L, 308.2409272754311106024666378243768099991L, plus_zero, UNDERFLOW_EXCEPTION),
6392 TEST_c_c (clog10, 0x1.fp+1023L, -0x1p-1074L, 308.2409272754311106024666378243768099991L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6393#endif
6394
6395#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6396 TEST_c_c (clog10, 0x1p-16445L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6397 TEST_c_c (clog10, -0x1p-16445L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6398 TEST_c_c (clog10, 0x1p-16445L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6399 TEST_c_c (clog10, -0x1p-16445L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6400 TEST_c_c (clog10, -0x1.fp+16383L, 0x1p-16445L, 4932.061660674182269085496060792589701158L, 1.364376353841841347485783625431355770210L),
6401 TEST_c_c (clog10, -0x1.fp+16383L, -0x1p-16445L, 4932.061660674182269085496060792589701158L, -1.364376353841841347485783625431355770210L),
6402 TEST_c_c (clog10, 0x1.fp+16383L, 0x1p-16445L, 4932.061660674182269085496060792589701158L, plus_zero, UNDERFLOW_EXCEPTION),
6403 TEST_c_c (clog10, 0x1.fp+16383L, -0x1p-16445L, 4932.061660674182269085496060792589701158L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e 6404# if LDBL_MANT_DIG >= 113
08198877
JM		 6405 TEST_c_c (clog10, 0x1p-16494L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6406 TEST_c_c (clog10, -0x1p-16494L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6407 TEST_c_c (clog10, 0x1p-16494L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6408 TEST_c_c (clog10, -0x1p-16494L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6409 TEST_c_c (clog10, -0x1.fp+16383L, 0x1p-16494L, 4932.061660674182269085496060792589701158L, 1.364376353841841347485783625431355770210L),
6410 TEST_c_c (clog10, -0x1.fp+16383L, -0x1p-16494L, 4932.061660674182269085496060792589701158L, -1.364376353841841347485783625431355770210L),
6411 TEST_c_c (clog10, 0x1.fp+16383L, 0x1p-16494L, 4932.061660674182269085496060792589701158L, plus_zero, UNDERFLOW_EXCEPTION),
6412 TEST_c_c (clog10, 0x1.fp+16383L, -0x1p-16494L, 4932.061660674182269085496060792589701158L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM		 6413# endif
6414#endif
6415
08198877
JM		 6416 TEST_c_c (clog10, 1.0L, 0x1.234566p-10L, 2.680828048441605163181684680300513080769e-7L, 4.825491868832381486767558728169977751564e-4L),
6417 TEST_c_c (clog10, -1.0L, 0x1.234566p-20L, 2.556638434669064077889576526006849923281e-13L, 1.364375882602207106407956770293808181427L),
6418 TEST_c_c (clog10, 0x1.234566p-30L, 1.0L, 2.438200411482400072282924063740535840474e-19L, 6.821881764607257184291586401763604544928e-1L),
6419 TEST_c_c (clog10, -0x1.234566p-40L, -1.0L, 2.325249110681915353442924915876654139373e-25L, -6.821881769213700828789403802671540158935e-1L),
6420 TEST_c_c (clog10, 0x1.234566p-50L, 1.0L, 2.217530356103816369479108963807448194409e-31L, 6.821881769209202348667823902864283966959e-1L),
6421 TEST_c_c (clog10, 0x1.234566p-60L, 1.0L, 2.114801746467415208319767917450504756866e-37L, 6.821881769209206733143018621078368211515e-1L),
6422 TEST_c_c (clog10, 0x1p-61L, 1.0L, 4.084085680564517578238994467153626207224e-38L, 6.821881769209206735545466044044889962925e-1L),
6423 TEST_c_c (clog10, 0x1p-62L, 1.0L, 1.021021420141129394559748616788406551878e-38L, 6.821881769209206736487192085600834406988e-1L, UNDERFLOW_EXCEPTION_FLOAT),
6424 TEST_c_c (clog10, 0x1p-63L, 1.0L, 2.552553550352823486399371541971016379740e-39L, 6.821881769209206736958055106378806629019e-1L, UNDERFLOW_EXCEPTION_FLOAT),
da865e95 6425#ifndef TEST_FLOAT
08198877
JM		 6426 TEST_c_c (clog10, 0x1p-509L, 1.0L, 7.730698388614835910296270976605350994446e-308L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
6427 TEST_c_c (clog10, 0x1p-510L, 1.0L, 1.932674597153708977574067744151337748612e-308L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
6428 TEST_c_c (clog10, 0x1p-511L, 1.0L, 4.831686492884272443935169360378344371529e-309L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
da865e95
JM		 6429#endif
6430#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 6431 TEST_c_c (clog10, 0x1p-8189L, 1.0L, 1.168114274114528946314738738025008370069e-4931L, 6.821881769209206737428918127156778851051e-1L),
6432 TEST_c_c (clog10, 0x1p-8190L, 1.0L, 2.920285685286322365786846845062520925172e-4932L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION),
6433 TEST_c_c (clog10, 0x1p-8191L, 1.0L, 7.300714213215805914467117112656302312931e-4933L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION),
da865e95
JM		 6434#endif
6435
08198877
JM		 6436 TEST_c_c (clog10, 0x1.000566p0L, 0x1.234p-10L, 3.604093470239754109961125085078190708674e-5L, 4.824745078422174667425851670822596859720e-4L),
6437 TEST_c_c (clog10, 0x1.000566p0L, 0x1.234p-100L, 3.577293486783822178310971763308187385546e-5L, 3.897399639875661463735636919790792140598e-31L),
d0419dbf 6438#ifndef TEST_FLOAT
08198877
JM		 6439 TEST_c_c (clog10, -0x1.0000000123456p0L, 0x1.2345678p-30L, 1.150487028947346337782682105935961875822e-10L, 1.364376353381646356131680448946397884147L),
6440 TEST_c_c (clog10, -0x1.0000000123456p0L, 0x1.2345678p-1000L, 1.150487026509145544402795327729455391948e-10L, 1.364376353841841347485783625431355770210L),
d0419dbf
JM		 6441#endif
6442#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 6443 TEST_c_c (clog10, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-60L, 4.285899851347756188767674032946882584784e-19L, 4.285899850759344225805480528847018395861e-19L),
6444 TEST_c_c (clog10, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-1000L, 4.285899851347756186652871946325962330640e-19L, 4.611541215247321502041995872887317363241e-302L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d0419dbf
JM		 6445#endif
6446
08198877 6447 TEST_c_c (clog10, 0x0.ffffffp0L, 0x0.ffffffp-100L, -2.588596909321764128428416045209904492216e-8L, 3.425979381266895667295625489912064603415e-31L),
d032e0d2 6448#ifndef TEST_FLOAT
08198877 6449 TEST_c_c (clog10, 0x0.fffffffffffff8p0L, 0x0.fffffffffffff8p-1000L, -4.821637332766435821255375046554377090472e-17L, 4.053112396770095089737411317782466262176e-302L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d032e0d2
JM		 6450#endif
6451#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM		 6452 TEST_c_c (clog10, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp-15000L, -2.354315103889861110220423157644627849164e-20L, 1.541165759405643564697852372112893034397e-4516L),
6453#endif
6454
6455 TEST_c_c (clog10, 0x1a6p-10L, 0x3a5p-10L, -6.2126412844802358329771948751248003038444e-07L, 0.4977135139537443711784513409096950995985L),
6456 TEST_c_c (clog10, 0xf2p-10L, 0x3e3p-10L, 2.6921240173351112953324592659528481616879e-06L, 0.5785726025799636431142862788413361783862L),
6457 TEST_c_c (clog10, 0x4d4ep-15L, 0x6605p-15L, -7.0781945783414996953799915941870192015212e-09L, 0.4005747524909781155537088181659175147564L),
6458 TEST_c_c (clog10, 0x2818p-15L, 0x798fp-15L, 6.6737261053986614395049481326819059203910e-09L, 0.5438241985991753781478398141908629586460L),
6459 TEST_c_c (clog10, 0x9b57bp-20L, 0xcb7b4p-20L, -1.7182001068739620267773842120965071561416e-11L, 0.3990121149225253562859800593935899629087L),
6460 TEST_c_c (clog10, 0x2731p-20L, 0xfffd0p-20L, 1.9156943718715958194239364991329064049438e-11L, 0.6780326907904082601285090019969008967595L),
6461 TEST_c_c (clog10, 0x2ede88p-23L, 0x771c3fp-23L, -1.9440841725722970687903291200493082253766e-13L, 0.5193774116724956222518530053006822210323L),
6462 TEST_c_c (clog10, 0x11682p-23L, 0x7ffed1p-23L, 5.0916490233953865181284669870035717560498e-13L, 0.6784968969384861816694467029319146542069L),
6463 TEST_c_c (clog10, 0xa1f2c1p-24L, 0xc643aep-24L, -4.5516256421319921959681423447271490869664e-14L, 0.3847315790697197749315054516562206543710L),
6464 TEST_c_c (clog10, 0x659feap-24L, 0xeaf6f9p-24L, 1.6200701438094619117335617123525612051457e-14L, 0.5049027913635038013499728086604870749732L),
d032e0d2 6465#ifndef TEST_FLOAT
08198877
JM		 6466 TEST_c_c (clog10, 0x4447d7175p-35L, 0x6c445e00ap-35L, -6.4375803621988389731799033530075237868110e-21L, 0.4378257977686804492768642780897650927167L),
6467 TEST_c_c (clog10, 0x2dd46725bp-35L, 0x7783a1284p-35L, 1.9312741086596516918394613098872836703188e-20L, 0.5231613813514771042838490538484014771862L),
6468 TEST_c_c (clog10, 0x164c74eea876p-45L, 0x16f393482f77p-45L, -1.3155760824064879362415202279780039150764e-26L, 0.3473590599762514228227328130640352044313L),
6469 TEST_c_c (clog10, 0xfe961079616p-45L, 0x1bc37e09e6d1p-45L, 2.3329549194675052736016290082882121135546e-26L, 0.4561756099441139182878993697611751382976L),
6470 TEST_c_c (clog10, 0xa4722f19346cp-51L, 0x7f9631c5e7f07p-51L, -2.6979587627476803379953050733225113494503e-30L, 0.6472785229986997177606324374555347813105L),
6471 TEST_c_c (clog10, 0x10673dd0f2481p-51L, 0x7ef1d17cefbd2p-51L, 1.3918041236396763648388478552321724382899e-29L, 0.6263795733790237053262025311642907438291L),
6472 TEST_c_c (clog10, 0x8ecbf810c4ae6p-52L, 0xd479468b09a37p-52L, -4.2289432987513243393180377141513840878196e-30L, 0.4252020027092323591068799049905597805296L),
6473 TEST_c_c (clog10, 0x5b06b680ea2ccp-52L, 0xef452b965da9fp-52L, 3.6079845358966994996207055940336690133424e-30L, 0.5243112258263349992771652393178033846555L),
6474 TEST_c_c (clog10, 0x659b70ab7971bp-53L, 0x1f5d111e08abecp-53L, -1.0893543813872082317104059174982092534059e-30L, 0.5954257879188711495921161433751775633232L),
6475 TEST_c_c (clog10, 0x15cfbd1990d1ffp-53L, 0x176a3973e09a9ap-53L, 4.4163015461643576961232672330852798804976e-31L, 0.3564851427422832755956993418877523303529L),
6476 TEST_c_c (clog10, 0x1367a310575591p-54L, 0x3cfcc0a0541f60p-54L, 2.2081507730821788480616336165447731164865e-32L, 0.5484039935757001196548030312819898864760L),
6477 TEST_c_c (clog10, 0x55cb6d0c83af5p-55L, 0x7fe33c0c7c4e90p-55L, -2.2583360179249556400630343805573865814771e-32L, 0.6639894257763289307423302343317622430835L),
d032e0d2
JM		 6478#endif
6479#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM		 6480 TEST_c_c (clog10, 0x298c62cb546588a7p-63L, 0x7911b1dfcc4ecdaep-63L, -5.1816837072162316773907242302011632570857e-37L, 0.5386167838952956925896424154370364458140L),
6481 TEST_c_c (clog10, 0x4d9c37e2b5cb4533p-63L, 0x65c98be2385a042ep-63L, 2.7822833698845776001753149807484078521508e-37L, 0.3992725998539071066769046272515417679815L),
6482 TEST_c_c (clog10, 0x602fd5037c4792efp-64L, 0xed3e2086dcca80b8p-64L, -1.0146400362652473358437501879334790111898e-37L, 0.5149047982335273098246594109614460842099L),
6483 TEST_c_c (clog10, 0x6b10b4f3520217b6p-64L, 0xe8893cbb449253a1p-64L, 1.0529283395205396881397407610630442563938e-37L, 0.4947949395762683446121140513971996916447L),
6484 TEST_c_c (clog10, 0x81b7efa81fc35ad1p-65L, 0x1ef4b835f1c79d812p-65L, -4.3074341162203896332989394770760901408798e-39L, 0.5709443672155660428417571212549720987784L),
d032e0d2
JM		 6485#endif
6486#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM		 6487 TEST_c_c (clog10, 0x3f96469050f650869c2p-75L, 0x6f16b2c9c8b05988335p-75L, -4.5643214291682663316715446865040356750881e-46L, 0.4564083863660793840592614609053162690362L),
6488 TEST_c_c (clog10, 0x3157fc1d73233e580c8p-75L, 0x761b52ccd435d7c7f5fp-75L, 5.8575458340992751256451490143468457830297e-44L, 0.5103174273246635294300470585396890237265L),
6489 TEST_c_c (clog10, 0x155f8afc4c48685bf63610p-85L, 0x17d0cf2652cdbeb1294e19p-85L, -2.0748709499710785084693619097712106753591e-50L, 0.3645447681189598740620098186365764884771L),
6490 TEST_c_c (clog10, 0x13836d58a13448d750b4b9p-85L, 0x195ca7bc3ab4f9161edbe6p-85L, 1.2333149003324592532859843519619084433953e-50L, 0.3973779298829931059309198145608711073016L),
6491 TEST_c_c (clog10, 0x1df515eb171a808b9e400266p-95L, 0x7c71eb0cd4688dfe98581c77p-95L, -1.5221162575729652613635150540947625639689e-57L, 0.5795934880811949230121092882659698986043L),
6492 TEST_c_c (clog10, 0xe33f66c9542ca25cc43c867p-95L, 0x7f35a68ebd3704a43c465864p-95L, 1.7850272475173865337808494725293124613817e-56L, 0.6338990862456906754888183278564382516852L),
6493 TEST_c_c (clog10, 0x6771f22c64ed551b857c128b4cp-105L, 0x1f570e7a13cc3cf2f44fd793ea1p-105L, -6.2023045024810589256360494043570293518879e-63L, 0.5938345819561308555003145899438513900776L),
6494 TEST_c_c (clog10, 0x15d8ab6ed05ca514086ac3a1e84p-105L, 0x1761e480aa094c0b10b34b09ce9p-105L, 4.3548095442952115860848857519953610343042e-63L, 0.3558376234889641500775150477035448866763L),
6495 TEST_c_c (clog10, 0x187190c1a334497bdbde5a95f48p-106L, 0x3b25f08062d0a095c4cfbbc338dp-106L, -7.5879257211204444302994221436282805900756e-64L, 0.5119945461708707332160859198685423099187L),
6496 TEST_c_c (clog10, 0x6241ef0da53f539f02fad67dabp-106L, 0x3fb46641182f7efd9caa769dac0p-106L, 1.8804859395820231849002915747252695375405e-63L, 0.6404513901551516189871978418046651877394L),
d032e0d2
JM		 6497#endif
6498#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM		 6499 TEST_c_c (clog10, 0x3e1d0a105ac4ebeacd9c6952d34cp-112L, 0xf859b3d1b06d005dcbb5516d5479p-112L, -5.0742964549782184008668435276046798273476e-67L, 0.5757527761596220360985719127090110408283L),
6500 TEST_c_c (clog10, 0x47017a2e36807acb1e5214b209dep-112L, 0xf5f4a550c9d75e3bb1839d865f0dp-112L, 6.5482587585671294601662599808612773010057e-66L, 0.5601289501766423782280643144987875760229L),
6501 TEST_c_c (clog10, 0x148f818cb7a9258fca942ade2a0cap-113L, 0x18854a34780b8333ec53310ad7001p-113L, -3.1210950417524756037077807411854181477733e-67L, 0.3791463562379872585396164879981280044658L),
6502 TEST_c_c (clog10, 0xfd95243681c055c2632286921092p-113L, 0x1bccabcd29ca2152860ec29e34ef7p-113L, 2.8774482675253468630312378575186855052697e-66L, 0.4571561610046221605554903008571429975493L),
6503 TEST_c_c (clog10, 0xdb85c467ee2aadd5f425fe0f4b8dp-114L, 0x3e83162a0f95f1dcbf97dddf410eap-114L, 1.9985076315737626043096596036300177494613e-67L, 0.5883569274304683249184005177865521205198L),
6504 TEST_c_c (clog10, 0x1415bcaf2105940d49a636e98ae59p-115L, 0x7e6a150adfcd1b0921d44b31f40f4p-115L, 1.1288799405048268615023706955013387413519e-67L, 0.6137587762850841972073301550420510507903L),
6505#endif
6506 END_DATA (clog10)
6507 };
d032e0d2 6508
08198877
JM		 6509static void
6510clog10_test (void)
6511{
6512 errno = 0;
6513 FUNC(clog10) (BUILD_COMPLEX (0.7L, 1.2L));
6514 if (errno == ENOSYS)
6515 /* Function not implemented. */
6516 return;
6517
6518 START (clog10);
6519 RUN_TEST_LOOP_c_c (clog10, clog10_test_data, );
6815fabc 6520 END (clog10, complex);
8847214f
UD		 6521}
6522
2550dfe9 6523
08198877
JM		 6524static const struct test_c_c_data conj_test_data[] =
6525 {
6526 START_DATA (conj),
6527 TEST_c_c (conj, 0.0, 0.0, 0.0, minus_zero),
6528 TEST_c_c (conj, 0.0, minus_zero, 0.0, 0.0),
6529 TEST_c_c (conj, qnan_value, qnan_value, qnan_value, qnan_value),
6530 TEST_c_c (conj, plus_infty, minus_infty, plus_infty, plus_infty),
6531 TEST_c_c (conj, plus_infty, plus_infty, plus_infty, minus_infty),
6532 TEST_c_c (conj, 1.0, 2.0, 1.0, -2.0),
6533 TEST_c_c (conj, 3.0, -4.0, 3.0, 4.0),
6534 END_DATA (conj)
6535 };
6536
0cdc8e6f
UD		 6537static void
6538conj_test (void)
6539{
6540 START (conj);
08198877 6541 RUN_TEST_LOOP_c_c (conj, conj_test_data, );
0cdc8e6f
UD		 6542 END (conj, complex);
6543}
6544
6545
601a3a5f
JM		 6546static const struct test_ff_f_data copysign_test_data[] =
6547 {
6548 START_DATA (copysign),
6549 TEST_ff_f (copysign, 0, 4, 0),
6550 TEST_ff_f (copysign, 0, -4, minus_zero),
6551 TEST_ff_f (copysign, minus_zero, 4, 0),
6552 TEST_ff_f (copysign, minus_zero, -4, minus_zero),
6553
6554 TEST_ff_f (copysign, plus_infty, 0, plus_infty),
6555 TEST_ff_f (copysign, plus_infty, minus_zero, minus_infty),
6556 TEST_ff_f (copysign, minus_infty, 0, plus_infty),
6557 TEST_ff_f (copysign, minus_infty, minus_zero, minus_infty),
6558
6559 TEST_ff_f (copysign, 0, plus_infty, 0),
6560 TEST_ff_f (copysign, 0, minus_zero, minus_zero),
6561 TEST_ff_f (copysign, minus_zero, plus_infty, 0),
6562 TEST_ff_f (copysign, minus_zero, minus_zero, minus_zero),
6563
6564 /* XXX More correctly we would have to check the sign of the NaN. */
6565 TEST_ff_f (copysign, qnan_value, 0, qnan_value),
6566 TEST_ff_f (copysign, qnan_value, minus_zero, qnan_value),
6567 TEST_ff_f (copysign, -qnan_value, 0, qnan_value),
6568 TEST_ff_f (copysign, -qnan_value, minus_zero, qnan_value),
6569 END_DATA (copysign)
6570 };
6571
8847214f
UD		 6572static void
6573copysign_test (void)
6574{
6575 START (copysign);
601a3a5f 6576 RUN_TEST_LOOP_ff_f (copysign, copysign_test_data, );
8847214f
UD		 6577 END (copysign);
6578}
6579
2550dfe9 6580
74c57478
JM		 6581static const struct test_f_f_data cos_test_data[] =
6582 {
6583 START_DATA (cos),
6584 TEST_f_f (cos, 0, 1),
6585 TEST_f_f (cos, minus_zero, 1),
6586 TEST_f_f (cos, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
6587 TEST_f_f (cos, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
6588 TEST_f_f (cos, qnan_value, qnan_value, ERRNO_UNCHANGED),
6589
6590 TEST_f_f (cos, M_PI_6l * 2.0, 0.5),
6591 TEST_f_f (cos, M_PI_6l * 4.0, -0.5),
6592
6593 /* The value of M_PI_2l is never exactly PI/2, and therefore the
6594 answer is never exactly zero. The answer is equal to the error
6595 in rounding PI/2 for the type used. Thus the answer is unique
6596 to each type. */
aba5e333 6597#ifdef TEST_FLOAT
74c57478
JM		 6598 /* 32-bit float. */
6599 TEST_f_f (cos, M_PI_2l, -0x1.777a5cp-25L),
aba5e333
CD		 6600#endif
6601#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MANT_DIG == 53)
74c57478
JM		 6602 /* 64-bit double or 64-bit long double. */
6603 TEST_f_f (cos, M_PI_2l, 0x1.1a62633145c07p-54L),
aba5e333
CD		 6604#endif
6605#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 64
74c57478
JM		 6606 /* 96-bit long double. */
6607 TEST_f_f (cos, M_PI_2l, -0xe.ce675d1fc8f8cbbp-69L),
aba5e333
CD		 6608#endif
6609#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 106
74c57478
JM		 6610 /* 128-bit IBM long double. */
6611 TEST_f_f (cos, M_PI_2l, 0x1.c1cd129024e088a67cc74020bcp-107L),
aba5e333
CD		 6612#endif
6613#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 113
74c57478
JM		 6614 /* 128-bit long double. */
6615 TEST_f_f (cos, M_PI_2l, 0x1.cd129024e088a67cc74020bbea64p-115L),
aba5e333 6616#endif
8847214f 6617
74c57478 6618 TEST_f_f (cos, 0.75L, 0.731688868873820886311838753000084544L),
8847214f 6619
74c57478
JM		 6620 TEST_f_f (cos, 0x1p65, 0.99888622066058013610642172179340364209972L),
6621 TEST_f_f (cos, -0x1p65, 0.99888622066058013610642172179340364209972L),
8c0247db 6622
d32e4346 6623#ifdef TEST_DOUBLE
74c57478 6624 TEST_f_f (cos, 0.80190127184058835, 0.69534156199418473),
8848d99d
JM		 6625#endif
6626
74c57478 6627 TEST_f_f (cos, 0x1.442f74p+15, 2.4407839902314016628485779006274989801517e-06L),
7a845b2c 6628
8848d99d 6629#ifndef TEST_FLOAT
74c57478
JM		 6630 TEST_f_f (cos, 1e22, 0.5232147853951389454975944733847094921409L),
6631 TEST_f_f (cos, 0x1p1023, -0.826369834614147994500785680811743734805L),
8848d99d
JM		 6632#endif
6633
6634#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478 6635 TEST_f_f (cos, 0x1p16383L, 0.9210843909921906206874509522505756251609L),
d32e4346
RM		 6636#endif
6637
74c57478
JM		 6638 TEST_f_f (cos, 0x1p+120, -9.25879022854837867303861764107414946730833e-01L),
6639 TEST_f_f (cos, 0x1p+127, 7.81914638714960072263910298466369236613162e-01L),
6640 TEST_f_f (cos, 0x1.fffff8p+127, 9.98819362551949040703862043664101081064641e-01L),
6641 TEST_f_f (cos, 0x1.fffffep+127, 8.53021039830304158051791467692161107353094e-01L),
6642 TEST_f_f (cos, 0x1p+50, 8.68095904660550604334592502063501320395739e-01L),
6643 TEST_f_f (cos, 0x1p+28, -1.65568979490578758865468278195361551113358e-01L),
6644 END_DATA (cos)
6645 };
6646
6647static void
6648cos_test (void)
6649{
6650 errno = 0;
6651 FUNC(cos) (0);
6652 if (errno == ENOSYS)
6653 /* Function not implemented. */
6654 return;
4ffffbd2 6655
74c57478
JM		 6656 START (cos);
6657 RUN_TEST_LOOP_f_f (cos, cos_test_data, );
8847214f
UD		 6658 END (cos);
6659}
6660
2550dfe9 6661
74c57478
JM		 6662static const struct test_f_f_data cos_tonearest_test_data[] =
6663 {
6664 START_DATA (cos_tonearest),
6665 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6666 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6667 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6668 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6669 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6670 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6671 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6672 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6673 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6674 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6675 END_DATA (cos_tonearest)
6676 };
6677
804360ed
JM		 6678static void
6679cos_test_tonearest (void)
6680{
804360ed
JM		 6681 errno = 0;
6682 FUNC(cos) (0);
6683 if (errno == ENOSYS)
6684 /* Function not implemented. */
6685 return;
6686
6687 START (cos_tonearest);
74c57478 6688 RUN_TEST_LOOP_f_f (cos, cos_tonearest_test_data, FE_TONEAREST);
804360ed
JM		 6689 END (cos_tonearest);
6690}
6691
6692
74c57478
JM		 6693static const struct test_f_f_data cos_towardzero_test_data[] =
6694 {
6695 START_DATA (cos_towardzero),
6696 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6697 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6698 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6699 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6700 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6701 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6702 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6703 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6704 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6705 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6706 END_DATA (cos_towardzero)
6707 };
6708
804360ed
JM		 6709static void
6710cos_test_towardzero (void)
6711{
804360ed
JM		 6712 errno = 0;
6713 FUNC(cos) (0);
6714 if (errno == ENOSYS)
6715 /* Function not implemented. */
6716 return;
6717
6718 START (cos_towardzero);
74c57478 6719 RUN_TEST_LOOP_f_f (cos, cos_towardzero_test_data, FE_TOWARDZERO);
804360ed
JM		 6720 END (cos_towardzero);
6721}
6722
6723
74c57478
JM		 6724static const struct test_f_f_data cos_downward_test_data[] =
6725 {
6726 START_DATA (cos_downward),
6727 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6728 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6729 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6730 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6731 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6732 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6733 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6734 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6735 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6736 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6737 END_DATA (cos_downward)
6738 };
6739
804360ed
JM		 6740static void
6741cos_test_downward (void)
6742{
804360ed
JM		 6743 errno = 0;
6744 FUNC(cos) (0);
6745 if (errno == ENOSYS)
6746 /* Function not implemented. */
6747 return;
6748
6749 START (cos_downward);
74c57478
JM		 6750 RUN_TEST_LOOP_f_f (cos, cos_downward_test_data, FE_DOWNWARD);
6751 END (cos_downward);
6752}
804360ed 6753
804360ed 6754
74c57478
JM		 6755static const struct test_f_f_data cos_upward_test_data[] =
6756 {
6757 START_DATA (cos_upward),
6758 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6759 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6760 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6761 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6762 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6763 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6764 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6765 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6766 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6767 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6768 END_DATA (cos_upward)
6769 };
804360ed
JM		 6770
6771static void
6772cos_test_upward (void)
6773{
804360ed
JM		 6774 errno = 0;
6775 FUNC(cos) (0);
6776 if (errno == ENOSYS)
6777 /* Function not implemented. */
6778 return;
6779
6780 START (cos_upward);
74c57478
JM		 6781 RUN_TEST_LOOP_f_f (cos, cos_upward_test_data, FE_UPWARD);
6782 END (cos_upward);
6783}
804360ed 6784
804360ed 6785
74c57478
JM		 6786static const struct test_f_f_data cosh_test_data[] =
6787 {
6788 START_DATA (cosh),
6789 TEST_f_f (cosh, 0, 1),
6790 TEST_f_f (cosh, minus_zero, 1),
804360ed 6791
74c57478
JM		 6792#ifndef TEST_INLINE
6793 TEST_f_f (cosh, plus_infty, plus_infty),
6794 TEST_f_f (cosh, minus_infty, plus_infty),
6795#endif
6796 TEST_f_f (cosh, qnan_value, qnan_value),
804360ed 6797
74c57478 6798 TEST_f_f (cosh, 0.75L, 1.29468328467684468784170818539018176L),
804360ed 6799
74c57478
JM		 6800#ifndef TEST_FLOAT
6801 TEST_f_f (cosh, 709.8893558127259666434838436543941497802734375L, 9.9999998999995070652573675944761818416035e+307L),
6802 TEST_f_f (cosh, -709.8893558127259666434838436543941497802734375L, 9.9999998999995070652573675944761818416035e+307L),
6803#endif
6804 END_DATA (cosh)
6805 };
804360ed 6806
8847214f
UD		 6807static void
6808cosh_test (void)
6809{
aaca11d8 6810 errno = 0;
3c6cad26 6811 FUNC(cosh) (0.7L);
aaca11d8
UD		 6812 if (errno == ENOSYS)
6813 /* Function not implemented. */
6814 return;
6815
8847214f 6816 START (cosh);
74c57478 6817 RUN_TEST_LOOP_f_f (cosh, cosh_test_data, );
8847214f
UD		 6818 END (cosh);
6819}
6820
6821
74c57478
JM		 6822static const struct test_f_f_data cosh_tonearest_test_data[] =
6823 {
6824 START_DATA (cosh_tonearest),
6825 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6826 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6827 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6828 END_DATA (cosh_tonearest)
6829 };
6830
ca811b22
JM		 6831static void
6832cosh_test_tonearest (void)
6833{
ca811b22
JM		 6834 errno = 0;
6835 FUNC(cosh) (0);
6836 if (errno == ENOSYS)
6837 /* Function not implemented. */
6838 return;
6839
6840 START (cosh_tonearest);
74c57478 6841 RUN_TEST_LOOP_f_f (cosh, cosh_tonearest_test_data, FE_TONEAREST);
ca811b22
JM		 6842 END (cosh_tonearest);
6843}
6844
6845
74c57478
JM		 6846static const struct test_f_f_data cosh_towardzero_test_data[] =
6847 {
6848 START_DATA (cosh_towardzero),
6849 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6850 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6851 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6852 END_DATA (cosh_towardzero)
6853 };
6854
ca811b22
JM		 6855static void
6856cosh_test_towardzero (void)
6857{
ca811b22
JM		 6858 errno = 0;
6859 FUNC(cosh) (0);
6860 if (errno == ENOSYS)
6861 /* Function not implemented. */
6862 return;
6863
6864 START (cosh_towardzero);
74c57478 6865 RUN_TEST_LOOP_f_f (cosh, cosh_towardzero_test_data, FE_TOWARDZERO);
ca811b22
JM		 6866 END (cosh_towardzero);
6867}
6868
6869
74c57478
JM		 6870static const struct test_f_f_data cosh_downward_test_data[] =
6871 {
6872 START_DATA (cosh_downward),
6873 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6874 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6875 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6876 END_DATA (cosh_downward)
6877 };
6878
ca811b22
JM		 6879static void
6880cosh_test_downward (void)
6881{
ca811b22
JM		 6882 errno = 0;
6883 FUNC(cosh) (0);
6884 if (errno == ENOSYS)
6885 /* Function not implemented. */
6886 return;
6887
6888 START (cosh_downward);
74c57478 6889 RUN_TEST_LOOP_f_f (cosh, cosh_downward_test_data, FE_DOWNWARD);
ca811b22
JM		 6890 END (cosh_downward);
6891}
6892
6893
74c57478
JM		 6894static const struct test_f_f_data cosh_upward_test_data[] =
6895 {
6896 START_DATA (cosh_upward),
6897 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6898 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6899 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6900 END_DATA (cosh_upward)
6901 };
6902
ca811b22
JM		 6903static void
6904cosh_test_upward (void)
6905{
ca811b22
JM		 6906 errno = 0;
6907 FUNC(cosh) (0);
6908 if (errno == ENOSYS)
6909 /* Function not implemented. */
6910 return;
6911
6912 START (cosh_upward);
74c57478 6913 RUN_TEST_LOOP_f_f (cosh, cosh_upward_test_data, FE_UPWARD);
ca811b22
JM		 6914 END (cosh_upward);
6915}
6916
6917
8847214f
UD		 6918static void
6919cpow_test (void)
6920{
aaca11d8
UD		 6921 errno = 0;
6922 FUNC(cpow) (BUILD_COMPLEX (1, 0), BUILD_COMPLEX (0, 0));
6923 if (errno == ENOSYS)
6924 /* Function not implemented. */
6925 return;
6926
8847214f
UD		 6927 START (cpow);
6928
6929 TEST_cc_c (cpow, 1, 0, 0, 0, 1.0, 0.0);
6930 TEST_cc_c (cpow, 2, 0, 10, 0, 1024.0, 0.0);
6931
6932 TEST_cc_c (cpow, M_El, 0, 0, 2 * M_PIl, 1.0, 0.0);
6933 TEST_cc_c (cpow, 2, 3, 4, 0, -119.0, -120.0);
6934
67e971f1 6935 TEST_cc_c (cpow, qnan_value, qnan_value, qnan_value, qnan_value, qnan_value, qnan_value);
15daa639 6936
96d10bdf
AJ		 6937 TEST_cc_c (cpow, 0.75L, 1.25L, 0.75L, 1.25L, 0.117506293914473555420279832210420483L, 0.346552747708338676483025352060418001L);
6938 TEST_cc_c (cpow, 0.75L, 1.25L, 1.0L, 1.0L, 0.0846958290317209430433805274189191353L, 0.513285749182902449043287190519090481L);
2550dfe9 6939 TEST_cc_c (cpow, 0.75L, 1.25L, 1.0L, 0.0L, 0.75L, 1.25L);
96d10bdf 6940 TEST_cc_c (cpow, 0.75L, 1.25L, 0.0L, 1.0L, 0.331825439177608832276067945276730566L, 0.131338600281188544930936345230903032L);
2550dfe9 6941
6815fabc 6942 END (cpow, complex);
8847214f
UD		 6943}
6944
2550dfe9 6945
08198877
JM		 6946static const struct test_c_c_data cproj_test_data[] =
6947 {
6948 START_DATA (cproj),
6949 TEST_c_c (cproj, 0.0, 0.0, 0.0, 0.0),
6950 TEST_c_c (cproj, minus_zero, minus_zero, minus_zero, minus_zero),
6951 TEST_c_c (cproj, 0.0, minus_zero, 0.0, minus_zero),
6952 TEST_c_c (cproj, minus_zero, 0.0, minus_zero, 0.0),
6953
6954 TEST_c_c (cproj, qnan_value, qnan_value, qnan_value, qnan_value),
6955
6956 TEST_c_c (cproj, plus_infty, plus_infty, plus_infty, 0.0),
6957 TEST_c_c (cproj, plus_infty, minus_infty, plus_infty, minus_zero),
6958 TEST_c_c (cproj, minus_infty, plus_infty, plus_infty, 0.0),
6959 TEST_c_c (cproj, minus_infty, minus_infty, plus_infty, minus_zero),
6960
6961 TEST_c_c (cproj, 1.0, 0.0, 1.0, 0.0),
6962 TEST_c_c (cproj, 2.0, 3.0, 2.0, 3.0),
6963 END_DATA (cproj)
6964 };
6965
8847214f
UD		 6966static void
6967cproj_test (void)
6968{
6969 START (cproj);
08198877 6970 RUN_TEST_LOOP_c_c (cproj, cproj_test_data, );
6815fabc 6971 END (cproj, complex);
8847214f
UD		 6972}
6973
2550dfe9 6974
0cdc8e6f
UD		 6975static void
6976creal_test (void)
6977{
6978 START (creal);
6979 TEST_c_f (creal, 0.0, 1.0, 0.0);
6980 TEST_c_f (creal, minus_zero, 1.0, minus_zero);
67e971f1
TS		 6981 TEST_c_f (creal, qnan_value, 1.0, qnan_value);
6982 TEST_c_f (creal, qnan_value, qnan_value, qnan_value);
0cdc8e6f
UD		 6983 TEST_c_f (creal, plus_infty, 1.0, plus_infty);
6984 TEST_c_f (creal, minus_infty, 1.0, minus_infty);
6985 TEST_c_f (creal, 2.0, 3.0, 2.0);
6986
6987 END (creal);
6988}
8847214f 6989
08198877
JM		 6990static const struct test_c_c_data csin_test_data[] =
6991 {
6992 START_DATA (csin),
6993 TEST_c_c (csin, 0.0, 0.0, 0.0, 0.0),
6994 TEST_c_c (csin, minus_zero, 0.0, minus_zero, 0.0),
6995 TEST_c_c (csin, 0.0, minus_zero, 0, minus_zero),
6996 TEST_c_c (csin, minus_zero, minus_zero, minus_zero, minus_zero),
8847214f 6997
08198877
JM		 6998 TEST_c_c (csin, 0.0, plus_infty, 0.0, plus_infty),
6999 TEST_c_c (csin, minus_zero, plus_infty, minus_zero, plus_infty),
7000 TEST_c_c (csin, 0.0, minus_infty, 0.0, minus_infty),
7001 TEST_c_c (csin, minus_zero, minus_infty, minus_zero, minus_infty),
8847214f 7002
08198877
JM		 7003 TEST_c_c (csin, plus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7004 TEST_c_c (csin, minus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7005 TEST_c_c (csin, plus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7006 TEST_c_c (csin, minus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7007
08198877
JM		 7008 TEST_c_c (csin, plus_infty, plus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7009 TEST_c_c (csin, minus_infty, plus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7010 TEST_c_c (csin, plus_infty, minus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7011 TEST_c_c (csin, minus_infty, minus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7012
08198877
JM		 7013 TEST_c_c (csin, plus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7014 TEST_c_c (csin, plus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7015 TEST_c_c (csin, minus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7016 TEST_c_c (csin, minus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 7017
08198877
JM		 7018 TEST_c_c (csin, 4.625, plus_infty, minus_infty, minus_infty),
7019 TEST_c_c (csin, 4.625, minus_infty, minus_infty, plus_infty),
7020 TEST_c_c (csin, -4.625, plus_infty, plus_infty, minus_infty),
7021 TEST_c_c (csin, -4.625, minus_infty, plus_infty, plus_infty),
8847214f 7022
08198877
JM		 7023 TEST_c_c (csin, qnan_value, 0.0, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
7024 TEST_c_c (csin, qnan_value, minus_zero, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 7025
08198877
JM		 7026 TEST_c_c (csin, qnan_value, plus_infty, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
7027 TEST_c_c (csin, qnan_value, minus_infty, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
8847214f 7028
08198877
JM		 7029 TEST_c_c (csin, qnan_value, 9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7030 TEST_c_c (csin, qnan_value, -9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7031
08198877
JM		 7032 TEST_c_c (csin, 0.0, qnan_value, 0.0, qnan_value),
7033 TEST_c_c (csin, minus_zero, qnan_value, minus_zero, qnan_value),
8847214f 7034
08198877
JM		 7035 TEST_c_c (csin, 10.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7036 TEST_c_c (csin, qnan_value, -10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7037
08198877
JM		 7038 TEST_c_c (csin, plus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7039 TEST_c_c (csin, minus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7040
08198877 7041 TEST_c_c (csin, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 7042
08198877
JM		 7043 TEST_c_c (csin, 0.75L, 1.25L, 1.28722291002649188575873510790565441L, 1.17210635989270256101081285116138863L),
7044 TEST_c_c (csin, -2, -3, -9.15449914691142957346729954460983256L, 4.16890695996656435075481305885375484L),
8847214f 7045
08198877
JM		 7046 TEST_c_c (csin, 0.75, 89.5, 2.522786001038096774676288412995370563339e38L, 2.708024460708609732016532185663087200560e38L),
7047 TEST_c_c (csin, 0.75, -89.5, 2.522786001038096774676288412995370563339e38L, -2.708024460708609732016532185663087200560e38L),
7048 TEST_c_c (csin, -0.75, 89.5, -2.522786001038096774676288412995370563339e38L, 2.708024460708609732016532185663087200560e38L),
7049 TEST_c_c (csin, -0.75, -89.5, -2.522786001038096774676288412995370563339e38L, -2.708024460708609732016532185663087200560e38L),
e0b16cc2
JM		 7050
7051#ifndef TEST_FLOAT
08198877
JM		 7052 TEST_c_c (csin, 0.75, 710.5, 1.255317763348154410745082950806112487736e308L, 1.347490911916428129246890157395342279438e308L),
7053 TEST_c_c (csin, 0.75, -710.5, 1.255317763348154410745082950806112487736e308L, -1.347490911916428129246890157395342279438e308L),
7054 TEST_c_c (csin, -0.75, 710.5, -1.255317763348154410745082950806112487736e308L, 1.347490911916428129246890157395342279438e308L),
7055 TEST_c_c (csin, -0.75, -710.5, -1.255317763348154410745082950806112487736e308L, -1.347490911916428129246890157395342279438e308L),
e0b16cc2
JM		 7056#endif
7057
7058#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 7059 TEST_c_c (csin, 0.75, 11357.25, 8.385498349388321535962327491346664141020e4931L, 9.001213196851067077465606717616495588201e4931L),
7060 TEST_c_c (csin, 0.75, -11357.25, 8.385498349388321535962327491346664141020e4931L, -9.001213196851067077465606717616495588201e4931L),
7061 TEST_c_c (csin, -0.75, 11357.25, -8.385498349388321535962327491346664141020e4931L, 9.001213196851067077465606717616495588201e4931L),
7062 TEST_c_c (csin, -0.75, -11357.25, -8.385498349388321535962327491346664141020e4931L, -9.001213196851067077465606717616495588201e4931L),
e0b16cc2
JM		 7063#endif
7064
7065#ifdef TEST_FLOAT
08198877 7066 TEST_c_c (csin, 0x1p-149, 180, 1.043535896672617552965983803453927655332e33L, plus_infty, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7067#endif
7068
7069#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 7070 TEST_c_c (csin, 0x1p-1074, 1440, 5.981479269486130556466515778180916082415e301L, plus_infty, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7071#endif
7072
7073#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 7074 TEST_c_c (csin, 0x1p-16434L, 22730, 1.217853148905605987081057582351152052687e4924L, plus_infty, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7075#endif
7076
08198877
JM		 7077 TEST_c_c (csin, min_subnorm_value, min_value, min_subnorm_value, min_value, UNDERFLOW_EXCEPTION),
7078 TEST_c_c (csin, min_value, min_subnorm_value, min_value, min_subnorm_value, UNDERFLOW_EXCEPTION),
7079 END_DATA (csin)
7080 };
8847214f
UD		 7081
7082static void
08198877 7083csin_test (void)
8847214f 7084{
aaca11d8 7085 errno = 0;
08198877 7086 FUNC(csin) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 7087 if (errno == ENOSYS)
7088 /* Function not implemented. */
7089 return;
8847214f 7090
08198877
JM		 7091 START (csin);
7092 RUN_TEST_LOOP_c_c (csin, csin_test_data, );
7093 END (csin, complex);
7094}
7095
8847214f 7096
08198877
JM		 7097static const struct test_c_c_data csinh_test_data[] =
7098 {
7099 START_DATA (csinh),
7100 TEST_c_c (csinh, 0.0, 0.0, 0.0, 0.0),
7101 TEST_c_c (csinh, minus_zero, 0.0, minus_zero, 0.0),
7102 TEST_c_c (csinh, 0.0, minus_zero, 0.0, minus_zero),
7103 TEST_c_c (csinh, minus_zero, minus_zero, minus_zero, minus_zero),
8847214f 7104
08198877
JM		 7105 TEST_c_c (csinh, 0.0, plus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7106 TEST_c_c (csinh, minus_zero, plus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7107 TEST_c_c (csinh, 0.0, minus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7108 TEST_c_c (csinh, minus_zero, minus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7109
08198877
JM		 7110 TEST_c_c (csinh, plus_infty, 0.0, plus_infty, 0.0),
7111 TEST_c_c (csinh, minus_infty, 0.0, minus_infty, 0.0),
7112 TEST_c_c (csinh, plus_infty, minus_zero, plus_infty, minus_zero),
7113 TEST_c_c (csinh, minus_infty, minus_zero, minus_infty, minus_zero),
8847214f 7114
08198877
JM		 7115 TEST_c_c (csinh, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7116 TEST_c_c (csinh, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7117 TEST_c_c (csinh, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7118 TEST_c_c (csinh, minus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7119
08198877
JM		 7120 TEST_c_c (csinh, plus_infty, 4.625, minus_infty, minus_infty),
7121 TEST_c_c (csinh, minus_infty, 4.625, plus_infty, minus_infty),
7122 TEST_c_c (csinh, plus_infty, -4.625, minus_infty, plus_infty),
7123 TEST_c_c (csinh, minus_infty, -4.625, plus_infty, plus_infty),
8847214f 7124
08198877
JM		 7125 TEST_c_c (csinh, 6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7126 TEST_c_c (csinh, -6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7127 TEST_c_c (csinh, 6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7128 TEST_c_c (csinh, -6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 7129
08198877
JM		 7130 TEST_c_c (csinh, 0.0, qnan_value, 0.0, qnan_value, IGNORE_ZERO_INF_SIGN),
7131 TEST_c_c (csinh, minus_zero, qnan_value, 0.0, qnan_value, IGNORE_ZERO_INF_SIGN),
8847214f 7132
08198877
JM		 7133 TEST_c_c (csinh, plus_infty, qnan_value, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
7134 TEST_c_c (csinh, minus_infty, qnan_value, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
8847214f 7135
08198877
JM		 7136 TEST_c_c (csinh, 9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7137 TEST_c_c (csinh, -9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7138
08198877
JM		 7139 TEST_c_c (csinh, qnan_value, 0.0, qnan_value, 0.0),
7140 TEST_c_c (csinh, qnan_value, minus_zero, qnan_value, minus_zero),
8847214f 7141
08198877
JM		 7142 TEST_c_c (csinh, qnan_value, 10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7143 TEST_c_c (csinh, qnan_value, -10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7144
08198877
JM		 7145 TEST_c_c (csinh, qnan_value, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7146 TEST_c_c (csinh, qnan_value, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7147
08198877 7148 TEST_c_c (csinh, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 7149
08198877
JM		 7150 TEST_c_c (csinh, 0.75L, 1.25L, 0.259294854551162779153349830618433028L, 1.22863452409509552219214606515777594L),
7151 TEST_c_c (csinh, -2, -3, 3.59056458998577995201256544779481679L, -0.530921086248519805267040090660676560L),
8847214f 7152
08198877
JM		 7153 TEST_c_c (csinh, 89.5, 0.75, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
7154 TEST_c_c (csinh, -89.5, 0.75, -2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
7155 TEST_c_c (csinh, 89.5, -0.75, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
7156 TEST_c_c (csinh, -89.5, -0.75, -2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
e0b16cc2
JM		 7157
7158#ifndef TEST_FLOAT
08198877
JM		 7159 TEST_c_c (csinh, 710.5, 0.75, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
7160 TEST_c_c (csinh, -710.5, 0.75, -1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
7161 TEST_c_c (csinh, 710.5, -0.75, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
7162 TEST_c_c (csinh, -710.5, -0.75, -1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
e0b16cc2
JM		 7163#endif
7164
7165#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 7166 TEST_c_c (csinh, 11357.25, 0.75, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
7167 TEST_c_c (csinh, -11357.25, 0.75, -9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
7168 TEST_c_c (csinh, 11357.25, -0.75, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
7169 TEST_c_c (csinh, -11357.25, -0.75, -9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
e0b16cc2
JM		 7170#endif
7171
7172#ifdef TEST_FLOAT
08198877 7173 TEST_c_c (csinh, 180, 0x1p-149, plus_infty, 1.043535896672617552965983803453927655332e33L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7174#endif
7175
7176#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 7177 TEST_c_c (csinh, 1440, 0x1p-1074, plus_infty, 5.981479269486130556466515778180916082415e301L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7178#endif
7179
7180#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 7181 TEST_c_c (csinh, 22730, 0x1p-16434L, plus_infty, 1.217853148905605987081057582351152052687e4924L, OVERFLOW_EXCEPTION),
e0b16cc2
JM		 7182#endif
7183
08198877
JM		 7184 TEST_c_c (csinh, min_subnorm_value, min_value, min_subnorm_value, min_value, UNDERFLOW_EXCEPTION),
7185 TEST_c_c (csinh, min_value, min_subnorm_value, min_value, min_subnorm_value, UNDERFLOW_EXCEPTION),
7186 END_DATA (csinh)
7187 };
2550dfe9 7188
8847214f 7189static void
08198877 7190csinh_test (void)
8847214f 7191{
aaca11d8 7192 errno = 0;
08198877 7193 FUNC(csinh) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD		 7194 if (errno == ENOSYS)
7195 /* Function not implemented. */
7196 return;
7197
08198877
JM		 7198 START (csinh);
7199 RUN_TEST_LOOP_c_c (csinh, csinh_test_data, );
7200 END (csinh, complex);
7201}
8847214f 7202
08198877
JM		 7203
7204static const struct test_c_c_data csqrt_test_data[] =
7205 {
7206 START_DATA (csqrt),
7207 TEST_c_c (csqrt, 0, 0, 0.0, 0.0),
7208 TEST_c_c (csqrt, 0, minus_zero, 0, minus_zero),
7209 TEST_c_c (csqrt, minus_zero, 0, 0.0, 0.0),
7210 TEST_c_c (csqrt, minus_zero, minus_zero, 0.0, minus_zero),
7211
7212 TEST_c_c (csqrt, minus_infty, 0, 0.0, plus_infty),
7213 TEST_c_c (csqrt, minus_infty, 6, 0.0, plus_infty),
7214 TEST_c_c (csqrt, minus_infty, minus_zero, 0.0, minus_infty),
7215 TEST_c_c (csqrt, minus_infty, -6, 0.0, minus_infty),
7216
7217 TEST_c_c (csqrt, plus_infty, 0, plus_infty, 0.0),
7218 TEST_c_c (csqrt, plus_infty, 6, plus_infty, 0.0),
7219 TEST_c_c (csqrt, plus_infty, minus_zero, plus_infty, minus_zero),
7220 TEST_c_c (csqrt, plus_infty, -6, plus_infty, minus_zero),
7221
7222 TEST_c_c (csqrt, 0, plus_infty, plus_infty, plus_infty),
7223 TEST_c_c (csqrt, 4, plus_infty, plus_infty, plus_infty),
7224 TEST_c_c (csqrt, plus_infty, plus_infty, plus_infty, plus_infty),
7225 TEST_c_c (csqrt, minus_zero, plus_infty, plus_infty, plus_infty),
7226 TEST_c_c (csqrt, -4, plus_infty, plus_infty, plus_infty),
7227 TEST_c_c (csqrt, minus_infty, plus_infty, plus_infty, plus_infty),
7228 TEST_c_c (csqrt, 0, minus_infty, plus_infty, minus_infty),
7229 TEST_c_c (csqrt, 4, minus_infty, plus_infty, minus_infty),
7230 TEST_c_c (csqrt, plus_infty, minus_infty, plus_infty, minus_infty),
7231 TEST_c_c (csqrt, minus_zero, minus_infty, plus_infty, minus_infty),
7232 TEST_c_c (csqrt, -4, minus_infty, plus_infty, minus_infty),
7233 TEST_c_c (csqrt, minus_infty, minus_infty, plus_infty, minus_infty),
7234
7235 TEST_c_c (csqrt, minus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
7236
7237 TEST_c_c (csqrt, plus_infty, qnan_value, plus_infty, qnan_value),
7238
7239 TEST_c_c (csqrt, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7240 TEST_c_c (csqrt, 1, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7241 TEST_c_c (csqrt, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7242 TEST_c_c (csqrt, -1, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7243
7244 TEST_c_c (csqrt, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7245 TEST_c_c (csqrt, qnan_value, 8, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7246 TEST_c_c (csqrt, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7247 TEST_c_c (csqrt, qnan_value, -8, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7248
7249 TEST_c_c (csqrt, qnan_value, qnan_value, qnan_value, qnan_value),
7250
7251 TEST_c_c (csqrt, 16.0, -30.0, 5.0, -3.0),
7252 TEST_c_c (csqrt, -1, 0, 0.0, 1.0),
7253 TEST_c_c (csqrt, 0, 2, 1.0, 1.0),
7254 TEST_c_c (csqrt, 119, 120, 12.0, 5.0),
7255 TEST_c_c (csqrt, 0.75L, 1.25L, 1.05065169626078392338656675760808326L, 0.594868882070379067881984030639932657L),
7256 TEST_c_c (csqrt, -2, -3, 0.89597747612983812471573375529004348L, -1.6741492280355400404480393008490519L),
7257 TEST_c_c (csqrt, -2, 3, 0.89597747612983812471573375529004348L, 1.6741492280355400404480393008490519L),
7258 /* Principal square root should be returned (i.e., non-negative real
7259 part). */
7260 TEST_c_c (csqrt, 0, -1, M_SQRT1_2l, -M_SQRT1_2l),
7261
7262 TEST_c_c (csqrt, 0x1.fffffep+127L, 0x1.fffffep+127L, 2.026714405498316804978751017492482558075e+19L, 8.394925938143272988211878516208015586281e+18L),
7263 TEST_c_c (csqrt, 0x1.fffffep+127L, 1.0L, 1.844674352395372953599975585936590505260e+19L, 2.710505511993121390769065968615872097053e-20L),
7264 TEST_c_c (csqrt, 0x1p-149L, 0x1p-149L, 4.112805464342778798097003462770175200803e-23L, 1.703579802732953750368659735601389709551e-23L),
7265 TEST_c_c (csqrt, 0x1p-147L, 0x1p-147L, 8.225610928685557596194006925540350401606e-23L, 3.407159605465907500737319471202779419102e-23L),
7266
7267 TEST_c_c (csqrt, plus_zero, 0x1p-149L, 2.646977960169688559588507814623881131411e-23L, 2.646977960169688559588507814623881131411e-23L),
7268 TEST_c_c (csqrt, 0x1p-50L, 0x1p-149L, 2.980232238769531250000000000000000000000e-8L, 2.350988701644575015937473074444491355637e-38L),
cdfe2c5e 7269#ifdef TEST_FLOAT
08198877 7270 TEST_c_c (csqrt, 0x1p+127L, 0x1p-149L, 1.304381782533278221234957180625250836888e19L, plus_zero, UNDERFLOW_EXCEPTION),
cdfe2c5e 7271#endif
08198877
JM		 7272 TEST_c_c (csqrt, 0x1p-149L, 0x1p+127L, 9.223372036854775808000000000000000000000e18L, 9.223372036854775808000000000000000000000e18L),
7273 TEST_c_c (csqrt, 0x1.000002p-126L, 0x1.000002p-126L, 1.191195773697904627170323731331667740087e-19L, 4.934094449071842328766868579214125217132e-20L),
7274 TEST_c_c (csqrt, -0x1.000002p-126L, -0x1.000002p-126L, 4.934094449071842328766868579214125217132e-20L, -1.191195773697904627170323731331667740087e-19L),
cdfe2c5e 7275
e456826d 7276#ifndef TEST_FLOAT
08198877
JM		 7277 TEST_c_c (csqrt, 0x1.fffffffffffffp+1023L, 0x1.fffffffffffffp+1023L, 1.473094556905565378990473658199034571917e+154L, 6.101757441282702188537080005372547713595e+153L),
7278 TEST_c_c (csqrt, 0x1.fffffffffffffp+1023L, 0x1p+1023L, 1.379778091031440685006200821918878702861e+154L, 3.257214233483129514781233066898042490248e+153L),
7279 TEST_c_c (csqrt, 0x1p-1074L, 0x1p-1074L, 2.442109726130830256743814843868934877597e-162L, 1.011554969366634726113090867589031782487e-162L),
7280 TEST_c_c (csqrt, 0x1p-1073L, 0x1p-1073L, 3.453664695497464982856905711457966660085e-162L, 1.430554756764195530630723976279903095110e-162L),
cdfe2c5e 7281
08198877
JM		 7282 TEST_c_c (csqrt, plus_zero, 0x1p-1074L, 1.571727784702628688909515672805082228285e-162L, 1.571727784702628688909515672805082228285e-162L),
7283 TEST_c_c (csqrt, 0x1p-500L, 0x1p-1074L, 5.527147875260444560247265192192255725514e-76L, 4.469444793151709302716387622440056066334e-249L),
cdfe2c5e 7284#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 7285 TEST_c_c (csqrt, 0x1p+1023L, 0x1p-1074L, 9.480751908109176726832526455652159260085e153L, plus_zero, UNDERFLOW_EXCEPTION),
cdfe2c5e 7286#endif
08198877
JM		 7287 TEST_c_c (csqrt, 0x1p-1074L, 0x1p+1023L, 6.703903964971298549787012499102923063740e153L, 6.703903964971298549787012499102923063740e153L),
7288 TEST_c_c (csqrt, 0x1.0000000000001p-1022L, 0x1.0000000000001p-1022L, 1.638872094839911521020410942677082920935e-154L, 6.788430486774966350907249113759995429568e-155L),
7289 TEST_c_c (csqrt, -0x1.0000000000001p-1022L, -0x1.0000000000001p-1022L, 6.788430486774966350907249113759995429568e-155L, -1.638872094839911521020410942677082920935e-154L),
e456826d
JM		 7290#endif
7291
7292#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 7293 TEST_c_c (csqrt, 0x1.fp+16383L, 0x1.fp+16383L, 1.179514222452201722651836720466795901016e+2466L, 4.885707879516577666702435054303191575148e+2465L),
7294 TEST_c_c (csqrt, 0x1.fp+16383L, 0x1p+16383L, 1.106698967236475180613254276996359485630e+2466L, 2.687568007603946993388538156299100955642e+2465L),
7295 TEST_c_c (csqrt, 0x1p-16440L, 0x1p-16441L, 3.514690655930285351254618340783294558136e-2475L, 8.297059146828716918029689466551384219370e-2476L),
cdfe2c5e 7296
08198877
JM		 7297 TEST_c_c (csqrt, plus_zero, 0x1p-16445L, 4.269191686890197837775136325621239761720e-2476L, 4.269191686890197837775136325621239761720e-2476L),
7298 TEST_c_c (csqrt, 0x1p-5000L, 0x1p-16445L, 2.660791472672778409283210520357607795518e-753L, 6.849840675828785164910701384823702064234e-4199L),
7299 TEST_c_c (csqrt, 0x1p+16383L, 0x1p-16445L, 7.712754032630730034273323365543179095045e2465L, plus_zero, UNDERFLOW_EXCEPTION),
7300 TEST_c_c (csqrt, 0x1p-16445L, 0x1p+16383L, 5.453740678097079647314921223668914312241e2465L, 5.453740678097079647314921223668914312241e2465L),
7301 TEST_c_c (csqrt, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-16382L, 2.014551439675644900131815801350165472778e-2466L, 8.344545284118961664300307045791497724440e-2467L),
7302 TEST_c_c (csqrt, -0x1.0000000000000002p-16382L, -0x1.0000000000000002p-16382L, 8.344545284118961664300307045791497724440e-2467L, -2.014551439675644900131815801350165472778e-2466L),
cdfe2c5e
JM		 7303
7304# if LDBL_MANT_DIG >= 113
08198877
JM		 7305 TEST_c_c (csqrt, plus_zero, 0x1p-16494L, 1.799329752913293143453817328207572571442e-2483L, 1.799329752913293143453817328207572571442e-2483L),
7306 TEST_c_c (csqrt, 0x1p-5000L, 0x1p-16494L, 2.660791472672778409283210520357607795518e-753L, 1.216776133331049643422030716668249905907e-4213L),
7307 TEST_c_c (csqrt, 0x1p+16383L, 0x1p-16494L, 7.712754032630730034273323365543179095045e2465L, plus_zero, UNDERFLOW_EXCEPTION),
7308 TEST_c_c (csqrt, 0x1p-16494L, 0x1p+16383L, 5.453740678097079647314921223668914312241e2465L, 5.453740678097079647314921223668914312241e2465L),
7309 TEST_c_c (csqrt, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-16382L, 2.014551439675644900022606748976158925145e-2466L, 8.344545284118961663847948339519226074126e-2467L),
7310 TEST_c_c (csqrt, -0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-16382L, 8.344545284118961663847948339519226074126e-2467L, -2.014551439675644900022606748976158925145e-2466L),
cdfe2c5e 7311# endif
e456826d 7312#endif
08198877
JM		 7313 END_DATA (csqrt)
7314 };
8847214f
UD		 7315
7316static void
08198877 7317csqrt_test (void)
8847214f 7318{
aaca11d8 7319 errno = 0;
08198877 7320 FUNC(csqrt) (BUILD_COMPLEX (-1, 0));
aaca11d8
UD		 7321 if (errno == ENOSYS)
7322 /* Function not implemented. */
7323 return;
7324
08198877
JM		 7325 START (csqrt);
7326 RUN_TEST_LOOP_c_c (csqrt, csqrt_test_data, );
7327 END (csqrt, complex);
7328}
8847214f 7329
08198877
JM		 7330static const struct test_c_c_data ctan_test_data[] =
7331 {
7332 START_DATA (ctan),
7333 TEST_c_c (ctan, 0, 0, 0.0, 0.0),
7334 TEST_c_c (ctan, 0, minus_zero, 0.0, minus_zero),
7335 TEST_c_c (ctan, minus_zero, 0, minus_zero, 0.0),
7336 TEST_c_c (ctan, minus_zero, minus_zero, minus_zero, minus_zero),
8847214f 7337
08198877
JM		 7338 TEST_c_c (ctan, 0, plus_infty, 0.0, 1.0),
7339 TEST_c_c (ctan, 1, plus_infty, 0.0, 1.0),
7340 TEST_c_c (ctan, minus_zero, plus_infty, minus_zero, 1.0),
7341 TEST_c_c (ctan, -1, plus_infty, minus_zero, 1.0),
8847214f 7342
08198877
JM		 7343 TEST_c_c (ctan, 0, minus_infty, 0.0, -1.0),
7344 TEST_c_c (ctan, 1, minus_infty, 0.0, -1.0),
7345 TEST_c_c (ctan, minus_zero, minus_infty, minus_zero, -1.0),
7346 TEST_c_c (ctan, -1, minus_infty, minus_zero, -1.0),
8847214f 7347
08198877
JM		 7348 TEST_c_c (ctan, plus_infty, 0, qnan_value, qnan_value, INVALID_EXCEPTION),
7349 TEST_c_c (ctan, plus_infty, 2, qnan_value, qnan_value, INVALID_EXCEPTION),
7350 TEST_c_c (ctan, minus_infty, 0, qnan_value, qnan_value, INVALID_EXCEPTION),
7351 TEST_c_c (ctan, minus_infty, 2, qnan_value, qnan_value, INVALID_EXCEPTION),
7352 TEST_c_c (ctan, plus_infty, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION),
7353 TEST_c_c (ctan, plus_infty, -2, qnan_value, qnan_value, INVALID_EXCEPTION),
7354 TEST_c_c (ctan, minus_infty, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION),
7355 TEST_c_c (ctan, minus_infty, -2, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 7356
08198877
JM		 7357 TEST_c_c (ctan, qnan_value, plus_infty, 0.0, 1.0, IGNORE_ZERO_INF_SIGN),
7358 TEST_c_c (ctan, qnan_value, minus_infty, 0.0, -1.0, IGNORE_ZERO_INF_SIGN),
8847214f 7359
08198877
JM		 7360 TEST_c_c (ctan, 0, qnan_value, 0.0, qnan_value),
7361 TEST_c_c (ctan, minus_zero, qnan_value, minus_zero, qnan_value),
8847214f 7362
08198877
JM		 7363 TEST_c_c (ctan, 0.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7364 TEST_c_c (ctan, -4.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7365
08198877
JM		 7366 TEST_c_c (ctan, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7367 TEST_c_c (ctan, qnan_value, 5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7368 TEST_c_c (ctan, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7369 TEST_c_c (ctan, qnan_value, -0.25, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7370
08198877 7371 TEST_c_c (ctan, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 7372
08198877
JM		 7373 TEST_c_c (ctan, 0.75L, 1.25L, 0.160807785916206426725166058173438663L, 0.975363285031235646193581759755216379L),
7374 TEST_c_c (ctan, -2, -3, 0.376402564150424829275122113032269084e-2L, -1.00323862735360980144635859782192726L),
8847214f 7375
08198877
JM		 7376 TEST_c_c (ctan, 1, 45, 1.490158918874345552942703234806348520895e-39L, 1.000000000000000000000000000000000000001L, UNDERFLOW_EXCEPTION_FLOAT),
7377 TEST_c_c (ctan, 1, 47, 2.729321264492904590777293425576722354636e-41L, 1.0, UNDERFLOW_EXCEPTION_FLOAT),
bcc8d661
JM		 7378
7379#ifndef TEST_FLOAT
08198877
JM		 7380 TEST_c_c (ctan, 1, 355, 8.140551093483276762350406321792653551513e-309L, 1.0, UNDERFLOW_EXCEPTION_DOUBLE),
7381 TEST_c_c (ctan, 1, 365, 1.677892637497921890115075995898773550884e-317L, 1.0, UNDERFLOW_EXCEPTION_DOUBLE),
bcc8d661
JM		 7382#endif
7383
7384#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM		 7385 TEST_c_c (ctan, 1, 5680, 4.725214596136812019616700920476949798307e-4934L, 1.0, UNDERFLOW_EXCEPTION),
7386 TEST_c_c (ctan, 1, 5690, 9.739393181626937151720816611272607059057e-4943L, 1.0, UNDERFLOW_EXCEPTION),
bcc8d661
JM		 7387#endif
7388
08198877 7389 TEST_c_c (ctan, 0x3.243f6cp-1, 0, -2.287733242885645987394874673945769518150e7L, 0.0),
bcc8d661 7390
08198877 7391 TEST_c_c (ctan, 0x1p127, 1, 0.2446359391192790896381501310437708987204L, 0.9101334047676183761532873794426475906201L),
bcc8d661
JM		 7392
7393#ifndef TEST_FLOAT
08198877 7394 TEST_c_c (ctan, 0x1p1023, 1, -0.2254627924997545057926782581695274244229L, 0.8786063118883068695462540226219865087189L),
bcc8d661
JM		 7395#endif
7396
7397#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 7398 TEST_c_c (ctan, 0x1p16383L, 1, 0.1608598776370396607204448234354670036772L, 0.8133818522051542536316746743877629761488L),
bcc8d661
JM		 7399#endif
7400
08198877
JM		 7401 TEST_c_c (ctan, 50000, 50000, plus_zero, 1.0, UNDERFLOW_EXCEPTION),
7402 TEST_c_c (ctan, 50000, -50000, plus_zero, -1.0, UNDERFLOW_EXCEPTION),
7403 TEST_c_c (ctan, -50000, 50000, minus_zero, 1.0, UNDERFLOW_EXCEPTION),
7404 TEST_c_c (ctan, -50000, -50000, minus_zero, -1.0, UNDERFLOW_EXCEPTION),
7405 END_DATA (ctan)
7406 };
bcc8d661 7407
08198877
JM		 7408static void
7409ctan_test (void)
7410{
7411 errno = 0;
7412 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7413 if (errno == ENOSYS)
7414 /* Function not implemented. */
7415 return;
7416
7417 START (ctan);
7418 RUN_TEST_LOOP_c_c (ctan, ctan_test_data, );
6815fabc 7419 END (ctan, complex);
8847214f
UD		 7420}
7421
7422
08198877
JM		 7423static const struct test_c_c_data ctan_tonearest_test_data[] =
7424 {
7425 START_DATA (ctan_tonearest),
7426 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
7427
7428#ifndef TEST_FLOAT
7429 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
7430#endif
7431
7432#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
7433 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
7434#endif
7435 END_DATA (ctan_tonearest)
7436 };
7437
ca61cf32
JM		 7438static void
7439ctan_test_tonearest (void)
7440{
ca61cf32
JM		 7441 errno = 0;
7442 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7443 if (errno == ENOSYS)
7444 /* Function not implemented. */
7445 return;
7446
7447 START (ctan_tonearest);
08198877
JM		 7448 RUN_TEST_LOOP_c_c (ctan, ctan_tonearest_test_data, FE_TONEAREST);
7449 END (ctan_tonearest, complex);
7450}
ca61cf32 7451
ca61cf32 7452
08198877
JM		 7453static const struct test_c_c_data ctan_towardzero_test_data[] =
7454 {
7455 START_DATA (ctan_towardzero),
7456 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
ca61cf32
JM		 7457
7458#ifndef TEST_FLOAT
08198877 7459 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
ca61cf32
JM		 7460#endif
7461
7462#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7463 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
ca61cf32 7464#endif
08198877
JM		 7465 END_DATA (ctan_towardzero)
7466 };
ca61cf32
JM		 7467
7468static void
7469ctan_test_towardzero (void)
7470{
ca61cf32
JM		 7471 errno = 0;
7472 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7473 if (errno == ENOSYS)
7474 /* Function not implemented. */
7475 return;
7476
7477 START (ctan_towardzero);
08198877
JM		 7478 RUN_TEST_LOOP_c_c (ctan, ctan_towardzero_test_data, FE_TOWARDZERO);
7479 END (ctan_towardzero, complex);
7480}
ca61cf32 7481
ca61cf32 7482
08198877
JM		 7483static const struct test_c_c_data ctan_downward_test_data[] =
7484 {
7485 START_DATA (ctan_downward),
7486 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
ca61cf32
JM		 7487
7488#ifndef TEST_FLOAT
08198877 7489 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
ca61cf32
JM		 7490#endif
7491
7492#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7493 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
ca61cf32 7494#endif
08198877
JM		 7495 END_DATA (ctan_downward)
7496 };
ca61cf32
JM		 7497
7498static void
7499ctan_test_downward (void)
7500{
ca61cf32
JM		 7501 errno = 0;
7502 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7503 if (errno == ENOSYS)
7504 /* Function not implemented. */
7505 return;
7506
7507 START (ctan_downward);
08198877
JM		 7508 RUN_TEST_LOOP_c_c (ctan, ctan_downward_test_data, FE_DOWNWARD);
7509 END (ctan_downward, complex);
7510}
ca61cf32 7511
ca61cf32 7512
08198877
JM		 7513static const struct test_c_c_data ctan_upward_test_data[] =
7514 {
7515 START_DATA (ctan_upward),
7516 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
ca61cf32
JM		 7517
7518#ifndef TEST_FLOAT
08198877 7519 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
ca61cf32
JM		 7520#endif
7521
7522#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7523 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
ca61cf32 7524#endif
08198877
JM		 7525 END_DATA (ctan_upward)
7526 };
ca61cf32
JM		 7527
7528static void
7529ctan_test_upward (void)
7530{
ca61cf32
JM		 7531 errno = 0;
7532 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7533 if (errno == ENOSYS)
7534 /* Function not implemented. */
7535 return;
7536
7537 START (ctan_upward);
08198877
JM		 7538 RUN_TEST_LOOP_c_c (ctan, ctan_upward_test_data, FE_UPWARD);
7539 END (ctan_upward, complex);
7540}
ca61cf32 7541
ca61cf32 7542
08198877
JM		 7543static const struct test_c_c_data ctanh_test_data[] =
7544 {
7545 START_DATA (ctanh),
7546 TEST_c_c (ctanh, 0, 0, 0.0, 0.0),
7547 TEST_c_c (ctanh, 0, minus_zero, 0.0, minus_zero),
7548 TEST_c_c (ctanh, minus_zero, 0, minus_zero, 0.0),
7549 TEST_c_c (ctanh, minus_zero, minus_zero, minus_zero, minus_zero),
7550
7551 TEST_c_c (ctanh, plus_infty, 0, 1.0, 0.0),
7552 TEST_c_c (ctanh, plus_infty, 1, 1.0, 0.0),
7553 TEST_c_c (ctanh, plus_infty, minus_zero, 1.0, minus_zero),
7554 TEST_c_c (ctanh, plus_infty, -1, 1.0, minus_zero),
7555 TEST_c_c (ctanh, minus_infty, 0, -1.0, 0.0),
7556 TEST_c_c (ctanh, minus_infty, 1, -1.0, 0.0),
7557 TEST_c_c (ctanh, minus_infty, minus_zero, -1.0, minus_zero),
7558 TEST_c_c (ctanh, minus_infty, -1, -1.0, minus_zero),
7559
7560 TEST_c_c (ctanh, 0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7561 TEST_c_c (ctanh, 2, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7562 TEST_c_c (ctanh, 0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7563 TEST_c_c (ctanh, 2, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7564 TEST_c_c (ctanh, minus_zero, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7565 TEST_c_c (ctanh, -2, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7566 TEST_c_c (ctanh, minus_zero, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7567 TEST_c_c (ctanh, -2, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7568
7569 TEST_c_c (ctanh, plus_infty, qnan_value, 1.0, 0.0, IGNORE_ZERO_INF_SIGN),
7570 TEST_c_c (ctanh, minus_infty, qnan_value, -1.0, 0.0, IGNORE_ZERO_INF_SIGN),
7571
7572 TEST_c_c (ctanh, qnan_value, 0, qnan_value, 0.0),
7573 TEST_c_c (ctanh, qnan_value, minus_zero, qnan_value, minus_zero),
7574
7575 TEST_c_c (ctanh, qnan_value, 0.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7576 TEST_c_c (ctanh, qnan_value, -4.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7577
7578 TEST_c_c (ctanh, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7579 TEST_c_c (ctanh, 5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7580 TEST_c_c (ctanh, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7581 TEST_c_c (ctanh, -0.25, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7582
7583 TEST_c_c (ctanh, qnan_value, qnan_value, qnan_value, qnan_value),
7584
7585 TEST_c_c (ctanh, 0, M_PI_4l, 0.0, 1.0),
7586
7587 TEST_c_c (ctanh, 0.75L, 1.25L, 1.37260757053378320258048606571226857L, 0.385795952609750664177596760720790220L),
7588 TEST_c_c (ctanh, -2, -3, -0.965385879022133124278480269394560686L, 0.988437503832249372031403430350121098e-2L),
7589
7590 TEST_c_c (ctanh, 45, 1, 1.000000000000000000000000000000000000001L, 1.490158918874345552942703234806348520895e-39L, UNDERFLOW_EXCEPTION_FLOAT),
7591 TEST_c_c (ctanh, 47, 1, 1.0, 2.729321264492904590777293425576722354636e-41L, UNDERFLOW_EXCEPTION_FLOAT),
ca61cf32
JM		 7592
7593#ifndef TEST_FLOAT
08198877
JM		 7594 TEST_c_c (ctanh, 355, 1, 1.0, 8.140551093483276762350406321792653551513e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
7595 TEST_c_c (ctanh, 365, 1, 1.0, 1.677892637497921890115075995898773550884e-317L, UNDERFLOW_EXCEPTION_DOUBLE),
ca61cf32
JM		 7596#endif
7597
08198877
JM		 7598#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7599 TEST_c_c (ctanh, 5680, 1, 1.0, 4.725214596136812019616700920476949798307e-4934L, UNDERFLOW_EXCEPTION),
7600 TEST_c_c (ctanh, 5690, 1, 1.0, 9.739393181626937151720816611272607059057e-4943L, UNDERFLOW_EXCEPTION),
ca61cf32 7601#endif
ca61cf32 7602
08198877 7603 TEST_c_c (ctanh, 0, 0x3.243f6cp-1, 0.0, -2.287733242885645987394874673945769518150e7L),
ca61cf32 7604
08198877 7605 TEST_c_c (ctanh, 1, 0x1p127, 0.9101334047676183761532873794426475906201L, 0.2446359391192790896381501310437708987204L),
ca61cf32 7606
08198877
JM		 7607#ifndef TEST_FLOAT
7608 TEST_c_c (ctanh, 1, 0x1p1023, 0.8786063118883068695462540226219865087189L, -0.2254627924997545057926782581695274244229L),
7609#endif
7610
7611#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7612 TEST_c_c (ctanh, 1, 0x1p16383L, 0.8133818522051542536316746743877629761488L, 0.1608598776370396607204448234354670036772L),
7613#endif
7614
7615 TEST_c_c (ctanh, 50000, 50000, 1.0, plus_zero, UNDERFLOW_EXCEPTION),
7616 TEST_c_c (ctanh, 50000, -50000, 1.0, minus_zero, UNDERFLOW_EXCEPTION),
7617 TEST_c_c (ctanh, -50000, 50000, -1.0, plus_zero, UNDERFLOW_EXCEPTION),
7618 TEST_c_c (ctanh, -50000, -50000, -1.0, minus_zero, UNDERFLOW_EXCEPTION),
7619 END_DATA (ctanh)
7620 };
ca61cf32 7621
8847214f
UD		 7622static void
7623ctanh_test (void)
7624{
aaca11d8
UD		 7625 errno = 0;
7626 FUNC(ctanh) (BUILD_COMPLEX (0, 0));
7627 if (errno == ENOSYS)
7628 /* Function not implemented. */
7629 return;
7630
8847214f 7631 START (ctanh);
08198877
JM		 7632 RUN_TEST_LOOP_c_c (ctanh, ctanh_test_data, );
7633 END (ctanh, complex);
7634}
8847214f 7635
bcc8d661 7636
08198877
JM		 7637static const struct test_c_c_data ctanh_tonearest_test_data[] =
7638 {
7639 START_DATA (ctanh_tonearest),
7640 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
bcc8d661
JM		 7641
7642#ifndef TEST_FLOAT
08198877 7643 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
bcc8d661
JM		 7644#endif
7645
08198877
JM		 7646#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
7647 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
bcc8d661 7648#endif
08198877
JM		 7649 END_DATA (ctanh_tonearest)
7650 };
2550dfe9 7651
ca61cf32
JM		 7652static void
7653ctanh_test_tonearest (void)
7654{
ca61cf32
JM		 7655 errno = 0;
7656 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7657 if (errno == ENOSYS)
7658 /* Function not implemented. */
7659 return;
7660
7661 START (ctanh_tonearest);
08198877
JM		 7662 RUN_TEST_LOOP_c_c (ctanh, ctanh_tonearest_test_data, FE_TONEAREST);
7663 END (ctanh_tonearest, complex);
7664}
ca61cf32 7665
ca61cf32 7666
08198877
JM		 7667static const struct test_c_c_data ctanh_towardzero_test_data[] =
7668 {
7669 START_DATA (ctanh_towardzero),
7670 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
ca61cf32
JM		 7671
7672#ifndef TEST_FLOAT
08198877 7673 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
ca61cf32
JM		 7674#endif
7675
7676#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7677 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
ca61cf32 7678#endif
08198877
JM		 7679 END_DATA (ctanh_towardzero)
7680 };
ca61cf32
JM		 7681
7682static void
7683ctanh_test_towardzero (void)
7684{
ca61cf32
JM		 7685 errno = 0;
7686 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7687 if (errno == ENOSYS)
7688 /* Function not implemented. */
7689 return;
7690
7691 START (ctanh_towardzero);
08198877
JM		 7692 RUN_TEST_LOOP_c_c (ctanh, ctanh_towardzero_test_data, FE_TOWARDZERO);
7693 END (ctanh_towardzero, complex);
7694}
ca61cf32 7695
ca61cf32 7696
08198877
JM		 7697static const struct test_c_c_data ctanh_downward_test_data[] =
7698 {
7699 START_DATA (ctanh_downward),
7700 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
ca61cf32
JM		 7701
7702#ifndef TEST_FLOAT
08198877 7703 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
ca61cf32
JM		 7704#endif
7705
7706#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7707 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
ca61cf32 7708#endif
08198877
JM		 7709 END_DATA (ctanh_downward)
7710 };
ca61cf32
JM		 7711
7712static void
7713ctanh_test_downward (void)
7714{
ca61cf32
JM		 7715 errno = 0;
7716 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7717 if (errno == ENOSYS)
7718 /* Function not implemented. */
7719 return;
7720
7721 START (ctanh_downward);
08198877
JM		 7722 RUN_TEST_LOOP_c_c (ctanh, ctanh_downward_test_data, FE_DOWNWARD);
7723 END (ctanh_downward, complex);
7724}
ca61cf32 7725
ca61cf32 7726
08198877
JM		 7727static const struct test_c_c_data ctanh_upward_test_data[] =
7728 {
7729 START_DATA (ctanh_upward),
7730 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
ca61cf32
JM		 7731
7732#ifndef TEST_FLOAT
08198877 7733 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
ca61cf32
JM		 7734#endif
7735
7736#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7737 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
ca61cf32 7738#endif
08198877
JM		 7739 END_DATA (ctanh_upward)
7740 };
ca61cf32
JM		 7741
7742static void
7743ctanh_test_upward (void)
7744{
ca61cf32
JM		 7745 errno = 0;
7746 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7747 if (errno == ENOSYS)
7748 /* Function not implemented. */
7749 return;
7750
7751 START (ctanh_upward);
08198877 7752 RUN_TEST_LOOP_c_c (ctanh, ctanh_upward_test_data, FE_UPWARD);
ca61cf32
JM		 7753 END (ctanh_upward, complex);
7754}
7755
7756
74c57478
JM		 7757static const struct test_f_f_data erf_test_data[] =
7758 {
7759 START_DATA (erf),
7760 TEST_f_f (erf, 0, 0),
7761 TEST_f_f (erf, minus_zero, minus_zero),
7762 TEST_f_f (erf, plus_infty, 1),
7763 TEST_f_f (erf, minus_infty, -1),
7764 TEST_f_f (erf, qnan_value, qnan_value),
7765
7766 TEST_f_f (erf, 0.125L, 0.140316204801333817393029446521623398L),
7767 TEST_f_f (erf, 0.75L, 0.711155633653515131598937834591410777L),
7768 TEST_f_f (erf, 1.25L, 0.922900128256458230136523481197281140L),
7769 TEST_f_f (erf, 2.0L, 0.995322265018952734162069256367252929L),
7770 TEST_f_f (erf, 4.125L, 0.999999994576599200434933994687765914L),
7771 TEST_f_f (erf, 27.0L, 1.0L),
7772 END_DATA (erf)
7773 };
7774
8847214f
UD		 7775static void
7776erf_test (void)
7777{
7778 errno = 0;
7779 FUNC(erf) (0);
7780 if (errno == ENOSYS)
7781 /* Function not implemented. */
7782 return;
7783
7784 START (erf);
74c57478 7785 RUN_TEST_LOOP_f_f (erf, erf_test_data, );
8847214f
UD		 7786 END (erf);
7787}
7788
7789
74c57478
JM		 7790static const struct test_f_f_data erfc_test_data[] =
7791 {
7792 START_DATA (erfc),
7793 TEST_f_f (erfc, plus_infty, 0.0),
7794 TEST_f_f (erfc, minus_infty, 2.0),
7795 TEST_f_f (erfc, 0.0, 1.0),
7796 TEST_f_f (erfc, minus_zero, 1.0),
7797 TEST_f_f (erfc, qnan_value, qnan_value),
7798
7799 TEST_f_f (erfc, 0.125L, 0.859683795198666182606970553478376602L),
7800 TEST_f_f (erfc, 0.75L, 0.288844366346484868401062165408589223L),
7801 TEST_f_f (erfc, 1.25L, 0.0770998717435417698634765188027188596L),
7802 TEST_f_f (erfc, 2.0L, 0.00467773498104726583793074363274707139L),
7803 TEST_f_f (erfc, 0x1.f7303cp+1L, 2.705500297238986897105236321218861842255e-8L),
7804 TEST_f_f (erfc, 4.125L, 0.542340079956506600531223408575531062e-8L),
7805 TEST_f_f (erfc, 0x1.ffa002p+2L, 1.233585992097580296336099501489175967033e-29L),
7806 TEST_f_f (erfc, 0x1.ffffc8p+2L, 1.122671365033056305522366683719541099329e-29L),
2550dfe9 7807#ifdef TEST_LDOUBLE
74c57478 7808 /* The result can only be represented in long double. */
f964490f 7809# if LDBL_MIN_10_EXP < -319
74c57478 7810 TEST_f_f (erfc, 27.0L, 0.523704892378925568501606768284954709e-318L),
f964490f 7811# endif
7b1902cb 7812# if LDBL_MANT_DIG >= 106
74c57478 7813 TEST_f_f (erfc, 0x1.ffff56789abcdef0123456789a8p+2L, 1.123161416304655390092138725253789378459e-29L),
7b1902cb 7814# endif
2550dfe9 7815#endif
74c57478
JM		 7816 END_DATA (erfc)
7817 };
2550dfe9 7818
8847214f 7819static void
74c57478 7820erfc_test (void)
8847214f 7821{
e6d3c4a7 7822 errno = 0;
74c57478 7823 FUNC(erfc) (0);
e6d3c4a7
AJ		 7824 if (errno == ENOSYS)
7825 /* Function not implemented. */
7826 return;
7827
74c57478
JM		 7828 START (erfc);
7829 RUN_TEST_LOOP_f_f (erfc, erfc_test_data, );
7830 END (erfc);
7831}
8847214f 7832
74c57478
JM		 7833
7834static const struct test_f_f_data exp_test_data[] =
7835 {
7836 START_DATA (exp),
7837 TEST_f_f (exp, 0, 1),
7838 TEST_f_f (exp, minus_zero, 1),
8847214f 7839
15daa639 7840#ifndef TEST_INLINE
74c57478
JM		 7841 TEST_f_f (exp, plus_infty, plus_infty),
7842 TEST_f_f (exp, minus_infty, 0),
15daa639 7843#endif
74c57478
JM		 7844 TEST_f_f (exp, qnan_value, qnan_value),
7845 TEST_f_f (exp, 1, M_El),
8847214f 7846
74c57478
JM		 7847 TEST_f_f (exp, 2, M_E2l),
7848 TEST_f_f (exp, 3, M_E3l),
7849 TEST_f_f (exp, 0.75L, 2.11700001661267466854536981983709561L),
7850 TEST_f_f (exp, 50.0L, 5184705528587072464087.45332293348538L),
7851 TEST_f_f (exp, 88.72269439697265625L, 3.40233126623160774937554134772290447915e38L),
e42a38dd 7852#ifndef TEST_FLOAT
74c57478 7853 TEST_f_f (exp, 709.75L, 1.739836873264160557698252711673830393864768e+308L),
e42a38dd 7854#endif
8fb0af98 7855#if defined TEST_LDOUBLE && __LDBL_MAX_EXP__ > 1024
74c57478
JM		 7856 /* The result can only be represented in sane long double. */
7857 TEST_f_f (exp, 1000.0L, 0.197007111401704699388887935224332313e435L),
4c95adde 7858#endif
2550dfe9 7859
41498f4d 7860#if !(defined TEST_LDOUBLE && LDBL_MAX_EXP > 1024)
74c57478
JM		 7861 TEST_f_f (exp, 710, plus_infty, OVERFLOW_EXCEPTION),
7862 TEST_f_f (exp, -1234, plus_zero, UNDERFLOW_EXCEPTION),
41498f4d 7863#endif
74c57478
JM		 7864 TEST_f_f (exp, 1e5, plus_infty, OVERFLOW_EXCEPTION),
7865 TEST_f_f (exp, max_value, plus_infty, OVERFLOW_EXCEPTION),
7866 TEST_f_f (exp, -max_value, 0, UNDERFLOW_EXCEPTION),
7867 END_DATA (exp)
7868 };
7869
7870static void
7871exp_test (void)
7872{
7873 errno = 0;
7874 FUNC(exp) (0);
7875 if (errno == ENOSYS)
7876 /* Function not implemented. */
7877 return;
41bf21a1 7878
74c57478
JM		 7879 START (exp);
7880 RUN_TEST_LOOP_f_f (exp, exp_test_data, );
8847214f
UD		 7881 END (exp);
7882}
7883
7884
74c57478
JM		 7885static const struct test_f_f_data exp_tonearest_test_data[] =
7886 {
7887 START_DATA (exp_tonearest),
7888 TEST_f_f (exp, 1, M_El),
7889 TEST_f_f (exp, 2, M_E2l),
7890 TEST_f_f (exp, 3, M_E3l),
7891 END_DATA (exp_tonearest)
7892 };
7893
28afd92d
JM		 7894static void
7895exp_test_tonearest (void)
7896{
28afd92d
JM		 7897 errno = 0;
7898 FUNC(exp) (0);
7899 if (errno == ENOSYS)
7900 /* Function not implemented. */
7901 return;
7902
7903 START (exp_tonearest);
74c57478 7904 RUN_TEST_LOOP_f_f (exp, exp_tonearest_test_data, FE_TONEAREST);
28afd92d
JM		 7905 END (exp_tonearest);
7906}
7907
7908
74c57478
JM		 7909static const struct test_f_f_data exp_towardzero_test_data[] =
7910 {
7911 START_DATA (exp_towardzero),
7912 TEST_f_f (exp, 1, M_El),
7913 TEST_f_f (exp, 2, M_E2l),
7914 TEST_f_f (exp, 3, M_E3l),
7915 END_DATA (exp_towardzero)
7916 };
7917
28afd92d
JM		 7918static void
7919exp_test_towardzero (void)
7920{
28afd92d
JM		 7921 errno = 0;
7922 FUNC(exp) (0);
7923 if (errno == ENOSYS)
7924 /* Function not implemented. */
7925 return;
7926
7927 START (exp_towardzero);
74c57478 7928 RUN_TEST_LOOP_f_f (exp, exp_towardzero_test_data, FE_TOWARDZERO);
28afd92d
JM		 7929 END (exp_towardzero);
7930}
7931
7932
74c57478
JM		 7933static const struct test_f_f_data exp_downward_test_data[] =
7934 {
7935 START_DATA (exp_downward),
7936 TEST_f_f (exp, 1, M_El),
7937 TEST_f_f (exp, 2, M_E2l),
7938 TEST_f_f (exp, 3, M_E3l),
7939 END_DATA (exp_downward)
7940 };
7941
28afd92d
JM		 7942static void
7943exp_test_downward (void)
7944{
28afd92d
JM		 7945 errno = 0;
7946 FUNC(exp) (0);
7947 if (errno == ENOSYS)
7948 /* Function not implemented. */
7949 return;
7950
7951 START (exp_downward);
74c57478 7952 RUN_TEST_LOOP_f_f (exp, exp_downward_test_data, FE_DOWNWARD);
28afd92d
JM		 7953 END (exp_downward);
7954}
7955
7956
74c57478
JM		 7957static const struct test_f_f_data exp_upward_test_data[] =
7958 {
7959 START_DATA (exp_upward),
7960 TEST_f_f (exp, 1, M_El),
7961 TEST_f_f (exp, 2, M_E2l),
7962 TEST_f_f (exp, 3, M_E3l),
7963 END_DATA (exp_upward)
7964 };
7965
28afd92d
JM		 7966static void
7967exp_test_upward (void)
7968{
28afd92d
JM		 7969 errno = 0;
7970 FUNC(exp) (0);
7971 if (errno == ENOSYS)
7972 /* Function not implemented. */
7973 return;
7974
7975 START (exp_upward);
74c57478 7976 RUN_TEST_LOOP_f_f (exp, exp_upward_test_data, FE_UPWARD);
28afd92d
JM		 7977 END (exp_upward);
7978}
7979
7980
74c57478
JM		 7981static const struct test_f_f_data exp10_test_data[] =
7982 {
7983 START_DATA (exp10),
7984 TEST_f_f (exp10, 0, 1),
7985 TEST_f_f (exp10, minus_zero, 1),
7986
7987 TEST_f_f (exp10, plus_infty, plus_infty),
7988 TEST_f_f (exp10, minus_infty, 0),
7989 TEST_f_f (exp10, qnan_value, qnan_value),
7990 TEST_f_f (exp10, 3, 1000),
7991 TEST_f_f (exp10, -1, 0.1L),
7992 TEST_f_f (exp10, 36, 1.0e36L),
7993 TEST_f_f (exp10, -36, 1.0e-36L),
7994#ifndef TEST_FLOAT
7995 TEST_f_f (exp10, 305, 1.0e305L),
7996 TEST_f_f (exp10, -305, 1.0e-305L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
7997#endif
7998#if defined TEST_LDOUBLE && LDBL_MAX_10_EXP >= 4932
7999 TEST_f_f (exp10, 4932, 1.0e4932L),
8000 TEST_f_f (exp10, -4932, 1.0e-4932L, UNDERFLOW_EXCEPTION),
8001#endif
8002 TEST_f_f (exp10, 1e6, plus_infty, OVERFLOW_EXCEPTION),
8003 TEST_f_f (exp10, -1e6, 0, UNDERFLOW_EXCEPTION),
8004 TEST_f_f (exp10, max_value, plus_infty, OVERFLOW_EXCEPTION),
8005 TEST_f_f (exp10, -max_value, 0, UNDERFLOW_EXCEPTION),
8006 TEST_f_f (exp10, 0.75L, 5.62341325190349080394951039776481231L),
8007 END_DATA (exp10)
8008 };
8009
8847214f
UD		 8010static void
8011exp10_test (void)
8012{
8013 errno = 0;
8014 FUNC(exp10) (0);
8015 if (errno == ENOSYS)
8016 /* Function not implemented. */
8017 return;
8018
8019 START (exp10);
74c57478
JM		 8020 RUN_TEST_LOOP_f_f (exp10, exp10_test_data, );
8021 END (exp10);
8022}
8023
8024
8025static const struct test_f_f_data exp2_test_data[] =
8026 {
8027 START_DATA (exp2),
8028 TEST_f_f (exp2, 0, 1),
8029 TEST_f_f (exp2, minus_zero, 1),
8030 TEST_f_f (exp2, plus_infty, plus_infty),
8031 TEST_f_f (exp2, minus_infty, 0),
8032 TEST_f_f (exp2, qnan_value, qnan_value),
8033
8034 TEST_f_f (exp2, 10, 1024),
8035 TEST_f_f (exp2, -1, 0.5),
8036 TEST_f_f (exp2, 1e6, plus_infty, OVERFLOW_EXCEPTION),
8037 TEST_f_f (exp2, -1e6, 0, UNDERFLOW_EXCEPTION),
8038 TEST_f_f (exp2, max_value, plus_infty, OVERFLOW_EXCEPTION),
8039 TEST_f_f (exp2, -max_value, 0, UNDERFLOW_EXCEPTION),
8040 TEST_f_f (exp2, 0.75L, 1.68179283050742908606225095246642979L),
8847214f 8041
74c57478
JM		 8042 TEST_f_f (exp2, 100.5, 1.792728671193156477399422023278661496394e+30L),
8043 TEST_f_f (exp2, 127, 0x1p127),
8044 TEST_f_f (exp2, -149, 0x1p-149),
8847214f 8045
d8b82cad 8046#ifndef TEST_FLOAT
74c57478
JM		 8047 TEST_f_f (exp2, 1000.25, 1.274245659452564874772384918171765416737e+301L),
8048 TEST_f_f (exp2, 1023, 0x1p1023),
8049 TEST_f_f (exp2, -1074, 0x1p-1074),
9568c0c2 8050#endif
8847214f 8051
74c57478
JM		 8052#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
8053 TEST_f_f (exp2, 16383, 0x1p16383L),
8054 TEST_f_f (exp2, -16400, 0x1p-16400L),
8055#endif
8056 END_DATA (exp2)
8057 };
2550dfe9 8058
8847214f
UD		 8059static void
8060exp2_test (void)
8061{
8062 errno = 0;
8063 FUNC(exp2) (0);
8064 if (errno == ENOSYS)
8065 /* Function not implemented. */
8066 return;
8067
8068 START (exp2);
74c57478
JM		 8069 RUN_TEST_LOOP_f_f (exp2, exp2_test_data, );
8070 END (exp2);
8071}
8847214f 8072
15daa639 8073
74c57478
JM		 8074static const struct test_f_f_data expm1_test_data[] =
8075 {
8076 START_DATA (expm1),
8077 TEST_f_f (expm1, 0, 0),
8078 TEST_f_f (expm1, minus_zero, minus_zero),
8079
8080#ifndef TEST_INLINE
8081 TEST_f_f (expm1, plus_infty, plus_infty),
8082 TEST_f_f (expm1, minus_infty, -1),
8083#endif
8084 TEST_f_f (expm1, qnan_value, qnan_value),
8085
8086 TEST_f_f (expm1, 1, M_El - 1.0),
8087 TEST_f_f (expm1, 0.75L, 1.11700001661267466854536981983709561L),
8847214f 8088
74c57478 8089 TEST_f_f (expm1, 50.0L, 5.1847055285870724640864533229334853848275e+21L),
48e44791
JM		 8090
8091#ifndef TEST_FLOAT
74c57478
JM		 8092 TEST_f_f (expm1, 127.0L, 1.4302079958348104463583671072905261080748e+55L),
8093 TEST_f_f (expm1, 500.0L, 1.4035922178528374107397703328409120821806e+217L),
48e44791
JM		 8094#endif
8095
8096#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 8097 TEST_f_f (expm1, 11356.25L, 9.05128237311923300051376115753226014206e+4931L),
8098#endif
8099
8100 TEST_f_f (expm1, -10.0, -0.9999546000702375151484644084844394493898L),
8101 TEST_f_f (expm1, -16.0, -0.9999998874648252807408854862248209398728L),
8102 TEST_f_f (expm1, -17.0, -0.9999999586006228121483334034897228104472L),
8103 TEST_f_f (expm1, -18.0, -0.9999999847700202552873715638633707664826L),
8104 TEST_f_f (expm1, -36.0, -0.9999999999999997680477169756430611687736L),
8105 TEST_f_f (expm1, -37.0, -0.9999999999999999146695237425593420572195L),
8106 TEST_f_f (expm1, -38.0, -0.9999999999999999686086720795197037129104L),
8107 TEST_f_f (expm1, -44.0, -0.9999999999999999999221886775886620348429L),
8108 TEST_f_f (expm1, -45.0, -0.9999999999999999999713748141945060635553L),
8109 TEST_f_f (expm1, -46.0, -0.9999999999999999999894693826424461876212L),
8110 TEST_f_f (expm1, -73.0, -0.9999999999999999999999999999999802074012L),
8111 TEST_f_f (expm1, -74.0, -0.9999999999999999999999999999999927187098L),
8112 TEST_f_f (expm1, -75.0, -0.9999999999999999999999999999999973213630L),
8113 TEST_f_f (expm1, -78.0, -0.9999999999999999999999999999999998666385L),
8114 TEST_f_f (expm1, -79.0, -0.9999999999999999999999999999999999509391L),
8115 TEST_f_f (expm1, -80.0, -0.9999999999999999999999999999999999819515L),
8116 TEST_f_f (expm1, -100.0, -1.0),
8117 TEST_f_f (expm1, -1000.0, -1.0),
8118 TEST_f_f (expm1, -10000.0, -1.0),
8119 TEST_f_f (expm1, -100000.0, -1.0),
8120
8121 TEST_f_f (expm1, 100000.0, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
8122 TEST_f_f (expm1, max_value, plus_infty, OVERFLOW_EXCEPTION),
8123 TEST_f_f (expm1, -max_value, -1),
8124 END_DATA (expm1)
8125 };
2550dfe9 8126
8847214f
UD		 8127static void
8128expm1_test (void)
8129{
e6d3c4a7
AJ		 8130 errno = 0;
8131 FUNC(expm1) (0);
8132 if (errno == ENOSYS)
8133 /* Function not implemented. */
8134 return;
8135
8847214f 8136 START (expm1);
74c57478
JM		 8137 RUN_TEST_LOOP_f_f (expm1, expm1_test_data, );
8138 END (expm1);
8139}
8847214f 8140
495fd99f 8141
74c57478
JM		 8142static const struct test_f_f_data fabs_test_data[] =
8143 {
8144 START_DATA (fabs),
8145 TEST_f_f (fabs, 0, 0),
8146 TEST_f_f (fabs, minus_zero, 0),
bbc5d74d 8147
74c57478
JM		 8148 TEST_f_f (fabs, plus_infty, plus_infty),
8149 TEST_f_f (fabs, minus_infty, plus_infty),
8150 TEST_f_f (fabs, qnan_value, qnan_value),
8847214f 8151
74c57478
JM		 8152 TEST_f_f (fabs, 38.0, 38.0),
8153 TEST_f_f (fabs, -M_El, M_El),
8154 END_DATA (fabs)
8155 };
2550dfe9 8156
8847214f
UD		 8157static void
8158fabs_test (void)
8159{
8160 START (fabs);
74c57478 8161 RUN_TEST_LOOP_f_f (fabs, fabs_test_data, );
8847214f
UD		 8162 END (fabs);
8163}
8164
2550dfe9 8165
601a3a5f
JM		 8166static const struct test_ff_f_data fdim_test_data[] =
8167 {
8168 START_DATA (fdim),
8169 TEST_ff_f (fdim, 0, 0, 0),
8170 TEST_ff_f (fdim, 9, 0, 9),
8171 TEST_ff_f (fdim, 0, 9, 0),
8172 TEST_ff_f (fdim, -9, 0, 0),
8173 TEST_ff_f (fdim, 0, -9, 9),
8174
8175 TEST_ff_f (fdim, plus_infty, 9, plus_infty),
8176 TEST_ff_f (fdim, plus_infty, -9, plus_infty),
8177 TEST_ff_f (fdim, minus_infty, 9, 0),
8178 TEST_ff_f (fdim, minus_infty, -9, 0),
8179 TEST_ff_f (fdim, 9, minus_infty, plus_infty),
8180 TEST_ff_f (fdim, -9, minus_infty, plus_infty),
8181 TEST_ff_f (fdim, 9, plus_infty, 0),
8182 TEST_ff_f (fdim, -9, plus_infty, 0),
8183
8184 TEST_ff_f (fdim, 0, qnan_value, qnan_value),
8185 TEST_ff_f (fdim, 9, qnan_value, qnan_value),
8186 TEST_ff_f (fdim, -9, qnan_value, qnan_value),
8187 TEST_ff_f (fdim, qnan_value, 9, qnan_value),
8188 TEST_ff_f (fdim, qnan_value, -9, qnan_value),
8189 TEST_ff_f (fdim, plus_infty, qnan_value, qnan_value),
8190 TEST_ff_f (fdim, minus_infty, qnan_value, qnan_value),
8191 TEST_ff_f (fdim, qnan_value, plus_infty, qnan_value),
8192 TEST_ff_f (fdim, qnan_value, minus_infty, qnan_value),
8193 TEST_ff_f (fdim, qnan_value, qnan_value, qnan_value),
8194
8195 TEST_ff_f (fdim, plus_infty, plus_infty, 0),
8196 END_DATA (fdim)
8197 };
8198
8847214f
UD		 8199static void
8200fdim_test (void)
8201{
8202 START (fdim);
601a3a5f 8203 RUN_TEST_LOOP_ff_f (fdim, fdim_test_data, );
8847214f
UD		 8204 END (fdim);
8205}
8206
2550dfe9 8207
ef1bb361
JM		 8208static void
8209finite_test (void)
8210{
8211 START (finite);
8212
8213 TEST_f_b (finite, 0, 1);
8214 TEST_f_b (finite, minus_zero, 1);
8215 TEST_f_b (finite, 10, 1);
8216 TEST_f_b (finite, min_subnorm_value, 1);
8217 TEST_f_b (finite, plus_infty, 0);
8218 TEST_f_b (finite, minus_infty, 0);
67e971f1 8219 TEST_f_b (finite, qnan_value, 0);
ef1bb361
JM		 8220
8221 END (finite);
8222}
8223
8224
74c57478
JM		 8225static const struct test_f_f_data floor_test_data[] =
8226 {
8227 START_DATA (floor),
8228 TEST_f_f (floor, 0.0, 0.0),
8229 TEST_f_f (floor, minus_zero, minus_zero),
8230 TEST_f_f (floor, plus_infty, plus_infty),
8231 TEST_f_f (floor, minus_infty, minus_infty),
8232 TEST_f_f (floor, qnan_value, qnan_value),
8233
8234 TEST_f_f (floor, M_PIl, 3.0),
8235 TEST_f_f (floor, -M_PIl, -4.0),
8236
8237 TEST_f_f (floor, 0.1, 0.0),
8238 TEST_f_f (floor, 0.25, 0.0),
8239 TEST_f_f (floor, 0.625, 0.0),
8240 TEST_f_f (floor, -0.1, -1.0),
8241 TEST_f_f (floor, -0.25, -1.0),
8242 TEST_f_f (floor, -0.625, -1.0),
f964490f
RM		 8243
8244#ifdef TEST_LDOUBLE
74c57478
JM		 8245 /* The result can only be represented in long double. */
8246 TEST_f_f (floor, 4503599627370495.5L, 4503599627370495.0L),
8247 TEST_f_f (floor, 4503599627370496.25L, 4503599627370496.0L),
8248 TEST_f_f (floor, 4503599627370496.5L, 4503599627370496.0L),
8249 TEST_f_f (floor, 4503599627370496.75L, 4503599627370496.0L),
8250 TEST_f_f (floor, 4503599627370497.5L, 4503599627370497.0L),
5c68d401 8251# if LDBL_MANT_DIG > 100
74c57478
JM		 8252 TEST_f_f (floor, 4503599627370494.5000000000001L, 4503599627370494.0L),
8253 TEST_f_f (floor, 4503599627370495.5000000000001L, 4503599627370495.0L),
8254 TEST_f_f (floor, 4503599627370496.5000000000001L, 4503599627370496.0L),
5c68d401 8255# endif
f964490f 8256
74c57478
JM		 8257 TEST_f_f (floor, -4503599627370495.5L, -4503599627370496.0L),
8258 TEST_f_f (floor, -4503599627370496.25L, -4503599627370497.0L),
8259 TEST_f_f (floor, -4503599627370496.5L, -4503599627370497.0L),
8260 TEST_f_f (floor, -4503599627370496.75L, -4503599627370497.0L),
8261 TEST_f_f (floor, -4503599627370497.5L, -4503599627370498.0L),
5c68d401 8262# if LDBL_MANT_DIG > 100
74c57478
JM		 8263 TEST_f_f (floor, -4503599627370494.5000000000001L, -4503599627370495.0L),
8264 TEST_f_f (floor, -4503599627370495.5000000000001L, -4503599627370496.0L),
8265 TEST_f_f (floor, -4503599627370496.5000000000001L, -4503599627370497.0L),
5c68d401 8266# endif
f964490f 8267
74c57478
JM		 8268 TEST_f_f (floor, 9007199254740991.5L, 9007199254740991.0L),
8269 TEST_f_f (floor, 9007199254740992.25L, 9007199254740992.0L),
8270 TEST_f_f (floor, 9007199254740992.5L, 9007199254740992.0L),
8271 TEST_f_f (floor, 9007199254740992.75L, 9007199254740992.0L),
8272 TEST_f_f (floor, 9007199254740993.5L, 9007199254740993.0L),
f964490f 8273
5c68d401 8274# if LDBL_MANT_DIG > 100
74c57478
JM		 8275 TEST_f_f (floor, 9007199254740991.0000000000001L, 9007199254740991.0L),
8276 TEST_f_f (floor, 9007199254740992.0000000000001L, 9007199254740992.0L),
8277 TEST_f_f (floor, 9007199254740993.0000000000001L, 9007199254740993.0L),
8278 TEST_f_f (floor, 9007199254740991.5000000000001L, 9007199254740991.0L),
8279 TEST_f_f (floor, 9007199254740992.5000000000001L, 9007199254740992.0L),
8280 TEST_f_f (floor, 9007199254740993.5000000000001L, 9007199254740993.0L),
5c68d401
RM		 8281# endif
8282
74c57478
JM		 8283 TEST_f_f (floor, -9007199254740991.5L, -9007199254740992.0L),
8284 TEST_f_f (floor, -9007199254740992.25L, -9007199254740993.0L),
8285 TEST_f_f (floor, -9007199254740992.5L, -9007199254740993.0L),
8286 TEST_f_f (floor, -9007199254740992.75L, -9007199254740993.0L),
8287 TEST_f_f (floor, -9007199254740993.5L, -9007199254740994.0L),
f964490f 8288
5c68d401 8289# if LDBL_MANT_DIG > 100
74c57478
JM		 8290 TEST_f_f (floor, -9007199254740991.0000000000001L, -9007199254740992.0L),
8291 TEST_f_f (floor, -9007199254740992.0000000000001L, -9007199254740993.0L),
8292 TEST_f_f (floor, -9007199254740993.0000000000001L, -9007199254740994.0L),
8293 TEST_f_f (floor, -9007199254740991.5000000000001L, -9007199254740992.0L),
8294 TEST_f_f (floor, -9007199254740992.5000000000001L, -9007199254740993.0L),
8295 TEST_f_f (floor, -9007199254740993.5000000000001L, -9007199254740994.0L),
5c68d401
RM		 8296# endif
8297
74c57478
JM		 8298 TEST_f_f (floor, 72057594037927935.5L, 72057594037927935.0L),
8299 TEST_f_f (floor, 72057594037927936.25L, 72057594037927936.0L),
8300 TEST_f_f (floor, 72057594037927936.5L, 72057594037927936.0L),
8301 TEST_f_f (floor, 72057594037927936.75L, 72057594037927936.0L),
8302 TEST_f_f (floor, 72057594037927937.5L, 72057594037927937.0L),
f964490f 8303
74c57478
JM		 8304 TEST_f_f (floor, -72057594037927935.5L, -72057594037927936.0L),
8305 TEST_f_f (floor, -72057594037927936.25L, -72057594037927937.0L),
8306 TEST_f_f (floor, -72057594037927936.5L, -72057594037927937.0L),
8307 TEST_f_f (floor, -72057594037927936.75L, -72057594037927937.0L),
8308 TEST_f_f (floor, -72057594037927937.5L, -72057594037927938.0L),
f964490f 8309
74c57478
JM		 8310 TEST_f_f (floor, 10141204801825835211973625643007.5L, 10141204801825835211973625643007.0L),
8311 TEST_f_f (floor, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
8312 TEST_f_f (floor, 10141204801825835211973625643008.5L, 10141204801825835211973625643008.0L),
8313 TEST_f_f (floor, 10141204801825835211973625643008.75L, 10141204801825835211973625643008.0L),
8314 TEST_f_f (floor, 10141204801825835211973625643009.5L, 10141204801825835211973625643009.0L),
94e02fc4 8315
74c57478
JM		 8316 TEST_f_f (floor, 0xf.ffffffffffffff8p+47L, 0xf.fffffffffffep+47L),
8317 TEST_f_f (floor, -0x8.000000000000004p+48L, -0x8.000000000001p+48L),
f964490f 8318#endif
74c57478
JM		 8319 END_DATA (floor)
8320 };
f964490f 8321
74c57478
JM		 8322static void
8323floor_test (void)
8324{
8325 START (floor);
8326 RUN_TEST_LOOP_f_f (floor, floor_test_data, );
8847214f
UD		 8327 END (floor);
8328}
8329
2550dfe9 8330
4f184d30
JM		 8331static const struct test_fff_f_data fma_test_data[] =
8332 {
8333 START_DATA (fma),
8334 TEST_fff_f (fma, 1.0, 2.0, 3.0, 5.0),
8335 TEST_fff_f (fma, qnan_value, 2.0, 3.0, qnan_value),
8336 TEST_fff_f (fma, 1.0, qnan_value, 3.0, qnan_value),
8337 TEST_fff_f (fma, 1.0, 2.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8338 TEST_fff_f (fma, plus_infty, 0.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8339 TEST_fff_f (fma, minus_infty, 0.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8340 TEST_fff_f (fma, 0.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8341 TEST_fff_f (fma, 0.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8342 TEST_fff_f (fma, plus_infty, 0.0, 1.0, qnan_value, INVALID_EXCEPTION),
8343 TEST_fff_f (fma, minus_infty, 0.0, 1.0, qnan_value, INVALID_EXCEPTION),
8344 TEST_fff_f (fma, 0.0, plus_infty, 1.0, qnan_value, INVALID_EXCEPTION),
8345 TEST_fff_f (fma, 0.0, minus_infty, 1.0, qnan_value, INVALID_EXCEPTION),
8346
8347 TEST_fff_f (fma, plus_infty, plus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
8348 TEST_fff_f (fma, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8349 TEST_fff_f (fma, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8350 TEST_fff_f (fma, minus_infty, minus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
8351 TEST_fff_f (fma, plus_infty, 3.5L, minus_infty, qnan_value, INVALID_EXCEPTION),
8352 TEST_fff_f (fma, minus_infty, -7.5L, minus_infty, qnan_value, INVALID_EXCEPTION),
8353 TEST_fff_f (fma, -13.5L, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8354 TEST_fff_f (fma, minus_infty, 7.5L, plus_infty, qnan_value, INVALID_EXCEPTION),
8355
8356 TEST_fff_f (fma, 1.25L, 0.75L, 0.0625L, 1.0L),
8357
8358 TEST_fff_f (fma, -max_value, -max_value, minus_infty, minus_infty),
8359 TEST_fff_f (fma, max_value / 2, max_value / 2, minus_infty, minus_infty),
8360 TEST_fff_f (fma, -max_value, max_value, plus_infty, plus_infty),
8361 TEST_fff_f (fma, max_value / 2, -max_value / 4, plus_infty, plus_infty),
8362 TEST_fff_f (fma, plus_infty, 4, plus_infty, plus_infty),
8363 TEST_fff_f (fma, 2, minus_infty, minus_infty, minus_infty),
8364 TEST_fff_f (fma, minus_infty, minus_infty, plus_infty, plus_infty),
8365 TEST_fff_f (fma, plus_infty, minus_infty, minus_infty, minus_infty),
8366
8367 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
8368 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, plus_zero),
8369 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, plus_zero),
8370 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
8371 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, plus_zero),
8372 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
8373 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
8374 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, plus_zero),
8375 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
8376 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, plus_zero),
8377 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, plus_zero),
8378 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
8379 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, plus_zero),
8380 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
8381 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
8382 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, plus_zero),
8383 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
8384 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, plus_zero),
8385 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, plus_zero),
8386 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
8387 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, plus_zero),
8388 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
8389 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
8390 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, plus_zero),
8391
8392 TEST_fff_f (fma, 1.0, 1.0, -1.0, plus_zero),
8393 TEST_fff_f (fma, 1.0, -1.0, 1.0, plus_zero),
8394 TEST_fff_f (fma, -1.0, 1.0, 1.0, plus_zero),
8395 TEST_fff_f (fma, -1.0, -1.0, -1.0, plus_zero),
8396
8397 TEST_fff_f (fma, min_value, min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8398 TEST_fff_f (fma, min_value, min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8399 TEST_fff_f (fma, min_value, -min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8400 TEST_fff_f (fma, min_value, -min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8401 TEST_fff_f (fma, -min_value, min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8402 TEST_fff_f (fma, -min_value, min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8403 TEST_fff_f (fma, -min_value, -min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8404 TEST_fff_f (fma, -min_value, -min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8405
8406 TEST_fff_f (fma, max_value, max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
8407 TEST_fff_f (fma, max_value, max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
8408 TEST_fff_f (fma, max_value, -max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8409 TEST_fff_f (fma, max_value, -max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8410 TEST_fff_f (fma, -max_value, max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8411 TEST_fff_f (fma, -max_value, max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8412 TEST_fff_f (fma, -max_value, -max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
8413 TEST_fff_f (fma, -max_value, -max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
a0c2940d 8414
5e908464 8415#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM		 8416 TEST_fff_f (fma, 0x1.7ff8p+13, 0x1.000002p+0, 0x1.ffffp-24, 0x1.7ff802p+13),
8417 TEST_fff_f (fma, 0x1.fffp+0, 0x1.00001p+0, -0x1.fffp+0, 0x1.fffp-20),
8418 TEST_fff_f (fma, 0x1.9abcdep+127, 0x0.9abcdep-126, -0x1.f08948p+0, 0x1.bb421p-25),
8419 TEST_fff_f (fma, 0x1.9abcdep+100, 0x0.9abcdep-126, -0x1.f08948p-27, 0x1.bb421p-52),
8420 TEST_fff_f (fma, 0x1.fffffep+127, 0x1.001p+0, -0x1.fffffep+127, 0x1.fffffep+115),
8421 TEST_fff_f (fma, -0x1.fffffep+127, 0x1.fffffep+0, 0x1.fffffep+127, -0x1.fffffap+127),
8422 TEST_fff_f (fma, 0x1.fffffep+127, 2.0, -0x1.fffffep+127, 0x1.fffffep+127),
8423 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8424 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8425 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8426 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8427 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
8428 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8429 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
8430 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8431 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1p127),
8432 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x1p127),
8433 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x1p127),
8434 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1p127),
8435 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1p-126),
8436 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8437 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8438 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1p-126),
8439 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8440 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8441 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8442 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8443 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8444 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8445 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8446 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8447 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
8448 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
8449 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
8450 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
8451 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1p127),
8452 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x1p127),
8453 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x1p127),
8454 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1p127),
8455 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1p103),
8456 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x1p103),
8457 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x1p103),
8458 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1p103),
5e908464
JJ		 8459#endif
8460#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM		 8461 TEST_fff_f (fma, 0x1.7fp+13, 0x1.0000000000001p+0, 0x1.ffep-48, 0x1.7f00000000001p+13),
8462 TEST_fff_f (fma, 0x1.fffp+0, 0x1.0000000000001p+0, -0x1.fffp+0, 0x1.fffp-52),
8463 TEST_fff_f (fma, 0x1.0000002p+0, 0x1.ffffffcp-1, 0x1p-300, 1.0),
8464 TEST_fff_f (fma, 0x1.0000002p+0, 0x1.ffffffcp-1, -0x1p-300, 0x1.fffffffffffffp-1),
8465 TEST_fff_f (fma, 0x1.deadbeef2feedp+1023, 0x0.deadbeef2feedp-1022, -0x1.a05f8c01a4bfbp+1, 0x1.0989687bc9da4p-53),
8466 TEST_fff_f (fma, 0x1.deadbeef2feedp+900, 0x0.deadbeef2feedp-1022, -0x1.a05f8c01a4bfbp-122, 0x1.0989687bc9da4p-176),
8467 TEST_fff_f (fma, 0x1.fffffffffffffp+1023, 0x1.001p+0, -0x1.fffffffffffffp+1023, 0x1.fffffffffffffp+1011),
8468 TEST_fff_f (fma, -0x1.fffffffffffffp+1023, 0x1.fffffffffffffp+0, 0x1.fffffffffffffp+1023, -0x1.ffffffffffffdp+1023),
8469 TEST_fff_f (fma, 0x1.fffffffffffffp+1023, 2.0, -0x1.fffffffffffffp+1023, 0x1.fffffffffffffp+1023),
8470 TEST_fff_f (fma, 0x1.6a09e667f3bccp-538, 0x1.6a09e667f3bccp-538, 0.0, 0.0, UNDERFLOW_EXCEPTION),
8471 TEST_fff_f (fma, 0x1.deadbeef2feedp-495, 0x1.deadbeef2feedp-495, -0x1.bf86a5786a574p-989, 0x0.0000042625a1fp-1022, UNDERFLOW_EXCEPTION),
8472 TEST_fff_f (fma, 0x1.deadbeef2feedp-503, 0x1.deadbeef2feedp-503, -0x1.bf86a5786a574p-1005, 0x0.0000000004262p-1022, UNDERFLOW_EXCEPTION),
8473 TEST_fff_f (fma, 0x1p-537, 0x1p-538, 0x1p-1074, 0x0.0000000000002p-1022, UNDERFLOW_EXCEPTION),
8474 TEST_fff_f (fma, 0x1.7fffff8p-968, 0x1p-106, 0x0.000001p-1022, 0x0.0000010000001p-1022, UNDERFLOW_EXCEPTION),
8475 TEST_fff_f (fma, 0x1.4000004p-967, 0x1p-106, 0x0.000001p-1022, 0x0.0000010000003p-1022, UNDERFLOW_EXCEPTION),
8476 TEST_fff_f (fma, 0x1.4p-967, -0x1p-106, -0x0.000001p-1022, -0x0.0000010000002p-1022, UNDERFLOW_EXCEPTION),
8477 TEST_fff_f (fma, -0x1.19cab66d73e17p-959, 0x1.c7108a8c5ff51p-107, -0x0.80b0ad65d9b64p-1022, -0x0.80b0ad65d9d59p-1022, UNDERFLOW_EXCEPTION),
8478 TEST_fff_f (fma, -0x1.d2eaed6e8e9d3p-979, -0x1.4e066c62ac9ddp-63, -0x0.9245e6b003454p-1022, -0x0.9245c09c5fb5dp-1022, UNDERFLOW_EXCEPTION),
8479 TEST_fff_f (fma, 0x1.153d650bb9f06p-907, 0x1.2d01230d48407p-125, -0x0.b278d5acfc3cp-1022, -0x0.b22757123bbe9p-1022, UNDERFLOW_EXCEPTION),
8480 TEST_fff_f (fma, -0x1.fffffffffffffp-711, 0x1.fffffffffffffp-275, 0x1.fffffe00007ffp-983, 0x1.7ffffe00007ffp-983),
8481 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8482 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8483 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8484 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8485 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
8486 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
8487 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
8488 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
8489 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1p1023),
8490 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x1p1023),
8491 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x1p1023),
8492 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1p1023),
8493 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1p-1022),
8494 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8495 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8496 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1p-1022),
8497 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8498 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8499 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8500 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8501 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8502 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8503 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8504 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8505 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8506 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8507 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8508 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8509 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8510 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8511 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8512 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8513 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1p970),
8514 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x1p970),
8515 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x1p970),
8516 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1p970),
3e692e05
JJ		 8517#endif
8518#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM		 8519 TEST_fff_f (fma, -0x8.03fcp+3696L, 0xf.fffffffffffffffp-6140L, 0x8.3ffffffffffffffp-2450L, -0x8.01ecp-2440L),
8520 TEST_fff_f (fma, 0x9.fcp+2033L, -0x8.000e1f000ff800fp-3613L, -0xf.fffffffffffc0ffp-1579L, -0xd.fc119fb093ed092p-1577L),
8521 TEST_fff_f (fma, 0xc.7fc000003ffffffp-1194L, 0x8.1e0003fffffffffp+15327L, -0x8.fffep+14072L, 0xc.ae9f164020effffp+14136L),
8522 TEST_fff_f (fma, -0x8.0001fc000000003p+1798L, 0xcp-2230L, 0x8.f7e000000000007p-468L, -0xc.0002f9ffee10404p-429L),
8523 TEST_fff_f (fma, 0xc.0000000000007ffp+10130L, -0x8.000000000000001p+4430L, 0xc.07000000001ffffp+14513L, -0xb.fffffffffffd7e4p+14563L),
8524 TEST_fff_f (fma, 0xb.ffffp-4777L, 0x8.000000fffffffffp-11612L, -0x0.3800fff8p-16385L, 0x5.c7fe80c7ffeffffp-16385L, UNDERFLOW_EXCEPTION),
8525 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8526 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8527 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8528 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8529 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8530 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8531 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8532 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8533 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1p16383L),
8534 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x1p16383L),
8535 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x1p16383L),
8536 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1p16383L),
8537 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1p-16382L),
8538 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8539 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8540 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1p-16382L),
8541 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8542 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8543 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8544 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8545 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
8546 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
8547 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
8548 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
8549 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8550 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8551 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8552 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8553 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
8554 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
8555 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
8556 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
8557 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
8558 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
8559 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
8560 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
9ff8d36f 8561#endif
7c08a05c 8562#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM		 8563 TEST_fff_f (fma, 0x1.bb2de33e02ccbbfa6e245a7c1f71p-2584L, -0x1.6b500daf0580d987f1bc0cadfcddp-13777L, 0x1.613cd91d9fed34b33820e5ab9d8dp-16378L, -0x1.3a79fb50eb9ce887cffa0f09bd9fp-16360L),
8564 TEST_fff_f (fma, -0x1.f949b880cacb0f0c61540105321dp-5954L, -0x1.3876cec84b4140f3bd6198731b7ep-10525L, -0x0.a5dc1c6cfbc498c54fb0b504bf19p-16382L, -0x0.a5dc1c6cfbc498c54fb0b5038abbp-16382L, UNDERFLOW_EXCEPTION),
8565 TEST_fff_f (fma, -0x1.0000fffffffffp-16221L, 0x1.0000001fffff8007fep-239L, 0x0.ff87ffffffffffffe000003fffffp-16382L, 0x0.ff87ffffffffffffdffc003bff7fp-16382L, UNDERFLOW_EXCEPTION),
8566 TEST_fff_f (fma, -0x1.ac79c9376ef447f3827c9e9de008p-2228L, -0x1.5ba830022b6139e21fbe7270cad8p-6314L, 0x1.e8282b6a26bb6a9daf5c8e73e9f9p-8616L, 0x1.22f14a0253878a730cd1aee373adp-8541L),
8567 TEST_fff_f (fma, -0x1.c69749ec574caaa2ab8e97ddb9f3p+2652L, 0x1.f34235ff9d095449c29b4831b62dp+3311L, 0x1.fbe4302df23354dbd0c4d3cfe606p+5879L, -0x1.bb473bfdfb7a6e18886ce6e57eafp+5964L),
8568 TEST_fff_f (fma, -0x1.ca8835fc6ecfb5398625fc891be5p-1686L, 0x1.621e1972bbe2180e5be9dd7d8df5p-7671L, -0x1.7d2d21b73b52cf20dec2a83902a4p-9395L, -0x1.3d2322191c9c88bc68a62ab8042cp-9356L),
8569 TEST_fff_f (fma, -0x1.55cff679ec49c2541fab41fc843ep-11819L, 0x1.e60e9f464f9e8df0509647c7c971p+12325L, 0x1.eaa2a7649d765c2f564f7a5beca7p+454L, -0x1.447e29fa7e406a285f4e350fcf86p+507L),
8570 TEST_fff_f (fma, 0x1.f0e7b1454908576f2537d863cf9bp+11432L, 0x1.cdce52f09d4ca76e68706f34b5d5p-1417L, -0x1.2e986187c70f146235ea2066e486p+9979L, 0x1.c030dad3cc5643f3dd0f5619f661p+10016L),
8571 TEST_fff_f (fma, 0x1.f102f7da4a57a3a4aab620e29452p-3098L, -0x1.cc06a4ff40248f9e2dcc4b6afd84p-11727L, 0x1.d512a11126b5ac8ed8973b8580c8p-14849L, -0x1.be8f1cf737ab4d1c31c54f5ec23bp-14824L),
8572 TEST_fff_f (fma, -0x1.fc47ac7434b993cd8dcb2b431f25p-3816L, 0x1.fbc9750da8468852d84558e1db6dp-5773L, -0x1.00a98abf783f75c40fe5b7a37d86p-9607L, -0x1.f81917b166f45e763cfcc057e2adp-9588L),
8573 TEST_fff_f (fma, 0x1.00000000000007ffffffffffffffp-9045L, -0x1.ffffffffffff80000001ffffffffp+4773L, -0x1.f8p-4316L, -0x1.00000000000f88000000fffffdffp-4271L),
8574 TEST_fff_f (fma, 0x1.4e922764c90701d4a2f21d01893dp-8683L, -0x1.955a12e2d7c9447c27fa022fc865p+212L, -0x1.e9634462eaef96528b90b6944578p-8521L, -0x1.08e1783184a371943d3598e10865p-8470L),
8575 TEST_fff_f (fma, 0x1.801181509c03bdbef10d6165588cp-15131L, 0x1.ad86f8e57d3d40bfa8007780af63p-368L, -0x1.6e9df0dab1c9f1d7a6043c390741p-15507L, 0x1.417c9b2b15e2ad57dc9e0e920844p-15498L),
8576 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8577 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8578 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8579 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8580 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8581 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8582 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8583 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8584 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1p16383L),
8585 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x1p16383L),
8586 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x1p16383L),
8587 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1p16383L),
8588 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1p-16382L),
8589 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8590 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8591 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1p-16382L),
8592 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8593 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8594 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8595 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8596 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
8597 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
8598 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
8599 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
8600 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8601 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8602 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8603 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8604 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
8605 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
8606 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
8607 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
8608 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
8609 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
8610 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
8611 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
8612#endif
8613 END_DATA (fma)
8614 };
8847214f 8615
8ec5b013 8616static void
4f184d30 8617fma_test (void)
8ec5b013 8618{
4f184d30
JM		 8619 START (fma);
8620 RUN_TEST_LOOP_fff_f (fma, fma_test_data, );
8621 END (fma);
8622}
8ec5b013 8623
8ec5b013 8624
4f184d30
JM		 8625static const struct test_fff_f_data fma_towardzero_test_data[] =
8626 {
8627 START_DATA (fma_towardzero),
8628 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
8629 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, plus_zero),
8630 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, plus_zero),
8631 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
8632 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, plus_zero),
8633 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
8634 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
8635 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, plus_zero),
8636 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
8637 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, plus_zero),
8638 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, plus_zero),
8639 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
8640 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, plus_zero),
8641 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
8642 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
8643 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, plus_zero),
8644 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
8645 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, plus_zero),
8646 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, plus_zero),
8647 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
8648 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, plus_zero),
8649 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
8650 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
8651 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, plus_zero),
8652
8653 TEST_fff_f (fma, 1.0, 1.0, -1.0, plus_zero),
8654 TEST_fff_f (fma, 1.0, -1.0, 1.0, plus_zero),
8655 TEST_fff_f (fma, -1.0, 1.0, 1.0, plus_zero),
8656 TEST_fff_f (fma, -1.0, -1.0, -1.0, plus_zero),
8657
8658 TEST_fff_f (fma, min_value, min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8659 TEST_fff_f (fma, min_value, min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8660 TEST_fff_f (fma, min_value, -min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8661 TEST_fff_f (fma, min_value, -min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8662 TEST_fff_f (fma, -min_value, min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8663 TEST_fff_f (fma, -min_value, min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8664 TEST_fff_f (fma, -min_value, -min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8665 TEST_fff_f (fma, -min_value, -min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8627a232 8666
7184dcdf 8667#if !(defined TEST_LDOUBLE && LDBL_MANT_DIG == 106) /* Bug 13304. */
4f184d30
JM		 8668 TEST_fff_f (fma, max_value, max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8669 TEST_fff_f (fma, max_value, max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
8670 TEST_fff_f (fma, max_value, -max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
8671 TEST_fff_f (fma, max_value, -max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
8672 TEST_fff_f (fma, -max_value, max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
8673 TEST_fff_f (fma, -max_value, max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
8674 TEST_fff_f (fma, -max_value, -max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8675 TEST_fff_f (fma, -max_value, -max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
7184dcdf 8676#endif
a0c2940d 8677
8627a232 8678#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM		 8679 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8680 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8681 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8682 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8683 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8684 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8685 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8686 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8687 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1p127),
8688 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x0.ffffffp127),
8689 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x0.ffffffp127),
8690 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1p127),
8691 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1p-126),
8692 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8693 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8694 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1p-126),
8695 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8696 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
8697 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
8698 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8699 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8700 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, plus_zero, UNDERFLOW_EXCEPTION),
8701 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, minus_zero, UNDERFLOW_EXCEPTION),
8702 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8703 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
8704 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
8705 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
8706 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
8707 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1p127),
8708 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x0.ffffffp127),
8709 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x0.ffffffp127),
8710 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1p127),
8711 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1p103),
8712 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x0.ffffffp103),
8713 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x0.ffffffp103),
8714 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1p103),
8627a232
JM		 8715#endif
8716#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM		 8717 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8718 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8719 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8720 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8721 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8722 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8723 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8724 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8725 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1p1023),
8726 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x0.fffffffffffff8p1023),
8727 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x0.fffffffffffff8p1023),
8728 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1p1023),
8729 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1p-1022),
8730 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8731 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8732 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1p-1022),
8733 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8734 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
8735 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
8736 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8737 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8738 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, plus_zero, UNDERFLOW_EXCEPTION),
8739 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, minus_zero, UNDERFLOW_EXCEPTION),
8740 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8741 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8742 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8743 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8744 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8745 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8746 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x0.fffffffffffff8p1023),
8747 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x0.fffffffffffff8p1023),
8748 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8749 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1p970),
8750 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x0.fffffffffffff8p970),
8751 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x0.fffffffffffff8p970),
8752 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1p970),
8627a232
JM		 8753#endif
8754#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM		 8755 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8756 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8757 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8758 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8759 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8760 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8761 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8762 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8763 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1p16383L),
8764 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
8765 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
8766 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1p16383L),
8767 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1p-16382L),
8768 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8769 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8770 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1p-16382L),
8771 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8772 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
8773 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
8774 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8775 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
8776 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, plus_zero, UNDERFLOW_EXCEPTION),
8777 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, minus_zero, UNDERFLOW_EXCEPTION),
8778 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
8779 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8780 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8781 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8782 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8783 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
8784 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
8785 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
8786 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
8787 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
8788 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x0.ffffffffffffffffp16319L),
8789 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x0.ffffffffffffffffp16319L),
8790 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
8627a232
JM		 8791#endif
8792#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM		 8793 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8794 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8795 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8796 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8797 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8798 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8799 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8800 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8801 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1p16383L),
8802 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
8803 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
8804 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1p16383L),
8805 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1p-16382L),
8806 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8807 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8808 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1p-16382L),
8809 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8810 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8811 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8812 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8813 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
8814 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, plus_zero, UNDERFLOW_EXCEPTION),
8815 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, minus_zero, UNDERFLOW_EXCEPTION),
8816 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
8817 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8818 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8819 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8820 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8821 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
8822 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
8823 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
8824 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
8825 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
8826 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x0.ffffffffffffffffffffffffffff8p16319L),
8827 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x0.ffffffffffffffffffffffffffff8p16319L),
8828 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
8829#endif
8830 END_DATA (fma_towardzero)
8831 };
8ec5b013
JM		 8832
8833static void
4f184d30 8834fma_test_towardzero (void)
8ec5b013 8835{
4f184d30
JM		 8836 START (fma_towardzero);
8837 RUN_TEST_LOOP_fff_f (fma, fma_towardzero_test_data, FE_TOWARDZERO);
8838 END (fma_towardzero);
8839}
8ec5b013 8840
8ec5b013 8841
4f184d30
JM		 8842static const struct test_fff_f_data fma_downward_test_data[] =
8843 {
8844 START_DATA (fma_downward),
8845 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
8846 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, minus_zero),
8847 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, minus_zero),
8848 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
8849 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, minus_zero),
8850 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
8851 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
8852 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, minus_zero),
8853 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
8854 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, minus_zero),
8855 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, minus_zero),
8856 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
8857 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, minus_zero),
8858 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
8859 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
8860 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, minus_zero),
8861 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
8862 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, minus_zero),
8863 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, minus_zero),
8864 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
8865 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, minus_zero),
8866 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
8867 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
8868 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, minus_zero),
8869
8870 TEST_fff_f (fma, 1.0, 1.0, -1.0, minus_zero),
8871 TEST_fff_f (fma, 1.0, -1.0, 1.0, minus_zero),
8872 TEST_fff_f (fma, -1.0, 1.0, 1.0, minus_zero),
8873 TEST_fff_f (fma, -1.0, -1.0, -1.0, minus_zero),
8874
8875 TEST_fff_f (fma, min_value, min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8876 TEST_fff_f (fma, min_value, min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8877 TEST_fff_f (fma, min_value, -min_value, plus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8878 TEST_fff_f (fma, min_value, -min_value, minus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8879 TEST_fff_f (fma, -min_value, min_value, plus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8880 TEST_fff_f (fma, -min_value, min_value, minus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8881 TEST_fff_f (fma, -min_value, -min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8882 TEST_fff_f (fma, -min_value, -min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8627a232 8883
7184dcdf 8884#if !(defined TEST_LDOUBLE && LDBL_MANT_DIG == 106) /* Bug 13304. */
4f184d30
JM		 8885 TEST_fff_f (fma, max_value, max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8886 TEST_fff_f (fma, max_value, max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
8887 TEST_fff_f (fma, max_value, -max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8888 TEST_fff_f (fma, max_value, -max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8889 TEST_fff_f (fma, -max_value, max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8890 TEST_fff_f (fma, -max_value, max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8891 TEST_fff_f (fma, -max_value, -max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8892 TEST_fff_f (fma, -max_value, -max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
7184dcdf 8893#endif
a0c2940d 8894
8627a232 8895#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM		 8896 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8897 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00008p-127, UNDERFLOW_EXCEPTION),
8898 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8899 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8900 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8901 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8902 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8903 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8904 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1p127),
8905 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x0.ffffffp127),
8906 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x1p127),
8907 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1.000002p127),
8908 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1p-126),
8909 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8910 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8911 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1.000002p-126),
8912 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8913 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
8914 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8915 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8916 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8917 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, plus_zero, UNDERFLOW_EXCEPTION),
8918 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8919 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-148, UNDERFLOW_EXCEPTION),
8920 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
8921 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
8922 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
8923 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
8924 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1p127),
8925 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x0.ffffffp127),
8926 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x1p127),
8927 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1.000002p127),
8928 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1p103),
8929 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x0.ffffffp103),
8930 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x1p103),
8931 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1.000002p103),
8627a232
JM		 8932#endif
8933#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM		 8934 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8935 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000004p-1023, UNDERFLOW_EXCEPTION),
8936 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8937 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8938 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8939 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
8940 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8941 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8942 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1p1023),
8943 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x0.fffffffffffff8p1023),
8944 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x1p1023),
8945 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1.0000000000001p1023),
8946 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1p-1022),
8947 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8948 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8949 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1.0000000000001p-1022),
8950 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8951 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
8952 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8953 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
8954 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8955 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, plus_zero, UNDERFLOW_EXCEPTION),
8956 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8957 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1073, UNDERFLOW_EXCEPTION),
8958 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8959 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8960 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8961 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8962 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8963 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x0.fffffffffffff8p1023),
8964 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8965 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1.0000000000001p1023),
8966 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1p970),
8967 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x0.fffffffffffff8p970),
8968 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x1p970),
8969 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1.0000000000001p970),
8627a232
JM		 8970#endif
8971#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM		 8972 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8973 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000008p-16383L, UNDERFLOW_EXCEPTION),
8974 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8975 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8976 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8977 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8978 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8979 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8980 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1p16383L),
8981 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
8982 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x1p16383L),
8983 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1.0000000000000002p16383L),
8984 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1p-16382L),
8985 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8986 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8987 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1.0000000000000002p-16382L),
8988 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8989 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
8990 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8991 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8992 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
8993 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, plus_zero, UNDERFLOW_EXCEPTION),
8994 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
8995 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16444L, UNDERFLOW_EXCEPTION),
8996 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8997 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8998 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8999 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9000 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
9001 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
9002 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
9003 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1.0000000000000002p16383L),
9004 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
9005 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x0.ffffffffffffffffp16319L),
9006 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
9007 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1.0000000000000002p16319L),
8627a232
JM		 9008#endif
9009#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM		 9010 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
9011 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9012 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9013 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9014 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9015 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9016 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9017 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9018 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1p16383L),
9019 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
9020 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x1p16383L),
9021 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1.0000000000000000000000000001p16383L),
9022 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1p-16382L),
9023 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9024 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9025 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1.0000000000000000000000000001p-16382L),
9026 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9027 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9028 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9029 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9030 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
9031 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, plus_zero, UNDERFLOW_EXCEPTION),
9032 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
9033 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16493L, UNDERFLOW_EXCEPTION),
9034 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9035 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9036 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9037 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9038 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
9039 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
9040 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
9041 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1.0000000000000000000000000001p16383L),
9042 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
9043 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x0.ffffffffffffffffffffffffffff8p16319L),
9044 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
9045 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1.0000000000000000000000000001p16319L),
9046#endif
9047 END_DATA (fma_downward)
9048 };
8ec5b013
JM		 9049
9050static void
4f184d30 9051fma_test_downward (void)
8ec5b013 9052{
4f184d30
JM		 9053 START (fma_downward);
9054 RUN_TEST_LOOP_fff_f (fma, fma_downward_test_data, FE_DOWNWARD);
9055 END (fma_downward);
9056}
8ec5b013 9057
8ec5b013 9058
4f184d30
JM		 9059static const struct test_fff_f_data fma_upward_test_data[] =
9060 {
9061 START_DATA (fma_upward),
9062 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
9063 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, plus_zero),
9064 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, plus_zero),
9065 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
9066 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, plus_zero),
9067 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
9068 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
9069 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, plus_zero),
9070 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
9071 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, plus_zero),
9072 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, plus_zero),
9073 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
9074 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, plus_zero),
9075 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
9076 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
9077 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, plus_zero),
9078 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
9079 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, plus_zero),
9080 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, plus_zero),
9081 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
9082 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, plus_zero),
9083 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
9084 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
9085 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, plus_zero),
9086
9087 TEST_fff_f (fma, 1.0, 1.0, -1.0, plus_zero),
9088 TEST_fff_f (fma, 1.0, -1.0, 1.0, plus_zero),
9089 TEST_fff_f (fma, -1.0, 1.0, 1.0, plus_zero),
9090 TEST_fff_f (fma, -1.0, -1.0, -1.0, plus_zero),
9091
9092 TEST_fff_f (fma, min_value, min_value, plus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9093 TEST_fff_f (fma, min_value, min_value, minus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9094 TEST_fff_f (fma, min_value, -min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9095 TEST_fff_f (fma, min_value, -min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9096 TEST_fff_f (fma, -min_value, min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9097 TEST_fff_f (fma, -min_value, min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9098 TEST_fff_f (fma, -min_value, -min_value, plus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9099 TEST_fff_f (fma, -min_value, -min_value, minus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
8627a232 9100
7184dcdf 9101#if !(defined TEST_LDOUBLE && LDBL_MANT_DIG == 106) /* Bug 13304. */
4f184d30
JM		 9102 TEST_fff_f (fma, max_value, max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
9103 TEST_fff_f (fma, max_value, max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
9104 TEST_fff_f (fma, max_value, -max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
9105 TEST_fff_f (fma, max_value, -max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
9106 TEST_fff_f (fma, -max_value, max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
9107 TEST_fff_f (fma, -max_value, max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
9108 TEST_fff_f (fma, -max_value, -max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
9109 TEST_fff_f (fma, -max_value, -max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
7184dcdf 9110#endif
a0c2940d 9111
8627a232 9112#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM		 9113 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00008p-127, UNDERFLOW_EXCEPTION),
9114 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00004p-127, UNDERFLOW_EXCEPTION),
9115 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9116 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9117 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
9118 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9119 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9120 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9121 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1.000002p127),
9122 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x1p127),
9123 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x0.ffffffp127),
9124 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1p127),
9125 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1.000002p-126),
9126 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9127 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9128 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1p-126),
9129 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
9130 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9131 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
9132 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9133 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-148, UNDERFLOW_EXCEPTION),
9134 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
9135 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, minus_zero, UNDERFLOW_EXCEPTION),
9136 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
9137 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
9138 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
9139 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
9140 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
9141 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1.000002p127),
9142 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x1p127),
9143 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x0.ffffffp127),
9144 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1p127),
9145 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1.000002p103),
9146 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x1p103),
9147 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x0.ffffffp103),
9148 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1p103),
8627a232
JM		 9149#endif
9150#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM		 9151 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000004p-1023, UNDERFLOW_EXCEPTION),
9152 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
9153 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9154 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9155 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
9156 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9157 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9158 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9159 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1.0000000000001p1023),
9160 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x1p1023),
9161 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x0.fffffffffffff8p1023),
9162 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1p1023),
9163 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1.0000000000001p-1022),
9164 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9165 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9166 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1p-1022),
9167 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
9168 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9169 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
9170 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9171 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1073, UNDERFLOW_EXCEPTION),
9172 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
9173 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, minus_zero, UNDERFLOW_EXCEPTION),
9174 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
9175 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9176 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9177 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9178 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9179 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1.0000000000001p1023),
9180 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
9181 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x0.fffffffffffff8p1023),
9182 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
9183 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1.0000000000001p970),
9184 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x1p970),
9185 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x0.fffffffffffff8p970),
9186 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1p970),
8627a232
JM		 9187#endif
9188#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM		 9189 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000008p-16383L, UNDERFLOW_EXCEPTION),
9190 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9191 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9192 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9193 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9194 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9195 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9196 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9197 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1.0000000000000002p16383L),
9198 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x1p16383L),
9199 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
9200 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1p16383L),
9201 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1.0000000000000002p-16382L),
9202 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9203 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9204 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1p-16382L),
9205 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9206 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9207 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
9208 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9209 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16444L, UNDERFLOW_EXCEPTION),
9210 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
9211 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, minus_zero, UNDERFLOW_EXCEPTION),
9212 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
9213 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9214 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9215 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9216 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9217 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1.0000000000000002p16383L),
9218 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
9219 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
9220 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
9221 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1.0000000000000002p16319L),
9222 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
9223 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x0.ffffffffffffffffp16319L),
9224 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
8627a232
JM		 9225#endif
9226#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM		 9227 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9228 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
9229 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9230 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9231 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9232 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9233 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9234 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9235 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1.0000000000000000000000000001p16383L),
9236 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x1p16383L),
9237 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
9238 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1p16383L),
9239 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1.0000000000000000000000000001p-16382L),
9240 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9241 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9242 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1p-16382L),
9243 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9244 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9245 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9246 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9247 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16493L, UNDERFLOW_EXCEPTION),
9248 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
9249 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, minus_zero, UNDERFLOW_EXCEPTION),
9250 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
9251 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9252 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9253 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9254 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9255 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1.0000000000000000000000000001p16383L),
9256 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
9257 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
9258 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
9259 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1.0000000000000000000000000001p16319L),
9260 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
9261 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x0.ffffffffffffffffffffffffffff8p16319L),
9262 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
9263#endif
9264 END_DATA (fma_upward)
9265 };
8ec5b013 9266
4f184d30
JM		 9267static void
9268fma_test_upward (void)
9269{
9270 START (fma_upward);
9271 RUN_TEST_LOOP_fff_f (fma, fma_upward_test_data, FE_UPWARD);
8ec5b013
JM		 9272 END (fma_upward);
9273}
9274
9275
601a3a5f
JM		 9276static const struct test_ff_f_data fmax_test_data[] =
9277 {
9278 START_DATA (fmax),
9279 TEST_ff_f (fmax, 0, 0, 0),
9280 TEST_ff_f (fmax, minus_zero, minus_zero, minus_zero),
9281 TEST_ff_f (fmax, 9, 0, 9),
9282 TEST_ff_f (fmax, 0, 9, 9),
9283 TEST_ff_f (fmax, -9, 0, 0),
9284 TEST_ff_f (fmax, 0, -9, 0),
9285
9286 TEST_ff_f (fmax, plus_infty, 9, plus_infty),
9287 TEST_ff_f (fmax, 0, plus_infty, plus_infty),
9288 TEST_ff_f (fmax, -9, plus_infty, plus_infty),
9289 TEST_ff_f (fmax, plus_infty, -9, plus_infty),
9290
9291 TEST_ff_f (fmax, minus_infty, 9, 9),
9292 TEST_ff_f (fmax, minus_infty, -9, -9),
9293 TEST_ff_f (fmax, 9, minus_infty, 9),
9294 TEST_ff_f (fmax, -9, minus_infty, -9),
9295
9296 TEST_ff_f (fmax, 0, qnan_value, 0),
9297 TEST_ff_f (fmax, 9, qnan_value, 9),
9298 TEST_ff_f (fmax, -9, qnan_value, -9),
9299 TEST_ff_f (fmax, qnan_value, 0, 0),
9300 TEST_ff_f (fmax, qnan_value, 9, 9),
9301 TEST_ff_f (fmax, qnan_value, -9, -9),
9302 TEST_ff_f (fmax, plus_infty, qnan_value, plus_infty),
9303 TEST_ff_f (fmax, minus_infty, qnan_value, minus_infty),
9304 TEST_ff_f (fmax, qnan_value, plus_infty, plus_infty),
9305 TEST_ff_f (fmax, qnan_value, minus_infty, minus_infty),
9306 TEST_ff_f (fmax, qnan_value, qnan_value, qnan_value),
9307 END_DATA (fmax)
9308 };
9309
8847214f
UD		 9310static void
9311fmax_test (void)
9312{
9313 START (fmax);
601a3a5f 9314 RUN_TEST_LOOP_ff_f (fmax, fmax_test_data, );
8847214f
UD		 9315 END (fmax);
9316}
9317
9318
601a3a5f
JM		 9319static const struct test_ff_f_data fmin_test_data[] =
9320 {
9321 START_DATA (fmin),
9322 TEST_ff_f (fmin, 0, 0, 0),
9323 TEST_ff_f (fmin, minus_zero, minus_zero, minus_zero),
9324 TEST_ff_f (fmin, 9, 0, 0),
9325 TEST_ff_f (fmin, 0, 9, 0),
9326 TEST_ff_f (fmin, -9, 0, -9),
9327 TEST_ff_f (fmin, 0, -9, -9),
9328
9329 TEST_ff_f (fmin, plus_infty, 9, 9),
9330 TEST_ff_f (fmin, 9, plus_infty, 9),
9331 TEST_ff_f (fmin, plus_infty, -9, -9),
9332 TEST_ff_f (fmin, -9, plus_infty, -9),
9333 TEST_ff_f (fmin, minus_infty, 9, minus_infty),
9334 TEST_ff_f (fmin, minus_infty, -9, minus_infty),
9335 TEST_ff_f (fmin, 9, minus_infty, minus_infty),
9336 TEST_ff_f (fmin, -9, minus_infty, minus_infty),
9337
9338 TEST_ff_f (fmin, 0, qnan_value, 0),
9339 TEST_ff_f (fmin, 9, qnan_value, 9),
9340 TEST_ff_f (fmin, -9, qnan_value, -9),
9341 TEST_ff_f (fmin, qnan_value, 0, 0),
9342 TEST_ff_f (fmin, qnan_value, 9, 9),
9343 TEST_ff_f (fmin, qnan_value, -9, -9),
9344 TEST_ff_f (fmin, plus_infty, qnan_value, plus_infty),
9345 TEST_ff_f (fmin, minus_infty, qnan_value, minus_infty),
9346 TEST_ff_f (fmin, qnan_value, plus_infty, plus_infty),
9347 TEST_ff_f (fmin, qnan_value, minus_infty, minus_infty),
9348 TEST_ff_f (fmin, qnan_value, qnan_value, qnan_value),
9349 END_DATA (fmin)
9350 };
9351
8847214f
UD		 9352static void
9353fmin_test (void)
9354{
9355 START (fmin);
601a3a5f 9356 RUN_TEST_LOOP_ff_f (fmin, fmin_test_data, );
8847214f
UD		 9357 END (fmin);
9358}
9359
9360
601a3a5f
JM		 9361static const struct test_ff_f_data fmod_test_data[] =
9362 {
9363 START_DATA (fmod),
9364 /* fmod (+0, y) == +0 for y != 0. */
9365 TEST_ff_f (fmod, 0, 3, 0),
9366
9367 /* fmod (-0, y) == -0 for y != 0. */
9368 TEST_ff_f (fmod, minus_zero, 3, minus_zero),
9369
9370 /* fmod (+inf, y) == qNaN plus invalid exception. */
9371 TEST_ff_f (fmod, plus_infty, 3, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
9372 /* fmod (-inf, y) == qNaN plus invalid exception. */
9373 TEST_ff_f (fmod, minus_infty, 3, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
9374 /* fmod (x, +0) == qNaN plus invalid exception. */
9375 TEST_ff_f (fmod, 3, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
9376 /* fmod (x, -0) == qNaN plus invalid exception. */
9377 TEST_ff_f (fmod, 3, minus_zero, qnan_value, INVALID_EXCEPTION),
9378
9379 /* fmod (x, +inf) == x for x not infinite. */
9380 TEST_ff_f (fmod, 3.0, plus_infty, 3.0),
9381 /* fmod (x, -inf) == x for x not infinite. */
9382 TEST_ff_f (fmod, 3.0, minus_infty, 3.0),
9383
9384 TEST_ff_f (fmod, qnan_value, qnan_value, qnan_value),
9385
9386 TEST_ff_f (fmod, 6.5, 2.25L, 2.0L),
9387 TEST_ff_f (fmod, -6.5, 2.25L, -2.0L),
9388 TEST_ff_f (fmod, 6.5, -2.25L, 2.0L),
9389 TEST_ff_f (fmod, -6.5, -2.25L, -2.0L),
9390
9391 TEST_ff_f (fmod, 0x0.fffffep-126L, 0x1p-149L, plus_zero),
9392#ifndef TEST_FLOAT
9393 TEST_ff_f (fmod, 0x0.fffffffffffffp-1022L, 0x1p-1074L, plus_zero),
9394#endif
9395#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
9396 TEST_ff_f (fmod, 0x0.fffffffffffffffep-16382L, 0x1p-16445L, plus_zero),
9397#endif
9398 END_DATA (fmod)
9399 };
9400
8847214f
UD		 9401static void
9402fmod_test (void)
9403{
aaca11d8 9404 errno = 0;
3c6cad26 9405 FUNC(fmod) (6.5, 2.3L);
aaca11d8
UD		 9406 if (errno == ENOSYS)
9407 /* Function not implemented. */
9408 return;
9409
8847214f 9410 START (fmod);
601a3a5f 9411 RUN_TEST_LOOP_ff_f (fmod, fmod_test_data, );
8847214f
UD		 9412 END (fmod);
9413}
9414
2550dfe9 9415
8847214f
UD		 9416static void
9417fpclassify_test (void)
9418{
9419 START (fpclassify);
9420
67e971f1 9421 TEST_f_i (fpclassify, qnan_value, FP_NAN);
8847214f
UD		 9422 TEST_f_i (fpclassify, plus_infty, FP_INFINITE);
9423 TEST_f_i (fpclassify, minus_infty, FP_INFINITE);
9424 TEST_f_i (fpclassify, plus_zero, FP_ZERO);
9425 TEST_f_i (fpclassify, minus_zero, FP_ZERO);
9426 TEST_f_i (fpclassify, 1000, FP_NORMAL);
ef1bb361 9427 TEST_f_i (fpclassify, min_subnorm_value, FP_SUBNORMAL);
8847214f
UD		 9428
9429 END (fpclassify);
9430}
9431
9432
9433static void
9434frexp_test (void)
9435{
9436 int x;
9437
9438 START (frexp);
9439
9440 TEST_fI_f1 (frexp, plus_infty, plus_infty, IGNORE);
9441 TEST_fI_f1 (frexp, minus_infty, minus_infty, IGNORE);
67e971f1 9442 TEST_fI_f1 (frexp, qnan_value, qnan_value, IGNORE);
8847214f
UD		 9443
9444 TEST_fI_f1 (frexp, 0.0, 0.0, 0.0);
9445 TEST_fI_f1 (frexp, minus_zero, minus_zero, 0.0);
9446
b15cb495
UD		 9447 TEST_fI_f1 (frexp, 12.8L, 0.8L, 4);
9448 TEST_fI_f1 (frexp, -27.34L, -0.854375L, 5);
8847214f
UD		 9449
9450 END (frexp);
9451}
9452
9453
9454static void
9455gamma_test (void)
9456{
9457 errno = 0;
9458 FUNC(gamma) (1);
9459
9460 if (errno == ENOSYS)
9461 /* Function not implemented. */
9462 return;
8847214f
UD		 9463
9464 START (gamma);
9465
5bf96de5
JM		 9466 TEST_f_f1 (gamma, plus_infty, plus_infty, 1);
9467 TEST_f_f1 (gamma, 0, plus_infty, 1, DIVIDE_BY_ZERO_EXCEPTION);
9468 TEST_f_f1 (gamma, -3, plus_infty, IGNORE, DIVIDE_BY_ZERO_EXCEPTION);
9469 TEST_f_f1 (gamma, minus_infty, plus_infty, IGNORE);
9470 TEST_f_f1 (gamma, qnan_value, qnan_value, IGNORE);
8847214f
UD		 9471
9472 TEST_f_f1 (gamma, 1, 0, 1);
9473 TEST_f_f1 (gamma, 3, M_LN2l, 1);
9474
9475 TEST_f_f1 (gamma, 0.5, M_LOG_SQRT_PIl, 1);
f30e0cd3 9476 TEST_f_f1 (gamma, -0.5, M_LOG_2_SQRT_PIl, -1);
8847214f
UD		 9477
9478 END (gamma);
9479}
9480
601a3a5f
JM		 9481static const struct test_ff_f_data hypot_test_data[] =
9482 {
9483 START_DATA (hypot),
9484 TEST_ff_f (hypot, plus_infty, 1, plus_infty),
9485 TEST_ff_f (hypot, minus_infty, 1, plus_infty),
8847214f 9486
15daa639 9487#ifndef TEST_INLINE
601a3a5f
JM		 9488 TEST_ff_f (hypot, plus_infty, qnan_value, plus_infty),
9489 TEST_ff_f (hypot, minus_infty, qnan_value, plus_infty),
9490 TEST_ff_f (hypot, qnan_value, plus_infty, plus_infty),
9491 TEST_ff_f (hypot, qnan_value, minus_infty, plus_infty),
15daa639 9492#endif
8847214f 9493
601a3a5f 9494 TEST_ff_f (hypot, qnan_value, qnan_value, qnan_value),
8847214f 9495
601a3a5f
JM		 9496 /* hypot (x,y) == hypot (+-x, +-y) */
9497 TEST_ff_f (hypot, 0.7L, 12.4L, 12.419742348374220601176836866763271L),
9498 TEST_ff_f (hypot, -0.7L, 12.4L, 12.419742348374220601176836866763271L),
9499 TEST_ff_f (hypot, 0.7L, -12.4L, 12.419742348374220601176836866763271L),
9500 TEST_ff_f (hypot, -0.7L, -12.4L, 12.419742348374220601176836866763271L),
9501 TEST_ff_f (hypot, 12.4L, 0.7L, 12.419742348374220601176836866763271L),
9502 TEST_ff_f (hypot, -12.4L, 0.7L, 12.419742348374220601176836866763271L),
9503 TEST_ff_f (hypot, 12.4L, -0.7L, 12.419742348374220601176836866763271L),
9504 TEST_ff_f (hypot, -12.4L, -0.7L, 12.419742348374220601176836866763271L),
8847214f 9505
601a3a5f
JM		 9506 /* hypot (x,0) == fabs (x) */
9507 TEST_ff_f (hypot, 0.75L, 0, 0.75L),
9508 TEST_ff_f (hypot, -0.75L, 0, 0.75L),
9509 TEST_ff_f (hypot, -5.7e7, 0, 5.7e7L),
8847214f 9510
601a3a5f 9511 TEST_ff_f (hypot, 0.75L, 1.25L, 1.45773797371132511771853821938639577L),
8847214f 9512
601a3a5f
JM		 9513 TEST_ff_f (hypot, 1.0L, 0x1p-61L, 1.0L),
9514 TEST_ff_f (hypot, 0x1p+0L, 0x1.fp-129L, 0x1p+0L),
1468ded3 9515#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
601a3a5f 9516 TEST_ff_f (hypot, 0x1.23456789abcdef0123456789ab8p-500L, 0x1.23456789abcdef0123456789ab8p-500L, 4.9155782399407039128612180934736799735113e-151L),
1468ded3 9517#endif
8e27e3cc 9518
aa4a2ae1 9519#if !(defined TEST_FLOAT && defined TEST_INLINE)
601a3a5f
JM		 9520 TEST_ff_f (hypot, 0x3p125L, 0x4p125L, 0x5p125L),
9521 TEST_ff_f (hypot, 0x1.234566p-126L, 0x1.234566p-126L, 1.891441686191081936598531534017449451173e-38L),
aa4a2ae1
JM		 9522#endif
9523
5779f134 9524#if !defined TEST_FLOAT && !(defined TEST_DOUBLE && defined TEST_INLINE)
601a3a5f
JM		 9525 TEST_ff_f (hypot, 0x3p1021L, 0x4p1021L, 0x5p1021L),
9526 TEST_ff_f (hypot, 0x1p+0L, 0x0.3ep-1022L, 0x1p+0L),
aa4a2ae1
JM		 9527#endif
9528
9529#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384 && !defined TEST_INLINE
601a3a5f 9530 TEST_ff_f (hypot, 0x3p16381L, 0x4p16381L, 0x5p16381L),
aa4a2ae1 9531#endif
601a3a5f
JM		 9532 END_DATA (hypot)
9533 };
9534
9535static void
9536hypot_test (void)
9537{
9538 errno = 0;
9539 FUNC(hypot) (0.7L, 12.4L);
9540 if (errno == ENOSYS)
9541 /* Function not implemented. */
9542 return;
aa4a2ae1 9543
601a3a5f
JM		 9544 START (hypot);
9545 RUN_TEST_LOOP_ff_f (hypot, hypot_test_data, );
8847214f
UD		 9546 END (hypot);
9547}
9548
9549
9550static void
9551ilogb_test (void)
9552{
9553 START (ilogb);
9554
9555 TEST_f_i (ilogb, 1, 0);
9556 TEST_f_i (ilogb, M_El, 1);
9557 TEST_f_i (ilogb, 1024, 10);
9558 TEST_f_i (ilogb, -2000, 10);
9559
76da7265 9560 /* ilogb (0.0) == FP_ILOGB0 plus invalid exception */
f2da7793 9561 TEST_f_i (ilogb, 0.0, FP_ILOGB0, INVALID_EXCEPTION|ERRNO_EDOM);
67e971f1 9562 /* ilogb (qNaN) == FP_ILOGBNAN plus invalid exception */
f2da7793 9563 TEST_f_i (ilogb, qnan_value, FP_ILOGBNAN, INVALID_EXCEPTION|ERRNO_EDOM);
76da7265 9564 /* ilogb (inf) == INT_MAX plus invalid exception */
f2da7793 9565 TEST_f_i (ilogb, plus_infty, INT_MAX, INVALID_EXCEPTION|ERRNO_EDOM);
76da7265 9566 /* ilogb (-inf) == INT_MAX plus invalid exception */
f2da7793 9567 TEST_f_i (ilogb, minus_infty, INT_MAX, INVALID_EXCEPTION|ERRNO_EDOM);
8847214f
UD		 9568
9569 END (ilogb);
9570}
9571
9572static void
9573isfinite_test (void)
9574{
9575 START (isfinite);
9576
9577 TEST_f_b (isfinite, 0, 1);
9578 TEST_f_b (isfinite, minus_zero, 1);
9579 TEST_f_b (isfinite, 10, 1);
ef1bb361 9580 TEST_f_b (isfinite, min_subnorm_value, 1);
8847214f
UD		 9581 TEST_f_b (isfinite, plus_infty, 0);
9582 TEST_f_b (isfinite, minus_infty, 0);
67e971f1 9583 TEST_f_b (isfinite, qnan_value, 0);
8847214f
UD		 9584
9585 END (isfinite);
9586}
9587
0e8e0c1c
JM		 9588static void
9589isgreater_test (void)
9590{
9591 START (isgreater);
9592
9593 TEST_ff_i (isgreater, minus_zero, minus_zero, 0);
9594 TEST_ff_i (isgreater, minus_zero, plus_zero, 0);
9595 TEST_ff_i (isgreater, minus_zero, (FLOAT) 1, 0);
67e971f1 9596 TEST_ff_i (isgreater, minus_zero, qnan_value, 0);
0e8e0c1c
JM		 9597 TEST_ff_i (isgreater, plus_zero, minus_zero, 0);
9598 TEST_ff_i (isgreater, plus_zero, plus_zero, 0);
9599 TEST_ff_i (isgreater, plus_zero, (FLOAT) 1, 0);
67e971f1 9600 TEST_ff_i (isgreater, plus_zero, qnan_value, 0);
0e8e0c1c
JM		 9601 TEST_ff_i (isgreater, (FLOAT) 1, minus_zero, 1);
9602 TEST_ff_i (isgreater, (FLOAT) 1, plus_zero, 1);
9603 TEST_ff_i (isgreater, (FLOAT) 1, (FLOAT) 1, 0);
67e971f1
TS		 9604 TEST_ff_i (isgreater, (FLOAT) 1, qnan_value, 0);
9605 TEST_ff_i (isgreater, qnan_value, minus_zero, 0);
9606 TEST_ff_i (isgreater, qnan_value, plus_zero, 0);
9607 TEST_ff_i (isgreater, qnan_value, (FLOAT) 1, 0);
9608 TEST_ff_i (isgreater, qnan_value, qnan_value, 0);
0e8e0c1c
JM		 9609
9610 END (isgreater);
9611}
9612
9613static void
9614isgreaterequal_test (void)
9615{
9616 START (isgreaterequal);
9617
9618 TEST_ff_i (isgreaterequal, minus_zero, minus_zero, 1);
9619 TEST_ff_i (isgreaterequal, minus_zero, plus_zero, 1);
9620 TEST_ff_i (isgreaterequal, minus_zero, (FLOAT) 1, 0);
67e971f1 9621 TEST_ff_i (isgreaterequal, minus_zero, qnan_value, 0);
0e8e0c1c
JM		 9622 TEST_ff_i (isgreaterequal, plus_zero, minus_zero, 1);
9623 TEST_ff_i (isgreaterequal, plus_zero, plus_zero, 1);
9624 TEST_ff_i (isgreaterequal, plus_zero, (FLOAT) 1, 0);
67e971f1 9625 TEST_ff_i (isgreaterequal, plus_zero, qnan_value, 0);
0e8e0c1c
JM		 9626 TEST_ff_i (isgreaterequal, (FLOAT) 1, minus_zero, 1);
9627 TEST_ff_i (isgreaterequal, (FLOAT) 1, plus_zero, 1);
9628 TEST_ff_i (isgreaterequal, (FLOAT) 1, (FLOAT) 1, 1);
67e971f1
TS		 9629 TEST_ff_i (isgreaterequal, (FLOAT) 1, qnan_value, 0);
9630 TEST_ff_i (isgreaterequal, qnan_value, minus_zero, 0);
9631 TEST_ff_i (isgreaterequal, qnan_value, plus_zero, 0);
9632 TEST_ff_i (isgreaterequal, qnan_value, (FLOAT) 1, 0);
9633 TEST_ff_i (isgreaterequal, qnan_value, qnan_value, 0);
0e8e0c1c
JM		 9634
9635 END (isgreaterequal);
9636}
9637
ef1bb361
JM		 9638static void
9639isinf_test (void)
9640{
9641 START (isinf);
9642
9643 TEST_f_b (isinf, 0, 0);
9644 TEST_f_b (isinf, minus_zero, 0);
9645 TEST_f_b (isinf, 10, 0);
9646 TEST_f_b (isinf, min_subnorm_value, 0);
9647 TEST_f_b (isinf, plus_infty, 1);
9648 TEST_f_b (isinf, minus_infty, 1);
67e971f1 9649 TEST_f_b (isinf, qnan_value, 0);
ef1bb361
JM		 9650
9651 END (isinf);
9652}
9653
0e8e0c1c
JM		 9654static void
9655isless_test (void)
9656{
9657 START (isless);
9658
9659 TEST_ff_i (isless, minus_zero, minus_zero, 0);
9660 TEST_ff_i (isless, minus_zero, plus_zero, 0);
9661 TEST_ff_i (isless, minus_zero, (FLOAT) 1, 1);
67e971f1 9662 TEST_ff_i (isless, minus_zero, qnan_value, 0);
0e8e0c1c
JM		 9663 TEST_ff_i (isless, plus_zero, minus_zero, 0);
9664 TEST_ff_i (isless, plus_zero, plus_zero, 0);
9665 TEST_ff_i (isless, plus_zero, (FLOAT) 1, 1);
67e971f1 9666 TEST_ff_i (isless, plus_zero, qnan_value, 0);
0e8e0c1c
JM		 9667 TEST_ff_i (isless, (FLOAT) 1, minus_zero, 0);
9668 TEST_ff_i (isless, (FLOAT) 1, plus_zero, 0);
9669 TEST_ff_i (isless, (FLOAT) 1, (FLOAT) 1, 0);
67e971f1
TS		 9670 TEST_ff_i (isless, (FLOAT) 1, qnan_value, 0);
9671 TEST_ff_i (isless, qnan_value, minus_zero, 0);
9672 TEST_ff_i (isless, qnan_value, plus_zero, 0);
9673 TEST_ff_i (isless, qnan_value, (FLOAT) 1, 0);
9674 TEST_ff_i (isless, qnan_value, qnan_value, 0);
0e8e0c1c
JM		 9675
9676 END (isless);
9677}
9678
9679static void
9680islessequal_test (void)
9681{
9682 START (islessequal);
9683
9684 TEST_ff_i (islessequal, minus_zero, minus_zero, 1);
9685 TEST_ff_i (islessequal, minus_zero, plus_zero, 1);
9686 TEST_ff_i (islessequal, minus_zero, (FLOAT) 1, 1);
67e971f1 9687 TEST_ff_i (islessequal, minus_zero, qnan_value, 0);
0e8e0c1c
JM		 9688 TEST_ff_i (islessequal, plus_zero, minus_zero, 1);
9689 TEST_ff_i (islessequal, plus_zero, plus_zero, 1);
9690 TEST_ff_i (islessequal, plus_zero, (FLOAT) 1, 1);
67e971f1 9691 TEST_ff_i (islessequal, plus_zero, qnan_value, 0);
0e8e0c1c
JM		 9692 TEST_ff_i (islessequal, (FLOAT) 1, minus_zero, 0);
9693 TEST_ff_i (islessequal, (FLOAT) 1, plus_zero, 0);
9694 TEST_ff_i (islessequal, (FLOAT) 1, (FLOAT) 1, 1);
67e971f1
TS		 9695 TEST_ff_i (islessequal, (FLOAT) 1, qnan_value, 0);
9696 TEST_ff_i (islessequal, qnan_value, minus_zero, 0);
9697 TEST_ff_i (islessequal, qnan_value, plus_zero, 0);
9698 TEST_ff_i (islessequal, qnan_value, (FLOAT) 1, 0);
9699 TEST_ff_i (islessequal, qnan_value, qnan_value, 0);
0e8e0c1c
JM		 9700
9701 END (islessequal);
9702}
9703
9704static void
9705islessgreater_test (void)
9706{
9707 START (islessgreater);
9708
9709 TEST_ff_i (islessgreater, minus_zero, minus_zero, 0);
9710 TEST_ff_i (islessgreater, minus_zero, plus_zero, 0);
9711 TEST_ff_i (islessgreater, minus_zero, (FLOAT) 1, 1);
67e971f1 9712 TEST_ff_i (islessgreater, minus_zero, qnan_value, 0);
0e8e0c1c
JM		 9713 TEST_ff_i (islessgreater, plus_zero, minus_zero, 0);
9714 TEST_ff_i (islessgreater, plus_zero, plus_zero, 0);
9715 TEST_ff_i (islessgreater, plus_zero, (FLOAT) 1, 1);
67e971f1 9716 TEST_ff_i (islessgreater, plus_zero, qnan_value, 0);
0e8e0c1c
JM		 9717 TEST_ff_i (islessgreater, (FLOAT) 1, minus_zero, 1);
9718 TEST_ff_i (islessgreater, (FLOAT) 1, plus_zero, 1);
9719 TEST_ff_i (islessgreater, (FLOAT) 1, (FLOAT) 1, 0);
67e971f1
TS		 9720 TEST_ff_i (islessgreater, (FLOAT) 1, qnan_value, 0);
9721 TEST_ff_i (islessgreater, qnan_value, minus_zero, 0);
9722 TEST_ff_i (islessgreater, qnan_value, plus_zero, 0);
9723 TEST_ff_i (islessgreater, qnan_value, (FLOAT) 1, 0);
9724 TEST_ff_i (islessgreater, qnan_value, qnan_value, 0);
0e8e0c1c
JM		 9725
9726 END (islessgreater);
9727}
9728
ef1bb361
JM		 9729static void
9730isnan_test (void)
9731{
9732 START (isnan);
9733
9734 TEST_f_b (isnan, 0, 0);
9735 TEST_f_b (isnan, minus_zero, 0);
9736 TEST_f_b (isnan, 10, 0);
9737 TEST_f_b (isnan, min_subnorm_value, 0);
9738 TEST_f_b (isnan, plus_infty, 0);
9739 TEST_f_b (isnan, minus_infty, 0);
67e971f1 9740 TEST_f_b (isnan, qnan_value, 1);
ef1bb361
JM		 9741
9742 END (isnan);
9743}
9744
8847214f
UD		 9745static void
9746isnormal_test (void)
9747{
9748 START (isnormal);
9749
9750 TEST_f_b (isnormal, 0, 0);
9751 TEST_f_b (isnormal, minus_zero, 0);
9752 TEST_f_b (isnormal, 10, 1);
ef1bb361 9753 TEST_f_b (isnormal, min_subnorm_value, 0);
8847214f
UD		 9754 TEST_f_b (isnormal, plus_infty, 0);
9755 TEST_f_b (isnormal, minus_infty, 0);
67e971f1 9756 TEST_f_b (isnormal, qnan_value, 0);
8847214f
UD		 9757
9758 END (isnormal);
9759}
9760
57267616
TS		 9761static void
9762issignaling_test (void)
9763{
9764 START (issignaling);
9765
9766 TEST_f_b (issignaling, 0, 0);
9767 TEST_f_b (issignaling, minus_zero, 0);
9768 TEST_f_b (issignaling, 10, 0);
9769 TEST_f_b (issignaling, min_subnorm_value, 0);
9770 TEST_f_b (issignaling, plus_infty, 0);
9771 TEST_f_b (issignaling, minus_infty, 0);
9772 TEST_f_b (issignaling, qnan_value, 0);
9773
9774 END (issignaling);
9775}
9776
0e8e0c1c
JM		 9777static void
9778isunordered_test (void)
9779{
9780 START (isunordered);
9781
9782 TEST_ff_i (isunordered, minus_zero, minus_zero, 0);
9783 TEST_ff_i (isunordered, minus_zero, plus_zero, 0);
9784 TEST_ff_i (isunordered, minus_zero, (FLOAT) 1, 0);
67e971f1 9785 TEST_ff_i (isunordered, minus_zero, qnan_value, 1);
0e8e0c1c
JM		 9786 TEST_ff_i (isunordered, plus_zero, minus_zero, 0);
9787 TEST_ff_i (isunordered, plus_zero, plus_zero, 0);
9788 TEST_ff_i (isunordered, plus_zero, (FLOAT) 1, 0);
67e971f1 9789 TEST_ff_i (isunordered, plus_zero, qnan_value, 1);
0e8e0c1c
JM		 9790 TEST_ff_i (isunordered, (FLOAT) 1, minus_zero, 0);
9791 TEST_ff_i (isunordered, (FLOAT) 1, plus_zero, 0);
9792 TEST_ff_i (isunordered, (FLOAT) 1, (FLOAT) 1, 0);
67e971f1
TS		 9793 TEST_ff_i (isunordered, (FLOAT) 1, qnan_value, 1);
9794 TEST_ff_i (isunordered, qnan_value, minus_zero, 1);
9795 TEST_ff_i (isunordered, qnan_value, plus_zero, 1);
9796 TEST_ff_i (isunordered, qnan_value, (FLOAT) 1, 1);
9797 TEST_ff_i (isunordered, qnan_value, qnan_value, 1);
0e8e0c1c
JM		 9798
9799 END (isunordered);
9800}
9801
74c57478
JM		 9802static const struct test_f_f_data j0_test_data[] =
9803 {
9804 START_DATA (j0),
9805 /* j0 is the Bessel function of the first kind of order 0 */
9806 TEST_f_f (j0, qnan_value, qnan_value),
9807 TEST_f_f (j0, plus_infty, 0),
9808 TEST_f_f (j0, -1.0, 0.765197686557966551449717526102663221L),
9809 TEST_f_f (j0, 0.0, 1.0),
9810 TEST_f_f (j0, 0.125L, 0.996097563041985204620768999453174712L),
9811 TEST_f_f (j0, 0.75L, 0.864242275166648623555731103820923211L),
9812 TEST_f_f (j0, 1.0, 0.765197686557966551449717526102663221L),
9813 TEST_f_f (j0, 1.5, 0.511827671735918128749051744283411720L),
9814 TEST_f_f (j0, 2.0, 0.223890779141235668051827454649948626L),
9815 TEST_f_f (j0, 8.0, 0.171650807137553906090869407851972001L),
9816 TEST_f_f (j0, 10.0, -0.245935764451348335197760862485328754L),
9817 TEST_f_f (j0, 4.0, -3.9714980986384737228659076845169804197562E-1L),
9818 TEST_f_f (j0, -4.0, -3.9714980986384737228659076845169804197562E-1L),
8847214f 9819
74c57478 9820 TEST_f_f (j0, 0x1.d7ce3ap+107L, 2.775523647291230802651040996274861694514e-17L),
c36e1d23
JM		 9821
9822#ifndef TEST_FLOAT
74c57478
JM		 9823 TEST_f_f (j0, -0x1.001000001p+593L, -3.927269966354206207832593635798954916263e-90L),
9824 TEST_f_f (j0, 0x1p1023L, -1.5665258060609012834424478437196679802783e-155L),
c36e1d23
JM		 9825#endif
9826
d2f9799e 9827#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 9828 TEST_f_f (j0, 0x1p16382L, -1.2193782500509000574176799046642541129387e-2466L),
9829 TEST_f_f (j0, 0x1p16383L, 9.5859502826270374691362975419147645151233e-2467L),
d2f9799e 9830#endif
74c57478
JM		 9831 END_DATA (j0)
9832 };
8847214f
UD		 9833
9834static void
74c57478 9835j0_test (void)
8847214f 9836{
8a216c1b 9837 FLOAT s, c;
8847214f 9838 errno = 0;
cd53c157
UD		 9839 FUNC (sincos) (0, &s, &c);
9840 if (errno == ENOSYS)
9841 /* Required function not implemented. */
9842 return;
74c57478 9843 FUNC(j0) (0);
8847214f
UD		 9844 if (errno == ENOSYS)
9845 /* Function not implemented. */
9846 return;
9847
74c57478
JM		 9848 START (j0);
9849 RUN_TEST_LOOP_f_f (j0, j0_test_data, );
9850 END (j0);
9851}
8847214f 9852
8847214f 9853
74c57478
JM		 9854static const struct test_f_f_data j1_test_data[] =
9855 {
9856 START_DATA (j1),
9857 /* j1 is the Bessel function of the first kind of order 1 */
9858 TEST_f_f (j1, qnan_value, qnan_value),
9859 TEST_f_f (j1, plus_infty, 0),
8847214f 9860
74c57478
JM		 9861 TEST_f_f (j1, -1.0, -0.440050585744933515959682203718914913L),
9862 TEST_f_f (j1, 0.0, 0.0),
9863 TEST_f_f (j1, 0.125L, 0.0623780091344946810942311355879361177L),
9864 TEST_f_f (j1, 0.75L, 0.349243602174862192523281016426251335L),
9865 TEST_f_f (j1, 1.0, 0.440050585744933515959682203718914913L),
9866 TEST_f_f (j1, 1.5, 0.557936507910099641990121213156089400L),
9867 TEST_f_f (j1, 2.0, 0.576724807756873387202448242269137087L),
9868 TEST_f_f (j1, 8.0, 0.234636346853914624381276651590454612L),
9869 TEST_f_f (j1, 10.0, 0.0434727461688614366697487680258592883L),
8847214f 9870
74c57478 9871 TEST_f_f (j1, 0x1.3ffp+74L, 1.818984347516051243459364437186082741567e-12L),
c36e1d23
JM		 9872
9873#ifndef TEST_FLOAT
74c57478
JM		 9874 TEST_f_f (j1, 0x1.ff00000000002p+840L, 1.846591691699331493194965158699937660696e-127L),
9875 TEST_f_f (j1, 0x1p1023L, 8.2687542933709649327986678723012001545638e-155L),
c36e1d23
JM		 9876#endif
9877
d2f9799e 9878#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 9879 TEST_f_f (j1, 0x1p16382L, 8.0839224448726336195866026476176740513439e-2467L),
9880 TEST_f_f (j1, 0x1p16383L, -3.8895531955766020648617743624167352352217e-2467L),
d2f9799e 9881#endif
74c57478
JM		 9882 END_DATA (j1)
9883 };
d2f9799e 9884
74c57478
JM		 9885static void
9886j1_test (void)
9887{
9888 FLOAT s, c;
9889 errno = 0;
9890 FUNC (sincos) (0, &s, &c);
9891 if (errno == ENOSYS)
9892 /* Required function not implemented. */
9893 return;
9894 FUNC(j1) (0);
9895 if (errno == ENOSYS)
9896 /* Function not implemented. */
9897 return;
9898
9899 START (j1);
9900 RUN_TEST_LOOP_f_f (j1, j1_test_data, );
8847214f
UD		 9901 END (j1);
9902}
9903
9904static void
9905jn_test (void)
9906{
8a216c1b 9907 FLOAT s, c;
8847214f 9908 errno = 0;
cd53c157
UD		 9909 FUNC (sincos) (0, &s, &c);
9910 if (errno == ENOSYS)
9911 /* Required function not implemented. */
9912 return;
8847214f
UD		 9913 FUNC(jn) (1, 1);
9914 if (errno == ENOSYS)
9915 /* Function not implemented. */
9916 return;
9917
9918 /* jn is the Bessel function of the first kind of order n. */
9919 START (jn);
9920
9921 /* jn (0, x) == j0 (x) */
ae08db3b
JM		 9922 TEST_if_f (jn, 0, qnan_value, qnan_value);
9923 TEST_if_f (jn, 0, plus_infty, 0);
9924 TEST_if_f (jn, 0, -1.0, 0.765197686557966551449717526102663221L);
9925 TEST_if_f (jn, 0, 0.0, 1.0);
9926 TEST_if_f (jn, 0, 0.125L, 0.996097563041985204620768999453174712L);
9927 TEST_if_f (jn, 0, 0.75L, 0.864242275166648623555731103820923211L);
9928 TEST_if_f (jn, 0, 1.0, 0.765197686557966551449717526102663221L);
9929 TEST_if_f (jn, 0, 1.5, 0.511827671735918128749051744283411720L);
9930 TEST_if_f (jn, 0, 2.0, 0.223890779141235668051827454649948626L);
9931 TEST_if_f (jn, 0, 8.0, 0.171650807137553906090869407851972001L);
9932 TEST_if_f (jn, 0, 10.0, -0.245935764451348335197760862485328754L);
9933 TEST_if_f (jn, 0, 4.0, -3.9714980986384737228659076845169804197562E-1L);
9934 TEST_if_f (jn, 0, -4.0, -3.9714980986384737228659076845169804197562E-1L);
8847214f
UD		 9935
9936 /* jn (1, x) == j1 (x) */
ae08db3b
JM		 9937 TEST_if_f (jn, 1, qnan_value, qnan_value);
9938 TEST_if_f (jn, 1, plus_infty, 0);
9939 TEST_if_f (jn, 1, -1.0, -0.440050585744933515959682203718914913L);
9940 TEST_if_f (jn, 1, 0.0, 0.0);
9941 TEST_if_f (jn, 1, 0.125L, 0.0623780091344946810942311355879361177L);
9942 TEST_if_f (jn, 1, 0.75L, 0.349243602174862192523281016426251335L);
9943 TEST_if_f (jn, 1, 1.0, 0.440050585744933515959682203718914913L);
9944 TEST_if_f (jn, 1, 1.5, 0.557936507910099641990121213156089400L);
9945 TEST_if_f (jn, 1, 2.0, 0.576724807756873387202448242269137087L);
9946 TEST_if_f (jn, 1, 8.0, 0.234636346853914624381276651590454612L);
9947 TEST_if_f (jn, 1, 10.0, 0.0434727461688614366697487680258592883L);
8847214f
UD		 9948
9949 /* jn (3, x) */
ae08db3b
JM		 9950 TEST_if_f (jn, 3, qnan_value, qnan_value);
9951 TEST_if_f (jn, 3, plus_infty, 0);
8847214f 9952
ae08db3b
JM		 9953 TEST_if_f (jn, 3, -1.0, -0.0195633539826684059189053216217515083L);
9954 TEST_if_f (jn, 3, 0.0, 0.0);
9955 TEST_if_f (jn, 3, 0.125L, 0.406503832554912875023029337653442868e-4L);
9956 TEST_if_f (jn, 3, 0.75L, 0.848438342327410884392755236884386804e-2L);
9957 TEST_if_f (jn, 3, 1.0, 0.0195633539826684059189053216217515083L);
9958 TEST_if_f (jn, 3, 2.0, 0.128943249474402051098793332969239835L);
9959 TEST_if_f (jn, 3, 10.0, 0.0583793793051868123429354784103409563L);
8847214f
UD		 9960
9961 /* jn (10, x) */
ae08db3b
JM		 9962 TEST_if_f (jn, 10, qnan_value, qnan_value);
9963 TEST_if_f (jn, 10, plus_infty, 0);
8847214f 9964
ae08db3b
JM		 9965 TEST_if_f (jn, 10, -1.0, 0.263061512368745320699785368779050294e-9L);
9966 TEST_if_f (jn, 10, 0.0, 0.0);
9967 TEST_if_f (jn, 10, 0.125L, 0.250543369809369890173993791865771547e-18L);
9968 TEST_if_f (jn, 10, 0.75L, 0.149621713117596814698712483621682835e-10L);
9969 TEST_if_f (jn, 10, 1.0, 0.263061512368745320699785368779050294e-9L);
9970 TEST_if_f (jn, 10, 2.0, 0.251538628271673670963516093751820639e-6L);
9971 TEST_if_f (jn, 10, 10.0, 0.207486106633358857697278723518753428L);
8847214f 9972
1248c1c4 9973 /* BZ #11589 .*/
ae08db3b
JM		 9974 TEST_if_f (jn, 2, 2.4048255576957729L, 0.43175480701968038399746111312430703L);
9975 TEST_if_f (jn, 3, 2.4048255576957729L, 0.19899990535769083404042146764530813L);
9976 TEST_if_f (jn, 4, 2.4048255576957729L, 0.647466661641779720084932282551219891E-1L);
9977 TEST_if_f (jn, 5, 2.4048255576957729L, 0.163892432048058525099230549946147698E-1L);
9978 TEST_if_f (jn, 6, 2.4048255576957729L, 0.34048184720278336646673682895929161E-2L);
9979 TEST_if_f (jn, 7, 2.4048255576957729L, 0.60068836573295394221291569249883076E-3L);
9980 TEST_if_f (jn, 8, 2.4048255576957729L, 0.92165786705344923232879022467054148E-4L);
9981 TEST_if_f (jn, 9, 2.4048255576957729L, 0.12517270977961513005428966643852564E-4L);
c36e1d23 9982
80bad0cc 9983 /* Bug 14155: spurious exception may occur. */
ae08db3b 9984 TEST_if_f (jn, 2, 0x1.ffff62p+99L, -4.43860668048170034334926693188979974489e-16L, UNDERFLOW_EXCEPTION_OK);
1248c1c4 9985
8847214f
UD		 9986 END (jn);
9987}
9988
9989
9990static void
9991ldexp_test (void)
9992{
af00a34d
TS		 9993 START (ldexp);
9994
ae08db3b
JM		 9995 TEST_fi_f (ldexp, 0, 0, 0);
9996 TEST_fi_f (ldexp, minus_zero, 0, minus_zero);
8847214f 9997
ae08db3b
JM		 9998 TEST_fi_f (ldexp, plus_infty, 1, plus_infty);
9999 TEST_fi_f (ldexp, minus_infty, 1, minus_infty);
10000 TEST_fi_f (ldexp, qnan_value, 1, qnan_value);
8847214f 10001
ae08db3b
JM		 10002 TEST_fi_f (ldexp, 0.8L, 4, 12.8L);
10003 TEST_fi_f (ldexp, -0.854375L, 5, -27.34L);
8847214f
UD		 10004
10005 /* ldexp (x, 0) == x. */
ae08db3b 10006 TEST_fi_f (ldexp, 1.0L, 0L, 1.0L);
af00a34d
TS		 10007
10008 END (ldexp);
8847214f
UD		 10009}
10010
2550dfe9 10011
8847214f
UD		 10012static void
10013lgamma_test (void)
10014{
10015 errno = 0;
10016 FUNC(lgamma) (0);
10017 if (errno == ENOSYS)
10018 /* Function not implemented. */
10019 return;
8847214f
UD		 10020
10021 START (lgamma);
10022
c31a5b1e
JM		 10023 TEST_f_f1 (lgamma, plus_infty, plus_infty, 1);
10024 TEST_f_f1 (lgamma, 0, plus_infty, 1, DIVIDE_BY_ZERO_EXCEPTION);
10025 TEST_f_f1 (lgamma, minus_zero, plus_infty, -1, DIVIDE_BY_ZERO_EXCEPTION);
10026 TEST_f_f1 (lgamma, qnan_value, qnan_value, IGNORE);
8847214f
UD		 10027
10028 /* lgamma (x) == +inf plus divide by zero exception for integer x <= 0. */
c31a5b1e
JM		 10029 TEST_f_f1 (lgamma, -3, plus_infty, IGNORE, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE);
10030 TEST_f_f1 (lgamma, minus_infty, plus_infty, IGNORE);
10031 TEST_f_f1 (lgamma, -max_value, plus_infty, IGNORE, DIVIDE_BY_ZERO_EXCEPTION);
10032 TEST_f_f1 (lgamma, max_value, plus_infty, 1, OVERFLOW_EXCEPTION);
8847214f
UD		 10033
10034 TEST_f_f1 (lgamma, 1, 0, 1);
10035
10036 TEST_f_f1 (lgamma, 3, M_LN2l, 1);
10037
10038 TEST_f_f1 (lgamma, 0.5, M_LOG_SQRT_PIl, 1);
10039 TEST_f_f1 (lgamma, -0.5, M_LOG_2_SQRT_PIl, -1);
79df8ce5
AJ		 10040 TEST_f_f1 (lgamma, 0.7L, 0.260867246531666514385732417016759578L, 1);
10041 TEST_f_f1 (lgamma, 1.2L, -0.853740900033158497197028392998854470e-1L, 1);
8847214f
UD		 10042
10043 END (lgamma);
10044}
10045
2550dfe9 10046
8847214f
UD		 10047static void
10048lrint_test (void)
10049{
10050 /* XXX this test is incomplete. We need to have a way to specifiy
10051 the rounding method and test the critical cases. So far, only
10052 unproblematic numbers are tested. */
64d063b8 10053 /* TODO: missing +/-Inf as well as qNaN tests. */
8847214f
UD		 10054
10055 START (lrint);
10056
10057 TEST_f_l (lrint, 0.0, 0);
10058 TEST_f_l (lrint, minus_zero, 0);
3c6cad26
UD		 10059 TEST_f_l (lrint, 0.2L, 0);
10060 TEST_f_l (lrint, -0.2L, 0);
8847214f 10061
3c6cad26
UD		 10062 TEST_f_l (lrint, 1.4L, 1);
10063 TEST_f_l (lrint, -1.4L, -1);
8847214f 10064
3c6cad26
UD		 10065 TEST_f_l (lrint, 8388600.3L, 8388600);
10066 TEST_f_l (lrint, -8388600.3L, -8388600);
8847214f 10067
3eb61415
UD		 10068 TEST_f_l (lrint, 1071930.0008, 1071930);
10069#ifndef TEST_FLOAT
10070 TEST_f_l (lrint, 1073741824.01, 1073741824);
39007ae3
UD		 10071# if LONG_MAX > 281474976710656
10072 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10073# endif
3eb61415
UD		 10074#endif
10075
8847214f
UD		 10076 END (lrint);
10077}
10078
2550dfe9 10079
6624dbc0
UD		 10080static void
10081lrint_test_tonearest (void)
10082{
10083 int save_round_mode;
10084 START (lrint_tonearest);
10085
10086 save_round_mode = fegetround ();
10087
10088 if (!fesetround (FE_TONEAREST))
10089 {
10090 TEST_f_l (lrint, 0.0, 0);
10091 TEST_f_l (lrint, minus_zero, 0);
10092 TEST_f_l (lrint, 0.2L, 0);
10093 TEST_f_l (lrint, -0.2L, 0);
10094 TEST_f_l (lrint, 0.5L, 0);
10095 TEST_f_l (lrint, -0.5L, 0);
10096 TEST_f_l (lrint, 0.8L, 1);
10097 TEST_f_l (lrint, -0.8L, -1);
10098
10099 TEST_f_l (lrint, 1.4L, 1);
10100 TEST_f_l (lrint, -1.4L, -1);
10101
10102 TEST_f_l (lrint, 8388600.3L, 8388600);
10103 TEST_f_l (lrint, -8388600.3L, -8388600);
10104
10105 TEST_f_l (lrint, 1071930.0008, 1071930);
10106#ifndef TEST_FLOAT
10107 TEST_f_l (lrint, 1073741824.01, 1073741824);
10108# if LONG_MAX > 281474976710656
10109 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10110# endif
10111#endif
10112 }
10113
10114 fesetround (save_round_mode);
10115
10116 END (lrint_tonearest);
10117}
10118
10119
10120static void
10121lrint_test_towardzero (void)
10122{
10123 int save_round_mode;
10124 START (lrint_towardzero);
10125
10126 save_round_mode = fegetround ();
10127
10128 if (!fesetround (FE_TOWARDZERO))
10129 {
10130 TEST_f_l (lrint, 0.0, 0);
10131 TEST_f_l (lrint, minus_zero, 0);
10132 TEST_f_l (lrint, 0.2L, 0);
10133 TEST_f_l (lrint, -0.2L, 0);
10134 TEST_f_l (lrint, 0.5L, 0);
10135 TEST_f_l (lrint, -0.5L, 0);
10136 TEST_f_l (lrint, 0.8L, 0);
10137 TEST_f_l (lrint, -0.8L, 0);
10138
10139 TEST_f_l (lrint, 1.4L, 1);
10140 TEST_f_l (lrint, -1.4L, -1);
10141
10142 TEST_f_l (lrint, 8388600.3L, 8388600);
10143 TEST_f_l (lrint, -8388600.3L, -8388600);
10144
10145 TEST_f_l (lrint, 1071930.0008, 1071930);
10146#ifndef TEST_FLOAT
10147 TEST_f_l (lrint, 1073741824.01, 1073741824);
10148# if LONG_MAX > 281474976710656
10149 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10150# endif
10151#endif
10152 }
10153
10154 fesetround (save_round_mode);
10155
10156 END (lrint_towardzero);
10157}
10158
10159
10160static void
10161lrint_test_downward (void)
10162{
10163 int save_round_mode;
10164 START (lrint_downward);
10165
10166 save_round_mode = fegetround ();
10167
10168 if (!fesetround (FE_DOWNWARD))
10169 {
10170 TEST_f_l (lrint, 0.0, 0);
10171 TEST_f_l (lrint, minus_zero, 0);
10172 TEST_f_l (lrint, 0.2L, 0);
10173 TEST_f_l (lrint, -0.2L, -1);
10174 TEST_f_l (lrint, 0.5L, 0);
10175 TEST_f_l (lrint, -0.5L, -1);
10176 TEST_f_l (lrint, 0.8L, 0);
10177 TEST_f_l (lrint, -0.8L, -1);
10178
10179 TEST_f_l (lrint, 1.4L, 1);
10180 TEST_f_l (lrint, -1.4L, -2);
10181
10182 TEST_f_l (lrint, 8388600.3L, 8388600);
10183 TEST_f_l (lrint, -8388600.3L, -8388601);
10184
10185 TEST_f_l (lrint, 1071930.0008, 1071930);
10186#ifndef TEST_FLOAT
10187 TEST_f_l (lrint, 1073741824.01, 1073741824);
10188# if LONG_MAX > 281474976710656
10189 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10190# endif
10191#endif
10192 }
10193
10194 fesetround (save_round_mode);
10195
10196 END (lrint_downward);
10197}
10198
10199
10200static void
10201lrint_test_upward (void)
10202{
10203 int save_round_mode;
10204 START (lrint_upward);
10205
10206 save_round_mode = fegetround ();
10207
10208 if (!fesetround (FE_UPWARD))
10209 {
10210 TEST_f_l (lrint, 0.0, 0);
10211 TEST_f_l (lrint, minus_zero, 0);
10212 TEST_f_l (lrint, 0.2L, 1);
10213 TEST_f_l (lrint, -0.2L, 0);
10214 TEST_f_l (lrint, 0.5L, 1);
10215 TEST_f_l (lrint, -0.5L, 0);
10216 TEST_f_l (lrint, 0.8L, 1);
10217 TEST_f_l (lrint, -0.8L, 0);
10218
10219 TEST_f_l (lrint, 1.4L, 2);
10220 TEST_f_l (lrint, -1.4L, -1);
10221
10222 TEST_f_l (lrint, 8388600.3L, 8388601);
10223 TEST_f_l (lrint, -8388600.3L, -8388600);
10224
10225#ifndef TEST_FLOAT
10226 TEST_f_l (lrint, 1071930.0008, 1071931);
10227 TEST_f_l (lrint, 1073741824.01, 1073741825);
10228# if LONG_MAX > 281474976710656 && defined (TEST_LDOUBLE)
89210b4c 10229 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
6624dbc0
UD		 10230# endif
10231#endif
10232 }
10233
10234 fesetround (save_round_mode);
10235
10236 END (lrint_upward);
10237}
10238
10239
8847214f
UD		 10240static void
10241llrint_test (void)
10242{
10243 /* XXX this test is incomplete. We need to have a way to specifiy
10244 the rounding method and test the critical cases. So far, only
10245 unproblematic numbers are tested. */
64d063b8 10246 /* TODO: missing +/-Inf as well as qNaN tests. */
8847214f
UD		 10247
10248 START (llrint);
10249
10250 TEST_f_L (llrint, 0.0, 0);
10251 TEST_f_L (llrint, minus_zero, 0);
3c6cad26
UD		 10252 TEST_f_L (llrint, 0.2L, 0);
10253 TEST_f_L (llrint, -0.2L, 0);
8847214f 10254
3c6cad26
UD		 10255 TEST_f_L (llrint, 1.4L, 1);
10256 TEST_f_L (llrint, -1.4L, -1);
8847214f 10257
3c6cad26
UD		 10258 TEST_f_L (llrint, 8388600.3L, 8388600);
10259 TEST_f_L (llrint, -8388600.3L, -8388600);
8847214f 10260
3eb61415
UD		 10261 TEST_f_l (llrint, 1071930.0008, 1071930);
10262
8847214f
UD		 10263 /* Test boundary conditions. */
10264 /* 0x1FFFFF */
10265 TEST_f_L (llrint, 2097151.0,2097151LL);
10266 /* 0x800000 */
10267 TEST_f_L (llrint, 8388608.0, 8388608LL);
10268 /* 0x1000000 */
10269 TEST_f_L (llrint, 16777216.0, 16777216LL);
10270 /* 0x20000000000 */
10271 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10272 /* 0x40000000000 */
10273 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
39007ae3
UD		 10274 /* 0x1000000000000 */
10275 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
8847214f
UD		 10276 /* 0x10000000000000 */
10277 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10278 /* 0x10000080000000 */
10279 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10280 /* 0x20000000000000 */
10281 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10282 /* 0x80000000000000 */
10283 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10284 /* 0x100000000000000 */
10285 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
f964490f
RM		 10286#ifdef TEST_LDOUBLE
10287 /* The input can only be represented in long double. */
10288 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370496LL);
10289 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10290 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10291 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370497LL);
10292 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370498LL);
10293
10294 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370496LL);
10295 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10296 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10297 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370497LL);
10298 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370498LL);
10299
830fce04
RM		 10300# if LDBL_MANT_DIG > 100
10301 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10302 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10303 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10304 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370495LL);
10305 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370496LL);
10306 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370497LL);
10307
10308 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10309 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10310 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10311 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370495LL);
10312 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370496LL);
10313 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370497LL);
10314#endif
10315
f964490f
RM		 10316 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740992LL);
10317 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10318 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10319 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740993LL);
10320 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740994LL);
10321
10322 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740992LL);
10323 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10324 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10325 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740993LL);
10326 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740994LL);
10327
830fce04
RM		 10328# if LDBL_MANT_DIG > 100
10329 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10330 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10331 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10332 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740992LL);
10333 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740993LL);
10334 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740994LL);
10335
10336 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10337 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10338 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10339 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740992LL);
10340 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740993LL);
10341 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740994LL);
10342#endif
10343
f964490f
RM		 10344 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927936LL);
10345 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10346 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10347 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927937LL);
10348 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927938LL);
10349
10350 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927936LL);
10351 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10352 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10353 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927937LL);
10354 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927938LL);
830fce04
RM		 10355
10356# if LDBL_MANT_DIG > 100
10357 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775806LL);
10358 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775806LL);
10359 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10360 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10361 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10362 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10363 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10364 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10365 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775807LL);
10366 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775807LL);
10367 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10368 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10369# endif
f964490f 10370#endif
8847214f
UD		 10371
10372 END (llrint);
10373}
10374
830fce04
RM		 10375static void
10376llrint_test_tonearest (void)
10377{
10378 int save_round_mode;
10379 START (llrint_tonearest);
10380
10381 save_round_mode = fegetround ();
10382
10383 if (!fesetround (FE_TONEAREST))
10384 {
10385 TEST_f_L (llrint, 0.0, 0);
10386 TEST_f_L (llrint, minus_zero, 0);
10387 TEST_f_L (llrint, 0.2L, 0);
10388 TEST_f_L (llrint, -0.2L, 0);
10389
10390 TEST_f_L (llrint, 1.4L, 1);
10391 TEST_f_L (llrint, -1.4L, -1);
10392
10393 TEST_f_L (llrint, 8388600.3L, 8388600);
10394 TEST_f_L (llrint, -8388600.3L, -8388600);
10395
10396 TEST_f_l (llrint, 1071930.0008, 1071930);
10397
10398 /* Test boundary conditions. */
10399 /* 0x1FFFFF */
10400 TEST_f_L (llrint, 2097151.0,2097151LL);
10401 /* 0x800000 */
10402 TEST_f_L (llrint, 8388608.0, 8388608LL);
10403 /* 0x1000000 */
10404 TEST_f_L (llrint, 16777216.0, 16777216LL);
10405 /* 0x20000000000 */
10406 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10407 /* 0x40000000000 */
10408 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10409 /* 0x1000000000000 */
10410 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10411 /* 0x10000000000000 */
10412 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10413 /* 0x10000080000000 */
10414 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10415 /* 0x20000000000000 */
10416 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10417 /* 0x80000000000000 */
10418 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10419 /* 0x100000000000000 */
10420 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10421#ifdef TEST_LDOUBLE
10422 /* The input can only be represented in long double. */
10423 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370496LL);
10424 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10425 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10426 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370497LL);
10427 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370498LL);
10428
10429 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370496LL);
10430 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10431 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10432 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370497LL);
10433 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370498LL);
10434
10435# if LDBL_MANT_DIG > 100
10436 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10437 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10438 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10439 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370495LL);
10440 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370496LL);
10441 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370497LL);
10442
10443 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10444 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10445 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10446 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370495LL);
10447 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370496LL);
10448 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370497LL);
10449#endif
10450
10451 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740992LL);
10452 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10453 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10454 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740993LL);
10455 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740994LL);
10456
10457 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740992LL);
10458 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10459 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10460 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740993LL);
10461 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740994LL);
10462
10463# if LDBL_MANT_DIG > 100
10464 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10465 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10466 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10467 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740992LL);
10468 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740993LL);
10469 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740994LL);
10470
10471 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10472 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10473 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10474 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740992LL);
10475 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740993LL);
10476 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740994LL);
10477#endif
10478
10479 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927936LL);
10480 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10481 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10482 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927937LL);
10483 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927938LL);
10484
10485 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927936LL);
10486 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10487 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10488 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927937LL);
10489 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927938LL);
10490
10491# if LDBL_MANT_DIG > 100
10492 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775806LL);
10493 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775806LL);
10494 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10495 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10496 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10497 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10498 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10499 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10500 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775807LL);
10501 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775807LL);
10502 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10503 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10504# endif
10505#endif
10506 }
10507
10508 fesetround (save_round_mode);
10509
10510 END (llrint_tonearest);
10511}
10512
10513static void
10514llrint_test_towardzero (void)
10515{
10516 int save_round_mode;
10517 START (llrint_towardzero);
10518
10519 save_round_mode = fegetround ();
10520
10521 if (!fesetround (FE_TOWARDZERO))
10522 {
10523 TEST_f_L (llrint, 0.0, 0);
10524 TEST_f_L (llrint, minus_zero, 0);
10525 TEST_f_L (llrint, 0.2L, 0);
10526 TEST_f_L (llrint, -0.2L, 0);
10527
10528 TEST_f_L (llrint, 1.4L, 1);
10529 TEST_f_L (llrint, -1.4L, -1);
10530
10531 TEST_f_L (llrint, 8388600.3L, 8388600);
10532 TEST_f_L (llrint, -8388600.3L, -8388600);
10533
10534 TEST_f_l (llrint, 1071930.0008, 1071930);
10535
10536 /* Test boundary conditions. */
10537 /* 0x1FFFFF */
10538 TEST_f_L (llrint, 2097151.0,2097151LL);
10539 /* 0x800000 */
10540 TEST_f_L (llrint, 8388608.0, 8388608LL);
10541 /* 0x1000000 */
10542 TEST_f_L (llrint, 16777216.0, 16777216LL);
10543 /* 0x20000000000 */
10544 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10545 /* 0x40000000000 */
10546 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10547 /* 0x1000000000000 */
10548 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10549 /* 0x10000000000000 */
10550 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10551 /* 0x10000080000000 */
10552 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10553 /* 0x20000000000000 */
10554 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10555 /* 0x80000000000000 */
10556 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10557 /* 0x100000000000000 */
10558 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10559#ifdef TEST_LDOUBLE
10560 /* The input can only be represented in long double. */
10561 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370495LL);
10562 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10563 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10564 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370496LL);
10565 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370497LL);
10566
10567 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370495LL);
10568 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10569 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10570 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370496LL);
10571 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370497LL);
10572
10573# if LDBL_MANT_DIG > 100
10574 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10575 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10576 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10577 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370494LL);
10578 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370495LL);
10579 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370496LL);
10580
10581 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10582 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10583 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10584 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370494LL);
10585 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370495LL);
10586 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370496LL);
10587#endif
10588
10589 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740991LL);
10590 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10591 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10592 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740992LL);
10593 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740993LL);
10594
10595 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740991LL);
10596 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10597 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10598 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740992LL);
10599 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740993LL);
10600
10601# if LDBL_MANT_DIG > 100
10602 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10603 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10604 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10605 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740991LL);
10606 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740992LL);
10607 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740993LL);
10608
10609 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10610 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10611 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10612 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740991LL);
10613 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740992LL);
10614 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740993LL);
10615#endif
10616
10617 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927935LL);
10618 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10619 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10620 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927936LL);
10621 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927937LL);
10622
10623 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927935LL);
10624 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10625 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10626 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927936LL);
10627 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927937LL);
10628
10629# if LDBL_MANT_DIG > 100
10630 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775805LL);
10631 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775805LL);
10632 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10633 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10634 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10635 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10636 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10637 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10638 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775806LL);
10639 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775806LL);
10640 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10641 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10642# endif
10643#endif
10644 }
10645
10646 fesetround (save_round_mode);
10647
10648 END (llrint_towardzero);
10649}
10650
10651static void
10652llrint_test_downward (void)
10653{
10654 int save_round_mode;
10655 START (llrint_downward);
10656
10657 save_round_mode = fegetround ();
10658
10659 if (!fesetround (FE_DOWNWARD))
10660 {
10661 TEST_f_L (llrint, 0.0, 0);
10662 TEST_f_L (llrint, minus_zero, 0);
10663 TEST_f_L (llrint, 0.2L, 0);
10664 TEST_f_L (llrint, -0.2L, -1);
10665
10666 TEST_f_L (llrint, 1.4L, 1);
10667 TEST_f_L (llrint, -1.4L, -2);
10668
10669 TEST_f_L (llrint, 8388600.3L, 8388600);
10670 TEST_f_L (llrint, -8388600.3L, -8388601);
10671
10672 TEST_f_l (llrint, 1071930.0008, 1071930);
10673
10674 /* Test boundary conditions. */
10675 /* 0x1FFFFF */
10676 TEST_f_L (llrint, 2097151.0,2097151LL);
10677 /* 0x800000 */
10678 TEST_f_L (llrint, 8388608.0, 8388608LL);
10679 /* 0x1000000 */
10680 TEST_f_L (llrint, 16777216.0, 16777216LL);
10681 /* 0x20000000000 */
10682 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10683 /* 0x40000000000 */
10684 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10685 /* 0x1000000000000 */
10686 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10687 /* 0x10000000000000 */
10688 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10689 /* 0x10000080000000 */
10690 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10691 /* 0x20000000000000 */
10692 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10693 /* 0x80000000000000 */
10694 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10695 /* 0x100000000000000 */
10696 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10697#ifdef TEST_LDOUBLE
10698 /* The input can only be represented in long double. */
10699 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370495LL);
10700 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10701 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10702 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370496LL);
10703 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370497LL);
10704
10705 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10706 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10707 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10708 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370494LL);
10709 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370495LL);
10710 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370496LL);
10711
10712 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370496LL);
10713 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370497LL);
10714 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370497LL);
10715 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370497LL);
10716 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370498LL);
10717
10718 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370496LL);
10719 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370497LL);
10720 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370498LL);
10721 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370495LL);
10722 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370496LL);
10723 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370497LL);
10724
10725 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740991LL);
10726 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10727 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10728 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740992LL);
10729 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740993LL);
10730
10731 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10732 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10733 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10734 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740991LL);
10735 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740992LL);
10736 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740993LL);
10737
10738 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740992LL);
10739 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740993LL);
10740 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740993LL);
10741 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740993LL);
10742 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740994LL);
10743
10744 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740992LL);
10745 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740993LL);
10746 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740994LL);
10747 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740992LL);
10748 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740993LL);
10749 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740994LL);
10750
10751 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927935LL);
10752 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10753 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10754 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927936LL);
10755 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927937LL);
10756
10757 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927936LL);
10758 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927937LL);
10759 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927937LL);
10760 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927937LL);
10761 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927938LL);
10762
10763# if LDBL_MANT_DIG > 100
10764 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775805LL);
10765 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775806LL);
10766 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10767 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10768 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10769 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775807LL);
10770 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10771 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775807LL);
10772 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775806LL);
10773 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775807LL);
10774 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10775 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10776# endif
10777#endif
10778 }
10779
10780 fesetround (save_round_mode);
10781
10782 END (llrint_downward);
10783}
10784
10785static void
10786llrint_test_upward (void)
10787{
10788 int save_round_mode;
10789 START (llrint_upward);
10790
10791 save_round_mode = fegetround ();
10792
10793 if (!fesetround (FE_UPWARD))
10794 {
10795 TEST_f_L (llrint, 0.0, 0);
10796 TEST_f_L (llrint, minus_zero, 0);
10797 TEST_f_L (llrint, 0.2L, 1);
10798 TEST_f_L (llrint, -0.2L, 0);
10799
10800 TEST_f_L (llrint, 1.4L, 2);
10801 TEST_f_L (llrint, -1.4L, -1);
10802
10803 TEST_f_L (llrint, 8388600.3L, 8388601);
10804 TEST_f_L (llrint, -8388600.3L, -8388600);
10805#ifndef TEST_FLOAT
10806 TEST_f_l (llrint, 1071930.0008, 1071931);
10807#endif
10808 /* Test boundary conditions. */
10809 /* 0x1FFFFF */
10810 TEST_f_L (llrint, 2097151.0,2097151LL);
10811 /* 0x800000 */
10812 TEST_f_L (llrint, 8388608.0, 8388608LL);
10813 /* 0x1000000 */
10814 TEST_f_L (llrint, 16777216.0, 16777216LL);
10815 /* 0x20000000000 */
10816 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10817 /* 0x40000000000 */
10818 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10819 /* 0x1000000000000 */
10820 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10821 /* 0x10000000000000 */
10822 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10823 /* 0x10000080000000 */
10824 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10825 /* 0x20000000000000 */
10826 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10827 /* 0x80000000000000 */
10828 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10829 /* 0x100000000000000 */
10830 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10831#ifdef TEST_LDOUBLE
10832 /* The input can only be represented in long double. */
10833 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370496LL);
10834 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370497LL);
10835 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370497LL);
10836 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370497LL);
10837 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370498LL);
10838
10839 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370496LL);
10840 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370497LL);
10841 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370498LL);
10842 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370495LL);
10843 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370496LL);
10844 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370497LL);
10845
10846 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370495LL);
10847 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10848 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10849 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370496LL);
10850 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370497LL);
10851
10852 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10853 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10854 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10855 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370494LL);
10856 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370495LL);
10857 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370496LL);
10858
10859 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740992LL);
10860 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740993LL);
10861 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740993LL);
10862 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740993LL);
10863 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740994LL);
10864
10865 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740992LL);
10866 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740993LL);
10867 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740994LL);
10868 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740992LL);
10869 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740993LL);
10870 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740994LL);
10871
10872 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740991LL);
10873 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10874 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10875 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740992LL);
10876 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740993LL);
10877
10878 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10879 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10880 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10881 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740991LL);
10882 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740992LL);
10883 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740993LL);
10884
10885 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927936LL);
10886 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927937LL);
10887 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927937LL);
10888 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927937LL);
10889 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927938LL);
10890
10891 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927935LL);
10892 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10893 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10894 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927936LL);
10895 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927937LL);
10896
10897# if LDBL_MANT_DIG > 100
10898 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775806LL);
10899 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775805LL);
10900 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10901 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10902 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775807LL);
10903 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10904 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775807L);
10905 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10906 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775807LL);
10907 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775806LL);
10908 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10909 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10910# endif
10911#endif
10912 }
10913
10914 fesetround (save_round_mode);
10915
10916 END (llrint_upward);
10917}
10918
2550dfe9 10919
74c57478
JM		 10920static const struct test_f_f_data log_test_data[] =
10921 {
10922 START_DATA (log),
10923 TEST_f_f (log, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
10924 TEST_f_f (log, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
10925
10926 TEST_f_f (log, 1, 0),
10927
10928 TEST_f_f (log, -1, qnan_value, INVALID_EXCEPTION),
10929 TEST_f_f (log, -max_value, qnan_value, INVALID_EXCEPTION),
10930 TEST_f_f (log, minus_infty, qnan_value, INVALID_EXCEPTION),
10931 TEST_f_f (log, plus_infty, plus_infty),
10932 TEST_f_f (log, qnan_value, qnan_value),
10933
10934 TEST_f_f (log, M_El, 1),
10935 TEST_f_f (log, 1.0 / M_El, -1),
10936 TEST_f_f (log, 2, M_LN2l),
10937 TEST_f_f (log, 10, M_LN10l),
10938 TEST_f_f (log, 0.75L, -0.287682072451780927439219005993827432L),
10939 END_DATA (log)
10940 };
10941
8847214f
UD		 10942static void
10943log_test (void)
10944{
e6d3c4a7
AJ		 10945 errno = 0;
10946 FUNC(log) (1);
10947 if (errno == ENOSYS)
10948 /* Function not implemented. */
10949 return;
8847214f 10950 START (log);
74c57478 10951 RUN_TEST_LOOP_f_f (log, log_test_data, );
8847214f
UD		 10952 END (log);
10953}
10954
10955
74c57478
JM		 10956static const struct test_f_f_data log10_test_data[] =
10957 {
10958 START_DATA (log10),
10959 TEST_f_f (log10, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
10960 TEST_f_f (log10, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
10961
10962 TEST_f_f (log10, 1, 0),
10963
10964 /* log10 (x) == qNaN plus invalid exception if x < 0. */
10965 TEST_f_f (log10, -1, qnan_value, INVALID_EXCEPTION),
10966 TEST_f_f (log10, -max_value, qnan_value, INVALID_EXCEPTION),
10967 TEST_f_f (log10, minus_infty, qnan_value, INVALID_EXCEPTION),
10968
10969 TEST_f_f (log10, plus_infty, plus_infty),
10970 TEST_f_f (log10, qnan_value, qnan_value),
10971
10972 TEST_f_f (log10, 0.1L, -1),
10973 TEST_f_f (log10, 10.0, 1),
10974 TEST_f_f (log10, 100.0, 2),
10975 TEST_f_f (log10, 10000.0, 4),
10976 TEST_f_f (log10, M_El, M_LOG10El),
10977 TEST_f_f (log10, 0.75L, -0.124938736608299953132449886193870744L),
10978 END_DATA (log10)
10979 };
10980
8847214f
UD		 10981static void
10982log10_test (void)
10983{
e6d3c4a7
AJ		 10984 errno = 0;
10985 FUNC(log10) (1);
10986 if (errno == ENOSYS)
10987 /* Function not implemented. */
10988 return;
10989
8847214f 10990 START (log10);
74c57478
JM		 10991 RUN_TEST_LOOP_f_f (log10, log10_test_data, );
10992 END (log10);
10993}
8847214f 10994
8847214f 10995
74c57478
JM		 10996static const struct test_f_f_data log1p_test_data[] =
10997 {
10998 START_DATA (log1p),
10999 TEST_f_f (log1p, 0, 0),
11000 TEST_f_f (log1p, minus_zero, minus_zero),
8847214f 11001
74c57478
JM		 11002 TEST_f_f (log1p, -1, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11003 TEST_f_f (log1p, -2, qnan_value, INVALID_EXCEPTION),
11004 TEST_f_f (log1p, -max_value, qnan_value, INVALID_EXCEPTION),
11005 TEST_f_f (log1p, minus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 11006
74c57478
JM		 11007 TEST_f_f (log1p, plus_infty, plus_infty),
11008 TEST_f_f (log1p, qnan_value, qnan_value),
8847214f 11009
74c57478 11010 TEST_f_f (log1p, M_El - 1.0, 1),
8847214f 11011
74c57478
JM		 11012 TEST_f_f (log1p, -0.25L, -0.287682072451780927439219005993827432L),
11013 TEST_f_f (log1p, -0.875, -2.07944154167983592825169636437452970L),
11014 END_DATA (log1p)
11015 };
8847214f
UD		 11016
11017static void
11018log1p_test (void)
11019{
e6d3c4a7
AJ		 11020 errno = 0;
11021 FUNC(log1p) (0);
11022 if (errno == ENOSYS)
11023 /* Function not implemented. */
11024 return;
11025
8847214f 11026 START (log1p);
74c57478
JM		 11027 RUN_TEST_LOOP_f_f (log1p, log1p_test_data, );
11028 END (log1p);
11029}
8847214f 11030
8847214f 11031
74c57478
JM		 11032static const struct test_f_f_data log2_test_data[] =
11033 {
11034 START_DATA (log2),
11035 TEST_f_f (log2, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11036 TEST_f_f (log2, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 11037
74c57478 11038 TEST_f_f (log2, 1, 0),
8847214f 11039
74c57478
JM		 11040 TEST_f_f (log2, -1, qnan_value, INVALID_EXCEPTION),
11041 TEST_f_f (log2, -max_value, qnan_value, INVALID_EXCEPTION),
11042 TEST_f_f (log2, minus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 11043
74c57478
JM		 11044 TEST_f_f (log2, plus_infty, plus_infty),
11045 TEST_f_f (log2, qnan_value, qnan_value),
8847214f 11046
74c57478
JM		 11047 TEST_f_f (log2, M_El, M_LOG2El),
11048 TEST_f_f (log2, 2.0, 1),
11049 TEST_f_f (log2, 16.0, 4),
11050 TEST_f_f (log2, 256.0, 8),
11051 TEST_f_f (log2, 0.75L, -.415037499278843818546261056052183492L),
11052 END_DATA (log2)
11053 };
8847214f
UD		 11054
11055static void
11056log2_test (void)
11057{
e6d3c4a7
AJ		 11058 errno = 0;
11059 FUNC(log2) (1);
11060 if (errno == ENOSYS)
11061 /* Function not implemented. */
11062 return;
11063
8847214f 11064 START (log2);
74c57478 11065 RUN_TEST_LOOP_f_f (log2, log2_test_data, );
8847214f
UD		 11066 END (log2);
11067}
11068
11069
74c57478
JM		 11070static const struct test_f_f_data logb_test_data[] =
11071 {
11072 START_DATA (logb),
11073 TEST_f_f (logb, plus_infty, plus_infty),
11074 TEST_f_f (logb, minus_infty, plus_infty),
8847214f 11075
74c57478 11076 TEST_f_f (logb, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 11077
74c57478
JM		 11078 TEST_f_f (logb, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11079 TEST_f_f (logb, qnan_value, qnan_value),
8847214f 11080
74c57478
JM		 11081 TEST_f_f (logb, 1, 0),
11082 TEST_f_f (logb, M_El, 1),
11083 TEST_f_f (logb, 1024, 10),
11084 TEST_f_f (logb, -2000, 10),
8847214f 11085
74c57478
JM		 11086 TEST_f_f (logb, 0x0.1p-127, -131),
11087 TEST_f_f (logb, 0x0.01p-127, -135),
11088 TEST_f_f (logb, 0x0.011p-127, -135),
89c9aa49 11089#ifndef TEST_FLOAT
74c57478
JM		 11090 TEST_f_f (logb, 0x0.8p-1022, -1023),
11091 TEST_f_f (logb, 0x0.1p-1022, -1026),
11092 TEST_f_f (logb, 0x0.00111p-1022, -1034),
11093 TEST_f_f (logb, 0x0.00001p-1022, -1042),
11094 TEST_f_f (logb, 0x0.000011p-1022, -1042),
11095 TEST_f_f (logb, 0x0.0000000000001p-1022, -1074),
89c9aa49
AZ		 11096#endif
11097#if defined TEST_LDOUBLE && LDBL_MIN_EXP - LDBL_MANT_DIG <= -16400
74c57478
JM		 11098 TEST_f_f (logb, 0x1p-16400L, -16400),
11099 TEST_f_f (logb, 0x.00000000001p-16382L, -16426),
89c9aa49 11100#endif
74c57478
JM		 11101 END_DATA (logb)
11102 };
89c9aa49 11103
74c57478
JM		 11104static void
11105logb_test (void)
11106{
11107 START (logb);
11108 RUN_TEST_LOOP_f_f (logb, logb_test_data, );
8847214f
UD		 11109 END (logb);
11110}
11111
74c57478
JM		 11112static const struct test_f_f_data logb_downward_test_data[] =
11113 {
11114 START_DATA (logb_downward),
11115 /* IEEE 754-2008 says (section 5.3.3) that "logB(1) is +0.". Libm
11116 should not return -0 from logb in any rounding mode. PowerPC32 has
11117 failed with this test for power4 logb (and logbl on all PowerPC
11118 platforms) in the past due to instruction selection. GCC PR 52775
11119 provides the availability of the fcfid insn in 32-bit mode which
11120 eliminates the use of fsub in this instance and prevents the negative
11121 signed 0.0. */
11122
11123 /* BZ #887 */
11124 TEST_f_f (logb, 1.000e+0, plus_zero),
11125 END_DATA (logb_downward)
11126 };
11127
a462cb63
RA		 11128static void
11129logb_test_downward (void)
11130{
a462cb63
RA		 11131 errno = 0;
11132
11133 FUNC(logb) (0);
11134 if (errno == ENOSYS)
11135 /* Function not implemented. */
11136 return;
11137
11138 START (logb_downward);
74c57478 11139 RUN_TEST_LOOP_f_f (logb, logb_downward_test_data, FE_DOWNWARD);
a462cb63
RA		 11140 END (logb_downward);
11141}
2550dfe9 11142
8847214f
UD		 11143static void
11144lround_test (void)
11145{
64d063b8
TS		 11146 /* TODO: missing +/-Inf as well as qNaN tests. */
11147
8847214f
UD		 11148 START (lround);
11149
11150 TEST_f_l (lround, 0, 0);
11151 TEST_f_l (lround, minus_zero, 0);
3c6cad26
UD		 11152 TEST_f_l (lround, 0.2L, 0.0);
11153 TEST_f_l (lround, -0.2L, 0);
8847214f
UD		 11154 TEST_f_l (lround, 0.5, 1);
11155 TEST_f_l (lround, -0.5, -1);
3c6cad26
UD		 11156 TEST_f_l (lround, 0.8L, 1);
11157 TEST_f_l (lround, -0.8L, -1);
8847214f
UD		 11158 TEST_f_l (lround, 1.5, 2);
11159 TEST_f_l (lround, -1.5, -2);
11160 TEST_f_l (lround, 22514.5, 22515);
11161 TEST_f_l (lround, -22514.5, -22515);
3eb61415 11162 TEST_f_l (lround, 1071930.0008, 1071930);
8847214f 11163#ifndef TEST_FLOAT
3eb61415 11164 TEST_f_l (lround, 1073741824.01, 1073741824);
39007ae3
UD		 11165# if LONG_MAX > 281474976710656
11166 TEST_f_l (lround, 281474976710656.025, 281474976710656);
169d7f11 11167 TEST_f_l (lround, 18014398509481974, 18014398509481974);
39007ae3 11168# endif
8847214f
UD		 11169 TEST_f_l (lround, 2097152.5, 2097153);
11170 TEST_f_l (lround, -2097152.5, -2097153);
c1e6b459
UD		 11171 /* nextafter(0.5,-1) */
11172 TEST_f_l (lround, 0x1.fffffffffffffp-2, 0);
11173 /* nextafter(-0.5,1) */
11174 TEST_f_l (lround, -0x1.fffffffffffffp-2, 0);
11175#else
11176 /* nextafter(0.5,-1) */
11177 TEST_f_l (lround, 0x1.fffffp-2, 0);
11178 /* nextafter(-0.5,1) */
11179 TEST_f_l (lround, -0x1.fffffp-2, 0);
11180 TEST_f_l (lround, 0x1.fffffep+23, 16777215);
11181 TEST_f_l (lround, -0x1.fffffep+23, -16777215);
8847214f
UD		 11182#endif
11183 END (lround);
11184}
11185
11186
11187static void
11188llround_test (void)
11189{
64d063b8
TS		 11190 /* TODO: missing +/-Inf as well as qNaN tests. */
11191
8847214f
UD		 11192 START (llround);
11193
11194 TEST_f_L (llround, 0, 0);
11195 TEST_f_L (llround, minus_zero, 0);
3c6cad26
UD		 11196 TEST_f_L (llround, 0.2L, 0.0);
11197 TEST_f_L (llround, -0.2L, 0);
8847214f
UD		 11198 TEST_f_L (llround, 0.5, 1);
11199 TEST_f_L (llround, -0.5, -1);
3c6cad26
UD		 11200 TEST_f_L (llround, 0.8L, 1);
11201 TEST_f_L (llround, -0.8L, -1);
8847214f
UD		 11202 TEST_f_L (llround, 1.5, 2);
11203 TEST_f_L (llround, -1.5, -2);
11204 TEST_f_L (llround, 22514.5, 22515);
11205 TEST_f_L (llround, -22514.5, -22515);
3eb61415 11206 TEST_f_l (llround, 1071930.0008, 1071930);
8847214f
UD		 11207#ifndef TEST_FLOAT
11208 TEST_f_L (llround, 2097152.5, 2097153);
11209 TEST_f_L (llround, -2097152.5, -2097153);
11210 TEST_f_L (llround, 34359738368.5, 34359738369ll);
11211 TEST_f_L (llround, -34359738368.5, -34359738369ll);
169d7f11 11212 TEST_f_L (llround, -3.65309740835E17, -365309740835000000LL);
8847214f
UD		 11213#endif
11214
11215 /* Test boundary conditions. */
11216 /* 0x1FFFFF */
11217 TEST_f_L (llround, 2097151.0, 2097151LL);
11218 /* 0x800000 */
11219 TEST_f_L (llround, 8388608.0, 8388608LL);
11220 /* 0x1000000 */
11221 TEST_f_L (llround, 16777216.0, 16777216LL);
11222 /* 0x20000000000 */
11223 TEST_f_L (llround, 2199023255552.0, 2199023255552LL);
11224 /* 0x40000000000 */
11225 TEST_f_L (llround, 4398046511104.0, 4398046511104LL);
39007ae3
UD		 11226 /* 0x1000000000000 */
11227 TEST_f_L (llround, 281474976710656.0, 281474976710656LL);
8847214f
UD		 11228 /* 0x10000000000000 */
11229 TEST_f_L (llround, 4503599627370496.0, 4503599627370496LL);
11230 /* 0x10000080000000 */
3eb61415 11231 TEST_f_L (llround, 4503601774854144.0, 4503601774854144LL);
8847214f
UD		 11232 /* 0x20000000000000 */
11233 TEST_f_L (llround, 9007199254740992.0, 9007199254740992LL);
11234 /* 0x80000000000000 */
11235 TEST_f_L (llround, 36028797018963968.0, 36028797018963968LL);
11236 /* 0x100000000000000 */
11237 TEST_f_L (llround, 72057594037927936.0, 72057594037927936LL);
11238
601d2942
UD		 11239#ifndef TEST_FLOAT
11240 /* 0x100000000 */
11241 TEST_f_L (llround, 4294967295.5, 4294967296LL);
11242 /* 0x200000000 */
11243 TEST_f_L (llround, 8589934591.5, 8589934592LL);
c1e6b459
UD		 11244
11245 /* nextafter(0.5,-1) */
11246 TEST_f_L (llround, 0x1.fffffffffffffp-2, 0);
11247 /* nextafter(-0.5,1) */
11248 TEST_f_L (llround, -0x1.fffffffffffffp-2, 0);
11249 /* On PowerPC an exponent of '52' is the largest incrementally
11250 * representable sequence of whole-numbers in the 'double' range. We test
11251 * lround to make sure that a guard bit set during the lround operation
11252 * hasn't forced an erroneous shift giving us an incorrect result. The odd
11253 * numbers between +-(2^52+1 and 2^53-1) are affected since they have the
11254 * rightmost bit set. */
11255 /* +-(2^52+1) */
11256 TEST_f_L (llround, 0x1.0000000000001p+52,4503599627370497LL);
11257 TEST_f_L (llround, -0x1.0000000000001p+52,-4503599627370497LL);
11258 /* +-(2^53-1): Input is the last (positive and negative) incrementally
11259 * representable whole-number in the 'double' range that might round
11260 * erroneously. */
11261 TEST_f_L (llround, 0x1.fffffffffffffp+52, 9007199254740991LL);
11262 TEST_f_L (llround, -0x1.fffffffffffffp+52, -9007199254740991LL);
11263#else
11264 /* nextafter(0.5,-1) */
11265 TEST_f_L (llround, 0x1.fffffep-2, 0);
11266 /* nextafter(-0.5,1) */
11267 TEST_f_L (llround, -0x1.fffffep-2, 0);
11268 /* As above, on PowerPC an exponent of '23' is the largest incrementally
11269 * representable sequence of whole-numbers in the 'float' range.
11270 * Likewise, numbers between +-(2^23+1 and 2^24-1) are affected. */
11271 TEST_f_L (llround, 0x1.000002p+23,8388609);
11272 TEST_f_L (llround, -0x1.000002p+23,-8388609);
11273 TEST_f_L (llround, 0x1.fffffep+23, 16777215);
11274 TEST_f_L (llround, -0x1.fffffep+23, -16777215);
601d2942
UD		 11275#endif
11276
c1e6b459 11277
f964490f
RM		 11278#ifdef TEST_LDOUBLE
11279 /* The input can only be represented in long double. */
11280 TEST_f_L (llround, 4503599627370495.5L, 4503599627370496LL);
11281 TEST_f_L (llround, 4503599627370496.25L, 4503599627370496LL);
11282 TEST_f_L (llround, 4503599627370496.5L, 4503599627370497LL);
11283 TEST_f_L (llround, 4503599627370496.75L, 4503599627370497LL);
11284 TEST_f_L (llround, 4503599627370497.5L, 4503599627370498LL);
11285
830fce04
RM		 11286# if LDBL_MANT_DIG > 100
11287 TEST_f_L (llround, 4503599627370495.4999999999999L, 4503599627370495LL);
11288 TEST_f_L (llround, 4503599627370496.4999999999999L, 4503599627370496LL);
11289 TEST_f_L (llround, 4503599627370497.4999999999999L, 4503599627370497LL);
11290 TEST_f_L (llround, 4503599627370494.5000000000001L, 4503599627370495LL);
11291 TEST_f_L (llround, 4503599627370495.5000000000001L, 4503599627370496LL);
11292 TEST_f_L (llround, 4503599627370496.5000000000001L, 4503599627370497LL);
11293
11294 TEST_f_L (llround, -4503599627370495.4999999999999L, -4503599627370495LL);
11295 TEST_f_L (llround, -4503599627370496.4999999999999L, -4503599627370496LL);
11296 TEST_f_L (llround, -4503599627370497.4999999999999L, -4503599627370497LL);
11297 TEST_f_L (llround, -4503599627370494.5000000000001L, -4503599627370495LL);
11298 TEST_f_L (llround, -4503599627370495.5000000000001L, -4503599627370496LL);
11299 TEST_f_L (llround, -4503599627370496.5000000000001L, -4503599627370497LL);
11300# endif
11301
f964490f
RM		 11302 TEST_f_L (llround, -4503599627370495.5L, -4503599627370496LL);
11303 TEST_f_L (llround, -4503599627370496.25L, -4503599627370496LL);
11304 TEST_f_L (llround, -4503599627370496.5L, -4503599627370497LL);
11305 TEST_f_L (llround, -4503599627370496.75L, -4503599627370497LL);
11306 TEST_f_L (llround, -4503599627370497.5L, -4503599627370498LL);
11307
11308 TEST_f_L (llround, 9007199254740991.5L, 9007199254740992LL);
11309 TEST_f_L (llround, 9007199254740992.25L, 9007199254740992LL);
11310 TEST_f_L (llround, 9007199254740992.5L, 9007199254740993LL);
11311 TEST_f_L (llround, 9007199254740992.75L, 9007199254740993LL);
11312 TEST_f_L (llround, 9007199254740993.5L, 9007199254740994LL);
11313
830fce04
RM		 11314# if LDBL_MANT_DIG > 100
11315 TEST_f_L (llround, 9007199254740991.4999999999999L, 9007199254740991LL);
11316 TEST_f_L (llround, 9007199254740992.4999999999999L, 9007199254740992LL);
11317 TEST_f_L (llround, 9007199254740993.4999999999999L, 9007199254740993LL);
11318 TEST_f_L (llround, 9007199254740991.5000000000001L, 9007199254740992LL);
11319 TEST_f_L (llround, 9007199254740992.5000000000001L, 9007199254740993LL);
11320 TEST_f_L (llround, 9007199254740993.5000000000001L, 9007199254740994LL);
11321
11322 TEST_f_L (llround, -9007199254740991.4999999999999L, -9007199254740991LL);
11323 TEST_f_L (llround, -9007199254740992.4999999999999L, -9007199254740992LL);
11324 TEST_f_L (llround, -9007199254740993.4999999999999L, -9007199254740993LL);
11325 TEST_f_L (llround, -9007199254740991.5000000000001L, -9007199254740992LL);
11326 TEST_f_L (llround, -9007199254740992.5000000000001L, -9007199254740993LL);
11327 TEST_f_L (llround, -9007199254740993.5000000000001L, -9007199254740994LL);
11328# endif
11329
f964490f
RM		 11330 TEST_f_L (llround, -9007199254740991.5L, -9007199254740992LL);
11331 TEST_f_L (llround, -9007199254740992.25L, -9007199254740992LL);
11332 TEST_f_L (llround, -9007199254740992.5L, -9007199254740993LL);
11333 TEST_f_L (llround, -9007199254740992.75L, -9007199254740993LL);
11334 TEST_f_L (llround, -9007199254740993.5L, -9007199254740994LL);
11335
11336 TEST_f_L (llround, 72057594037927935.5L, 72057594037927936LL);
11337 TEST_f_L (llround, 72057594037927936.25L, 72057594037927936LL);
11338 TEST_f_L (llround, 72057594037927936.5L, 72057594037927937LL);
11339 TEST_f_L (llround, 72057594037927936.75L, 72057594037927937LL);
11340 TEST_f_L (llround, 72057594037927937.5L, 72057594037927938LL);
11341
11342 TEST_f_L (llround, -72057594037927935.5L, -72057594037927936LL);
11343 TEST_f_L (llround, -72057594037927936.25L, -72057594037927936LL);
11344 TEST_f_L (llround, -72057594037927936.5L, -72057594037927937LL);
11345 TEST_f_L (llround, -72057594037927936.75L, -72057594037927937LL);
11346 TEST_f_L (llround, -72057594037927937.5L, -72057594037927938LL);
1e832e37
RM		 11347
11348 TEST_f_L (llround, 9223372036854775806.25L, 9223372036854775806LL);
11349 TEST_f_L (llround, -9223372036854775806.25L, -9223372036854775806LL);
11350 TEST_f_L (llround, 9223372036854775806.5L, 9223372036854775807LL);
11351 TEST_f_L (llround, -9223372036854775806.5L, -9223372036854775807LL);
11352 TEST_f_L (llround, 9223372036854775807.0L, 9223372036854775807LL);
11353 TEST_f_L (llround, -9223372036854775807.0L, -9223372036854775807LL);
f964490f
RM		 11354#endif
11355
8847214f
UD		 11356 END (llround);
11357}
11358
11359static void
11360modf_test (void)
11361{
11362 FLOAT x;
11363
11364 START (modf);
11365
11366 TEST_fF_f1 (modf, plus_infty, 0, plus_infty);
11367 TEST_fF_f1 (modf, minus_infty, minus_zero, minus_infty);
67e971f1 11368 TEST_fF_f1 (modf, qnan_value, qnan_value, qnan_value);
8847214f
UD		 11369 TEST_fF_f1 (modf, 0, 0, 0);
11370 TEST_fF_f1 (modf, 1.5, 0.5, 1);
11371 TEST_fF_f1 (modf, 2.5, 0.5, 2);
11372 TEST_fF_f1 (modf, -2.5, -0.5, -2);
11373 TEST_fF_f1 (modf, 20, 0, 20);
11374 TEST_fF_f1 (modf, 21, 0, 21);
11375 TEST_fF_f1 (modf, 89.5, 0.5, 89);
11376
11377 END (modf);
11378}
11379
11380
74c57478
JM		 11381static const struct test_f_f_data nearbyint_test_data[] =
11382 {
11383 START_DATA (nearbyint),
11384
11385 TEST_f_f (nearbyint, 0.0, 0.0),
11386 TEST_f_f (nearbyint, minus_zero, minus_zero),
11387 TEST_f_f (nearbyint, plus_infty, plus_infty),
11388 TEST_f_f (nearbyint, minus_infty, minus_infty),
11389 TEST_f_f (nearbyint, qnan_value, qnan_value),
11390
11391 /* Subnormal values */
11392 TEST_f_f (nearbyint, -8.98847e+307, -8.98847e+307),
11393 TEST_f_f (nearbyint, -4.45015e-308, minus_zero),
11394
11395 /* Default rounding mode is round to nearest. */
11396 TEST_f_f (nearbyint, 0.5, 0.0),
11397 TEST_f_f (nearbyint, 1.5, 2.0),
11398 TEST_f_f (nearbyint, -0.5, minus_zero),
11399 TEST_f_f (nearbyint, -1.5, -2.0),
11400
11401 TEST_f_f (nearbyint, 262144.75, 262145.0),
11402 TEST_f_f (nearbyint, 262142.75, 262143.0),
11403 TEST_f_f (nearbyint, 524286.75, 524287.0),
11404 TEST_f_f (nearbyint, 524288.75, 524289.0),
11405
11406 TEST_f_f (nearbyint, 1048576.75, 1048577.0),
11407 TEST_f_f (nearbyint, 2097152.75, 2097153.0),
11408 TEST_f_f (nearbyint, 2492472.75, 2492473.0),
11409 TEST_f_f (nearbyint, 2886220.75, 2886221.0),
11410 TEST_f_f (nearbyint, 3058792.75, 3058793.0),
11411 TEST_f_f (nearbyint, -1048576.75, -1048577.0),
11412 TEST_f_f (nearbyint, -2097152.75, -2097153.0),
11413 TEST_f_f (nearbyint, -2492472.75, -2492473.0),
11414 TEST_f_f (nearbyint, -2886220.75, -2886221.0),
11415 TEST_f_f (nearbyint, -3058792.75, -3058793.0),
11416#ifndef TEST_FLOAT
11417 TEST_f_f (nearbyint, 70368744177664.75, 70368744177665.0),
11418 TEST_f_f (nearbyint, 140737488355328.75, 140737488355329.0),
11419 TEST_f_f (nearbyint, 281474976710656.75, 281474976710657.0),
11420 TEST_f_f (nearbyint, 562949953421312.75, 562949953421313.0),
11421 TEST_f_f (nearbyint, 1125899906842624.75, 1125899906842625.0),
11422 TEST_f_f (nearbyint, -70368744177664.75, -70368744177665.0),
11423 TEST_f_f (nearbyint, -140737488355328.75, -140737488355329.0),
11424 TEST_f_f (nearbyint, -281474976710656.75, -281474976710657.0),
11425 TEST_f_f (nearbyint, -562949953421312.75, -562949953421313.0),
11426 TEST_f_f (nearbyint, -1125899906842624.75, -1125899906842625.0),
11427#endif
11428
11429 END_DATA (nearbyint)
11430 };
11431
8847214f
UD		 11432static void
11433nearbyint_test (void)
11434{
11435 START (nearbyint);
74c57478 11436 RUN_TEST_LOOP_f_f (nearbyint, nearbyint_test_data, );
8847214f
UD		 11437 END (nearbyint);
11438}
11439
601a3a5f
JM		 11440static const struct test_ff_f_data nextafter_test_data[] =
11441 {
11442 START_DATA (nextafter),
8847214f 11443
601a3a5f
JM		 11444 TEST_ff_f (nextafter, 0, 0, 0),
11445 TEST_ff_f (nextafter, minus_zero, 0, 0),
11446 TEST_ff_f (nextafter, 0, minus_zero, minus_zero),
11447 TEST_ff_f (nextafter, minus_zero, minus_zero, minus_zero),
8847214f 11448
601a3a5f
JM		 11449 TEST_ff_f (nextafter, 9, 9, 9),
11450 TEST_ff_f (nextafter, -9, -9, -9),
11451 TEST_ff_f (nextafter, plus_infty, plus_infty, plus_infty),
11452 TEST_ff_f (nextafter, minus_infty, minus_infty, minus_infty),
8847214f 11453
601a3a5f
JM		 11454 TEST_ff_f (nextafter, qnan_value, 1.1L, qnan_value),
11455 TEST_ff_f (nextafter, 1.1L, qnan_value, qnan_value),
11456 TEST_ff_f (nextafter, qnan_value, qnan_value, qnan_value),
8847214f 11457
601a3a5f
JM		 11458 TEST_ff_f (nextafter, max_value, plus_infty, plus_infty, OVERFLOW_EXCEPTION),
11459 TEST_ff_f (nextafter, -max_value, minus_infty, minus_infty, OVERFLOW_EXCEPTION),
64b02fd2 11460
757de559 11461#ifdef TEST_LDOUBLE
601a3a5f
JM		 11462 // XXX Enable once gcc is fixed.
11463 //TEST_ff_f (nextafter, 0x0.00000040000000000000p-16385L, -0.1L, 0x0.0000003ffffffff00000p-16385L),
757de559
UD		 11464#endif
11465
601a3a5f
JM		 11466 /* XXX We need the hexadecimal FP number representation here for further
11467 tests. */
11468 END_DATA (nextafter)
11469 };
8847214f 11470
601a3a5f
JM		 11471static void
11472nextafter_test (void)
11473{
11474
11475 START (nextafter);
11476 RUN_TEST_LOOP_ff_f (nextafter, nextafter_test_data, );
8847214f
UD		 11477 END (nextafter);
11478}
11479
fe559c5e 11480
601a3a5f
JM		 11481static const struct test_ff_f_data_nexttoward nexttoward_test_data[] =
11482 {
11483 START_DATA (nexttoward),
11484 TEST_ff_f (nexttoward, 0, 0, 0),
11485 TEST_ff_f (nexttoward, minus_zero, 0, 0),
11486 TEST_ff_f (nexttoward, 0, minus_zero, minus_zero),
11487 TEST_ff_f (nexttoward, minus_zero, minus_zero, minus_zero),
8847214f 11488
601a3a5f
JM		 11489 TEST_ff_f (nexttoward, 9, 9, 9),
11490 TEST_ff_f (nexttoward, -9, -9, -9),
11491 TEST_ff_f (nexttoward, plus_infty, plus_infty, plus_infty),
11492 TEST_ff_f (nexttoward, minus_infty, minus_infty, minus_infty),
8847214f 11493
601a3a5f
JM		 11494 TEST_ff_f (nexttoward, qnan_value, 1.1L, qnan_value),
11495 TEST_ff_f (nexttoward, 1.1L, qnan_value, qnan_value),
11496 TEST_ff_f (nexttoward, qnan_value, qnan_value, qnan_value),
8847214f 11497
7cb029ee 11498#ifdef TEST_FLOAT
601a3a5f
JM		 11499 TEST_ff_f (nexttoward, 1.0, 1.1L, 0x1.000002p0),
11500 TEST_ff_f (nexttoward, 1.0, LDBL_MAX, 0x1.000002p0),
11501 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000001p0, 0x1.000002p0),
11502 TEST_ff_f (nexttoward, 1.0, 0.9L, 0x0.ffffffp0),
11503 TEST_ff_f (nexttoward, 1.0, -LDBL_MAX, 0x0.ffffffp0),
11504 TEST_ff_f (nexttoward, 1.0, 0x0.fffffffffffff8p0, 0x0.ffffffp0),
11505 TEST_ff_f (nexttoward, -1.0, -1.1L, -0x1.000002p0),
11506 TEST_ff_f (nexttoward, -1.0, -LDBL_MAX, -0x1.000002p0),
11507 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000001p0, -0x1.000002p0),
11508 TEST_ff_f (nexttoward, -1.0, -0.9L, -0x0.ffffffp0),
11509 TEST_ff_f (nexttoward, -1.0, LDBL_MAX, -0x0.ffffffp0),
11510 TEST_ff_f (nexttoward, -1.0, -0x0.fffffffffffff8p0, -0x0.ffffffp0),
11511 TEST_ff_f (nexttoward, -0x1.3p-145, -0xap-148L, -0x1.4p-145, UNDERFLOW_EXCEPTION),
7cb029ee 11512# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11513 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000002p0L, 0x1.000002p0),
11514 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffp0L, 0x0.ffffffp0),
11515 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000002p0L, -0x1.000002p0),
11516 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffp0L, -0x0.ffffffp0),
7cb029ee
JM		 11517# endif
11518# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11519 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000000000000000008p0L, 0x1.000002p0),
11520 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffcp0L, 0x0.ffffffp0),
11521 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000000000000000008p0L, -0x1.000002p0),
11522 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffcp0L, -0x0.ffffffp0),
7cb029ee
JM		 11523# endif
11524# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11525 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000000000000000000001p0L, 0x1.000002p0),
11526 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffp0),
11527 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000000000000000000001p0L, -0x1.000002p0),
11528 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffp0),
7cb029ee
JM		 11529# endif
11530#endif
11531#ifdef TEST_DOUBLE
601a3a5f
JM		 11532 TEST_ff_f (nexttoward, 1.0, 1.1L, 0x1.0000000000001p0),
11533 TEST_ff_f (nexttoward, 1.0, LDBL_MAX, 0x1.0000000000001p0),
11534 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000001p0, 0x1.0000000000001p0),
11535 TEST_ff_f (nexttoward, 1.0, 0.9L, 0x0.fffffffffffff8p0),
11536 TEST_ff_f (nexttoward, 1.0, -LDBL_MAX, 0x0.fffffffffffff8p0),
11537 TEST_ff_f (nexttoward, 1.0, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0),
11538 TEST_ff_f (nexttoward, -1.0, -1.1L, -0x1.0000000000001p0),
11539 TEST_ff_f (nexttoward, -1.0, -LDBL_MAX, -0x1.0000000000001p0),
11540 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000001p0, -0x1.0000000000001p0),
11541 TEST_ff_f (nexttoward, -1.0, -0.9L, -0x0.fffffffffffff8p0),
11542 TEST_ff_f (nexttoward, -1.0, LDBL_MAX, -0x0.fffffffffffff8p0),
11543 TEST_ff_f (nexttoward, -1.0, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0),
11544 TEST_ff_f (nexttoward, -1.0, -0x8.00346dc5d6388p-3L, -0x1.0000000000001p0),
11545 TEST_ff_f (nexttoward, 0x1p-1074, 0x1p-1073L, 0x1p-1073, UNDERFLOW_EXCEPTION),
7cb029ee 11546# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11547 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000002p0L, 0x1.0000000000001p0),
11548 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffff8p0),
11549 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000002p0L, -0x1.0000000000001p0),
11550 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffff8p0),
7cb029ee
JM		 11551# endif
11552# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11553 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000000000000000008p0L, 0x1.0000000000001p0),
11554 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffcp0L, 0x0.fffffffffffff8p0),
11555 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000000000000000008p0L, -0x1.0000000000001p0),
11556 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffcp0L, -0x0.fffffffffffff8p0),
7cb029ee
JM		 11557# endif
11558# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11559 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000000000000000000001p0L, 0x1.0000000000001p0),
11560 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.fffffffffffff8p0),
11561 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000000000000000000001p0L, -0x1.0000000000001p0),
11562 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.fffffffffffff8p0),
7cb029ee
JM		 11563# endif
11564#endif
601a3a5f
JM		 11565 END_DATA (nexttoward)
11566 };
8847214f
UD		 11567
11568static void
601a3a5f 11569nexttoward_test (void)
8847214f 11570{
601a3a5f
JM		 11571 START (nexttoward);
11572 RUN_TEST_LOOP_ff_f (nexttoward, nexttoward_test_data, );
11573 END (nexttoward);
11574}
8847214f 11575
8847214f 11576
601a3a5f
JM		 11577static const struct test_ff_f_data pow_test_data[] =
11578 {
11579 START_DATA (pow),
11580 TEST_ff_f (pow, 0, 0, 1),
11581 TEST_ff_f (pow, 0, minus_zero, 1),
11582 TEST_ff_f (pow, minus_zero, 0, 1),
11583 TEST_ff_f (pow, minus_zero, minus_zero, 1),
8847214f 11584
601a3a5f
JM		 11585 TEST_ff_f (pow, 10, 0, 1),
11586 TEST_ff_f (pow, 10, minus_zero, 1),
11587 TEST_ff_f (pow, -10, 0, 1),
11588 TEST_ff_f (pow, -10, minus_zero, 1),
8847214f 11589
601a3a5f
JM		 11590 TEST_ff_f (pow, qnan_value, 0, 1),
11591 TEST_ff_f (pow, qnan_value, minus_zero, 1),
8847214f 11592
15daa639 11593#ifndef TEST_INLINE
601a3a5f
JM		 11594 TEST_ff_f (pow, 1.1L, plus_infty, plus_infty),
11595 TEST_ff_f (pow, plus_infty, plus_infty, plus_infty),
11596 TEST_ff_f (pow, -1.1L, plus_infty, plus_infty),
11597 TEST_ff_f (pow, minus_infty, plus_infty, plus_infty),
11598
11599 TEST_ff_f (pow, 0.9L, plus_infty, 0),
11600 TEST_ff_f (pow, 1e-7L, plus_infty, 0),
11601 TEST_ff_f (pow, -0.9L, plus_infty, 0),
11602 TEST_ff_f (pow, -1e-7L, plus_infty, 0),
11603
11604 TEST_ff_f (pow, 1.1L, minus_infty, 0),
11605 TEST_ff_f (pow, plus_infty, minus_infty, 0),
11606 TEST_ff_f (pow, -1.1L, minus_infty, 0),
11607 TEST_ff_f (pow, minus_infty, minus_infty, 0),
11608
11609 TEST_ff_f (pow, 0.9L, minus_infty, plus_infty),
11610 TEST_ff_f (pow, 1e-7L, minus_infty, plus_infty),
11611 TEST_ff_f (pow, -0.9L, minus_infty, plus_infty),
11612 TEST_ff_f (pow, -1e-7L, minus_infty, plus_infty),
11613
11614 TEST_ff_f (pow, plus_infty, 1e-7L, plus_infty),
11615 TEST_ff_f (pow, plus_infty, 1, plus_infty),
11616 TEST_ff_f (pow, plus_infty, 1e7L, plus_infty),
11617 TEST_ff_f (pow, plus_infty, min_subnorm_value, plus_infty),
11618
11619 TEST_ff_f (pow, plus_infty, -1e-7L, 0),
11620 TEST_ff_f (pow, plus_infty, -1, 0),
11621 TEST_ff_f (pow, plus_infty, -1e7L, 0),
11622 TEST_ff_f (pow, plus_infty, -min_subnorm_value, 0),
11623
11624 TEST_ff_f (pow, minus_infty, 1, minus_infty),
11625 TEST_ff_f (pow, minus_infty, 11, minus_infty),
11626 TEST_ff_f (pow, minus_infty, 1001, minus_infty),
11627
11628 TEST_ff_f (pow, minus_infty, 2, plus_infty),
11629 TEST_ff_f (pow, minus_infty, 12, plus_infty),
11630 TEST_ff_f (pow, minus_infty, 1002, plus_infty),
11631 TEST_ff_f (pow, minus_infty, 0.1L, plus_infty),
11632 TEST_ff_f (pow, minus_infty, 1.1L, plus_infty),
11633 TEST_ff_f (pow, minus_infty, 11.1L, plus_infty),
11634 TEST_ff_f (pow, minus_infty, 1001.1L, plus_infty),
11635 TEST_ff_f (pow, minus_infty, min_subnorm_value, plus_infty),
11636
11637 TEST_ff_f (pow, minus_infty, -1, minus_zero),
11638 TEST_ff_f (pow, minus_infty, -11, minus_zero),
11639 TEST_ff_f (pow, minus_infty, -1001, minus_zero),
11640
11641 TEST_ff_f (pow, minus_infty, -2, 0),
11642 TEST_ff_f (pow, minus_infty, -12, 0),
11643 TEST_ff_f (pow, minus_infty, -1002, 0),
11644 TEST_ff_f (pow, minus_infty, -0.1L, 0),
11645 TEST_ff_f (pow, minus_infty, -1.1L, 0),
11646 TEST_ff_f (pow, minus_infty, -11.1L, 0),
11647 TEST_ff_f (pow, minus_infty, -1001.1L, 0),
11648 TEST_ff_f (pow, minus_infty, -min_subnorm_value, 0),
11649#endif
11650
11651 TEST_ff_f (pow, qnan_value, qnan_value, qnan_value),
11652 TEST_ff_f (pow, 0, qnan_value, qnan_value),
11653 TEST_ff_f (pow, 1, qnan_value, 1),
11654 TEST_ff_f (pow, -1, qnan_value, qnan_value),
11655 TEST_ff_f (pow, qnan_value, 1, qnan_value),
11656 TEST_ff_f (pow, qnan_value, -1, qnan_value),
11657
11658 /* pow (x, qNaN) == qNaN. */
11659 TEST_ff_f (pow, 3.0, qnan_value, qnan_value),
11660 TEST_ff_f (pow, minus_zero, qnan_value, qnan_value),
11661 TEST_ff_f (pow, plus_infty, qnan_value, qnan_value),
11662 TEST_ff_f (pow, -3.0, qnan_value, qnan_value),
11663 TEST_ff_f (pow, minus_infty, qnan_value, qnan_value),
11664
11665 TEST_ff_f (pow, qnan_value, 3.0, qnan_value),
11666 TEST_ff_f (pow, qnan_value, -3.0, qnan_value),
11667 TEST_ff_f (pow, qnan_value, plus_infty, qnan_value),
11668 TEST_ff_f (pow, qnan_value, minus_infty, qnan_value),
11669 TEST_ff_f (pow, qnan_value, 2.5, qnan_value),
11670 TEST_ff_f (pow, qnan_value, -2.5, qnan_value),
11671 TEST_ff_f (pow, qnan_value, min_subnorm_value, qnan_value),
11672 TEST_ff_f (pow, qnan_value, -min_subnorm_value, qnan_value),
11673
11674 TEST_ff_f (pow, 1, plus_infty, 1),
11675 TEST_ff_f (pow, -1, plus_infty, 1),
11676 TEST_ff_f (pow, 1, minus_infty, 1),
11677 TEST_ff_f (pow, -1, minus_infty, 1),
11678 TEST_ff_f (pow, 1, 1, 1),
11679 TEST_ff_f (pow, 1, -1, 1),
11680 TEST_ff_f (pow, 1, 1.25, 1),
11681 TEST_ff_f (pow, 1, -1.25, 1),
11682 TEST_ff_f (pow, 1, 0x1p62L, 1),
11683 TEST_ff_f (pow, 1, 0x1p63L, 1),
11684 TEST_ff_f (pow, 1, 0x1p64L, 1),
11685 TEST_ff_f (pow, 1, 0x1p72L, 1),
11686 TEST_ff_f (pow, 1, min_subnorm_value, 1),
11687 TEST_ff_f (pow, 1, -min_subnorm_value, 1),
11688
11689 /* pow (x, +-0) == 1. */
11690 TEST_ff_f (pow, plus_infty, 0, 1),
11691 TEST_ff_f (pow, plus_infty, minus_zero, 1),
11692 TEST_ff_f (pow, minus_infty, 0, 1),
11693 TEST_ff_f (pow, minus_infty, minus_zero, 1),
11694 TEST_ff_f (pow, 32.75L, 0, 1),
11695 TEST_ff_f (pow, 32.75L, minus_zero, 1),
11696 TEST_ff_f (pow, -32.75L, 0, 1),
11697 TEST_ff_f (pow, -32.75L, minus_zero, 1),
11698 TEST_ff_f (pow, 0x1p72L, 0, 1),
11699 TEST_ff_f (pow, 0x1p72L, minus_zero, 1),
11700 TEST_ff_f (pow, 0x1p-72L, 0, 1),
11701 TEST_ff_f (pow, 0x1p-72L, minus_zero, 1),
11702
11703 TEST_ff_f (pow, -0.1L, 1.1L, qnan_value, INVALID_EXCEPTION),
11704 TEST_ff_f (pow, -0.1L, -1.1L, qnan_value, INVALID_EXCEPTION),
11705 TEST_ff_f (pow, -10.1L, 1.1L, qnan_value, INVALID_EXCEPTION),
11706 TEST_ff_f (pow, -10.1L, -1.1L, qnan_value, INVALID_EXCEPTION),
11707 TEST_ff_f (pow, -1.01L, min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11708 TEST_ff_f (pow, -1.01L, -min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11709 TEST_ff_f (pow, -1.0L, min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11710 TEST_ff_f (pow, -1.0L, -min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11711
11712 TEST_ff_f (pow, 0, -1, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11713 TEST_ff_f (pow, 0, -11, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11714 TEST_ff_f (pow, 0, -0xffffff, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa 11715#ifndef TEST_FLOAT
601a3a5f 11716 TEST_ff_f (pow, 0, -0x1.fffffffffffffp+52L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11717#endif
11718#ifdef TEST_LDOUBLE
11719# if LDBL_MANT_DIG >= 64
601a3a5f 11720 TEST_ff_f (pow, 0, -0x1.fffffffffffffffep+63L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11721# endif
11722# if LDBL_MANT_DIG >= 106
601a3a5f 11723 TEST_ff_f (pow, 0, -0x1.ffffffffffffffffffffffffff8p+105L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11724# endif
11725# if LDBL_MANT_DIG >= 113
601a3a5f 11726 TEST_ff_f (pow, 0, -0x1.ffffffffffffffffffffffffffffp+112L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11727# endif
11728#endif
601a3a5f
JM		 11729 TEST_ff_f (pow, minus_zero, -1, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11730 TEST_ff_f (pow, minus_zero, -11L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11731 TEST_ff_f (pow, minus_zero, -0xffffff, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11732 TEST_ff_f (pow, minus_zero, -0x1fffffe, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa 11733#ifndef TEST_FLOAT
601a3a5f
JM		 11734 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffp+52L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11735 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffp+53L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11736#endif
11737#ifdef TEST_LDOUBLE
11738# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11739 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffffep+63L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11740 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffffep+64L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11741# endif
11742# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11743 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11744 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11745# endif
11746# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11747 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11748 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM		 11749# endif
11750#endif
8847214f 11751
601a3a5f
JM		 11752 TEST_ff_f (pow, 0, -2, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11753 TEST_ff_f (pow, 0, -11.1L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11754 TEST_ff_f (pow, 0, -min_subnorm_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11755 TEST_ff_f (pow, 0, -0x1p24, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11756 TEST_ff_f (pow, 0, -0x1p127, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11757 TEST_ff_f (pow, 0, -max_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11758 TEST_ff_f (pow, minus_zero, -2, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11759 TEST_ff_f (pow, minus_zero, -11.1L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11760 TEST_ff_f (pow, minus_zero, -min_subnorm_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11761 TEST_ff_f (pow, minus_zero, -0x1p24, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11762 TEST_ff_f (pow, minus_zero, -0x1p127, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11763 TEST_ff_f (pow, minus_zero, -max_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11764
11765 TEST_ff_f (pow, 0x1p72L, 0x1p72L, plus_infty, OVERFLOW_EXCEPTION),
11766 TEST_ff_f (pow, 10, -0x1p72L, 0, UNDERFLOW_EXCEPTION),
11767 TEST_ff_f (pow, max_value, max_value, plus_infty, OVERFLOW_EXCEPTION),
11768 TEST_ff_f (pow, 10, -max_value, 0, UNDERFLOW_EXCEPTION),
11769
11770 TEST_ff_f (pow, 0, 1, 0),
11771 TEST_ff_f (pow, 0, 11, 0),
11772
11773 TEST_ff_f (pow, minus_zero, 1, minus_zero),
11774 TEST_ff_f (pow, minus_zero, 11, minus_zero),
11775
11776 TEST_ff_f (pow, 0, 2, 0),
11777 TEST_ff_f (pow, 0, 11.1L, 0),
11778
11779 TEST_ff_f (pow, minus_zero, 2, 0),
11780 TEST_ff_f (pow, minus_zero, 11.1L, 0),
11781 TEST_ff_f (pow, 0, plus_infty, 0),
11782 TEST_ff_f (pow, minus_zero, plus_infty, 0),
11783 TEST_ff_f (pow, 0, minus_infty, plus_infty, DIVIDE_BY_ZERO_EXCEPTION_OK),
11784 TEST_ff_f (pow, minus_zero, minus_infty, plus_infty, DIVIDE_BY_ZERO_EXCEPTION_OK),
8847214f 11785
15daa639 11786#ifndef TEST_INLINE
601a3a5f
JM		 11787 /* pow (x, +inf) == +inf for |x| > 1. */
11788 TEST_ff_f (pow, 1.5, plus_infty, plus_infty),
8847214f 11789
601a3a5f
JM		 11790 /* pow (x, +inf) == +0 for |x| < 1. */
11791 TEST_ff_f (pow, 0.5, plus_infty, 0.0),
8847214f 11792
601a3a5f
JM		 11793 /* pow (x, -inf) == +0 for |x| > 1. */
11794 TEST_ff_f (pow, 1.5, minus_infty, 0.0),
8847214f 11795
601a3a5f
JM		 11796 /* pow (x, -inf) == +inf for |x| < 1. */
11797 TEST_ff_f (pow, 0.5, minus_infty, plus_infty),
15daa639 11798#endif
8847214f 11799
601a3a5f
JM		 11800 /* pow (+inf, y) == +inf for y > 0. */
11801 TEST_ff_f (pow, plus_infty, 2, plus_infty),
11802 TEST_ff_f (pow, plus_infty, 0xffffff, plus_infty),
2460d3aa 11803#ifndef TEST_FLOAT
601a3a5f 11804 TEST_ff_f (pow, plus_infty, 0x1.fffffffffffffp+52L, plus_infty),
2460d3aa
JM		 11805#endif
11806#ifdef TEST_LDOUBLE
11807# if LDBL_MANT_DIG >= 64
601a3a5f 11808 TEST_ff_f (pow, plus_infty, 0x1.fffffffffffffffep+63L, plus_infty),
2460d3aa
JM		 11809# endif
11810# if LDBL_MANT_DIG >= 106
601a3a5f 11811 TEST_ff_f (pow, plus_infty, 0x1.ffffffffffffffffffffffffff8p+105L, plus_infty),
2460d3aa
JM		 11812# endif
11813# if LDBL_MANT_DIG >= 113
601a3a5f 11814 TEST_ff_f (pow, plus_infty, 0x1.ffffffffffffffffffffffffffffp+112L, plus_infty),
2460d3aa
JM		 11815# endif
11816#endif
601a3a5f
JM		 11817 TEST_ff_f (pow, plus_infty, 0x1p24, plus_infty),
11818 TEST_ff_f (pow, plus_infty, 0x1p127, plus_infty),
11819 TEST_ff_f (pow, plus_infty, max_value, plus_infty),
8847214f 11820
601a3a5f
JM		 11821 /* pow (+inf, y) == +0 for y < 0. */
11822 TEST_ff_f (pow, plus_infty, -1, 0.0),
11823 TEST_ff_f (pow, plus_infty, -0xffffff, 0.0),
2460d3aa 11824#ifndef TEST_FLOAT
601a3a5f 11825 TEST_ff_f (pow, plus_infty, -0x1.fffffffffffffp+52L, 0.0),
2460d3aa
JM		 11826#endif
11827#ifdef TEST_LDOUBLE
11828# if LDBL_MANT_DIG >= 64
601a3a5f 11829 TEST_ff_f (pow, plus_infty, -0x1.fffffffffffffffep+63L, 0.0),
2460d3aa
JM		 11830# endif
11831# if LDBL_MANT_DIG >= 106
601a3a5f 11832 TEST_ff_f (pow, plus_infty, -0x1.ffffffffffffffffffffffffff8p+105L, 0.0),
2460d3aa
JM		 11833# endif
11834# if LDBL_MANT_DIG >= 113
601a3a5f 11835 TEST_ff_f (pow, plus_infty, -0x1.ffffffffffffffffffffffffffffp+112L, 0.0),
2460d3aa
JM		 11836# endif
11837#endif
601a3a5f
JM		 11838 TEST_ff_f (pow, plus_infty, -0x1p24, 0.0),
11839 TEST_ff_f (pow, plus_infty, -0x1p127, 0.0),
11840 TEST_ff_f (pow, plus_infty, -max_value, 0.0),
8847214f 11841
601a3a5f
JM		 11842 /* pow (-inf, y) == -inf for y an odd integer > 0. */
11843 TEST_ff_f (pow, minus_infty, 27, minus_infty),
11844 TEST_ff_f (pow, minus_infty, 0xffffff, minus_infty),
11845 TEST_ff_f (pow, minus_infty, 0x1fffffe, plus_infty),
2460d3aa 11846#ifndef TEST_FLOAT
601a3a5f
JM		 11847 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffp+52L, minus_infty),
11848 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffp+53L, plus_infty),
2460d3aa
JM		 11849#endif
11850#ifdef TEST_LDOUBLE
11851# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11852 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffffep+63L, minus_infty),
11853 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffffep+64L, plus_infty),
2460d3aa
JM		 11854# endif
11855# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11856 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffff8p+105L, minus_infty),
11857 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffff8p+106L, plus_infty),
2460d3aa
JM		 11858# endif
11859# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11860 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffffffp+112L, minus_infty),
11861 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffffffp+113L, plus_infty),
2460d3aa
JM		 11862# endif
11863#endif
8847214f 11864
601a3a5f
JM		 11865 /* pow (-inf, y) == +inf for y > 0 and not an odd integer. */
11866 TEST_ff_f (pow, minus_infty, 28, plus_infty),
11867 TEST_ff_f (pow, minus_infty, 0x1p24, plus_infty),
11868 TEST_ff_f (pow, minus_infty, 0x1p127, plus_infty),
11869 TEST_ff_f (pow, minus_infty, max_value, plus_infty),
8847214f 11870
601a3a5f
JM		 11871 /* pow (-inf, y) == -0 for y an odd integer < 0. */
11872 TEST_ff_f (pow, minus_infty, -3, minus_zero),
11873 TEST_ff_f (pow, minus_infty, -0xffffff, minus_zero),
11874 TEST_ff_f (pow, minus_infty, -0x1fffffe, plus_zero),
2460d3aa 11875#ifndef TEST_FLOAT
601a3a5f
JM		 11876 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffp+52L, minus_zero),
11877 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffp+53L, plus_zero),
2460d3aa
JM		 11878#endif
11879#ifdef TEST_LDOUBLE
11880# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11881 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffffep+63L, minus_zero),
11882 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffffep+64L, plus_zero),
2460d3aa
JM		 11883# endif
11884# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11885 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffff8p+105L, minus_zero),
11886 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffff8p+106L, plus_zero),
2460d3aa
JM		 11887# endif
11888# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11889 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffffffp+112L, minus_zero),
11890 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffffffp+113L, plus_zero),
2460d3aa
JM		 11891# endif
11892#endif
601a3a5f
JM		 11893 /* pow (-inf, y) == +0 for y < 0 and not an odd integer. */
11894 TEST_ff_f (pow, minus_infty, -2.0, 0.0),
11895 TEST_ff_f (pow, minus_infty, -0x1p24, 0.0),
11896 TEST_ff_f (pow, minus_infty, -0x1p127, 0.0),
11897 TEST_ff_f (pow, minus_infty, -max_value, 0.0),
8847214f 11898
601a3a5f
JM		 11899 /* pow (+0, y) == +0 for y an odd integer > 0. */
11900 TEST_ff_f (pow, 0.0, 27, 0.0),
11901 TEST_ff_f (pow, 0.0, 0xffffff, 0.0),
2460d3aa 11902#ifndef TEST_FLOAT
601a3a5f 11903 TEST_ff_f (pow, 0.0, 0x1.fffffffffffffp+52L, 0.0),
2460d3aa
JM		 11904#endif
11905#ifdef TEST_LDOUBLE
11906# if LDBL_MANT_DIG >= 64
601a3a5f 11907 TEST_ff_f (pow, 0.0, 0x1.fffffffffffffffep+63L, 0.0),
2460d3aa
JM		 11908# endif
11909# if LDBL_MANT_DIG >= 106
601a3a5f 11910 TEST_ff_f (pow, 0.0, 0x1.ffffffffffffffffffffffffff8p+105L, 0.0),
2460d3aa
JM		 11911# endif
11912# if LDBL_MANT_DIG >= 113
601a3a5f 11913 TEST_ff_f (pow, 0.0, 0x1.ffffffffffffffffffffffffffffp+112L, 0.0),
2460d3aa
JM		 11914# endif
11915#endif
8847214f 11916
601a3a5f
JM		 11917 /* pow (-0, y) == -0 for y an odd integer > 0. */
11918 TEST_ff_f (pow, minus_zero, 27, minus_zero),
11919 TEST_ff_f (pow, minus_zero, 0xffffff, minus_zero),
11920 TEST_ff_f (pow, minus_zero, 0x1fffffe, plus_zero),
2460d3aa 11921#ifndef TEST_FLOAT
601a3a5f
JM		 11922 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffp+52L, minus_zero),
11923 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffp+53L, plus_zero),
2460d3aa
JM		 11924#endif
11925#ifdef TEST_LDOUBLE
11926# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11927 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffffep+63L, minus_zero),
11928 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffffep+64L, plus_zero),
2460d3aa
JM		 11929# endif
11930# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11931 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffff8p+105L, minus_zero),
11932 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffff8p+106L, plus_zero),
2460d3aa
JM		 11933# endif
11934# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11935 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffffffp+112L, minus_zero),
11936 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffffffp+113L, plus_zero),
2460d3aa
JM		 11937# endif
11938#endif
8847214f 11939
601a3a5f
JM		 11940 /* pow (+0, y) == +0 for y > 0 and not an odd integer. */
11941 TEST_ff_f (pow, 0.0, 4, 0.0),
11942 TEST_ff_f (pow, 0.0, 0x1p24, 0.0),
11943 TEST_ff_f (pow, 0.0, 0x1p127, 0.0),
11944 TEST_ff_f (pow, 0.0, max_value, 0.0),
11945 TEST_ff_f (pow, 0.0, min_subnorm_value, 0.0),
8847214f 11946
601a3a5f
JM		 11947 /* pow (-0, y) == +0 for y > 0 and not an odd integer. */
11948 TEST_ff_f (pow, minus_zero, 4, 0.0),
11949 TEST_ff_f (pow, minus_zero, 0x1p24, 0.0),
11950 TEST_ff_f (pow, minus_zero, 0x1p127, 0.0),
11951 TEST_ff_f (pow, minus_zero, max_value, 0.0),
11952 TEST_ff_f (pow, minus_zero, min_subnorm_value, 0.0),
8847214f 11953
601a3a5f
JM		 11954 TEST_ff_f (pow, 16, 0.25L, 2),
11955 TEST_ff_f (pow, 0x1p64L, 0.125L, 256),
11956 TEST_ff_f (pow, 2, 4, 16),
11957 TEST_ff_f (pow, 256, 8, 0x1p64L),
164f863e 11958
601a3a5f 11959 TEST_ff_f (pow, 0.75L, 1.25L, 0.697953644326574699205914060237425566L),
8847214f 11960
4c95adde 11961#if defined TEST_DOUBLE || defined TEST_LDOUBLE
601a3a5f 11962 TEST_ff_f (pow, -7.49321e+133, -9.80818e+16, 0, UNDERFLOW_EXCEPTION),
8847214f
UD		 11963#endif
11964
601a3a5f
JM		 11965 TEST_ff_f (pow, -1.0, -0xffffff, -1.0),
11966 TEST_ff_f (pow, -1.0, -0x1fffffe, 1.0),
d6270972 11967#ifndef TEST_FLOAT
601a3a5f
JM		 11968 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffp+52L, -1.0),
11969 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffp+53L, 1.0),
d6270972
JM		 11970#endif
11971#ifdef TEST_LDOUBLE
11972# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11973 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffffep+63L, -1.0),
11974 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffffep+64L, 1.0),
d6270972
JM		 11975# endif
11976# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11977 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffff8p+105L, -1.0),
11978 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffff8p+106L, 1.0),
d6270972
JM		 11979# endif
11980# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 11981 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffffffp+112L, -1.0),
11982 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffffffp+113L, 1.0),
d6270972
JM		 11983# endif
11984#endif
601a3a5f 11985 TEST_ff_f (pow, -1.0, -max_value, 1.0),
d6270972 11986
601a3a5f
JM		 11987 TEST_ff_f (pow, -1.0, 0xffffff, -1.0),
11988 TEST_ff_f (pow, -1.0, 0x1fffffe, 1.0),
d6270972 11989#ifndef TEST_FLOAT
601a3a5f
JM		 11990 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffp+52L, -1.0),
11991 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffp+53L, 1.0),
d6270972
JM		 11992#endif
11993#ifdef TEST_LDOUBLE
11994# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 11995 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffffep+63L, -1.0),
11996 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffffep+64L, 1.0),
d6270972
JM		 11997# endif
11998# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 11999 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffff8p+105L, -1.0),
12000 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffff8p+106L, 1.0),
d6270972
JM		 12001# endif
12002# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12003 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffffffp+112L, -1.0),
12004 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffffffp+113L, 1.0),
d6270972
JM		 12005# endif
12006#endif
601a3a5f 12007 TEST_ff_f (pow, -1.0, max_value, 1.0),
d6270972 12008
601a3a5f
JM		 12009 TEST_ff_f (pow, -2.0, 126, 0x1p126),
12010 TEST_ff_f (pow, -2.0, 127, -0x1p127),
12011 /* Allow inexact results for float to be considered to underflow. */
12012 TEST_ff_f (pow, -2.0, -126, 0x1p-126, UNDERFLOW_EXCEPTION_OK_FLOAT),
12013 TEST_ff_f (pow, -2.0, -127, -0x1p-127, UNDERFLOW_EXCEPTION_OK_FLOAT),
d6270972 12014
601a3a5f
JM		 12015 TEST_ff_f (pow, -2.0, -0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12016 TEST_ff_f (pow, -2.0, -0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12017#ifndef TEST_FLOAT
601a3a5f
JM		 12018 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12019 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12020#endif
12021#ifdef TEST_LDOUBLE
12022# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12023 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12024 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12025# endif
12026# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12027 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12028 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12029# endif
12030# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12031 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12032 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12033# endif
12034#endif
601a3a5f 12035 TEST_ff_f (pow, -2.0, -max_value, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12036
601a3a5f
JM		 12037 TEST_ff_f (pow, -2.0, 0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12038 TEST_ff_f (pow, -2.0, 0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12039#ifndef TEST_FLOAT
601a3a5f
JM		 12040 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12041 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12042#endif
12043#ifdef TEST_LDOUBLE
12044# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12045 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12046 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12047# endif
12048# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12049 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12050 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12051# endif
12052# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12053 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12054 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12055# endif
12056#endif
601a3a5f 12057 TEST_ff_f (pow, -2.0, max_value, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12058
601a3a5f
JM		 12059 TEST_ff_f (pow, -max_value, 0.5, qnan_value, INVALID_EXCEPTION),
12060 TEST_ff_f (pow, -max_value, 1.5, qnan_value, INVALID_EXCEPTION),
12061 TEST_ff_f (pow, -max_value, 1000.5, qnan_value, INVALID_EXCEPTION),
12062 TEST_ff_f (pow, -max_value, -2, plus_zero, UNDERFLOW_EXCEPTION),
12063 TEST_ff_f (pow, -max_value, -3, minus_zero, UNDERFLOW_EXCEPTION),
12064 TEST_ff_f (pow, -max_value, 2, plus_infty, OVERFLOW_EXCEPTION),
12065 TEST_ff_f (pow, -max_value, 3, minus_infty, OVERFLOW_EXCEPTION),
d6270972 12066
601a3a5f
JM		 12067 TEST_ff_f (pow, -max_value, -0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12068 TEST_ff_f (pow, -max_value, -0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12069#ifndef TEST_FLOAT
601a3a5f
JM		 12070 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12071 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12072#endif
12073#ifdef TEST_LDOUBLE
12074# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12075 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12076 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12077# endif
12078# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12079 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12080 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12081# endif
12082# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12083 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12084 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12085# endif
12086#endif
601a3a5f 12087 TEST_ff_f (pow, -max_value, -max_value, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12088
601a3a5f
JM		 12089 TEST_ff_f (pow, -max_value, 0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12090 TEST_ff_f (pow, -max_value, 0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12091#ifndef TEST_FLOAT
601a3a5f
JM		 12092 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12093 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12094#endif
12095#ifdef TEST_LDOUBLE
12096# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12097 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12098 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12099# endif
12100# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12101 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12102 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12103# endif
12104# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12105 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12106 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12107# endif
12108#endif
601a3a5f 12109 TEST_ff_f (pow, -max_value, max_value, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12110
601a3a5f
JM		 12111 TEST_ff_f (pow, -0.5, 126, 0x1p-126),
12112 TEST_ff_f (pow, -0.5, 127, -0x1p-127),
12113 TEST_ff_f (pow, -0.5, -126, 0x1p126),
12114 TEST_ff_f (pow, -0.5, -127, -0x1p127),
d6270972 12115
601a3a5f
JM		 12116 TEST_ff_f (pow, -0.5, -0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12117 TEST_ff_f (pow, -0.5, -0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12118#ifndef TEST_FLOAT
601a3a5f
JM		 12119 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12120 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12121#endif
12122#ifdef TEST_LDOUBLE
12123# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12124 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12125 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12126# endif
12127# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12128 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12129 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12130# endif
12131# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12132 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12133 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12134# endif
12135#endif
601a3a5f 12136 TEST_ff_f (pow, -0.5, -max_value, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12137
601a3a5f
JM		 12138 TEST_ff_f (pow, -0.5, 0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12139 TEST_ff_f (pow, -0.5, 0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12140#ifndef TEST_FLOAT
601a3a5f
JM		 12141 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12142 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12143#endif
12144#ifdef TEST_LDOUBLE
12145# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12146 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12147 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12148# endif
12149# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12150 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12151 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12152# endif
12153# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12154 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12155 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12156# endif
12157#endif
601a3a5f 12158 TEST_ff_f (pow, -0.5, max_value, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12159
601a3a5f
JM		 12160 TEST_ff_f (pow, -min_value, 0.5, qnan_value, INVALID_EXCEPTION),
12161 TEST_ff_f (pow, -min_value, 1.5, qnan_value, INVALID_EXCEPTION),
12162 TEST_ff_f (pow, -min_value, 1000.5, qnan_value, INVALID_EXCEPTION),
12163 TEST_ff_f (pow, -min_value, -2, plus_infty, OVERFLOW_EXCEPTION),
12164 TEST_ff_f (pow, -min_value, -3, minus_infty, OVERFLOW_EXCEPTION),
12165 /* Allow inexact results to be considered to underflow. */
12166 TEST_ff_f (pow, -min_value, 1, -min_value, UNDERFLOW_EXCEPTION_OK),
12167 TEST_ff_f (pow, -min_value, 2, plus_zero, UNDERFLOW_EXCEPTION),
12168 TEST_ff_f (pow, -min_value, 3, minus_zero, UNDERFLOW_EXCEPTION),
d6270972 12169
601a3a5f
JM		 12170 TEST_ff_f (pow, -min_value, -0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12171 TEST_ff_f (pow, -min_value, -0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12172#ifndef TEST_FLOAT
601a3a5f
JM		 12173 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12174 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12175#endif
12176#ifdef TEST_LDOUBLE
12177# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12178 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12179 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12180# endif
12181# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12182 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12183 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12184# endif
12185# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12186 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12187 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM		 12188# endif
12189#endif
601a3a5f 12190 TEST_ff_f (pow, -min_value, -max_value, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12191
601a3a5f
JM		 12192 TEST_ff_f (pow, -min_value, 0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12193 TEST_ff_f (pow, -min_value, 0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12194#ifndef TEST_FLOAT
601a3a5f
JM		 12195 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12196 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12197#endif
12198#ifdef TEST_LDOUBLE
12199# if LDBL_MANT_DIG >= 64
601a3a5f
JM		 12200 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12201 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12202# endif
12203# if LDBL_MANT_DIG >= 106
601a3a5f
JM		 12204 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12205 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12206# endif
12207# if LDBL_MANT_DIG >= 113
601a3a5f
JM		 12208 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12209 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM		 12210# endif
12211#endif
601a3a5f
JM		 12212 TEST_ff_f (pow, -min_value, max_value, plus_zero, UNDERFLOW_EXCEPTION),
12213
12214 TEST_ff_f (pow, 0x0.ffffffp0, 10, 0.999999403953712118183885036774764444747L),
12215 TEST_ff_f (pow, 0x0.ffffffp0, 100, 0.999994039553108359406305079606228341585L),
12216 TEST_ff_f (pow, 0x0.ffffffp0, 1000, 0.9999403971297699052276650144650733772182L),
12217 TEST_ff_f (pow, 0x0.ffffffp0, 0x1p24, 0.3678794302077803437135155590023422899744L),
12218 TEST_ff_f (pow, 0x0.ffffffp0, 0x1p30, 1.603807831524924233828134753069728224044e-28L),
12219 TEST_ff_f (pow, 0x0.ffffffp0, 0x1.234566p30, 2.374884712135295099971443365381007297732e-32L),
12220 TEST_ff_f (pow, 0x0.ffffffp0, -10, 1.000000596046643153205170848674671339688L),
12221 TEST_ff_f (pow, 0x0.ffffffp0, -100, 1.000005960482418779499387594989252621451L),
12222 TEST_ff_f (pow, 0x0.ffffffp0, -1000, 1.000059606422943986382898964231519867906L),
12223 TEST_ff_f (pow, 0x0.ffffffp0, -0x1p24, 2.7182819094701610539628664526874952929416L),
12224 TEST_ff_f (pow, 0x0.ffffffp0, -0x1p30, 6.2351609734265057988914412331288163636075e+27L),
12225 TEST_ff_f (pow, 0x0.ffffffp0, -0x1.234566p30, 4.2107307141696353498921307077142537353515e+31L),
12226 TEST_ff_f (pow, 0x1.000002p0, 0x1p24, 7.3890552180866447284268641248075832310141L),
12227 TEST_ff_f (pow, 0x1.000002p0, 0x1.234566p29, 4.2107033006507495188536371520637025716256e+31L),
12228 TEST_ff_f (pow, 0x1.000002p0, -0x1.234566p29, 2.3749001736727769098946062325205705312166e-32L),
c483f6b4 12229
1bead169 12230#if !defined TEST_FLOAT
601a3a5f
JM		 12231 TEST_ff_f (pow, 0x0.fffffffffffff8p0L, 0x1.23456789abcdfp62L, 1.0118762747827252817436395051178295138220e-253L),
12232 TEST_ff_f (pow, 0x0.fffffffffffff8p0L, -0x1.23456789abcdfp62L, 9.8826311568054561811190162420900667121992e+252L),
12233 TEST_ff_f (pow, 0x1.0000000000001p0L, 0x1.23456789abcdfp61L, 9.8826311568044974397135026217687399395481e+252L),
12234 TEST_ff_f (pow, 0x1.0000000000001p0L, -0x1.23456789abcdfp61L, 1.0118762747828234466621210689458255908670e-253L),
c483f6b4
JM		 12235#endif
12236
1bead169 12237#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64 && LDBL_MAX_EXP >= 16384
601a3a5f
JM		 12238 TEST_ff_f (pow, 0x0.ffffffffffffffffp0L, 0x1.23456789abcdef0ep77L, 1.2079212226420368189981778807634890018840e-4048L),
12239 TEST_ff_f (pow, 0x0.ffffffffffffffffp0L, -0x1.23456789abcdef0ep77L, 8.2786855736563746280496724205839522148001e+4047L),
12240 TEST_ff_f (pow, 0x1.0000000000000002p0L, 0x1.23456789abcdef0ep76L, 8.2786855736563683535324500168799315131570e+4047L),
12241 TEST_ff_f (pow, 0x1.0000000000000002p0L, -0x1.23456789abcdef0ep76L, 1.2079212226420377344964713407722652880280e-4048L),
1bead169
JM		 12242#endif
12243
12244#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
601a3a5f
JM		 12245 TEST_ff_f (pow, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.23456789abcdef0123456789abcdp126L, 1.2079212226420440237790185999151440179953e-4048L),
12246 TEST_ff_f (pow, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.23456789abcdef0123456789abcdp126L, 8.2786855736563252489063231915535105363602e+4047L),
12247 TEST_ff_f (pow, 0x1.0000000000000000000000000001p0L, 0x1.23456789abcdef0123456789abcdp125L, 8.2786855736563252489063231915423647547782e+4047L),
12248 TEST_ff_f (pow, 0x1.0000000000000000000000000001p0L, -0x1.23456789abcdef0123456789abcdp125L, 1.2079212226420440237790185999167702696503e-4048L),
1bead169
JM		 12249#endif
12250
12251#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
601a3a5f
JM		 12252 TEST_ff_f (pow, 1e4932L, 0.75L, 1e3699L),
12253 TEST_ff_f (pow, 1e4928L, 0.75L, 1e3696L),
12254 TEST_ff_f (pow, 1e4924L, 0.75L, 1e3693L),
12255 TEST_ff_f (pow, 1e4920L, 0.75L, 1e3690L),
12256 TEST_ff_f (pow, 10.0L, 4932.0L, 1e4932L),
12257 TEST_ff_f (pow, 10.0L, 4931.0L, 1e4931L),
12258 TEST_ff_f (pow, 10.0L, 4930.0L, 1e4930L),
12259 TEST_ff_f (pow, 10.0L, 4929.0L, 1e4929L),
12260 TEST_ff_f (pow, 10.0L, -4931.0L, 1e-4931L),
12261 TEST_ff_f (pow, 10.0L, -4930.0L, 1e-4930L),
12262 TEST_ff_f (pow, 10.0L, -4929.0L, 1e-4929L),
12263 TEST_ff_f (pow, 1e27L, 182.0L, 1e4914L),
12264 TEST_ff_f (pow, 1e27L, -182.0L, 1e-4914L),
12265#endif
12266
12267 TEST_ff_f (pow, min_subnorm_value, min_subnorm_value, 1.0L),
12268 TEST_ff_f (pow, min_subnorm_value, -min_subnorm_value, 1.0L),
12269 TEST_ff_f (pow, max_value, min_subnorm_value, 1.0L),
12270 TEST_ff_f (pow, max_value, -min_subnorm_value, 1.0L),
12271 TEST_ff_f (pow, 0.99L, min_subnorm_value, 1.0L),
12272 TEST_ff_f (pow, 0.99L, -min_subnorm_value, 1.0L),
12273 TEST_ff_f (pow, 1.01L, min_subnorm_value, 1.0L),
12274 TEST_ff_f (pow, 1.01L, -min_subnorm_value, 1.0L),
12275
12276 TEST_ff_f (pow, 2.0L, -100000.0L, plus_zero, UNDERFLOW_EXCEPTION),
12277 END_DATA (pow)
12278 };
7a25eb06 12279
601a3a5f
JM		 12280static void
12281pow_test (void)
12282{
12283
12284 errno = 0;
12285 FUNC(pow) (0, 0);
12286 if (errno == ENOSYS)
12287 /* Function not implemented. */
12288 return;
12289
12290 START (pow);
12291 RUN_TEST_LOOP_ff_f (pow, pow_test_data, );
8847214f
UD		 12292 END (pow);
12293}
12294
b7cd39e8 12295
601a3a5f
JM		 12296static const struct test_ff_f_data pow_tonearest_test_data[] =
12297 {
12298 START_DATA (pow_tonearest),
12299 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12300 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12301 END_DATA (pow_tonearest)
12302 };
12303
b7cd39e8
JM		 12304static void
12305pow_test_tonearest (void)
12306{
b7cd39e8
JM		 12307 errno = 0;
12308 FUNC(pow) (0, 0);
12309 if (errno == ENOSYS)
12310 /* Function not implemented. */
12311 return;
12312
12313 START (pow_tonearest);
601a3a5f 12314 RUN_TEST_LOOP_ff_f (pow, pow_tonearest_test_data, FE_TONEAREST);
b7cd39e8
JM		 12315 END (pow_tonearest);
12316}
12317
12318
601a3a5f
JM		 12319static const struct test_ff_f_data pow_towardzero_test_data[] =
12320 {
12321 START_DATA (pow_towardzero),
12322 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12323 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12324 END_DATA (pow_towardzero)
12325 };
12326
b7cd39e8
JM		 12327static void
12328pow_test_towardzero (void)
12329{
b7cd39e8
JM		 12330 errno = 0;
12331 FUNC(pow) (0, 0);
12332 if (errno == ENOSYS)
12333 /* Function not implemented. */
12334 return;
12335
12336 START (pow_towardzero);
601a3a5f 12337 RUN_TEST_LOOP_ff_f (pow, pow_towardzero_test_data, FE_TOWARDZERO);
b7cd39e8
JM		 12338 END (pow_towardzero);
12339}
12340
12341
601a3a5f
JM		 12342static const struct test_ff_f_data pow_downward_test_data[] =
12343 {
12344 START_DATA (pow_downward),
12345 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12346 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12347 END_DATA (pow_downward)
12348 };
12349
b7cd39e8
JM		 12350static void
12351pow_test_downward (void)
12352{
b7cd39e8
JM		 12353 errno = 0;
12354 FUNC(pow) (0, 0);
12355 if (errno == ENOSYS)
12356 /* Function not implemented. */
12357 return;
12358
12359 START (pow_downward);
601a3a5f 12360 RUN_TEST_LOOP_ff_f (pow, pow_downward_test_data, FE_DOWNWARD);
b7cd39e8
JM		 12361 END (pow_downward);
12362}
12363
12364
601a3a5f
JM		 12365static const struct test_ff_f_data pow_upward_test_data[] =
12366 {
12367 START_DATA (pow_upward),
12368 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12369 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12370 END_DATA (pow_upward)
12371 };
12372
b7cd39e8
JM		 12373static void
12374pow_test_upward (void)
12375{
b7cd39e8
JM		 12376 errno = 0;
12377 FUNC(pow) (0, 0);
12378 if (errno == ENOSYS)
12379 /* Function not implemented. */
12380 return;
12381
12382 START (pow_upward);
601a3a5f 12383 RUN_TEST_LOOP_ff_f (pow, pow_upward_test_data, FE_UPWARD);
b7cd39e8
JM		 12384 END (pow_upward);
12385}
12386
12387
601a3a5f
JM		 12388static const struct test_ff_f_data remainder_test_data[] =
12389 {
12390 START_DATA (remainder),
12391 TEST_ff_f (remainder, 1, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12392 TEST_ff_f (remainder, 1, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12393 TEST_ff_f (remainder, plus_infty, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12394 TEST_ff_f (remainder, plus_infty, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12395 TEST_ff_f (remainder, plus_infty, 1, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12396 TEST_ff_f (remainder, plus_infty, 2, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12397 TEST_ff_f (remainder, minus_infty, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12398 TEST_ff_f (remainder, minus_infty, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12399 TEST_ff_f (remainder, minus_infty, 1, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12400 TEST_ff_f (remainder, minus_infty, 2, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12401 TEST_ff_f (remainder, qnan_value, qnan_value, qnan_value, ERRNO_UNCHANGED),
12402 TEST_ff_f (remainder, 0, qnan_value, qnan_value, ERRNO_UNCHANGED),
12403 TEST_ff_f (remainder, qnan_value, 0, qnan_value, ERRNO_UNCHANGED),
12404
12405 TEST_ff_f (remainder, 7.0, plus_infty, 7.0, ERRNO_UNCHANGED),
12406 TEST_ff_f (remainder, 7.0, minus_infty, 7.0, ERRNO_UNCHANGED),
12407
12408 TEST_ff_f (remainder, 1.625, 1.0, -0.375),
12409 TEST_ff_f (remainder, -1.625, 1.0, 0.375),
12410 TEST_ff_f (remainder, 1.625, -1.0, -0.375),
12411 TEST_ff_f (remainder, -1.625, -1.0, 0.375),
12412 TEST_ff_f (remainder, 5.0, 2.0, 1.0),
12413 TEST_ff_f (remainder, 3.0, 2.0, -1.0),
12414 END_DATA (remainder)
12415 };
12416
8847214f
UD		 12417static void
12418remainder_test (void)
12419{
aaca11d8
UD		 12420 errno = 0;
12421 FUNC(remainder) (1.625, 1.0);
12422 if (errno == ENOSYS)
12423 /* Function not implemented. */
12424 return;
8847214f
UD		 12425
12426 START (remainder);
601a3a5f 12427 RUN_TEST_LOOP_ff_f (remainder, remainder_test_data, );
8847214f
UD		 12428 END (remainder);
12429}
12430
12431static void
12432remquo_test (void)
12433{
12434 /* x is needed. */
12435 int x;
12436
aaca11d8
UD		 12437 errno = 0;
12438 FUNC(remquo) (1.625, 1.0, &x);
12439 if (errno == ENOSYS)
12440 /* Function not implemented. */
12441 return;
12442
8847214f
UD		 12443 START (remquo);
12444
67e971f1
TS		 12445 TEST_ffI_f1 (remquo, 1, 0, qnan_value, IGNORE, INVALID_EXCEPTION);
12446 TEST_ffI_f1 (remquo, 1, minus_zero, qnan_value, IGNORE, INVALID_EXCEPTION);
12447 TEST_ffI_f1 (remquo, plus_infty, 1, qnan_value, IGNORE, INVALID_EXCEPTION);
12448 TEST_ffI_f1 (remquo, minus_infty, 1, qnan_value, IGNORE, INVALID_EXCEPTION);
12449 TEST_ffI_f1 (remquo, qnan_value, qnan_value, qnan_value, IGNORE);
8847214f
UD		 12450
12451 TEST_ffI_f1 (remquo, 1.625, 1.0, -0.375, 2);
12452 TEST_ffI_f1 (remquo, -1.625, 1.0, 0.375, -2);
12453 TEST_ffI_f1 (remquo, 1.625, -1.0, -0.375, -2);
12454 TEST_ffI_f1 (remquo, -1.625, -1.0, 0.375, 2);
12455
12456 TEST_ffI_f1 (remquo, 5, 2, 1, 2);
12457 TEST_ffI_f1 (remquo, 3, 2, -1, 2);
12458
12459 END (remquo);
12460}
12461
74c57478
JM		 12462static const struct test_f_f_data rint_test_data[] =
12463 {
12464 START_DATA (rint),
12465 /* TODO: missing qNaN tests. */
12466
12467 TEST_f_f (rint, 0.0, 0.0),
12468 TEST_f_f (rint, minus_zero, minus_zero),
12469 TEST_f_f (rint, plus_infty, plus_infty),
12470 TEST_f_f (rint, minus_infty, minus_infty),
12471
12472 /* Default rounding mode is round to even. */
12473 TEST_f_f (rint, 0.5, 0.0),
12474 TEST_f_f (rint, 1.5, 2.0),
12475 TEST_f_f (rint, 2.5, 2.0),
12476 TEST_f_f (rint, 3.5, 4.0),
12477 TEST_f_f (rint, 4.5, 4.0),
12478 TEST_f_f (rint, -0.5, -0.0),
12479 TEST_f_f (rint, -1.5, -2.0),
12480 TEST_f_f (rint, -2.5, -2.0),
12481 TEST_f_f (rint, -3.5, -4.0),
12482 TEST_f_f (rint, -4.5, -4.0),
12483 TEST_f_f (rint, 0.1, 0.0),
12484 TEST_f_f (rint, 0.25, 0.0),
12485 TEST_f_f (rint, 0.625, 1.0),
12486 TEST_f_f (rint, -0.1, -0.0),
12487 TEST_f_f (rint, -0.25, -0.0),
12488 TEST_f_f (rint, -0.625, -1.0),
12489 TEST_f_f (rint, 262144.75, 262145.0),
12490 TEST_f_f (rint, 262142.75, 262143.0),
12491 TEST_f_f (rint, 524286.75, 524287.0),
12492 TEST_f_f (rint, 524288.75, 524289.0),
12493 TEST_f_f (rint, 1048576.75, 1048577.0),
12494 TEST_f_f (rint, 2097152.75, 2097153.0),
12495 TEST_f_f (rint, -1048576.75, -1048577.0),
12496 TEST_f_f (rint, -2097152.75, -2097153.0),
12497#ifndef TEST_FLOAT
12498 TEST_f_f (rint, 70368744177664.75, 70368744177665.0),
12499 TEST_f_f (rint, 140737488355328.75, 140737488355329.0),
12500 TEST_f_f (rint, 281474976710656.75, 281474976710657.0),
12501 TEST_f_f (rint, 562949953421312.75, 562949953421313.0),
12502 TEST_f_f (rint, 1125899906842624.75, 1125899906842625.0),
12503 TEST_f_f (rint, -70368744177664.75, -70368744177665.0),
12504 TEST_f_f (rint, -140737488355328.75, -140737488355329.0),
12505 TEST_f_f (rint, -281474976710656.75, -281474976710657.0),
12506 TEST_f_f (rint, -562949953421312.75, -562949953421313.0),
12507 TEST_f_f (rint, -1125899906842624.75, -1125899906842625.0),
fe45ce09 12508#endif
f964490f 12509#ifdef TEST_LDOUBLE
74c57478
JM		 12510 /* The result can only be represented in long double. */
12511 TEST_f_f (rint, 4503599627370495.5L, 4503599627370496.0L),
12512 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12513 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12514 TEST_f_f (rint, 4503599627370496.75L, 4503599627370497.0L),
12515 TEST_f_f (rint, 4503599627370497.5L, 4503599627370498.0L),
830fce04 12516
5c68d401 12517# if LDBL_MANT_DIG > 100
74c57478
JM		 12518 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370495.0L),
12519 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370496.0L),
12520 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370497.0L),
5c68d401 12521# endif
f964490f 12522
74c57478
JM		 12523 TEST_f_f (rint, -4503599627370495.5L, -4503599627370496.0L),
12524 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12525 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12526 TEST_f_f (rint, -4503599627370496.75L, -4503599627370497.0L),
12527 TEST_f_f (rint, -4503599627370497.5L, -4503599627370498.0L),
830fce04 12528
5c68d401 12529# if LDBL_MANT_DIG > 100
74c57478
JM		 12530 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370495.0L),
12531 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370496.0L),
12532 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370497.0L),
12533
12534 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12535 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12536 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12537 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740992.0L),
12538 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740993.0L),
12539 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740994.0L),
12540
12541 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12542 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12543 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12544 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740992.0L),
12545 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740993.0L),
12546 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740994.0L),
5c68d401 12547# endif
f964490f 12548
74c57478
JM		 12549 TEST_f_f (rint, 9007199254740991.5L, 9007199254740992.0L),
12550 TEST_f_f (rint, 9007199254740992.25L, 9007199254740992.0L),
12551 TEST_f_f (rint, 9007199254740992.5L, 9007199254740992.0L),
12552 TEST_f_f (rint, 9007199254740992.75L, 9007199254740993.0L),
12553 TEST_f_f (rint, 9007199254740993.5L, 9007199254740994.0L),
12554
12555 TEST_f_f (rint, -9007199254740991.5L, -9007199254740992.0L),
12556 TEST_f_f (rint, -9007199254740992.25L, -9007199254740992.0L),
12557 TEST_f_f (rint, -9007199254740992.5L, -9007199254740992.0L),
12558 TEST_f_f (rint, -9007199254740992.75L, -9007199254740993.0L),
12559 TEST_f_f (rint, -9007199254740993.5L, -9007199254740994.0L),
12560
12561 TEST_f_f (rint, 72057594037927935.5L, 72057594037927936.0L),
12562 TEST_f_f (rint, 72057594037927936.25L, 72057594037927936.0L),
12563 TEST_f_f (rint, 72057594037927936.5L, 72057594037927936.0L),
12564 TEST_f_f (rint, 72057594037927936.75L, 72057594037927937.0L),
12565 TEST_f_f (rint, 72057594037927937.5L, 72057594037927938.0L),
12566
12567 TEST_f_f (rint, -72057594037927935.5L, -72057594037927936.0L),
12568 TEST_f_f (rint, -72057594037927936.25L, -72057594037927936.0L),
12569 TEST_f_f (rint, -72057594037927936.5L, -72057594037927936.0L),
12570 TEST_f_f (rint, -72057594037927936.75L, -72057594037927937.0L),
12571 TEST_f_f (rint, -72057594037927937.5L, -72057594037927938.0L),
12572
12573 TEST_f_f (rint, 10141204801825835211973625643007.5L, 10141204801825835211973625643008.0L),
12574 TEST_f_f (rint, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
12575 TEST_f_f (rint, 10141204801825835211973625643008.5L, 10141204801825835211973625643008.0L),
12576 TEST_f_f (rint, 10141204801825835211973625643008.75L, 10141204801825835211973625643009.0L),
12577 TEST_f_f (rint, 10141204801825835211973625643009.5L, 10141204801825835211973625643010.0L),
12578#endif
12579 END_DATA (rint)
12580 };
1dc23588 12581
74c57478
JM		 12582static void
12583rint_test (void)
12584{
12585 START (rint);
12586 RUN_TEST_LOOP_f_f (rint, rint_test_data, );
8847214f
UD		 12587 END (rint);
12588}
12589
74c57478
JM		 12590static const struct test_f_f_data rint_tonearest_test_data[] =
12591 {
12592 START_DATA (rint_tonearest),
12593 TEST_f_f (rint, 2.0, 2.0),
12594 TEST_f_f (rint, 1.5, 2.0),
12595 TEST_f_f (rint, 1.0, 1.0),
12596 TEST_f_f (rint, 0.5, 0.0),
12597 TEST_f_f (rint, 0.0, 0.0),
12598 TEST_f_f (rint, minus_zero, minus_zero),
12599 TEST_f_f (rint, -0.5, -0.0),
12600 TEST_f_f (rint, -1.0, -1.0),
12601 TEST_f_f (rint, -1.5, -2.0),
12602 TEST_f_f (rint, -2.0, -2.0),
12603 TEST_f_f (rint, 0.1, 0.0),
12604 TEST_f_f (rint, 0.25, 0.0),
12605 TEST_f_f (rint, 0.625, 1.0),
12606 TEST_f_f (rint, -0.1, -0.0),
12607 TEST_f_f (rint, -0.25, -0.0),
12608 TEST_f_f (rint, -0.625, -1.0),
12609 TEST_f_f (rint, 1048576.75, 1048577.0),
12610 TEST_f_f (rint, 2097152.75, 2097153.0),
12611 TEST_f_f (rint, -1048576.75, -1048577.0),
12612 TEST_f_f (rint, -2097152.75, -2097153.0),
12613#ifndef TEST_FLOAT
12614 TEST_f_f (rint, 70368744177664.75, 70368744177665.0),
12615 TEST_f_f (rint, 140737488355328.75, 140737488355329.0),
12616 TEST_f_f (rint, 281474976710656.75, 281474976710657.0),
12617 TEST_f_f (rint, 562949953421312.75, 562949953421313.0),
12618 TEST_f_f (rint, 1125899906842624.75, 1125899906842625.0),
12619 TEST_f_f (rint, -70368744177664.75, -70368744177665.0),
12620 TEST_f_f (rint, -140737488355328.75, -140737488355329.0),
12621 TEST_f_f (rint, -281474976710656.75, -281474976710657.0),
12622 TEST_f_f (rint, -562949953421312.75, -562949953421313.0),
12623 TEST_f_f (rint, -1125899906842624.75, -1125899906842625.0),
12624#endif
12625#ifdef TEST_LDOUBLE
12626 /* The result can only be represented in long double. */
12627 TEST_f_f (rint, 4503599627370495.5L, 4503599627370496.0L),
12628 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12629 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12630 TEST_f_f (rint, 4503599627370496.75L, 4503599627370497.0L),
12631 TEST_f_f (rint, 4503599627370497.5L, 4503599627370498.0L),
12632# if LDBL_MANT_DIG > 100
12633 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370495.0L),
12634 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370496.0L),
12635 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370497.0L),
12636# endif
12637 TEST_f_f (rint, -4503599627370495.5L, -4503599627370496.0L),
12638 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12639 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12640 TEST_f_f (rint, -4503599627370496.75L, -4503599627370497.0L),
12641 TEST_f_f (rint, -4503599627370497.5L, -4503599627370498.0L),
12642# if LDBL_MANT_DIG > 100
12643 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370495.0L),
12644 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370496.0L),
12645 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370497.0L),
12646
12647 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12648 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12649 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12650 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740992.0L),
12651 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740993.0L),
12652 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740994.0L),
12653
12654 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12655 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12656 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12657 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740992.0L),
12658 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740993.0L),
12659 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740994.0L),
12660# endif
12661#endif
12662 END_DATA (rint_tonearest)
12663 };
12664
4d37c8aa
UD		 12665static void
12666rint_test_tonearest (void)
12667{
4d37c8aa 12668 START (rint_tonearest);
74c57478
JM		 12669 RUN_TEST_LOOP_f_f (rint, rint_tonearest_test_data, FE_TONEAREST);
12670 END (rint_tonearest);
12671}
4d37c8aa 12672
74c57478
JM		 12673static const struct test_f_f_data rint_towardzero_test_data[] =
12674 {
12675 START_DATA (rint_towardzero),
12676 TEST_f_f (rint, 2.0, 2.0),
12677 TEST_f_f (rint, 1.5, 1.0),
12678 TEST_f_f (rint, 1.0, 1.0),
12679 TEST_f_f (rint, 0.5, 0.0),
12680 TEST_f_f (rint, 0.0, 0.0),
12681 TEST_f_f (rint, minus_zero, minus_zero),
12682 TEST_f_f (rint, -0.5, -0.0),
12683 TEST_f_f (rint, -1.0, -1.0),
12684 TEST_f_f (rint, -1.5, -1.0),
12685 TEST_f_f (rint, -2.0, -2.0),
12686 TEST_f_f (rint, 0.1, 0.0),
12687 TEST_f_f (rint, 0.25, 0.0),
12688 TEST_f_f (rint, 0.625, 0.0),
12689 TEST_f_f (rint, -0.1, -0.0),
12690 TEST_f_f (rint, -0.25, -0.0),
12691 TEST_f_f (rint, -0.625, -0.0),
12692 TEST_f_f (rint, 1048576.75, 1048576.0),
12693 TEST_f_f (rint, 2097152.75, 2097152.0),
12694 TEST_f_f (rint, -1048576.75, -1048576.0),
12695 TEST_f_f (rint, -2097152.75, -2097152.0),
12696#ifndef TEST_FLOAT
12697 TEST_f_f (rint, 70368744177664.75, 70368744177664.0),
12698 TEST_f_f (rint, 140737488355328.75, 140737488355328.0),
12699 TEST_f_f (rint, 281474976710656.75, 281474976710656.0),
12700 TEST_f_f (rint, 562949953421312.75, 562949953421312.0),
12701 TEST_f_f (rint, 1125899906842624.75, 1125899906842624.0),
12702 TEST_f_f (rint, -70368744177664.75, -70368744177664.0),
12703 TEST_f_f (rint, -140737488355328.75, -140737488355328.0),
12704 TEST_f_f (rint, -281474976710656.75, -281474976710656.0),
12705 TEST_f_f (rint, -562949953421312.75, -562949953421312.0),
12706 TEST_f_f (rint, -1125899906842624.75, -1125899906842624.0),
fe45ce09 12707#endif
5c68d401 12708#ifdef TEST_LDOUBLE
74c57478
JM		 12709 /* The result can only be represented in long double. */
12710 TEST_f_f (rint, 4503599627370495.5L, 4503599627370495.0L),
12711 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12712 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12713 TEST_f_f (rint, 4503599627370496.75L, 4503599627370496.0L),
12714 TEST_f_f (rint, 4503599627370497.5L, 4503599627370497.0L),
5c68d401 12715# if LDBL_MANT_DIG > 100
74c57478
JM		 12716 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370494.0L),
12717 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370495.0L),
12718 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370496.0L),
5c68d401 12719# endif
74c57478
JM		 12720 TEST_f_f (rint, -4503599627370495.5L, -4503599627370495.0L),
12721 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12722 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12723 TEST_f_f (rint, -4503599627370496.75L, -4503599627370496.0L),
12724 TEST_f_f (rint, -4503599627370497.5L, -4503599627370497.0L),
5c68d401 12725# if LDBL_MANT_DIG > 100
74c57478
JM		 12726 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370494.0L),
12727 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370495.0L),
12728 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370496.0L),
12729
12730 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12731 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12732 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12733 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740991.0L),
12734 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740992.0L),
12735 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740993.0L),
12736
12737 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12738 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12739 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12740 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740991.0L),
12741 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740992.0L),
12742 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740993.0L),
5c68d401
RM		 12743# endif
12744#endif
74c57478
JM		 12745 END_DATA (rint_towardzero)
12746 };
4d37c8aa
UD		 12747
12748static void
12749rint_test_towardzero (void)
12750{
4d37c8aa 12751 START (rint_towardzero);
74c57478
JM		 12752 RUN_TEST_LOOP_f_f (rint, rint_towardzero_test_data, FE_TOWARDZERO);
12753 END (rint_towardzero);
12754}
4d37c8aa 12755
74c57478
JM		 12756static const struct test_f_f_data rint_downward_test_data[] =
12757 {
12758 START_DATA (rint_downward),
12759 TEST_f_f (rint, 2.0, 2.0),
12760 TEST_f_f (rint, 1.5, 1.0),
12761 TEST_f_f (rint, 1.0, 1.0),
12762 TEST_f_f (rint, 0.5, 0.0),
12763 TEST_f_f (rint, 0.0, 0.0),
12764 TEST_f_f (rint, minus_zero, minus_zero),
12765 TEST_f_f (rint, -0.5, -1.0),
12766 TEST_f_f (rint, -1.0, -1.0),
12767 TEST_f_f (rint, -1.5, -2.0),
12768 TEST_f_f (rint, -2.0, -2.0),
12769 TEST_f_f (rint, 0.1, 0.0),
12770 TEST_f_f (rint, 0.25, 0.0),
12771 TEST_f_f (rint, 0.625, 0.0),
12772 TEST_f_f (rint, -0.1, -1.0),
12773 TEST_f_f (rint, -0.25, -1.0),
12774 TEST_f_f (rint, -0.625, -1.0),
12775 TEST_f_f (rint, 1048576.75, 1048576.0),
12776 TEST_f_f (rint, 2097152.75, 2097152.0),
12777 TEST_f_f (rint, -1048576.75, -1048577.0),
12778 TEST_f_f (rint, -2097152.75, -2097153.0),
12779#ifndef TEST_FLOAT
12780 TEST_f_f (rint, 70368744177664.75, 70368744177664.0),
12781 TEST_f_f (rint, 140737488355328.75, 140737488355328.0),
12782 TEST_f_f (rint, 281474976710656.75, 281474976710656.0),
12783 TEST_f_f (rint, 562949953421312.75, 562949953421312.0),
12784 TEST_f_f (rint, 1125899906842624.75, 1125899906842624.0),
12785 TEST_f_f (rint, -70368744177664.75, -70368744177665.0),
12786 TEST_f_f (rint, -140737488355328.75, -140737488355329.0),
12787 TEST_f_f (rint, -281474976710656.75, -281474976710657.0),
12788 TEST_f_f (rint, -562949953421312.75, -562949953421313.0),
12789 TEST_f_f (rint, -1125899906842624.75, -1125899906842625.0),
fe45ce09 12790#endif
5c68d401 12791#ifdef TEST_LDOUBLE
74c57478
JM		 12792 /* The result can only be represented in long double. */
12793 TEST_f_f (rint, 4503599627370495.5L, 4503599627370495.0L),
12794 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12795 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12796 TEST_f_f (rint, 4503599627370496.75L, 4503599627370496.0L),
12797 TEST_f_f (rint, 4503599627370497.5L, 4503599627370497.0L),
5c68d401 12798# if LDBL_MANT_DIG > 100
74c57478
JM		 12799 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370494.0L),
12800 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370495.0L),
12801 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370496.0L),
5c68d401 12802# endif
74c57478
JM		 12803 TEST_f_f (rint, -4503599627370495.5L, -4503599627370496.0L),
12804 TEST_f_f (rint, -4503599627370496.25L, -4503599627370497.0L),
12805 TEST_f_f (rint, -4503599627370496.5L, -4503599627370497.0L),
12806 TEST_f_f (rint, -4503599627370496.75L, -4503599627370497.0L),
12807 TEST_f_f (rint, -4503599627370497.5L, -4503599627370498.0L),
5c68d401 12808# if LDBL_MANT_DIG > 100
74c57478
JM		 12809 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370495.0L),
12810 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370496.0L),
12811 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370497.0L),
12812
12813 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12814 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12815 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12816 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740991.0L),
12817 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740992.0L),
12818 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740993.0L),
12819
12820 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740992.0L),
12821 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740993.0L),
12822 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740994.0L),
12823 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740992.0L),
12824 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740993.0L),
12825 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740994.0L),
5c68d401
RM		 12826# endif
12827#endif
74c57478
JM		 12828 END_DATA (rint_downward)
12829 };
4d37c8aa
UD		 12830
12831static void
12832rint_test_downward (void)
12833{
4d37c8aa 12834 START (rint_downward);
74c57478
JM		 12835 RUN_TEST_LOOP_f_f (rint, rint_downward_test_data, FE_DOWNWARD);
12836 END (rint_downward);
12837}
4d37c8aa 12838
74c57478
JM		 12839static const struct test_f_f_data rint_upward_test_data[] =
12840 {
12841 START_DATA (rint_upward),
12842 TEST_f_f (rint, 2.0, 2.0),
12843 TEST_f_f (rint, 1.5, 2.0),
12844 TEST_f_f (rint, 1.0, 1.0),
12845 TEST_f_f (rint, 0.5, 1.0),
12846 TEST_f_f (rint, 0.0, 0.0),
12847 TEST_f_f (rint, minus_zero, minus_zero),
12848 TEST_f_f (rint, -0.5, -0.0),
12849 TEST_f_f (rint, -1.0, -1.0),
12850 TEST_f_f (rint, -1.5, -1.0),
12851 TEST_f_f (rint, -2.0, -2.0),
12852 TEST_f_f (rint, 0.1, 1.0),
12853 TEST_f_f (rint, 0.25, 1.0),
12854 TEST_f_f (rint, 0.625, 1.0),
12855 TEST_f_f (rint, -0.1, -0.0),
12856 TEST_f_f (rint, -0.25, -0.0),
12857 TEST_f_f (rint, -0.625, -0.0),
12858 TEST_f_f (rint, 1048576.75, 1048577.0),
12859 TEST_f_f (rint, 2097152.75, 2097153.0),
12860 TEST_f_f (rint, -1048576.75, -1048576.0),
12861 TEST_f_f (rint, -2097152.75, -2097152.0),
12862#ifndef TEST_FLOAT
12863 TEST_f_f (rint, 70368744177664.75, 70368744177665.0),
12864 TEST_f_f (rint, 140737488355328.75, 140737488355329.0),
12865 TEST_f_f (rint, 281474976710656.75, 281474976710657.0),
12866 TEST_f_f (rint, 562949953421312.75, 562949953421313.0),
12867 TEST_f_f (rint, 1125899906842624.75, 1125899906842625.0),
12868 TEST_f_f (rint, -70368744177664.75, -70368744177664.0),
12869 TEST_f_f (rint, -140737488355328.75, -140737488355328.0),
12870 TEST_f_f (rint, -281474976710656.75, -281474976710656.0),
12871 TEST_f_f (rint, -562949953421312.75, -562949953421312.0),
12872 TEST_f_f (rint, -1125899906842624.75, -1125899906842624.0),
fe45ce09 12873#endif
5c68d401 12874#ifdef TEST_LDOUBLE
74c57478
JM		 12875 /* The result can only be represented in long double. */
12876 TEST_f_f (rint, 4503599627370495.5L, 4503599627370496.0L),
12877 TEST_f_f (rint, 4503599627370496.25L, 4503599627370497.0L),
12878 TEST_f_f (rint, 4503599627370496.5L, 4503599627370497.0L),
12879 TEST_f_f (rint, 4503599627370496.75L, 4503599627370497.0L),
12880 TEST_f_f (rint, 4503599627370497.5L, 4503599627370498.0L),
5c68d401 12881# if LDBL_MANT_DIG > 100
74c57478
JM		 12882 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370495.0L),
12883 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370496.0L),
12884 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370497.0L),
5c68d401 12885# endif
74c57478
JM		 12886 TEST_f_f (rint, -4503599627370495.5L, -4503599627370495.0L),
12887 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12888 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12889 TEST_f_f (rint, -4503599627370496.75L, -4503599627370496.0L),
12890 TEST_f_f (rint, -4503599627370497.5L, -4503599627370497.0L),
5c68d401 12891# if LDBL_MANT_DIG > 100
74c57478
JM		 12892 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370494.0L),
12893 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370495.0L),
12894 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370496.0L),
12895
12896 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740992.0L),
12897 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740993.0L),
12898 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740994.0L),
12899 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740992.0L),
12900 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740993.0L),
12901 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740994.0L),
12902
12903 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12904 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12905 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12906 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740991.0L),
12907 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740992.0L),
12908 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740993.0L),
5c68d401
RM		 12909# endif
12910#endif
74c57478
JM		 12911 END_DATA (rint_upward)
12912 };
4d37c8aa
UD		 12913
12914static void
12915rint_test_upward (void)
12916{
4d37c8aa 12917 START (rint_upward);
74c57478 12918 RUN_TEST_LOOP_f_f (rint, rint_upward_test_data, FE_UPWARD);
4d37c8aa
UD		 12919 END (rint_upward);
12920}
12921
74c57478
JM		 12922static const struct test_f_f_data round_test_data[] =
12923 {
12924 START_DATA (round),
12925 /* TODO: missing +/-Inf as well as qNaN tests. */
12926
12927 TEST_f_f (round, 0, 0),
12928 TEST_f_f (round, minus_zero, minus_zero),
12929 TEST_f_f (round, 0.2L, 0.0),
12930 TEST_f_f (round, -0.2L, minus_zero),
12931 TEST_f_f (round, 0.5, 1.0),
12932 TEST_f_f (round, -0.5, -1.0),
12933 TEST_f_f (round, 0.8L, 1.0),
12934 TEST_f_f (round, -0.8L, -1.0),
12935 TEST_f_f (round, 1.5, 2.0),
12936 TEST_f_f (round, -1.5, -2.0),
12937 TEST_f_f (round, 0.1, 0.0),
12938 TEST_f_f (round, 0.25, 0.0),
12939 TEST_f_f (round, 0.625, 1.0),
12940 TEST_f_f (round, -0.1, -0.0),
12941 TEST_f_f (round, -0.25, -0.0),
12942 TEST_f_f (round, -0.625, -1.0),
12943 TEST_f_f (round, 2097152.5, 2097153),
12944 TEST_f_f (round, -2097152.5, -2097153),
8847214f 12945
f964490f 12946#ifdef TEST_LDOUBLE
74c57478
JM		 12947 /* The result can only be represented in long double. */
12948 TEST_f_f (round, 4503599627370495.5L, 4503599627370496.0L),
12949 TEST_f_f (round, 4503599627370496.25L, 4503599627370496.0L),
12950 TEST_f_f (round, 4503599627370496.5L, 4503599627370497.0L),
12951 TEST_f_f (round, 4503599627370496.75L, 4503599627370497.0L),
12952 TEST_f_f (round, 4503599627370497.5L, 4503599627370498.0L),
5c68d401 12953# if LDBL_MANT_DIG > 100
74c57478
JM		 12954 TEST_f_f (round, 4503599627370494.5000000000001L, 4503599627370495.0L),
12955 TEST_f_f (round, 4503599627370495.5000000000001L, 4503599627370496.0L),
12956 TEST_f_f (round, 4503599627370496.5000000000001L, 4503599627370497.0L),
5c68d401 12957# endif
f964490f 12958
74c57478
JM		 12959 TEST_f_f (round, -4503599627370495.5L, -4503599627370496.0L),
12960 TEST_f_f (round, -4503599627370496.25L, -4503599627370496.0L),
12961 TEST_f_f (round, -4503599627370496.5L, -4503599627370497.0L),
12962 TEST_f_f (round, -4503599627370496.75L, -4503599627370497.0L),
12963 TEST_f_f (round, -4503599627370497.5L, -4503599627370498.0L),
5c68d401 12964# if LDBL_MANT_DIG > 100
74c57478
JM		 12965 TEST_f_f (round, -4503599627370494.5000000000001L, -4503599627370495.0L),
12966 TEST_f_f (round, -4503599627370495.5000000000001L, -4503599627370496.0L),
12967 TEST_f_f (round, -4503599627370496.5000000000001L, -4503599627370497.0L),
5c68d401 12968# endif
f964490f 12969
74c57478
JM		 12970 TEST_f_f (round, 9007199254740991.5L, 9007199254740992.0L),
12971 TEST_f_f (round, 9007199254740992.25L, 9007199254740992.0L),
12972 TEST_f_f (round, 9007199254740992.5L, 9007199254740993.0L),
12973 TEST_f_f (round, 9007199254740992.75L, 9007199254740993.0L),
12974 TEST_f_f (round, 9007199254740993.5L, 9007199254740994.0L),
f964490f 12975
74c57478
JM		 12976 TEST_f_f (round, -9007199254740991.5L, -9007199254740992.0L),
12977 TEST_f_f (round, -9007199254740992.25L, -9007199254740992.0L),
12978 TEST_f_f (round, -9007199254740992.5L, -9007199254740993.0L),
12979 TEST_f_f (round, -9007199254740992.75L, -9007199254740993.0L),
12980 TEST_f_f (round, -9007199254740993.5L, -9007199254740994.0L),
f964490f 12981
5c68d401 12982# if LDBL_MANT_DIG > 100
74c57478
JM		 12983 TEST_f_f (round, 9007199254740991.0000000000001L, 9007199254740991.0L),
12984 TEST_f_f (round, 9007199254740992.0000000000001L, 9007199254740992.0L),
12985 TEST_f_f (round, 9007199254740993.0000000000001L, 9007199254740993.0L),
12986 TEST_f_f (round, 9007199254740991.5000000000001L, 9007199254740992.0L),
12987 TEST_f_f (round, 9007199254740992.5000000000001L, 9007199254740993.0L),
12988 TEST_f_f (round, 9007199254740993.5000000000001L, 9007199254740994.0L),
12989
12990 TEST_f_f (round, -9007199254740991.0000000000001L, -9007199254740991.0L),
12991 TEST_f_f (round, -9007199254740992.0000000000001L, -9007199254740992.0L),
12992 TEST_f_f (round, -9007199254740993.0000000000001L, -9007199254740993.0L),
12993 TEST_f_f (round, -9007199254740991.5000000000001L, -9007199254740992.0L),
12994 TEST_f_f (round, -9007199254740992.5000000000001L, -9007199254740993.0L),
12995 TEST_f_f (round, -9007199254740993.5000000000001L, -9007199254740994.0L),
5c68d401
RM		 12996# endif
12997
74c57478
JM		 12998 TEST_f_f (round, 72057594037927935.5L, 72057594037927936.0L),
12999 TEST_f_f (round, 72057594037927936.25L, 72057594037927936.0L),
13000 TEST_f_f (round, 72057594037927936.5L, 72057594037927937.0L),
13001 TEST_f_f (round, 72057594037927936.75L, 72057594037927937.0L),
13002 TEST_f_f (round, 72057594037927937.5L, 72057594037927938.0L),
13003
13004 TEST_f_f (round, -72057594037927935.5L, -72057594037927936.0L),
13005 TEST_f_f (round, -72057594037927936.25L, -72057594037927936.0L),
13006 TEST_f_f (round, -72057594037927936.5L, -72057594037927937.0L),
13007 TEST_f_f (round, -72057594037927936.75L, -72057594037927937.0L),
13008 TEST_f_f (round, -72057594037927937.5L, -72057594037927938.0L),
13009
13010 TEST_f_f (round, 10141204801825835211973625643007.5L, 10141204801825835211973625643008.0L),
13011 TEST_f_f (round, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
13012 TEST_f_f (round, 10141204801825835211973625643008.5L, 10141204801825835211973625643009.0L),
13013 TEST_f_f (round, 10141204801825835211973625643008.75L, 10141204801825835211973625643009.0L),
13014 TEST_f_f (round, 10141204801825835211973625643009.5L, 10141204801825835211973625643010.0L),
13015#endif
13016 END_DATA (round)
13017 };
f964490f 13018
74c57478
JM		 13019static void
13020round_test (void)
13021{
13022 START (round);
13023 RUN_TEST_LOOP_f_f (round, round_test_data, );
8847214f
UD		 13024 END (round);
13025}
13026
13027
601a3a5f
JM		 13028static const struct test_ff_f_data scalb_test_data[] =
13029 {
13030 START_DATA (scalb),
13031 TEST_ff_f (scalb, 2.0, 0.5, qnan_value, INVALID_EXCEPTION),
13032 TEST_ff_f (scalb, 3.0, -2.5, qnan_value, INVALID_EXCEPTION),
13033
13034 TEST_ff_f (scalb, 0, qnan_value, qnan_value),
13035 TEST_ff_f (scalb, 1, qnan_value, qnan_value),
13036
13037 TEST_ff_f (scalb, 1, 0, 1),
13038 TEST_ff_f (scalb, -1, 0, -1),
13039
13040 TEST_ff_f (scalb, 0, plus_infty, qnan_value, INVALID_EXCEPTION),
13041 TEST_ff_f (scalb, minus_zero, plus_infty, qnan_value, INVALID_EXCEPTION),
13042
13043 TEST_ff_f (scalb, 0, 2, 0),
13044 TEST_ff_f (scalb, minus_zero, -4, minus_zero),
13045 TEST_ff_f (scalb, 0, 0, 0),
13046 TEST_ff_f (scalb, minus_zero, 0, minus_zero),
13047 TEST_ff_f (scalb, 0, -1, 0),
13048 TEST_ff_f (scalb, minus_zero, -10, minus_zero),
13049 TEST_ff_f (scalb, 0, minus_infty, 0),
13050 TEST_ff_f (scalb, minus_zero, minus_infty, minus_zero),
13051
13052 TEST_ff_f (scalb, plus_infty, -1, plus_infty),
13053 TEST_ff_f (scalb, minus_infty, -10, minus_infty),
13054 TEST_ff_f (scalb, plus_infty, 0, plus_infty),
13055 TEST_ff_f (scalb, minus_infty, 0, minus_infty),
13056 TEST_ff_f (scalb, plus_infty, 2, plus_infty),
13057 TEST_ff_f (scalb, minus_infty, 100, minus_infty),
13058
13059 TEST_ff_f (scalb, 0.1L, minus_infty, 0.0),
13060 TEST_ff_f (scalb, -0.1L, minus_infty, minus_zero),
13061
13062 TEST_ff_f (scalb, 1, plus_infty, plus_infty),
13063 TEST_ff_f (scalb, -1, plus_infty, minus_infty),
13064 TEST_ff_f (scalb, plus_infty, plus_infty, plus_infty),
13065 TEST_ff_f (scalb, minus_infty, plus_infty, minus_infty),
13066
13067 TEST_ff_f (scalb, plus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
13068 TEST_ff_f (scalb, minus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
13069
13070 TEST_ff_f (scalb, qnan_value, 1, qnan_value),
13071 TEST_ff_f (scalb, 1, qnan_value, qnan_value),
13072 TEST_ff_f (scalb, qnan_value, 0, qnan_value),
13073 TEST_ff_f (scalb, 0, qnan_value, qnan_value),
13074 TEST_ff_f (scalb, qnan_value, plus_infty, qnan_value),
13075 TEST_ff_f (scalb, plus_infty, qnan_value, qnan_value),
13076 TEST_ff_f (scalb, qnan_value, qnan_value, qnan_value),
13077
13078 TEST_ff_f (scalb, 0.8L, 4, 12.8L),
13079 TEST_ff_f (scalb, -0.854375L, 5, -27.34L),
13080 END_DATA (scalb)
13081 };
13082
8847214f
UD		 13083static void
13084scalb_test (void)
13085{
13086
13087 START (scalb);
601a3a5f 13088 RUN_TEST_LOOP_ff_f (scalb, scalb_test_data, );
8847214f
UD		 13089 END (scalb);
13090}
13091
13092
13093static void
13094scalbn_test (void)
13095{
13096
13097 START (scalbn);
13098
13099 TEST_fi_f (scalbn, 0, 0, 0);
13100 TEST_fi_f (scalbn, minus_zero, 0, minus_zero);
13101
13102 TEST_fi_f (scalbn, plus_infty, 1, plus_infty);
13103 TEST_fi_f (scalbn, minus_infty, 1, minus_infty);
67e971f1 13104 TEST_fi_f (scalbn, qnan_value, 1, qnan_value);
8847214f
UD		 13105
13106 TEST_fi_f (scalbn, 0.8L, 4, 12.8L);
13107 TEST_fi_f (scalbn, -0.854375L, 5, -27.34L);
13108
13109 TEST_fi_f (scalbn, 1, 0L, 1);
13110
c135cc1b 13111 TEST_fi_f (scalbn, 1, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13112 TEST_fi_f (scalbn, 1, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
c135cc1b 13113 TEST_fi_f (scalbn, max_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13114 TEST_fi_f (scalbn, max_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
c135cc1b 13115 TEST_fi_f (scalbn, min_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13116 TEST_fi_f (scalbn, min_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
c135cc1b 13117 TEST_fi_f (scalbn, min_value / 4, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13118 TEST_fi_f (scalbn, min_value / 4, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
a6d06d7b 13119
8847214f
UD		 13120 END (scalbn);
13121}
13122
2550dfe9 13123
8847214f
UD		 13124static void
13125scalbln_test (void)
13126{
13127
13128 START (scalbln);
13129
13130 TEST_fl_f (scalbln, 0, 0, 0);
13131 TEST_fl_f (scalbln, minus_zero, 0, minus_zero);
13132
13133 TEST_fl_f (scalbln, plus_infty, 1, plus_infty);
13134 TEST_fl_f (scalbln, minus_infty, 1, minus_infty);
67e971f1 13135 TEST_fl_f (scalbln, qnan_value, 1, qnan_value);
8847214f
UD		 13136
13137 TEST_fl_f (scalbln, 0.8L, 4, 12.8L);
13138 TEST_fl_f (scalbln, -0.854375L, 5, -27.34L);
13139
13140 TEST_fl_f (scalbln, 1, 0L, 1);
13141
c135cc1b 13142 TEST_fi_f (scalbln, 1, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13143 TEST_fi_f (scalbln, 1, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
c135cc1b 13144 TEST_fi_f (scalbln, max_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13145 TEST_fi_f (scalbln, max_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
c135cc1b 13146 TEST_fi_f (scalbln, min_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13147 TEST_fi_f (scalbln, min_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
c135cc1b 13148 TEST_fi_f (scalbln, min_value / 4, INT_MAX, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13149 TEST_fi_f (scalbln, min_value / 4, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION);
a6d06d7b 13150
c135cc1b 13151 TEST_fi_f (scalbln, 1, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13152 TEST_fi_f (scalbln, 1, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION);
c135cc1b 13153 TEST_fi_f (scalbln, max_value, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13154 TEST_fi_f (scalbln, max_value, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION);
c135cc1b 13155 TEST_fi_f (scalbln, min_value, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13156 TEST_fi_f (scalbln, min_value, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION);
c135cc1b 13157 TEST_fi_f (scalbln, min_value / 4, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13158 TEST_fi_f (scalbln, min_value / 4, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION);
a6d06d7b
JM		 13159
13160#if LONG_MAX >= 0x100000000
c135cc1b 13161 TEST_fi_f (scalbln, 1, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13162 TEST_fi_f (scalbln, 1, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION);
c135cc1b 13163 TEST_fi_f (scalbln, max_value, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13164 TEST_fi_f (scalbln, max_value, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION);
c135cc1b 13165 TEST_fi_f (scalbln, min_value, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13166 TEST_fi_f (scalbln, min_value, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION);
c135cc1b 13167 TEST_fi_f (scalbln, min_value / 4, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION);
80bad0cc 13168 TEST_fi_f (scalbln, min_value / 4, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION);
a6d06d7b
JM		 13169#endif
13170
8847214f
UD		 13171 END (scalbn);
13172}
13173
2550dfe9 13174
8847214f
UD		 13175static void
13176signbit_test (void)
13177{
64d063b8 13178 /* TODO: missing qNaN tests. */
8847214f
UD		 13179
13180 START (signbit);
13181
13182 TEST_f_b (signbit, 0, 0);
13183 TEST_f_b (signbit, minus_zero, 1);
13184 TEST_f_b (signbit, plus_infty, 0);
13185 TEST_f_b (signbit, minus_infty, 1);
13186
13187 /* signbit (x) != 0 for x < 0. */
13188 TEST_f_b (signbit, -1, 1);
13189 /* signbit (x) == 0 for x >= 0. */
13190 TEST_f_b (signbit, 1, 0);
13191
13192 END (signbit);
13193}
13194
2550dfe9 13195
74c57478
JM		 13196static const struct test_f_f_data sin_test_data[] =
13197 {
13198 START_DATA (sin),
13199 TEST_f_f (sin, 0, 0),
13200 TEST_f_f (sin, minus_zero, minus_zero),
13201 TEST_f_f (sin, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13202 TEST_f_f (sin, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13203 TEST_f_f (sin, qnan_value, qnan_value, ERRNO_UNCHANGED),
8847214f 13204
74c57478
JM		 13205 TEST_f_f (sin, M_PI_6l, 0.5),
13206 TEST_f_f (sin, -M_PI_6l, -0.5),
13207 TEST_f_f (sin, M_PI_2l, 1),
13208 TEST_f_f (sin, -M_PI_2l, -1),
13209 TEST_f_f (sin, 0.75L, 0.681638760023334166733241952779893935L),
8847214f 13210
74c57478
JM		 13211 TEST_f_f (sin, 0x1p65, -0.047183876212354673805106149805700013943218L),
13212 TEST_f_f (sin, -0x1p65, 0.047183876212354673805106149805700013943218L),
8c0247db 13213
74c57478 13214 TEST_f_f (sin, 0x1.7f4134p+103, -6.6703229329788657073304190650534846045235e-08L),
7a845b2c 13215
d32e4346 13216#ifdef TEST_DOUBLE
74c57478
JM		 13217 TEST_f_f (sin, 0.80190127184058835, 0.71867942238767868),
13218 TEST_f_f (sin, 2.522464e-1, 2.4957989804940911e-1),
8848d99d
JM		 13219#endif
13220
13221#ifndef TEST_FLOAT
74c57478
JM		 13222 TEST_f_f (sin, 1e22, -0.8522008497671888017727058937530293682618L),
13223 TEST_f_f (sin, 0x1p1023, 0.5631277798508840134529434079444683477104L),
8848d99d
JM		 13224#endif
13225
13226#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478 13227 TEST_f_f (sin, 0x1p16383L, 0.3893629985894208126948115852610595405563L),
d32e4346
RM		 13228#endif
13229
74c57478
JM		 13230 TEST_f_f (sin, 0x1p+120, 3.77820109360752022655548470056922991960587e-01L),
13231 TEST_f_f (sin, 0x1p+127, 6.23385512955870240370428801097126489001833e-01L),
13232 TEST_f_f (sin, 0x1.fffff8p+127, 4.85786063130487339701113680434728152037092e-02L),
13233 TEST_f_f (sin, 0x1.fffffep+127, -5.21876523333658540551505357019806722935726e-01L),
13234 TEST_f_f (sin, 0x1p+50, 4.96396515208940840876821859865411368093356e-01L),
13235 TEST_f_f (sin, 0x1p+28, -9.86198211836975655703110310527108292055548e-01L),
13236 END_DATA (sin)
13237 };
4ffffbd2 13238
74c57478
JM		 13239static void
13240sin_test (void)
13241{
13242 errno = 0;
13243 FUNC(sin) (0);
13244 if (errno == ENOSYS)
13245 /* Function not implemented. */
13246 return;
8847214f 13247
74c57478
JM		 13248 START (sin);
13249 RUN_TEST_LOOP_f_f (sin, sin_test_data, );
13250 END (sin);
8847214f
UD		 13251}
13252
2550dfe9 13253
74c57478
JM		 13254static const struct test_f_f_data sin_tonearest_test_data[] =
13255 {
13256 START_DATA (sin_tonearest),
13257 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13258 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13259 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13260 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13261 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13262 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13263 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13264 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13265 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13266 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13267 END_DATA (sin_tonearest)
13268 };
13269
804360ed
JM		 13270static void
13271sin_test_tonearest (void)
13272{
804360ed
JM		 13273 errno = 0;
13274 FUNC(sin) (0);
13275 if (errno == ENOSYS)
13276 /* Function not implemented. */
13277 return;
13278
13279 START (sin_tonearest);
74c57478 13280 RUN_TEST_LOOP_f_f (sin, sin_tonearest_test_data, FE_TONEAREST);
804360ed
JM		 13281 END (sin_tonearest);
13282}
13283
13284
74c57478
JM		 13285static const struct test_f_f_data sin_towardzero_test_data[] =
13286 {
13287 START_DATA (sin_towardzero),
13288 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13289 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13290 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13291 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13292 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13293 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13294 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13295 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13296 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13297 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13298 END_DATA (sin_towardzero)
13299 };
13300
804360ed
JM		 13301static void
13302sin_test_towardzero (void)
13303{
804360ed
JM		 13304 errno = 0;
13305 FUNC(sin) (0);
13306 if (errno == ENOSYS)
13307 /* Function not implemented. */
13308 return;
13309
13310 START (sin_towardzero);
74c57478 13311 RUN_TEST_LOOP_f_f (sin, sin_towardzero_test_data, FE_TOWARDZERO);
804360ed
JM		 13312 END (sin_towardzero);
13313}
13314
13315
74c57478
JM		 13316static const struct test_f_f_data sin_downward_test_data[] =
13317 {
13318 START_DATA (sin_downward),
13319 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13320 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13321 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13322 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13323 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13324 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13325 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13326 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13327 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13328 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13329 END_DATA (sin_downward)
13330 };
13331
804360ed
JM		 13332static void
13333sin_test_downward (void)
13334{
804360ed
JM		 13335 errno = 0;
13336 FUNC(sin) (0);
13337 if (errno == ENOSYS)
13338 /* Function not implemented. */
13339 return;
13340
13341 START (sin_downward);
74c57478 13342 RUN_TEST_LOOP_f_f (sin, sin_downward_test_data, FE_DOWNWARD);
804360ed
JM		 13343 END (sin_downward);
13344}
13345
13346
74c57478
JM		 13347static const struct test_f_f_data sin_upward_test_data[] =
13348 {
13349 START_DATA (sin_upward),
13350 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13351 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13352 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13353 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13354 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13355 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13356 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13357 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13358 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13359 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13360 END_DATA (sin_upward)
13361 };
13362
804360ed
JM		 13363static void
13364sin_test_upward (void)
13365{
804360ed
JM		 13366 errno = 0;
13367 FUNC(sin) (0);
13368 if (errno == ENOSYS)
13369 /* Function not implemented. */
13370 return;
13371
13372 START (sin_upward);
74c57478 13373 RUN_TEST_LOOP_f_f (sin, sin_upward_test_data, FE_UPWARD);
804360ed
JM		 13374 END (sin_upward);
13375}
13376
13377
8847214f
UD		 13378static void
13379sincos_test (void)
13380{
13381 FLOAT sin_res, cos_res;
13382
aaca11d8
UD		 13383 errno = 0;
13384 FUNC(sincos) (0, &sin_res, &cos_res);
13385 if (errno == ENOSYS)
13386 /* Function not implemented. */
13387 return;
13388
8847214f
UD		 13389 START (sincos);
13390
13391 /* sincos is treated differently because it returns void. */
13392 TEST_extra (sincos, 0, 0, 1);
13393
13394 TEST_extra (sincos, minus_zero, minus_zero, 1);
67e971f1
TS		 13395 TEST_extra (sincos, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION);
13396 TEST_extra (sincos, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION);
13397 TEST_extra (sincos, qnan_value, qnan_value, qnan_value);
8847214f 13398
aba5e333
CD		 13399 /* The value of M_PI_2l is never exactly PI/2, and therefore the
13400 answer is never exactly zero. The answer is equal to the error
13401 in rounding PI/2 for the type used. Thus the answer is unique
13402 to each type. */
13403#ifdef TEST_FLOAT
13404 /* 32-bit float. */
418601aa 13405 TEST_extra (sincos, M_PI_2l, 1, -0x1.777a5cp-25L);
aba5e333
CD		 13406#endif
13407#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MANT_DIG == 53)
13408 /* 64-bit double or 64-bit long double. */
418601aa 13409 TEST_extra (sincos, M_PI_2l, 1, 0x1.1a62633145c07p-54L);
aba5e333
CD		 13410#endif
13411#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 64
13412 /* 96-bit long double. */
418601aa 13413 TEST_extra (sincos, M_PI_2l, 1, -0xe.ce675d1fc8f8cbbp-69L);
aba5e333
CD		 13414#endif
13415#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 106
13416 /* 128-bit IBM long double. */
418601aa 13417 TEST_extra (sincos, M_PI_2l, 1, 0x1.c1cd129024e088a67cc74020bcp-107L);
aba5e333
CD		 13418#endif
13419#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 113
13420 /* 128-bit long double. */
418601aa 13421 TEST_extra (sincos, M_PI_2l, 1, 0x1.cd129024e088a67cc74020bbea64p-115L);
aba5e333
CD		 13422#endif
13423
3c6cad26
UD		 13424 TEST_extra (sincos, M_PI_6l, 0.5, 0.86602540378443864676372317075293616L);
13425 TEST_extra (sincos, M_PI_6l*2.0, 0.86602540378443864676372317075293616L, 0.5);
2550dfe9 13426 TEST_extra (sincos, 0.75L, 0.681638760023334166733241952779893935L, 0.731688868873820886311838753000084544L);
8847214f 13427
ea40808a
AJ		 13428 TEST_extra (sincos, 0x1p65, -0.047183876212354673805106149805700013943218L, 0.99888622066058013610642172179340364209972L);
13429 TEST_extra (sincos, -0x1p65, 0.047183876212354673805106149805700013943218L, 0.99888622066058013610642172179340364209972L);
8c0247db 13430
d32e4346
RM		 13431#ifdef TEST_DOUBLE
13432 TEST_extra (sincos, 0.80190127184058835, 0.71867942238767868, 0.69534156199418473);
8848d99d
JM		 13433#endif
13434
13435#ifndef TEST_FLOAT
13436 TEST_extra (sincos, 1e22, -0.8522008497671888017727058937530293682618L, 0.5232147853951389454975944733847094921409L);
13437 TEST_extra (sincos, 0x1p1023, 0.5631277798508840134529434079444683477104L, -0.826369834614147994500785680811743734805L);
13438#endif
13439
13440#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
13441 TEST_extra (sincos, 0x1p16383L, 0.3893629985894208126948115852610595405563L, 0.9210843909921906206874509522505756251609L);
d32e4346
RM		 13442#endif
13443
4ffffbd2
LD		 13444 TEST_extra (sincos, 0x1p+120, 3.77820109360752022655548470056922991960587e-01L, -9.25879022854837867303861764107414946730833e-01L);
13445 TEST_extra (sincos, 0x1p+127, 6.23385512955870240370428801097126489001833e-01L, 7.81914638714960072263910298466369236613162e-01L);
13446 TEST_extra (sincos, 0x1.fffff8p+127, 4.85786063130487339701113680434728152037092e-02L, 9.98819362551949040703862043664101081064641e-01L);
13447 TEST_extra (sincos, 0x1.fffffep+127, -5.21876523333658540551505357019806722935726e-01L, 8.53021039830304158051791467692161107353094e-01L);
13448 TEST_extra (sincos, 0x1p+50, 4.96396515208940840876821859865411368093356e-01L, 8.68095904660550604334592502063501320395739e-01L);
13449 TEST_extra (sincos, 0x1p+28, -9.86198211836975655703110310527108292055548e-01L, -1.65568979490578758865468278195361551113358e-01L);
13450
8847214f
UD		 13451 END (sincos);
13452}
13453
74c57478
JM		 13454static const struct test_f_f_data sinh_test_data[] =
13455 {
13456 START_DATA (sinh),
13457 TEST_f_f (sinh, 0, 0),
13458 TEST_f_f (sinh, minus_zero, minus_zero),
13459
13460#ifndef TEST_INLINE
13461 TEST_f_f (sinh, plus_infty, plus_infty),
13462 TEST_f_f (sinh, minus_infty, minus_infty),
13463#endif
13464 TEST_f_f (sinh, qnan_value, qnan_value),
13465
13466 TEST_f_f (sinh, 0.75L, 0.822316731935829980703661634446913849L),
13467 TEST_f_f (sinh, 0x8p-32L, 1.86264514923095703232705808926175479e-9L),
13468 END_DATA (sinh)
13469 };
13470
8847214f
UD		 13471static void
13472sinh_test (void)
13473{
aaca11d8 13474 errno = 0;
3c6cad26 13475 FUNC(sinh) (0.7L);
aaca11d8
UD		 13476 if (errno == ENOSYS)
13477 /* Function not implemented. */
13478 return;
13479
8847214f 13480 START (sinh);
74c57478 13481 RUN_TEST_LOOP_f_f (sinh, sinh_test_data, );
8847214f
UD		 13482 END (sinh);
13483}
13484
ca811b22 13485
74c57478
JM		 13486static const struct test_f_f_data sinh_tonearest_test_data[] =
13487 {
13488 START_DATA (sinh_tonearest),
13489 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13490 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13491 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13492 END_DATA (sinh_tonearest)
13493 };
13494
ca811b22
JM		 13495static void
13496sinh_test_tonearest (void)
13497{
ca811b22
JM		 13498 errno = 0;
13499 FUNC(sinh) (0);
13500 if (errno == ENOSYS)
13501 /* Function not implemented. */
13502 return;
13503
13504 START (sinh_tonearest);
74c57478 13505 RUN_TEST_LOOP_f_f (sinh, sinh_tonearest_test_data, FE_TONEAREST);
ca811b22
JM		 13506 END (sinh_tonearest);
13507}
13508
13509
74c57478
JM		 13510static const struct test_f_f_data sinh_towardzero_test_data[] =
13511 {
13512 START_DATA (sinh_towardzero),
13513 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13514 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13515 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13516 END_DATA (sinh_towardzero)
13517 };
13518
ca811b22
JM		 13519static void
13520sinh_test_towardzero (void)
13521{
ca811b22
JM		 13522 errno = 0;
13523 FUNC(sinh) (0);
13524 if (errno == ENOSYS)
13525 /* Function not implemented. */
13526 return;
13527
13528 START (sinh_towardzero);
74c57478 13529 RUN_TEST_LOOP_f_f (sinh, sinh_towardzero_test_data, FE_TOWARDZERO);
ca811b22
JM		 13530 END (sinh_towardzero);
13531}
13532
13533
74c57478
JM		 13534static const struct test_f_f_data sinh_downward_test_data[] =
13535 {
13536 START_DATA (sinh_downward),
13537 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13538 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13539 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13540 END_DATA (sinh_downward)
13541 };
13542
ca811b22
JM		 13543static void
13544sinh_test_downward (void)
13545{
ca811b22
JM		 13546 errno = 0;
13547 FUNC(sinh) (0);
13548 if (errno == ENOSYS)
13549 /* Function not implemented. */
13550 return;
13551
13552 START (sinh_downward);
74c57478 13553 RUN_TEST_LOOP_f_f (sinh, sinh_downward_test_data, FE_DOWNWARD);
ca811b22
JM		 13554 END (sinh_downward);
13555}
13556
13557
74c57478
JM		 13558static const struct test_f_f_data sinh_upward_test_data[] =
13559 {
13560 START_DATA (sinh_upward),
13561 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13562 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13563 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13564 END_DATA (sinh_upward)
13565 };
13566
ca811b22
JM		 13567static void
13568sinh_test_upward (void)
13569{
ca811b22
JM		 13570 errno = 0;
13571 FUNC(sinh) (0);
13572 if (errno == ENOSYS)
13573 /* Function not implemented. */
13574 return;
13575
13576 START (sinh_upward);
74c57478 13577 RUN_TEST_LOOP_f_f (sinh, sinh_upward_test_data, FE_UPWARD);
ca811b22
JM		 13578 END (sinh_upward);
13579}
13580
13581
74c57478
JM		 13582static const struct test_f_f_data sqrt_test_data[] =
13583 {
13584 START_DATA (sqrt),
13585 TEST_f_f (sqrt, 0, 0),
13586 TEST_f_f (sqrt, qnan_value, qnan_value),
13587 TEST_f_f (sqrt, plus_infty, plus_infty),
13588
13589 TEST_f_f (sqrt, minus_zero, minus_zero),
13590
13591 /* sqrt (x) == qNaN plus invalid exception for x < 0. */
13592 TEST_f_f (sqrt, -1, qnan_value, INVALID_EXCEPTION),
13593 TEST_f_f (sqrt, -max_value, qnan_value, INVALID_EXCEPTION),
13594 TEST_f_f (sqrt, minus_infty, qnan_value, INVALID_EXCEPTION),
13595
13596 TEST_f_f (sqrt, 2209, 47),
13597 TEST_f_f (sqrt, 4, 2),
13598 TEST_f_f (sqrt, 2, M_SQRT2l),
13599 TEST_f_f (sqrt, 0.25, 0.5),
13600 TEST_f_f (sqrt, 6642.25, 81.5),
13601 TEST_f_f (sqrt, 15190.5625L, 123.25L),
13602 TEST_f_f (sqrt, 0.75L, 0.866025403784438646763723170752936183L),
13603 END_DATA (sqrt)
13604 };
13605
8847214f
UD		 13606static void
13607sqrt_test (void)
13608{
e6d3c4a7
AJ		 13609 errno = 0;
13610 FUNC(sqrt) (1);
13611 if (errno == ENOSYS)
13612 /* Function not implemented. */
13613 return;
13614
8847214f 13615 START (sqrt);
74c57478 13616 RUN_TEST_LOOP_f_f (sqrt, sqrt_test_data, );
8847214f
UD		 13617 END (sqrt);
13618}
13619
2550dfe9 13620
74c57478
JM		 13621static const struct test_f_f_data tan_test_data[] =
13622 {
13623 START_DATA (tan),
13624 TEST_f_f (tan, 0, 0),
13625 TEST_f_f (tan, minus_zero, minus_zero),
13626 TEST_f_f (tan, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13627 TEST_f_f (tan, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13628 TEST_f_f (tan, qnan_value, qnan_value, ERRNO_UNCHANGED),
13629
13630 TEST_f_f (tan, M_PI_4l, 1),
13631 TEST_f_f (tan, 0.75L, 0.931596459944072461165202756573936428L),
13632
13633 TEST_f_f (tan, 0x1p65, -0.0472364872359047946798414219288370688827L),
13634 TEST_f_f (tan, -0x1p65, 0.0472364872359047946798414219288370688827L),
13635
13636 TEST_f_f (tan, 0xc.9p-4, 0.9995162902115457818029468900654150261381L),
13637 TEST_f_f (tan, 0xc.908p-4, 0.9997603425502441410973077452249560802034L),
13638 TEST_f_f (tan, 0xc.90cp-4, 0.9998823910588060302788513970802357770031L),
13639 TEST_f_f (tan, 0xc.90ep-4, 0.9999434208994808753305784795924711152508L),
13640 TEST_f_f (tan, 0xc.90fp-4, 0.9999739372166156702433266059635165160515L),
13641 TEST_f_f (tan, 0xc.90f8p-4, 0.9999891957244072765118898375645469865764L),
13642 TEST_f_f (tan, 0xc.90fcp-4, 0.9999968250656122402859679132395522927393L),
13643 TEST_f_f (tan, 0xc.90fdp-4, 0.9999987324100083358016192309006353329444L),
13644 TEST_f_f (tan, 0xc.90fd8p-4, 0.9999996860835706212861509874451585282616L),
13645 TEST_f_f (tan, 0xc.90fdap-4, 0.9999999245021033010474530133665235922808L),
13646 TEST_f_f (tan, 0xc.ap-4, 1.0073556597407272165371804539701396631519L),
13647 TEST_f_f (tan, 0xc.98p-4, 1.0034282930863044654045449407466962736255L),
13648 TEST_f_f (tan, 0xc.94p-4, 1.0014703786820082237342656561856877993328L),
13649 TEST_f_f (tan, 0xc.92p-4, 1.0004928571392300571266638743539017593717L),
13650 TEST_f_f (tan, 0xc.91p-4, 1.0000044544650244953647966900221905361131L),
13651 TEST_f_f (tan, 0xc.90fep-4, 1.0000006397580424009014454926842136804016L),
13652 TEST_f_f (tan, 0xc.90fdcp-4, 1.0000001629206928242190327320047489394217L),
13653 TEST_f_f (tan, 0xc.90fdbp-4, 1.0000000437113909572052640953950483705005L),
13654
13655 TEST_f_f (tan, -0xc.9p-4, -0.9995162902115457818029468900654150261381L),
13656 TEST_f_f (tan, -0xc.908p-4, -0.9997603425502441410973077452249560802034L),
13657 TEST_f_f (tan, -0xc.90cp-4, -0.9998823910588060302788513970802357770031L),
13658 TEST_f_f (tan, -0xc.90ep-4, -0.9999434208994808753305784795924711152508L),
13659 TEST_f_f (tan, -0xc.90fp-4, -0.9999739372166156702433266059635165160515L),
13660 TEST_f_f (tan, -0xc.90f8p-4, -0.9999891957244072765118898375645469865764L),
13661 TEST_f_f (tan, -0xc.90fcp-4, -0.9999968250656122402859679132395522927393L),
13662 TEST_f_f (tan, -0xc.90fdp-4, -0.9999987324100083358016192309006353329444L),
13663 TEST_f_f (tan, -0xc.90fd8p-4, -0.9999996860835706212861509874451585282616L),
13664 TEST_f_f (tan, -0xc.90fdap-4, -0.9999999245021033010474530133665235922808L),
13665 TEST_f_f (tan, -0xc.ap-4, -1.0073556597407272165371804539701396631519L),
13666 TEST_f_f (tan, -0xc.98p-4, -1.0034282930863044654045449407466962736255L),
13667 TEST_f_f (tan, -0xc.94p-4, -1.0014703786820082237342656561856877993328L),
13668 TEST_f_f (tan, -0xc.92p-4, -1.0004928571392300571266638743539017593717L),
13669 TEST_f_f (tan, -0xc.91p-4, -1.0000044544650244953647966900221905361131L),
13670 TEST_f_f (tan, -0xc.90fep-4, -1.0000006397580424009014454926842136804016L),
13671 TEST_f_f (tan, -0xc.90fdcp-4, -1.0000001629206928242190327320047489394217L),
13672 TEST_f_f (tan, -0xc.90fdbp-4, -1.0000000437113909572052640953950483705005L),
13673
13674#ifndef TEST_FLOAT
13675 TEST_f_f (tan, 1e22, -1.628778225606898878549375936939548513545L),
13676 TEST_f_f (tan, 0x1p1023, -0.6814476476066215012854144040167365190368L),
13677#endif
13678
13679#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
13680 TEST_f_f (tan, 0x1p16383L, 0.422722393732022337800504160054440141575L),
13681#endif
13682 END_DATA (tan)
13683 };
13684
8847214f
UD		 13685static void
13686tan_test (void)
13687{
e6d3c4a7
AJ		 13688 errno = 0;
13689 FUNC(tan) (0);
13690 if (errno == ENOSYS)
13691 /* Function not implemented. */
13692 return;
13693
8847214f 13694 START (tan);
74c57478 13695 RUN_TEST_LOOP_f_f (tan, tan_test_data, );
8847214f
UD		 13696 END (tan);
13697}
13698
804360ed 13699
74c57478
JM		 13700static const struct test_f_f_data tan_tonearest_test_data[] =
13701 {
13702 START_DATA (tan_tonearest),
13703 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13704 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13705 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13706 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13707 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13708 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13709 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13710 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13711 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13712 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13713 END_DATA (tan_tonearest)
13714 };
13715
804360ed
JM		 13716static void
13717tan_test_tonearest (void)
13718{
804360ed
JM		 13719 errno = 0;
13720 FUNC(tan) (0);
13721 if (errno == ENOSYS)
13722 /* Function not implemented. */
13723 return;
13724
13725 START (tan_tonearest);
74c57478 13726 RUN_TEST_LOOP_f_f (tan, tan_tonearest_test_data, FE_TONEAREST);
804360ed
JM		 13727 END (tan_tonearest);
13728}
13729
13730
74c57478
JM		 13731static const struct test_f_f_data tan_towardzero_test_data[] =
13732 {
13733 START_DATA (tan_towardzero),
13734 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13735 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13736 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13737 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13738 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13739 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13740 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13741 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13742 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13743 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13744 END_DATA (tan_towardzero)
13745 };
13746
804360ed
JM		 13747static void
13748tan_test_towardzero (void)
13749{
804360ed
JM		 13750 errno = 0;
13751 FUNC(tan) (0);
13752 if (errno == ENOSYS)
13753 /* Function not implemented. */
13754 return;
13755
13756 START (tan_towardzero);
74c57478 13757 RUN_TEST_LOOP_f_f (tan, tan_towardzero_test_data, FE_TOWARDZERO);
804360ed
JM		 13758 END (tan_towardzero);
13759}
13760
13761
74c57478
JM		 13762static const struct test_f_f_data tan_downward_test_data[] =
13763 {
13764 START_DATA (tan_downward),
13765 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13766 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13767 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13768 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13769 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13770 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13771 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13772 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13773 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13774 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13775 END_DATA (tan_downward)
13776 };
13777
804360ed
JM		 13778static void
13779tan_test_downward (void)
13780{
804360ed
JM		 13781 errno = 0;
13782 FUNC(tan) (0);
13783 if (errno == ENOSYS)
13784 /* Function not implemented. */
13785 return;
13786
13787 START (tan_downward);
74c57478 13788 RUN_TEST_LOOP_f_f (tan, tan_downward_test_data, FE_DOWNWARD);
804360ed
JM		 13789 END (tan_downward);
13790}
13791
13792
74c57478
JM		 13793static const struct test_f_f_data tan_upward_test_data[] =
13794 {
13795 START_DATA (tan_upward),
13796 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13797 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13798 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13799 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13800 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13801 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13802 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13803 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13804 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13805 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13806 END_DATA (tan_upward)
13807 };
13808
804360ed
JM		 13809static void
13810tan_test_upward (void)
13811{
804360ed
JM		 13812 errno = 0;
13813 FUNC(tan) (0);
13814 if (errno == ENOSYS)
13815 /* Function not implemented. */
13816 return;
13817
13818 START (tan_upward);
74c57478 13819 RUN_TEST_LOOP_f_f (tan, tan_upward_test_data, FE_UPWARD);
804360ed
JM		 13820 END (tan_upward);
13821}
13822
13823
74c57478
JM		 13824static const struct test_f_f_data tanh_test_data[] =
13825 {
13826 START_DATA (tanh),
13827 TEST_f_f (tanh, 0, 0),
13828 TEST_f_f (tanh, minus_zero, minus_zero),
8847214f 13829
15daa639 13830#ifndef TEST_INLINE
74c57478
JM		 13831 TEST_f_f (tanh, plus_infty, 1),
13832 TEST_f_f (tanh, minus_infty, -1),
15daa639 13833#endif
74c57478 13834 TEST_f_f (tanh, qnan_value, qnan_value),
3eab00bd 13835
74c57478
JM		 13836 TEST_f_f (tanh, 0.75L, 0.635148952387287319214434357312496495L),
13837 TEST_f_f (tanh, -0.75L, -0.635148952387287319214434357312496495L),
8847214f 13838
74c57478
JM		 13839 TEST_f_f (tanh, 1.0L, 0.7615941559557648881194582826047935904L),
13840 TEST_f_f (tanh, -1.0L, -0.7615941559557648881194582826047935904L),
30e5dcb7 13841
74c57478
JM		 13842 /* 2^-57 */
13843 TEST_f_f (tanh, 0x1p-57L, 6.938893903907228377647697925567626953125e-18L),
13844 END_DATA (tanh)
13845 };
8847214f
UD		 13846
13847static void
74c57478 13848tanh_test (void)
8847214f
UD		 13849{
13850 errno = 0;
74c57478 13851 FUNC(tanh) (0.7L);
8847214f
UD		 13852 if (errno == ENOSYS)
13853 /* Function not implemented. */
13854 return;
8847214f 13855
74c57478
JM		 13856 START (tanh);
13857 RUN_TEST_LOOP_f_f (tanh, tanh_test_data, );
13858 END (tanh);
13859}
8847214f 13860
74c57478
JM		 13861static const struct test_f_f_data tgamma_test_data[] =
13862 {
13863 START_DATA (tgamma),
13864 TEST_f_f (tgamma, plus_infty, plus_infty),
13865 TEST_f_f (tgamma, max_value, plus_infty, OVERFLOW_EXCEPTION),
13866 TEST_f_f (tgamma, 0, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
13867 TEST_f_f (tgamma, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
13868 /* tgamma (x) == qNaN plus invalid exception for integer x <= 0. */
13869 TEST_f_f (tgamma, -2, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13870 TEST_f_f (tgamma, -max_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13871 TEST_f_f (tgamma, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13872 TEST_f_f (tgamma, qnan_value, qnan_value),
13873
13874 TEST_f_f (tgamma, 0.5, M_SQRT_PIl),
13875 TEST_f_f (tgamma, -0.5, -M_2_SQRT_PIl),
13876
13877 TEST_f_f (tgamma, 1, 1),
13878 TEST_f_f (tgamma, 2, 1),
13879 TEST_f_f (tgamma, 3, 2),
13880 TEST_f_f (tgamma, 4, 6),
13881 TEST_f_f (tgamma, 5, 24),
13882 TEST_f_f (tgamma, 6, 120),
13883 TEST_f_f (tgamma, 7, 720),
13884 TEST_f_f (tgamma, 8, 5040),
13885 TEST_f_f (tgamma, 9, 40320),
13886 TEST_f_f (tgamma, 10, 362880),
13887
13888 TEST_f_f (tgamma, 0.7L, 1.29805533264755778568117117915281162L),
13889 TEST_f_f (tgamma, 1.2L, 0.918168742399760610640951655185830401L),
13890
13891 TEST_f_f (tgamma, 1.5L, 8.8622692545275801364908374167057259139877e-01L),
13892 TEST_f_f (tgamma, 2.5L, 1.3293403881791370204736256125058588870982e+00L),
13893 TEST_f_f (tgamma, 3.5L, 3.3233509704478425511840640312646472177454e+00L),
13894 TEST_f_f (tgamma, 4.5L, 1.1631728396567448929144224109426265262109e+01L),
13895 TEST_f_f (tgamma, 5.5L, 5.2342777784553520181149008492418193679490e+01L),
13896 TEST_f_f (tgamma, 6.5L, 2.8788527781504436099631954670830006523720e+02L),
13897 TEST_f_f (tgamma, 7.5L, 1.8712543057977883464760770536039504240418e+03L),
13898 TEST_f_f (tgamma, 8.5L, 1.4034407293483412598570577902029628180313e+04L),
13899 TEST_f_f (tgamma, 9.5L, 1.1929246199460900708784991216725183953266e+05L),
13900 TEST_f_f (tgamma, -1.5L, 2.3632718012073547030642233111215269103967e+00L),
13901 TEST_f_f (tgamma, -2.5L, -9.4530872048294188122568932444861076415869e-01L),
13902 TEST_f_f (tgamma, -3.5L, 2.7008820585226910892162552127103164690248e-01L),
13903 TEST_f_f (tgamma, -4.5L, -6.0019601300504246427027893615784810422774e-02L),
13904 TEST_f_f (tgamma, -5.5L, 1.0912654781909862986732344293779056440504e-02L),
13905 TEST_f_f (tgamma, -6.5L, -1.6788699664476712287280529682737009908468e-03L),
13906 TEST_f_f (tgamma, -7.5L, 2.2384932885968949716374039576982679877958e-04L),
13907 TEST_f_f (tgamma, -8.5L, -2.6335215159963470254557693619979623385833e-05L),
13908 TEST_f_f (tgamma, -9.5L, 2.7721279115751021320587045915768024616666e-06L),
13909 TEST_f_f (tgamma, 0x1p-24L, 1.6777215422784394050795179874582764575261e+07L),
13910 TEST_f_f (tgamma, -0x1p-24L, -1.6777216577215723853867349114260580375249e+07L),
13911 TEST_f_f (tgamma, 0x1p-53L, 9.0071992547409914227843350984672492007618e+15L),
13912 TEST_f_f (tgamma, -0x1p-53L, -9.0071992547409925772156649015329704137860e+15L),
13913 TEST_f_f (tgamma, 0x1p-64L, 1.8446744073709551615422784335098467139447e+19L),
13914 TEST_f_f (tgamma, -0x1p-64L, -1.8446744073709551616577215664901532860660e+19L),
13915 TEST_f_f (tgamma, 0x1p-106L, 8.1129638414606681695789005144063422784335e+31L),
13916 TEST_f_f (tgamma, -0x1p-106L, -8.1129638414606681695789005144064577215665e+31L),
13917 TEST_f_f (tgamma, 0x1p-113L, 1.0384593717069655257060992658440191422784e+34L),
13918 TEST_f_f (tgamma, -0x1p-113L, -1.0384593717069655257060992658440192577216e+34L),
13919 TEST_f_f (tgamma, 0x1p-127L, 1.7014118346046923173168730371588410572742e+38L),
13920 TEST_f_f (tgamma, -0x1p-127L, -1.7014118346046923173168730371588410572858e+38L),
d8cd06db 13921#ifdef TEST_FLOAT
74c57478
JM		 13922 TEST_f_f (tgamma, 0x1p-128L, plus_infty, OVERFLOW_EXCEPTION),
13923 TEST_f_f (tgamma, -0x1p-128L, minus_infty, OVERFLOW_EXCEPTION),
13924 TEST_f_f (tgamma, 0x1p-149L, plus_infty, OVERFLOW_EXCEPTION),
13925 TEST_f_f (tgamma, -0x1p-149L, minus_infty, OVERFLOW_EXCEPTION),
d8cd06db 13926#else
74c57478
JM		 13927 TEST_f_f (tgamma, 0x1p-128L, 3.4028236692093846346337460743176821145542e+38L),
13928 TEST_f_f (tgamma, -0x1p-128L, -3.4028236692093846346337460743176821145658e+38L),
13929 TEST_f_f (tgamma, 0x1p-149L, 7.1362384635297994052914298472474756819137e+44L),
13930 TEST_f_f (tgamma, -0x1p-149L, -7.1362384635297994052914298472474756819137e+44L),
d8cd06db
JM		 13931#endif
13932#ifndef TEST_FLOAT
74c57478
JM		 13933 TEST_f_f (tgamma, 0x1p-1023L, 8.9884656743115795386465259539451236680899e+307L),
13934 TEST_f_f (tgamma, -0x1p-1023L, -8.9884656743115795386465259539451236680899e+307L),
d8cd06db 13935# if !defined TEST_LDOUBLE || LDBL_MAX_EXP <= 1024
74c57478
JM		 13936 TEST_f_f (tgamma, 0x1p-1024L, plus_infty, OVERFLOW_EXCEPTION),
13937 TEST_f_f (tgamma, -0x1p-1024L, minus_infty, OVERFLOW_EXCEPTION),
13938 TEST_f_f (tgamma, 0x1p-1074L, plus_infty, OVERFLOW_EXCEPTION),
13939 TEST_f_f (tgamma, -0x1p-1074L, minus_infty, OVERFLOW_EXCEPTION),
d8cd06db 13940# else
74c57478
JM		 13941 TEST_f_f (tgamma, 0x1p-1024L, 1.7976931348623159077293051907890247336180e+308L),
13942 TEST_f_f (tgamma, -0x1p-1024L, -1.7976931348623159077293051907890247336180e+308L),
13943 TEST_f_f (tgamma, 0x1p-1074L, 2.0240225330731061835249534671891730704956e+323L),
13944 TEST_f_f (tgamma, -0x1p-1074L, -2.0240225330731061835249534671891730704956e+323L),
d8cd06db
JM		 13945# endif
13946#endif
13947#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
74c57478
JM		 13948 TEST_f_f (tgamma, 0x1p-16383L, 5.9486574767861588254287966331400356538172e+4931L),
13949 TEST_f_f (tgamma, -0x1p-16383L, -5.9486574767861588254287966331400356538172e+4931L),
13950 TEST_f_f (tgamma, 0x1p-16384L, plus_infty, OVERFLOW_EXCEPTION),
13951 TEST_f_f (tgamma, -0x1p-16384L, minus_infty, OVERFLOW_EXCEPTION),
13952 TEST_f_f (tgamma, 0x1p-16445L, plus_infty, OVERFLOW_EXCEPTION),
13953 TEST_f_f (tgamma, -0x1p-16445L, minus_infty, OVERFLOW_EXCEPTION),
d8cd06db 13954# if LDBL_MANT_DIG >= 113
74c57478
JM		 13955 TEST_f_f (tgamma, 0x1p-16494L, plus_infty, OVERFLOW_EXCEPTION),
13956 TEST_f_f (tgamma, -0x1p-16494L, minus_infty, OVERFLOW_EXCEPTION),
d8cd06db
JM		 13957# endif
13958#endif
74c57478
JM		 13959 TEST_f_f (tgamma, 0x8.00001p0L, 5.0400096882277802019946778420223050233915e+03L),
13960 TEST_f_f (tgamma, 0x7.fffff8p0L, 5.0399951558933225045148935487583089307135e+03L),
13961 TEST_f_f (tgamma, 0x7.000008p0L, 7.2000064296977505705636258629805621178587e+02L),
13962 TEST_f_f (tgamma, 0x6.fffff8p0L, 7.1999935703082425988147448928288557689866e+02L),
13963 TEST_f_f (tgamma, 0x6.000008p0L, 1.2000009762487825358530770343720418162783e+02L),
13964 TEST_f_f (tgamma, 0x5.fffff8p0L, 1.1999990237520611552119807476573441975106e+02L),
13965 TEST_f_f (tgamma, 0x5.000008p0L, 2.4000017236155647574166073485628713443799e+01L),
13966 TEST_f_f (tgamma, 0x4.fffff8p0L, 2.3999982763857938712639837029547357501709e+01L),
13967 TEST_f_f (tgamma, 0x4.000008p0L, 6.0000035937827461765660468073471093546129e+00L),
13968 TEST_f_f (tgamma, 0x3.fffffcp0L, 5.9999982031095793171233994481968816873643e+00L),
13969 TEST_f_f (tgamma, 0x3.000004p0L, 2.0000004400179308360529417942462250547999e+00L),
13970 TEST_f_f (tgamma, 0x2.fffffcp0L, 1.9999995599822108706107786027549565954046e+00L),
13971 TEST_f_f (tgamma, 0x2.000004p0L, 1.0000001007996638509889062631687945799175e+00L),
13972 TEST_f_f (tgamma, 0x1.fffffep0L, 9.9999994960018563231526611134590489120697e-01L),
13973 TEST_f_f (tgamma, 0x1.000002p0L, 9.9999993119054472483596471908942669644327e-01L),
13974 TEST_f_f (tgamma, 0x0.ffffffp0L, 1.0000000344047381790797322460568297132998e+00L),
13975 TEST_f_f (tgamma, -0x0.ffffffp0L, -1.6777216422784419250710305882992376932423e+07L),
13976 TEST_f_f (tgamma, -0x1.000002p0L, 8.3886075772158332060084424806449513922858e+06L),
13977 TEST_f_f (tgamma, -0x1.fffffep0L, 4.1943044613922792026014320172298377770578e+06L),
13978 TEST_f_f (tgamma, -0x2.000004p0L, -2.0971515386080557574407223895988378776747e+06L),
13979 TEST_f_f (tgamma, -0x2.fffffcp0L, -6.9905087601970247876992248591045142913324e+05L),
13980 TEST_f_f (tgamma, -0x3.000004p0L, 6.9905045731381300146131914617735687322025e+05L),
13981 TEST_f_f (tgamma, -0x3.fffffcp0L, 1.7476272942159602684441970627092458855771e+05L),
13982 TEST_f_f (tgamma, -0x4.000008p0L, -8.7381270578483499672965708923121931082305e+04L),
13983 TEST_f_f (tgamma, -0x4.fffff8p0L, -1.7476280884325863043793087474680780379554e+04L),
13984 TEST_f_f (tgamma, -0x5.000008p0L, 1.7476252449031389167286893378510439443844e+04L),
13985 TEST_f_f (tgamma, -0x5.fffff8p0L, 2.9127137122026653716311560165769071985443e+03L),
13986 TEST_f_f (tgamma, -0x6.000008p0L, -2.9127085100239567622341538102130981196910e+03L),
13987 TEST_f_f (tgamma, -0x6.fffff8p0L, -4.1610198723079349791939054365613377035519e+02L),
13988 TEST_f_f (tgamma, -0x7.000008p0L, 4.1610118737306415004517215226199741948733e+02L),
13989 TEST_f_f (tgamma, -0x7.fffff8p0L, 5.2012751504050764429534086402871289946986e+01L),
13990 TEST_f_f (tgamma, -0x8.00001p0L, -2.6006296115134418896533598545925084576702e+01L),
13991 TEST_f_f (tgamma, -0x9.fffffp0L, 2.8896008370721717567612135720915723136310e-01L),
13992 TEST_f_f (tgamma, -0xa.00001p0L, -2.8895878754728051776830454190076999107021e-01L),
13993 TEST_f_f (tgamma, -0x13.ffffep0L, 2.1550026214525536756224040483579183652119e-13L),
13994 TEST_f_f (tgamma, -0x14.00002p0L, -2.1549777908265594916405421768142757507179e-13L),
13995 TEST_f_f (tgamma, -0x1d.ffffep0L, 1.9765721589464867957912772592816027583176e-27L),
13996 TEST_f_f (tgamma, -0x1e.00002p0L, -1.9765463890341964384070157599286498212650e-27L),
13997 TEST_f_f (tgamma, -0x27.ffffcp0L, 3.2129279441390812141195076945616975790225e-43L, UNDERFLOW_EXCEPTION_FLOAT),
13998 TEST_f_f (tgamma, -0x28.00004p0L, -3.2128372159115252365699015758097981155793e-43L, UNDERFLOW_EXCEPTION_FLOAT),
13999 TEST_f_f (tgamma, -0x28.ffffcp0L, -7.8364103489619817539676737414096652170685e-45L, UNDERFLOW_EXCEPTION_FLOAT),
14000 TEST_f_f (tgamma, -0x29.00004p0L, 7.8361876024016854597745353972619195760515e-45L, UNDERFLOW_EXCEPTION_FLOAT),
d8cd06db 14001#ifdef TEST_FLOAT
74c57478
JM		 14002 TEST_f_f (tgamma, -0x29.ffffcp0L, plus_zero, UNDERFLOW_EXCEPTION_FLOAT),
14003 TEST_f_f (tgamma, -0x2a.00004p0L, minus_zero, UNDERFLOW_EXCEPTION_FLOAT),
d8cd06db 14004#else
74c57478
JM		 14005 TEST_f_f (tgamma, -0x29.ffffcp0L, 1.8658121573125798145204120066590953505132e-46L),
14006 TEST_f_f (tgamma, -0x2a.00004p0L, -1.8657587834931410688246126853566488626385e-46L),
14007#endif
14008#ifndef TEST_FLOAT
14009 TEST_f_f (tgamma, 0x8.0000000000008p0L, 5.0400000000000180457125667322294144477136e+03L),
14010 TEST_f_f (tgamma, 0x7.ffffffffffffcp0L, 5.0399999999999909771437166339103165198442e+03L),
14011 TEST_f_f (tgamma, 0x7.0000000000004p0L, 7.2000000000000119762397445457359071259652e+02L),
14012 TEST_f_f (tgamma, 0x6.ffffffffffffcp0L, 7.1999999999999880237602554542848858572672e+02L),
14013 TEST_f_f (tgamma, 0x6.0000000000004p0L, 1.2000000000000018184042734842640022086408e+02L),
14014 TEST_f_f (tgamma, 0x5.ffffffffffffcp0L, 1.1999999999999981815957265157389249327533e+02L),
14015 TEST_f_f (tgamma, 0x5.0000000000004p0L, 2.4000000000000032104829055124673225982803e+01L),
14016 TEST_f_f (tgamma, 0x4.ffffffffffffcp0L, 2.3999999999999967895170944875373910918544e+01L),
14017 TEST_f_f (tgamma, 0x4.0000000000004p0L, 6.0000000000000066939396342309789716341613e+00L),
14018 TEST_f_f (tgamma, 0x3.ffffffffffffep0L, 5.9999999999999966530301828845138185025345e+00L),
14019 TEST_f_f (tgamma, 0x3.0000000000002p0L, 2.0000000000000008195971324717875960213536e+00L),
14020 TEST_f_f (tgamma, 0x2.ffffffffffffep0L, 1.9999999999999991804028675282128956223990e+00L),
14021 TEST_f_f (tgamma, 0x2.0000000000002p0L, 1.0000000000000001877539613108624482361963e+00L),
14022 TEST_f_f (tgamma, 0x1.fffffffffffffp0L, 9.9999999999999990612301934456883679778984e-01L),
14023 TEST_f_f (tgamma, 0x1.0000000000001p0L, 9.9999999999999987183237573039992418700531e-01L),
14024 TEST_f_f (tgamma, 0x0.fffffffffffff8p0L, 1.0000000000000000640838121348000744796665e+00L),
14025 TEST_f_f (tgamma, -0x0.fffffffffffff8p0L, -9.0071992547409924227843350984672961392521e+15L),
14026 TEST_f_f (tgamma, -0x1.0000000000001p0L, 4.5035996273704955772156649015331740980405e+15L),
14027 TEST_f_f (tgamma, -0x1.fffffffffffffp0L, 2.2517998136852484613921675492337776673289e+15L),
14028 TEST_f_f (tgamma, -0x2.0000000000002p0L, -1.1258999068426235386078324507668462444260e+15L),
14029 TEST_f_f (tgamma, -0x2.ffffffffffffep0L, -3.7529996894754154268627807196691509198813e+14L),
14030 TEST_f_f (tgamma, -0x3.0000000000002p0L, 3.7529996894754112398038859470009084971438e+14L),
14031 TEST_f_f (tgamma, -0x3.ffffffffffffep0L, 9.3824992236885396088236184658402406857503e+13L),
14032 TEST_f_f (tgamma, -0x4.0000000000004p0L, -4.6912496118442603911763815341745722862351e+13L),
14033 TEST_f_f (tgamma, -0x4.ffffffffffffcp0L, -9.3824992236885475509805702650262155809819e+12L),
14034 TEST_f_f (tgamma, -0x5.0000000000004p0L, 9.3824992236885191156860964016850034672946e+12L),
14035 TEST_f_f (tgamma, -0x5.ffffffffffffcp0L, 1.5637498706147581566449098589862357835505e+12L),
14036 TEST_f_f (tgamma, -0x6.0000000000004p0L, -1.5637498706147529544662012521330708016396e+12L),
14037 TEST_f_f (tgamma, -0x6.ffffffffffffcp0L, -2.2339283865925119357965832452642909859289e+11L),
14038 TEST_f_f (tgamma, -0x7.0000000000004p0L, 2.2339283865925039372192897706214475877342e+11L),
14039 TEST_f_f (tgamma, -0x7.ffffffffffffcp0L, 2.7924104832406402297655703264222230055898e+10L),
14040 TEST_f_f (tgamma, -0x8.0000000000008p0L, -1.3962052416203121511868106259843527348026e+10L),
14041 TEST_f_f (tgamma, -0x9.ffffffffffff8p0L, 1.5513391573559147700413058496716749249803e+08L),
14042 TEST_f_f (tgamma, -0xa.0000000000008p0L, -1.5513391573559018084419393002828541166901e+08L),
14043 TEST_f_f (tgamma, -0x13.ffffffffffffp0L, 1.1569515572952029402736625857313236848570e-04L),
14044 TEST_f_f (tgamma, -0x14.000000000001p0L, -1.1569515572951781096476686854873801225397e-04L),
14045 TEST_f_f (tgamma, -0x1d.ffffffffffffp0L, 1.0611571800204311628217068863959963842891e-18L),
14046 TEST_f_f (tgamma, -0x1e.000000000001p0L, -1.0611571800204053929094168642022073530425e-18L),
14047 TEST_f_f (tgamma, -0x27.fffffffffffep0L, 1.7249032006742266376460389310340465554361e-34L),
14048 TEST_f_f (tgamma, -0x28.000000000002p0L, -1.7249032006741359094184881234822934593822e-34L),
14049 TEST_f_f (tgamma, -0x28.fffffffffffep0L, -4.2070809772542120404320040128839297118648e-36L),
14050 TEST_f_f (tgamma, -0x29.000000000002p0L, 4.2070809772539892938717205103652583609422e-36L),
14051 TEST_f_f (tgamma, -0x29.fffffffffffep0L, 1.0016859469652887505173040814397197718981e-37L),
14052 TEST_f_f (tgamma, -0x2a.000000000002p0L, -1.0016859469652353766978684241048308120274e-37L),
14053 TEST_f_f (tgamma, -0x31.fffffffffffep0L, 4.6273774273632946947805289899230181990085e-51L),
14054 TEST_f_f (tgamma, -0x32.000000000002p0L, -4.6273774273630367887073532197576655720178e-51L),
14055 TEST_f_f (tgamma, -0x63.fffffffffffcp0L, 7.5400833348840965463348754984345825364294e-145L),
14056 TEST_f_f (tgamma, -0x64.000000000004p0L, -7.5400833348831085791638490135462230991587e-145L),
14057 TEST_f_f (tgamma, -0x95.fffffffffff8p0L, 6.1582369322723207086020016423767264008839e-250L),
14058 TEST_f_f (tgamma, -0x96.000000000008p0L, -6.1582369322705655439003240743176243138734e-250L),
14059 TEST_f_f (tgamma, -0xb4.fffffffffff8p0L, -9.6760879059917574597728750098636253931457e-319L, UNDERFLOW_EXCEPTION_DOUBLE),
14060 TEST_f_f (tgamma, -0xb5.000000000008p0L, 9.6760879059888966544677044221698800670218e-319L, UNDERFLOW_EXCEPTION_DOUBLE),
14061 TEST_f_f (tgamma, -0xb5.fffffffffff8p0L, 5.3165318164789884455066481673086605454904e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14062 TEST_f_f (tgamma, -0xb6.000000000008p0L, -5.3165318164774149139661976747137185876909e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14063 TEST_f_f (tgamma, -0xb6.fffffffffff8p0L, -2.9052086428846935908287469917922960610289e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
14064 TEST_f_f (tgamma, -0xb7.000000000008p0L, 2.9052086428838328351126988236541632950925e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14065# if !defined TEST_LDOUBLE || LDBL_MAX_EXP <= 1024
74c57478
JM		 14066 TEST_f_f (tgamma, -0xb7.fffffffffff8p0L, plus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
14067 TEST_f_f (tgamma, -0xb8.000000000008p0L, minus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14068# else
74c57478
JM		 14069 TEST_f_f (tgamma, -0xb7.fffffffffff8p0L, 1.5789177406982032823826953250736039527543e-325L),
14070 TEST_f_f (tgamma, -0xb8.000000000008p0L, -1.5789177406977349925854817486109369828857e-325L),
d8cd06db
JM		 14071# endif
14072#endif
14073#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
74c57478
JM		 14074 TEST_f_f (tgamma, 0x8.00000000000000000000000004p0L, 5.0400000000000000000000000000020034765587e+03L),
14075 TEST_f_f (tgamma, 0x7.fffffffffffffffffffffffffep0L, 5.0399999999999999999999999999989982617206e+03L),
14076 TEST_f_f (tgamma, 0x7.00000000000000000000000002p0L, 7.2000000000000000000000000000013296297113e+02L),
14077 TEST_f_f (tgamma, 0x6.fffffffffffffffffffffffffep0L, 7.1999999999999999999999999999986703702887e+02L),
14078 TEST_f_f (tgamma, 0x6.00000000000000000000000002p0L, 1.2000000000000000000000000000002018834292e+02L),
14079 TEST_f_f (tgamma, 0x5.fffffffffffffffffffffffffep0L, 1.1999999999999999999999999999997981165708e+02L),
14080 TEST_f_f (tgamma, 0x5.00000000000000000000000002p0L, 2.4000000000000000000000000000003564352042e+01L),
14081 TEST_f_f (tgamma, 0x4.fffffffffffffffffffffffffep0L, 2.3999999999999999999999999999996435647958e+01L),
14082 TEST_f_f (tgamma, 0x4.00000000000000000000000002p0L, 6.0000000000000000000000000000007431765907e+00L),
14083 TEST_f_f (tgamma, 0x3.ffffffffffffffffffffffffffp0L, 5.9999999999999999999999999999996284117046e+00L),
14084 TEST_f_f (tgamma, 0x3.00000000000000000000000001p0L, 2.0000000000000000000000000000000909935607e+00L),
14085 TEST_f_f (tgamma, 0x2.ffffffffffffffffffffffffffp0L, 1.9999999999999999999999999999999090064393e+00L),
14086 TEST_f_f (tgamma, 0x2.00000000000000000000000001p0L, 1.0000000000000000000000000000000208448771e+00L),
14087 TEST_f_f (tgamma, 0x1.ffffffffffffffffffffffffff8p0L, 9.9999999999999999999999999999998957756146e-01L),
14088 TEST_f_f (tgamma, 0x1.000000000000000000000000008p0L, 9.9999999999999999999999999999998577053525e-01L),
14089 TEST_f_f (tgamma, 0x0.ffffffffffffffffffffffffffcp0L, 1.0000000000000000000000000000000071147324e+00L),
14090 TEST_f_f (tgamma, -0x0.ffffffffffffffffffffffffffcp0L, -8.1129638414606681695789005144064422784335e+31L),
14091 TEST_f_f (tgamma, -0x1.000000000000000000000000008p0L, 4.0564819207303340847894502572031577215665e+31L),
14092 TEST_f_f (tgamma, -0x1.ffffffffffffffffffffffffff8p0L, 2.0282409603651670423947251286016461392168e+31L),
14093 TEST_f_f (tgamma, -0x2.00000000000000000000000001p0L, -1.0141204801825835211973625643007538607832e+31L),
14094 TEST_f_f (tgamma, -0x2.ffffffffffffffffffffffffffp0L, -3.3804016006086117373245418810028760196114e+30L),
14095 TEST_f_f (tgamma, -0x3.00000000000000000000000001p0L, 3.3804016006086117373245418810024573137219e+30L),
14096 TEST_f_f (tgamma, -0x3.ffffffffffffffffffffffffffp0L, 8.4510040015215293433113547025072942156952e+29L),
14097 TEST_f_f (tgamma, -0x4.00000000000000000000000002p0L, -4.2255020007607646716556773512527057843048e+29L),
14098 TEST_f_f (tgamma, -0x4.fffffffffffffffffffffffffep0L, -8.4510040015215293433113547025080884313904e+28L),
14099 TEST_f_f (tgamma, -0x5.00000000000000000000000002p0L, 8.4510040015215293433113547025052449019430e+28L),
14100 TEST_f_f (tgamma, -0x5.fffffffffffffffffffffffffep0L, 1.4085006669202548905518924504180378867132e+28L),
14101 TEST_f_f (tgamma, -0x6.00000000000000000000000002p0L, -1.4085006669202548905518924504175176688423e+28L),
14102 TEST_f_f (tgamma, -0x6.fffffffffffffffffffffffffep0L, -2.0121438098860784150741320720257967542615e+27L),
14103 TEST_f_f (tgamma, -0x7.00000000000000000000000002p0L, 2.0121438098860784150741320720249968965322e+27L),
14104 TEST_f_f (tgamma, -0x7.fffffffffffffffffffffffffep0L, 2.5151797623575980188426650900322769448110e+26L),
14105 TEST_f_f (tgamma, -0x8.00000000000000000000000004p0L, -1.2575898811787990094213325450153421028080e+26L),
14106 TEST_f_f (tgamma, -0x9.fffffffffffffffffffffffffcp0L, 1.3973220901986655660237028277960625420495e+24L),
14107 TEST_f_f (tgamma, -0xa.00000000000000000000000004p0L, -1.3973220901986655660237028277947663821128e+24L),
14108 TEST_f_f (tgamma, -0x13.fffffffffffffffffffffffff8p0L, 1.0420893204640670202556853709074896123293e+12L),
14109 TEST_f_f (tgamma, -0x14.00000000000000000000000008p0L, -1.0420893204640670202556853709050065497299e+12L),
14110 TEST_f_f (tgamma, -0x1d.fffffffffffffffffffffffff8p0L, 9.5580541610429641982963434151488827190079e-03L),
14111 TEST_f_f (tgamma, -0x1e.00000000000000000000000008p0L, -9.5580541610429641982963434151231128067179e-03L),
14112 TEST_f_f (tgamma, -0x27.fffffffffffffffffffffffffp0L, 1.5536546823612837336494536911280147806523e-18L),
14113 TEST_f_f (tgamma, -0x28.0000000000000000000000001p0L, -1.5536546823612837336494536911189419578973e-18L),
14114 TEST_f_f (tgamma, -0x28.fffffffffffffffffffffffffp0L, -3.7894016642958139845108626612879138384405e-20L),
14115 TEST_f_f (tgamma, -0x29.0000000000000000000000001p0L, 3.7894016642958139845108626612656391824122e-20L),
14116 TEST_f_f (tgamma, -0x29.fffffffffffffffffffffffffp0L, 9.0223849149900332964544349078285357440663e-22L),
14117 TEST_f_f (tgamma, -0x2a.0000000000000000000000001p0L, -9.0223849149900332964544349077751619246306e-22L),
14118 TEST_f_f (tgamma, -0x31.fffffffffffffffffffffffffp0L, 4.1679710515150795310771069868348482819424e-35L),
14119 TEST_f_f (tgamma, -0x32.0000000000000000000000001p0L, -4.1679710515150795310771069868090576746248e-35L),
14120 TEST_f_f (tgamma, -0x63.ffffffffffffffffffffffffep0L, 6.7915032994648558610510614163560656864280e-129L),
14121 TEST_f_f (tgamma, -0x64.0000000000000000000000002p0L, -6.7915032994648558610510614162572689693253e-129L),
14122 TEST_f_f (tgamma, -0x95.ffffffffffffffffffffffffcp0L, 5.5468467106873795353190582463444660395353e-234L),
14123 TEST_f_f (tgamma, -0x96.0000000000000000000000004p0L, -5.5468467106873795353190582461689495693675e-234L),
14124 TEST_f_f (tgamma, -0xb4.ffffffffffffffffffffffffcp0L, -8.7154451775644399729745472278589884205029e-303L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14125 TEST_f_f (tgamma, -0xb5.0000000000000000000000004p0L, 8.7154451775644399729745472275729078899858e-303L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14126 TEST_f_f (tgamma, -0xb5.ffffffffffffffffffffffffcp0L, 4.7887061415189230620739270482742524864974e-305L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14127 TEST_f_f (tgamma, -0xb6.0000000000000000000000004p0L, -4.7887061415189230620739270481168993324524e-305L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14128 TEST_f_f (tgamma, -0xb6.ffffffffffffffffffffffffcp0L, -2.6167793123054224382917634143575601407067e-307L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14129 TEST_f_f (tgamma, -0xb7.0000000000000000000000004p0L, 2.6167793123054224382917634142714845691019e-307L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14130 TEST_f_f (tgamma, -0xb7.ffffffffffffffffffffffffcp0L, 1.4221626697312078468976975078030462044826e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
14131 TEST_f_f (tgamma, -0xb8.0000000000000000000000004p0L, -1.4221626697312078468976975077562172247612e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
14132 TEST_f_f (tgamma, -0xbb.ffffffffffffffffffffffffcp0L, 1.1756150745511026776007338998283058108448e-318L, UNDERFLOW_EXCEPTION_DOUBLE),
14133 TEST_f_f (tgamma, -0xbc.0000000000000000000000004p0L, -1.1756150745511026776007338997894360215107e-318L, UNDERFLOW_EXCEPTION_DOUBLE),
14134 TEST_f_f (tgamma, -0xbc.ffffffffffffffffffffffffcp0L, -6.2201855796354639026493857133773832713743e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14135 TEST_f_f (tgamma, -0xbd.0000000000000000000000004p0L, 6.2201855796354639026493857131715153125175e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14136 TEST_f_f (tgamma, -0xbd.ffffffffffffffffffffffffcp0L, 3.2737818840186652119207293228302560914295e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
14137 TEST_f_f (tgamma, -0xbe.0000000000000000000000004p0L, -3.2737818840186652119207293227217957948294e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14138# if LDBL_MAX_EXP <= 1024
74c57478
JM		 14139 TEST_f_f (tgamma, -0xbe.ffffffffffffffffffffffffcp0L, minus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
14140 TEST_f_f (tgamma, -0xbf.0000000000000000000000004p0L, plus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14141# else
74c57478
JM		 14142 TEST_f_f (tgamma, -0xbe.ffffffffffffffffffffffffcp0L, -1.7140219288055838805867692789687487834686e-325L),
14143 TEST_f_f (tgamma, -0xbf.0000000000000000000000004p0L, 1.7140219288055838805867692789119066543632e-325L),
d8cd06db
JM		 14144# endif
14145#endif
14146#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 14147 TEST_f_f (tgamma, 0x8.000000000000001p0L, 5.0400000000000000088113830892247051102283e+03L),
14148 TEST_f_f (tgamma, 0x7.fffffffffffffff8p0L, 5.0399999999999999955943084553876474508520e+03L),
14149 TEST_f_f (tgamma, 0x7.0000000000000008p0L, 7.2000000000000000058477733127664675369681e+02L),
14150 TEST_f_f (tgamma, 0x6.fffffffffffffff8p0L, 7.1999999999999999941522266872335324679893e+02L),
14151 TEST_f_f (tgamma, 0x6.0000000000000008p0L, 1.2000000000000000008878927116622375680433e+02L),
14152 TEST_f_f (tgamma, 0x5.fffffffffffffff8p0L, 1.1999999999999999991121072883377624326546e+02L),
14153 TEST_f_f (tgamma, 0x5.0000000000000008p0L, 2.4000000000000000015676186062072582846211e+01L),
14154 TEST_f_f (tgamma, 0x4.fffffffffffffff8p0L, 2.3999999999999999984323813937927417165027e+01L),
14155 TEST_f_f (tgamma, 0x4.0000000000000008p0L, 6.0000000000000000032685252120268430507939e+00L),
14156 TEST_f_f (tgamma, 0x3.fffffffffffffffcp0L, 5.9999999999999999983657373939865784753909e+00L),
14157 TEST_f_f (tgamma, 0x3.0000000000000004p0L, 2.0000000000000000004001939123397399171482e+00L),
14158 TEST_f_f (tgamma, 0x2.fffffffffffffffcp0L, 1.9999999999999999995998060876602600829690e+00L),
14159 TEST_f_f (tgamma, 0x2.0000000000000004p0L, 1.0000000000000000000916767389213195151634e+00L),
14160 TEST_f_f (tgamma, 0x1.fffffffffffffffep0L, 9.9999999999999999995416163053934024243282e-01L),
14161 TEST_f_f (tgamma, 0x1.0000000000000002p0L, 9.9999999999999999993741815221210931418291e-01L),
14162 TEST_f_f (tgamma, 0x0.ffffffffffffffffp0L, 1.0000000000000000000312909238939453429173e+00L),
14163 TEST_f_f (tgamma, -0x0.ffffffffffffffffp0L, -1.8446744073709551616422784335098467139470e+19L),
14164 TEST_f_f (tgamma, -0x1.0000000000000002p0L, 9.2233720368547758075772156649015328607596e+18L),
14165 TEST_f_f (tgamma, -0x1.fffffffffffffffep0L, 4.6116860184273879044613921675492335697983e+18L),
14166 TEST_f_f (tgamma, -0x2.0000000000000004p0L, -2.3058430092136939515386078324507664305064e+18L),
14167 TEST_f_f (tgamma, -0x2.fffffffffffffffcp0L, -7.6861433640456465087601961140530007887063e+17L),
14168 TEST_f_f (tgamma, -0x3.0000000000000004p0L, 7.6861433640456465045731372192803325462836e+17L),
14169 TEST_f_f (tgamma, -0x3.fffffffffffffffcp0L, 1.9215358410114116272942156951799168638773e+17L),
14170 TEST_f_f (tgamma, -0x4.0000000000000008p0L, -9.6076792050570581270578430482008313684602e+16L),
14171 TEST_f_f (tgamma, -0x4.fffffffffffffff8p0L, -1.9215358410114116280884313903598337283601e+16L),
14172 TEST_f_f (tgamma, -0x5.0000000000000008p0L, 1.9215358410114116252449019429734996071487e+16L),
14173 TEST_f_f (tgamma, -0x5.fffffffffffffff8p0L, 3.2025597350190193803788671320812043622696e+15L),
14174 TEST_f_f (tgamma, -0x6.0000000000000008p0L, -3.2025597350190193751766884234743511972877e+15L),
14175 TEST_f_f (tgamma, -0x6.fffffffffffffff8p0L, -4.5750853357414562579675426149912896787735e+14L),
14176 TEST_f_f (tgamma, -0x7.0000000000000008p0L, 4.5750853357414562499689653215166468353753e+14L),
14177 TEST_f_f (tgamma, -0x7.fffffffffffffff8p0L, 5.7188566696768203227694481100089533685959e+13L),
14178 TEST_f_f (tgamma, -0x8.000000000000001p0L, -2.8594283348384101534210280804672371201060e+13L),
14179 TEST_f_f (tgamma, -0x9.fffffffffffffffp0L, 3.1771425942649001828476427167843945971988e+11L),
14180 TEST_f_f (tgamma, -0xa.000000000000001p0L, -3.1771425942649001698860433502350057763905e+11L),
14181 TEST_f_f (tgamma, -0x13.ffffffffffffffep0L, 2.3694367893405502075347562184931828448654e-01L),
14182 TEST_f_f (tgamma, -0x14.000000000000002p0L, -2.3694367893405501827041302245929389013031e-01L),
14183 TEST_f_f (tgamma, -0x1d.ffffffffffffffep0L, 2.1732499046818166459536268654187775086902e-15L),
14184 TEST_f_f (tgamma, -0x1e.000000000000002p0L, -2.1732499046818166201837145753965837196590e-15L),
14185 TEST_f_f (tgamma, -0x27.ffffffffffffffcp0L, 3.5326017549807232935581894777156474496719e-31L),
14186 TEST_f_f (tgamma, -0x28.000000000000004p0L, -3.5326017549807232028299619269080956965758e-31L),
14187 TEST_f_f (tgamma, -0x28.ffffffffffffffcp0L, -8.6161018414163982777002940498289948893044e-33L),
14188 TEST_f_f (tgamma, -0x29.000000000000004p0L, 8.6161018414163980549537337663264762179535e-33L),
14189 TEST_f_f (tgamma, -0x29.ffffffffffffffcp0L, 2.0514528193848567329552463626090806737389e-34L),
14190 TEST_f_f (tgamma, -0x2a.000000000000004p0L, -2.0514528193848566795814269269517457847791e-34L),
14191 TEST_f_f (tgamma, -0x31.ffffffffffffffcp0L, 9.4768689712397635680446279661359728835046e-48L),
14192 TEST_f_f (tgamma, -0x32.000000000000004p0L, -9.4768689712397633101385547903658075308777e-48L),
14193 TEST_f_f (tgamma, -0x63.ffffffffffffff8p0L, 1.5442090669841618542494279375256856430049e-141L),
14194 TEST_f_f (tgamma, -0x64.000000000000008p0L, -1.5442090669841617554527108348771968070612e-141L),
14195 TEST_f_f (tgamma, -0x95.ffffffffffffffp0L, 1.2612069237291916400144732227892704713839e-246L),
14196 TEST_f_f (tgamma, -0x96.00000000000001p0L, -1.2612069237291914644980030550324645611752e-246L),
14197 TEST_f_f (tgamma, -0xb4.ffffffffffffffp0L, -1.9816628031468191243385005680879281767694e-315L),
14198 TEST_f_f (tgamma, -0xb5.00000000000001p0L, 1.9816628031468188382579700510291588022368e-315L),
14199 TEST_f_f (tgamma, -0xb5.ffffffffffffffp0L, 1.0888257160147357826865964233809723297472e-317L),
14200 TEST_f_f (tgamma, -0xb6.00000000000001p0L, -1.0888257160147356253334423783317128355514e-317L),
14201 TEST_f_f (tgamma, -0xb6.ffffffffffffffp0L, -5.9498673006269714905418984659220067091260e-320L),
14202 TEST_f_f (tgamma, -0xb7.00000000000001p0L, 5.9498673006269706297861824177538685763601e-320L),
14203 TEST_f_f (tgamma, -0xb7.ffffffffffffffp0L, 3.2336235329494410277123118903958061569834e-322L),
14204 TEST_f_f (tgamma, -0xb8.00000000000001p0L, -3.2336235329494405594225146768193434900135e-322L),
14205 TEST_f_f (tgamma, -0xbb.ffffffffffffffp0L, 2.6730392040715350119087465463119939092815e-331L),
14206 TEST_f_f (tgamma, -0xbc.00000000000001p0L, -2.6730392040715346232108532050343031951651e-331L),
14207 TEST_f_f (tgamma, -0xbc.ffffffffffffffp0L, -1.4143064571807063556111222197839950086445e-333L),
14208 TEST_f_f (tgamma, -0xbd.00000000000001p0L, 1.4143064571807061497431633629389135273431e-333L),
14209 TEST_f_f (tgamma, -0xbd.ffffffffffffffp0L, 7.4437181956879281879706555863416819210399e-336L),
14210 TEST_f_f (tgamma, -0xbe.00000000000001p0L, -7.4437181956879271033676895858841525581153e-336L),
14211 TEST_f_f (tgamma, -0xbe.ffffffffffffffp0L, -3.8972346574282346536709453101948570578636e-338L),
14212 TEST_f_f (tgamma, -0xbf.00000000000001p0L, 3.8972346574282340852496542564155275274974e-338L),
14213 TEST_f_f (tgamma, -0xf9.ffffffffffffffp0L, 2.2289142548411573883553287678043297937797e-476L),
14214 TEST_f_f (tgamma, -0xfa.00000000000001p0L, -2.2289142548411570466476165308364665814265e-476L),
14215 TEST_f_f (tgamma, -0x1f3.fffffffffffffep0L, 2.9528489142763141594943668922610562530068e-1118L),
14216 TEST_f_f (tgamma, -0x1f4.00000000000002p0L, -2.9528489142763131406565394149878256133744e-1118L),
14217 TEST_f_f (tgamma, -0x2ed.fffffffffffffcp0L, 6.9801511765871818502006905472380418430269e-1817L),
14218 TEST_f_f (tgamma, -0x2ee.00000000000004p0L, -6.9801511765871767194421856376592926002995e-1817L),
14219 TEST_f_f (tgamma, -0x3e7.fffffffffffffcp0L, 4.4768809295877296071892611539415773519036e-2552L),
14220 TEST_f_f (tgamma, -0x3e8.00000000000004p0L, -4.4768809295877261735541135972060089530309e-2552L),
14221 TEST_f_f (tgamma, -0x4e1.fffffffffffff8p0L, 5.4651488569236507565341414077911790252381e-3315L),
14222 TEST_f_f (tgamma, -0x4e2.00000000000008p0L, -5.4651488569236421026544487194247355967789e-3315L),
14223 TEST_f_f (tgamma, -0x5db.fffffffffffff8p0L, 1.8718211510339187689122114747834510481993e-4099L),
14224 TEST_f_f (tgamma, -0x5dc.00000000000008p0L, -1.8718211510339157291960718369454861898499e-4099L),
14225 TEST_f_f (tgamma, -0x6d5.fffffffffffff8p0L, 4.2925786447266492555651378780094011518063e-4902L),
14226 TEST_f_f (tgamma, -0x6d6.00000000000008p0L, -4.2925786447266421378134368786479937285900e-4902L),
14227 TEST_f_f (tgamma, -0x6e2.fffffffffffff8p0L, -2.8229173528168668283609231628661510187536e-4944L, UNDERFLOW_EXCEPTION),
14228 TEST_f_f (tgamma, -0x6e3.00000000000008p0L, 2.8229173528168621428945467532322397890424e-4944L, UNDERFLOW_EXCEPTION),
14229 TEST_f_f (tgamma, -0x6e3.fffffffffffff8p0L, 1.6002932839097884515524894602387278842659e-4947L, UNDERFLOW_EXCEPTION),
14230 TEST_f_f (tgamma, -0x6e4.00000000000008p0L, -1.6002932839097857951909742110188634438017e-4947L, UNDERFLOW_EXCEPTION),
14231 TEST_f_f (tgamma, -0x6e4.fffffffffffff8p0L, -9.0668174725767051085164382743343408095146e-4951L, UNDERFLOW_EXCEPTION),
14232 TEST_f_f (tgamma, -0x6e5.00000000000008p0L, 9.0668174725766900571689083050287838090189e-4951L, UNDERFLOW_EXCEPTION),
d8cd06db 14233# if LDBL_MANT_DIG <= 64
74c57478
JM		 14234 TEST_f_f (tgamma, -0x6e5.fffffffffffff8p0L, plus_zero, UNDERFLOW_EXCEPTION),
14235 TEST_f_f (tgamma, -0x6e6.00000000000008p0L, minus_zero, UNDERFLOW_EXCEPTION),
d8cd06db 14236# else
74c57478
JM		 14237 TEST_f_f (tgamma, -0x6e5.fffffffffffff8p0L, 5.1340982290921319983501912122292601780326e-4954L, UNDERFLOW_EXCEPTION),
14238 TEST_f_f (tgamma, -0x6e6.00000000000008p0L, -5.1340982290921234748578193083614111497314e-4954L, UNDERFLOW_EXCEPTION),
d8cd06db
JM		 14239# endif
14240# if LDBL_MANT_DIG >= 113
74c57478
JM		 14241 TEST_f_f (tgamma, 0x8.0000000000000000000000000008p0L, 5.0400000000000000000000000000000156521606e+03L),
14242 TEST_f_f (tgamma, 0x7.fffffffffffffffffffffffffffcp0L, 5.0399999999999999999999999999999921739197e+03L),
14243 TEST_f_f (tgamma, 0x7.0000000000000000000000000004p0L, 7.2000000000000000000000000000000103877321e+02L),
14244 TEST_f_f (tgamma, 0x6.fffffffffffffffffffffffffffcp0L, 7.1999999999999999999999999999999896122679e+02L),
14245 TEST_f_f (tgamma, 0x6.0000000000000000000000000004p0L, 1.2000000000000000000000000000000015772143e+02L),
14246 TEST_f_f (tgamma, 0x5.fffffffffffffffffffffffffffcp0L, 1.1999999999999999999999999999999984227857e+02L),
14247 TEST_f_f (tgamma, 0x5.0000000000000000000000000004p0L, 2.4000000000000000000000000000000027846500e+01L),
14248 TEST_f_f (tgamma, 0x4.fffffffffffffffffffffffffffcp0L, 2.3999999999999999999999999999999972153500e+01L),
14249 TEST_f_f (tgamma, 0x4.0000000000000000000000000004p0L, 6.0000000000000000000000000000000058060671e+00L),
14250 TEST_f_f (tgamma, 0x3.fffffffffffffffffffffffffffep0L, 5.9999999999999999999999999999999970969664e+00L),
14251 TEST_f_f (tgamma, 0x3.0000000000000000000000000002p0L, 2.0000000000000000000000000000000007108872e+00L),
14252 TEST_f_f (tgamma, 0x2.fffffffffffffffffffffffffffep0L, 1.9999999999999999999999999999999992891128e+00L),
14253 TEST_f_f (tgamma, 0x2.0000000000000000000000000002p0L, 1.0000000000000000000000000000000001628506e+00L),
14254 TEST_f_f (tgamma, 0x1.ffffffffffffffffffffffffffffp0L, 9.9999999999999999999999999999999991857470e-01L),
14255 TEST_f_f (tgamma, 0x1.0000000000000000000000000001p0L, 9.9999999999999999999999999999999988883231e-01L),
14256 TEST_f_f (tgamma, 0x0.ffffffffffffffffffffffffffff8p0L, 1.0000000000000000000000000000000000555838e+00L),
14257 TEST_f_f (tgamma, -0x0.ffffffffffffffffffffffffffff8p0L, -1.0384593717069655257060992658440192422784e+34L),
14258 TEST_f_f (tgamma, -0x1.0000000000000000000000000001p0L, 5.1922968585348276285304963292200955772157e+33L),
14259 TEST_f_f (tgamma, -0x1.ffffffffffffffffffffffffffffp0L, 2.5961484292674138142652481646100484613922e+33L),
14260 TEST_f_f (tgamma, -0x2.0000000000000000000000000002p0L, -1.2980742146337069071326240823050235386078e+33L),
14261 TEST_f_f (tgamma, -0x2.fffffffffffffffffffffffffffep0L, -4.3269140487790230237754136076834154268628e+32L),
14262 TEST_f_f (tgamma, -0x3.0000000000000000000000000002p0L, 4.3269140487790230237754136076834112398039e+32L),
14263 TEST_f_f (tgamma, -0x3.fffffffffffffffffffffffffffep0L, 1.0817285121947557559438534019208539608824e+32L),
14264 TEST_f_f (tgamma, -0x4.0000000000000000000000000004p0L, -5.4086425609737787797192670096042603911764e+31L),
14265 TEST_f_f (tgamma, -0x4.fffffffffffffffffffffffffffcp0L, -1.0817285121947557559438534019208547550981e+31L),
14266 TEST_f_f (tgamma, -0x5.0000000000000000000000000004p0L, 1.0817285121947557559438534019208519115686e+31L),
14267 TEST_f_f (tgamma, -0x5.fffffffffffffffffffffffffffcp0L, 1.8028808536579262599064223365347581566449e+30L),
14268 TEST_f_f (tgamma, -0x6.0000000000000000000000000004p0L, -1.8028808536579262599064223365347529544662e+30L),
14269 TEST_f_f (tgamma, -0x6.fffffffffffffffffffffffffffcp0L, -2.5755440766541803712948890521925119357966e+29L),
14270 TEST_f_f (tgamma, -0x7.0000000000000000000000000004p0L, 2.5755440766541803712948890521925039372193e+29L),
14271 TEST_f_f (tgamma, -0x7.fffffffffffffffffffffffffffcp0L, 3.2194300958177254641186113152406402297656e+28L),
14272 TEST_f_f (tgamma, -0x8.0000000000000000000000000008p0L, -1.6097150479088627320593056576203121511868e+28L),
14273 TEST_f_f (tgamma, -0x9.fffffffffffffffffffffffffff8p0L, 1.7885722754542919245103396195781369922635e+26L),
14274 TEST_f_f (tgamma, -0xa.0000000000000000000000000008p0L, -1.7885722754542919245103396195781240306642e+26L),
14275 TEST_f_f (tgamma, -0x13.fffffffffffffffffffffffffffp0L, 1.3338743301940057859272772747600099590309e+14L),
14276 TEST_f_f (tgamma, -0x14.000000000000000000000000001p0L, -1.3338743301940057859272772747599851284049e+14L),
14277 TEST_f_f (tgamma, -0x1d.fffffffffffffffffffffffffffp0L, 1.2234309326134994173819319571374205986026e+00L),
14278 TEST_f_f (tgamma, -0x1e.000000000000000000000000001p0L, -1.2234309326134994173819319571373948286903e+00L),
14279 TEST_f_f (tgamma, -0x27.ffffffffffffffffffffffffffep0L, 1.9886779934224431790713007246380976767855e-16L),
14280 TEST_f_f (tgamma, -0x28.000000000000000000000000002p0L, -1.9886779934224431790713007246380069485580e-16L),
14281 TEST_f_f (tgamma, -0x28.ffffffffffffffffffffffffffep0L, -4.8504341302986419001739042064343853066259e-18L),
14282 TEST_f_f (tgamma, -0x29.000000000000000000000000002p0L, 4.8504341302986419001739042064341625600656e-18L),
14283 TEST_f_f (tgamma, -0x29.ffffffffffffffffffffffffffep0L, 1.1548652691187242619461676681986633377063e-19L),
14284 TEST_f_f (tgamma, -0x2a.000000000000000000000000002p0L, -1.1548652691187242619461676681986099638869e-19L),
14285 TEST_f_f (tgamma, -0x31.ffffffffffffffffffffffffffep0L, 5.3350029459393017997786969431322287652396e-33L),
14286 TEST_f_f (tgamma, -0x32.000000000000000000000000002p0L, -5.3350029459393017997786969431319708591664e-33L),
14287 TEST_f_f (tgamma, -0x63.ffffffffffffffffffffffffffcp0L, 8.6931242233150155021453586128730281632676e-127L),
14288 TEST_f_f (tgamma, -0x64.000000000000000000000000004p0L, -8.6931242233150155021453586128720401960966e-127L),
14289 TEST_f_f (tgamma, -0x95.ffffffffffffffffffffffffff8p0L, 7.0999637896798458052083945552094635720486e-232L),
14290 TEST_f_f (tgamma, -0x96.000000000000000000000000008p0L, -7.0999637896798458052083945552077084073470e-232L),
14291 TEST_f_f (tgamma, -0xb4.ffffffffffffffffffffffffff8p0L, -1.1155769827282483165407420451477844041365e-300L),
14292 TEST_f_f (tgamma, -0xb5.000000000000000000000000008p0L, 1.1155769827282483165407420451474983236060e-300L),
14293 TEST_f_f (tgamma, -0xb5.ffffffffffffffffffffffffff8p0L, 6.1295438611442215194546266216911239298981e-303L),
14294 TEST_f_f (tgamma, -0xb6.000000000000000000000000008p0L, -6.1295438611442215194546266216895503983577e-303L),
14295 TEST_f_f (tgamma, -0xb6.ffffffffffffffffffffffffff8p0L, -3.3494775197509407210134571703230189921356e-305L),
14296 TEST_f_f (tgamma, -0xb7.000000000000000000000000008p0L, 3.3494775197509407210134571703221582364195e-305L),
14297 TEST_f_f (tgamma, -0xb7.ffffffffffffffffffffffffff8p0L, 1.8203682172559460440290528099581627396147e-307L),
14298 TEST_f_f (tgamma, -0xb8.000000000000000000000000008p0L, -1.8203682172559460440290528099576944498174e-307L),
14299 TEST_f_f (tgamma, -0xbb.ffffffffffffffffffffffffff8p0L, 1.5047872954254114273289393917555491216542e-316L),
14300 TEST_f_f (tgamma, -0xbc.000000000000000000000000008p0L, -1.5047872954254114273289393917551604237609e-316L),
14301 TEST_f_f (tgamma, -0xbc.ffffffffffffffffffffffffff8p0L, -7.9618375419333937953912137129923244334851e-319L),
14302 TEST_f_f (tgamma, -0xbd.000000000000000000000000008p0L, 7.9618375419333937953912137129902657538965e-319L),
14303 TEST_f_f (tgamma, -0xbd.ffffffffffffffffffffffffff8p0L, 4.1904408115438914712585335331538555086887e-321L),
14304 TEST_f_f (tgamma, -0xbe.000000000000000000000000008p0L, -4.1904408115438914712585335331527709057227e-321L),
14305 TEST_f_f (tgamma, -0xbe.ffffffffffffffffffffffffff8p0L, -2.1939480688711473671510646770439036908579e-323L),
14306 TEST_f_f (tgamma, -0xbf.000000000000000000000000008p0L, 2.1939480688711473671510646770433352695669e-323L),
14307 TEST_f_f (tgamma, -0xf9.ffffffffffffffffffffffffff8p0L, 1.2547671759429278005937024349858508569625e-461L),
14308 TEST_f_f (tgamma, -0xfa.000000000000000000000000008p0L, -1.2547671759429278005937024349855091492502e-461L),
14309 TEST_f_f (tgamma, -0x1f3.ffffffffffffffffffffffffffp0L, 1.6623061587520224800948170558276526986560e-1103L),
14310 TEST_f_f (tgamma, -0x1f4.00000000000000000000000001p0L, -1.6623061587520224800948170558266338608285e-1103L),
14311 TEST_f_f (tgamma, -0x2ed.fffffffffffffffffffffffffep0L, 3.9294757797334687313030998663853566763041e-1802L),
14312 TEST_f_f (tgamma, -0x2ee.00000000000000000000000002p0L, -3.9294757797334687313030998663802259177992e-1802L),
14313 TEST_f_f (tgamma, -0x3e7.fffffffffffffffffffffffffep0L, 2.5202599107841713834679953735597552855978e-2537L),
14314 TEST_f_f (tgamma, -0x3e8.00000000000000000000000002p0L, -2.5202599107841713834679953735563216504503e-2537L),
14315 TEST_f_f (tgamma, -0x4e1.fffffffffffffffffffffffffcp0L, 3.0766052944457032773369415396747635242705e-3300L),
14316 TEST_f_f (tgamma, -0x4e2.00000000000000000000000004p0L, -3.0766052944457032773369415396661096445778e-3300L),
14317 TEST_f_f (tgamma, -0x5db.fffffffffffffffffffffffffcp0L, 1.0537416297875703295453200836588944487917e-4084L),
14318 TEST_f_f (tgamma, -0x5dc.00000000000000000000000004p0L, -1.0537416297875703295453200836558547326520e-4084L),
14319 TEST_f_f (tgamma, -0x6d5.fffffffffffffffffffffffffcp0L, 2.4165069481061837867659591369998698607387e-4887L),
14320 TEST_f_f (tgamma, -0x6d6.00000000000000000000000004p0L, -2.4165069481061837867659591369927521090377e-4887L),
14321 TEST_f_f (tgamma, -0x6e2.fffffffffffffffffffffffffcp0L, -1.5891611922804672355414813803008070609431e-4929L),
14322 TEST_f_f (tgamma, -0x6e3.00000000000000000000000004p0L, 1.5891611922804672355414813802961215945667e-4929L),
14323 TEST_f_f (tgamma, -0x6e3.fffffffffffffffffffffffffcp0L, 9.0088502963745308137272187091882496519917e-4933L, UNDERFLOW_EXCEPTION),
14324 TEST_f_f (tgamma, -0x6e4.00000000000000000000000004p0L, -9.0088502963745308137272187091616860368392e-4933L, UNDERFLOW_EXCEPTION),
14325 TEST_f_f (tgamma, -0x6e4.fffffffffffffffffffffffffcp0L, -5.1041644738665896961627301468488672286746e-4936L, UNDERFLOW_EXCEPTION),
14326 TEST_f_f (tgamma, -0x6e5.00000000000000000000000004p0L, 5.1041644738665896961627301468338158811446e-4936L, UNDERFLOW_EXCEPTION),
14327 TEST_f_f (tgamma, -0x6e5.fffffffffffffffffffffffffcp0L, 2.8902403589278537350864836618623260468143e-4939L, UNDERFLOW_EXCEPTION),
14328 TEST_f_f (tgamma, -0x6e6.00000000000000000000000004p0L, -2.8902403589278537350864836618538025544424e-4939L, UNDERFLOW_EXCEPTION),
14329 TEST_f_f (tgamma, -0x6eb.fffffffffffffffffffffffffcp0L, 9.4152481960798287090819640211017219042636e-4959L, UNDERFLOW_EXCEPTION),
14330 TEST_f_f (tgamma, -0x6ec.00000000000000000000000004p0L, -9.4152481960798287090819640210739431797168e-4959L, UNDERFLOW_EXCEPTION),
14331 TEST_f_f (tgamma, -0x6ec.fffffffffffffffffffffffffcp0L, -5.3103486723518492437010513373388172315540e-4962L, UNDERFLOW_EXCEPTION),
14332 TEST_f_f (tgamma, -0x6ed.00000000000000000000000004p0L, 5.3103486723518492437010513373231484108489e-4962L, UNDERFLOW_EXCEPTION),
14333 TEST_f_f (tgamma, -0x6ed.fffffffffffffffffffffffffcp0L, 2.9934321715624854812294539669328172615019e-4965L, UNDERFLOW_EXCEPTION),
14334 TEST_f_f (tgamma, -0x6ee.00000000000000000000000004p0L, -2.9934321715624854812294539669239841152754e-4965L, UNDERFLOW_EXCEPTION),
14335 TEST_f_f (tgamma, -0x6ee.fffffffffffffffffffffffffcp0L, minus_zero, UNDERFLOW_EXCEPTION),
14336 TEST_f_f (tgamma, -0x6ef.00000000000000000000000004p0L, plus_zero, UNDERFLOW_EXCEPTION),
d8cd06db
JM		 14337# endif
14338#endif
74c57478 14339 TEST_f_f (tgamma, -0x1.0a32a2p+5L, 1.8125267978155035272941154746083439329912e-37L),
d8cd06db 14340#ifndef TEST_FLOAT
74c57478 14341 TEST_f_f (tgamma, -0x1.5800000080001p+7L, -3.1439271448823567326093363350637118195240e-304L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d8cd06db 14342#endif
74c57478
JM		 14343 TEST_f_f (tgamma, 18.5L, 1.4986120533153361177371791123515513270334e+15L),
14344 TEST_f_f (tgamma, 19.5L, 2.7724322986333718178137813578503699550119e+16L),
14345 TEST_f_f (tgamma, 23.5L, 5.3613035875444147334274983856108155717836e+21L),
14346 TEST_f_f (tgamma, 29.5L, 1.6348125198274266444378807806868221866931e+30L),
14347 TEST_f_f (tgamma, 30.5L, 4.8226969334909086010917483030261254507447e+31L),
14348 TEST_f_f (tgamma, 31.5L, 1.4709225647147271233329832324229682624771e+33L),
14349 TEST_f_f (tgamma, 32.5L, 4.6334060788513904384988971821323500268029e+34L),
14350 TEST_f_f (tgamma, 33.5L, 1.5058569756267018925121415841930137587110e+36L),
14351 TEST_f_f (tgamma, 34.5L, 5.0446208683494513399156743070465960916817e+37L),
14352 TEST_f_f (tgamma, 0x2.30a43cp+4L, 3.4027979115654976101247558405326779640190e+38L),
d8cd06db 14353#ifdef TEST_FLOAT
74c57478 14354 TEST_f_f (tgamma, 0x2.30a44p+4L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14355#else
74c57478 14356 TEST_f_f (tgamma, 0x2.30a44p+4L, 3.4028438913396451054667218138127983367181e+38L),
d8cd06db
JM		 14357#endif
14358#ifndef TEST_FLOAT
74c57478 14359 TEST_f_f (tgamma, 0xa.b9fd72b0fb238p+4L, 1.7976931348622298700886249281842651388250e+308L),
d8cd06db 14360# if !defined TEST_LDOUBLE || LDBL_MAX_EXP <= 1024
74c57478 14361 TEST_f_f (tgamma, 0xa.b9fd72b0fb24p+4L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14362# else
74c57478 14363 TEST_f_f (tgamma, 0xa.b9fd72b0fb24p+4L, 1.7976931348624926129589466917917870782484e+308L),
d8cd06db
JM		 14364# endif
14365#endif
14366#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
74c57478 14367 TEST_f_f (tgamma, 0xa.b9fd72b0fb23a9ddbf0d3804f4p+4L, 1.7976931348623158079372897140307719334857e+308L),
d8cd06db 14368# if LDBL_MAX_EXP <= 1024
74c57478 14369 TEST_f_f (tgamma, 0xa.b9fd72b0fb23a9ddbf0d3804f8p+4L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14370# else
74c57478 14371 TEST_f_f (tgamma, 0xa.b9fd72b0fb23a9ddbf0d3804f8p+4L, 1.7976931348623158079372897140599422519044e+308L),
d8cd06db
JM		 14372# endif
14373#endif
14374#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 14375 TEST_f_f (tgamma, 0x6.db8c603359a97108p+8L, 1.1897314953572317517071551278058233700012e+4932L),
14376 TEST_f_f (tgamma, 0x6.db8c603359a9711p+8L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14377# if LDBL_MANT_DIG >= 113
74c57478
JM		 14378 TEST_f_f (tgamma, 0x6.db8c603359a971081bc4a2e9dfdp+8L, 1.1897314953572317650857593266265995494998e+4932L),
14379 TEST_f_f (tgamma, 0x6.db8c603359a971081bc4a2e9dfd4p+8L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db
JM		 14380# endif
14381#endif
74c57478
JM		 14382 END_DATA (tgamma)
14383 };
2550dfe9 14384
8847214f 14385static void
74c57478 14386tgamma_test (void)
8847214f 14387{
74c57478
JM		 14388 errno = 0;
14389 FUNC(tgamma) (1);
14390 if (errno == ENOSYS)
14391 /* Function not implemented. */
14392 return;
8847214f 14393
74c57478
JM		 14394 START (tgamma);
14395 RUN_TEST_LOOP_f_f (tgamma, tgamma_test_data, );
14396 END (tgamma);
14397}
8847214f 14398
8847214f 14399
74c57478
JM		 14400static const struct test_f_f_data trunc_test_data[] =
14401 {
14402 START_DATA (trunc),
14403 TEST_f_f (trunc, plus_infty, plus_infty),
14404 TEST_f_f (trunc, minus_infty, minus_infty),
14405 TEST_f_f (trunc, qnan_value, qnan_value),
14406
14407 TEST_f_f (trunc, 0, 0),
14408 TEST_f_f (trunc, minus_zero, minus_zero),
14409 TEST_f_f (trunc, 0.1, 0),
14410 TEST_f_f (trunc, 0.25, 0),
14411 TEST_f_f (trunc, 0.625, 0),
14412 TEST_f_f (trunc, -0.1, minus_zero),
14413 TEST_f_f (trunc, -0.25, minus_zero),
14414 TEST_f_f (trunc, -0.625, minus_zero),
14415 TEST_f_f (trunc, 1, 1),
14416 TEST_f_f (trunc, -1, -1),
14417 TEST_f_f (trunc, 1.625, 1),
14418 TEST_f_f (trunc, -1.625, -1),
14419
14420 TEST_f_f (trunc, 1048580.625L, 1048580L),
14421 TEST_f_f (trunc, -1048580.625L, -1048580L),
14422
14423 TEST_f_f (trunc, 8388610.125L, 8388610.0L),
14424 TEST_f_f (trunc, -8388610.125L, -8388610.0L),
14425
14426 TEST_f_f (trunc, 4294967296.625L, 4294967296.0L),
14427 TEST_f_f (trunc, -4294967296.625L, -4294967296.0L),
8847214f 14428
f964490f 14429#ifdef TEST_LDOUBLE
74c57478
JM		 14430 /* The result can only be represented in long double. */
14431 TEST_f_f (trunc, 4503599627370495.5L, 4503599627370495.0L),
14432 TEST_f_f (trunc, 4503599627370496.25L, 4503599627370496.0L),
14433 TEST_f_f (trunc, 4503599627370496.5L, 4503599627370496.0L),
14434 TEST_f_f (trunc, 4503599627370496.75L, 4503599627370496.0L),
14435 TEST_f_f (trunc, 4503599627370497.5L, 4503599627370497.0L),
f964490f 14436
5c68d401 14437# if LDBL_MANT_DIG > 100
74c57478
JM		 14438 TEST_f_f (trunc, 4503599627370494.5000000000001L, 4503599627370494.0L),
14439 TEST_f_f (trunc, 4503599627370495.5000000000001L, 4503599627370495.0L),
14440 TEST_f_f (trunc, 4503599627370496.5000000000001L, 4503599627370496.0L),
5c68d401 14441# endif
830fce04 14442
74c57478
JM		 14443 TEST_f_f (trunc, -4503599627370495.5L, -4503599627370495.0L),
14444 TEST_f_f (trunc, -4503599627370496.25L, -4503599627370496.0L),
14445 TEST_f_f (trunc, -4503599627370496.5L, -4503599627370496.0L),
14446 TEST_f_f (trunc, -4503599627370496.75L, -4503599627370496.0L),
14447 TEST_f_f (trunc, -4503599627370497.5L, -4503599627370497.0L),
830fce04 14448
5c68d401 14449# if LDBL_MANT_DIG > 100
74c57478
JM		 14450 TEST_f_f (trunc, -4503599627370494.5000000000001L, -4503599627370494.0L),
14451 TEST_f_f (trunc, -4503599627370495.5000000000001L, -4503599627370495.0L),
14452 TEST_f_f (trunc, -4503599627370496.5000000000001L, -4503599627370496.0L),
5c68d401 14453# endif
f964490f 14454
74c57478
JM		 14455 TEST_f_f (trunc, 9007199254740991.5L, 9007199254740991.0L),
14456 TEST_f_f (trunc, 9007199254740992.25L, 9007199254740992.0L),
14457 TEST_f_f (trunc, 9007199254740992.5L, 9007199254740992.0L),
14458 TEST_f_f (trunc, 9007199254740992.75L, 9007199254740992.0L),
14459 TEST_f_f (trunc, 9007199254740993.5L, 9007199254740993.0L),
f964490f 14460
5c68d401 14461# if LDBL_MANT_DIG > 100
74c57478
JM		 14462 TEST_f_f (trunc, 9007199254740991.0000000000001L, 9007199254740991.0L),
14463 TEST_f_f (trunc, 9007199254740992.0000000000001L, 9007199254740992.0L),
14464 TEST_f_f (trunc, 9007199254740993.0000000000001L, 9007199254740993.0L),
14465 TEST_f_f (trunc, 9007199254740991.5000000000001L, 9007199254740991.0L),
14466 TEST_f_f (trunc, 9007199254740992.5000000000001L, 9007199254740992.0L),
14467 TEST_f_f (trunc, 9007199254740993.5000000000001L, 9007199254740993.0L),
5c68d401
RM		 14468# endif
14469
74c57478
JM		 14470 TEST_f_f (trunc, -9007199254740991.5L, -9007199254740991.0L),
14471 TEST_f_f (trunc, -9007199254740992.25L, -9007199254740992.0L),
14472 TEST_f_f (trunc, -9007199254740992.5L, -9007199254740992.0L),
14473 TEST_f_f (trunc, -9007199254740992.75L, -9007199254740992.0L),
14474 TEST_f_f (trunc, -9007199254740993.5L, -9007199254740993.0L),
f964490f 14475
5c68d401 14476# if LDBL_MANT_DIG > 100
74c57478
JM		 14477 TEST_f_f (trunc, -9007199254740991.0000000000001L, -9007199254740991.0L),
14478 TEST_f_f (trunc, -9007199254740992.0000000000001L, -9007199254740992.0L),
14479 TEST_f_f (trunc, -9007199254740993.0000000000001L, -9007199254740993.0L),
14480 TEST_f_f (trunc, -9007199254740991.5000000000001L, -9007199254740991.0L),
14481 TEST_f_f (trunc, -9007199254740992.5000000000001L, -9007199254740992.0L),
14482 TEST_f_f (trunc, -9007199254740993.5000000000001L, -9007199254740993.0L),
5c68d401
RM		 14483# endif
14484
74c57478
JM		 14485 TEST_f_f (trunc, 72057594037927935.5L, 72057594037927935.0L),
14486 TEST_f_f (trunc, 72057594037927936.25L, 72057594037927936.0L),
14487 TEST_f_f (trunc, 72057594037927936.5L, 72057594037927936.0L),
14488 TEST_f_f (trunc, 72057594037927936.75L, 72057594037927936.0L),
14489 TEST_f_f (trunc, 72057594037927937.5L, 72057594037927937.0L),
14490
14491 TEST_f_f (trunc, -72057594037927935.5L, -72057594037927935.0L),
14492 TEST_f_f (trunc, -72057594037927936.25L, -72057594037927936.0L),
14493 TEST_f_f (trunc, -72057594037927936.5L, -72057594037927936.0L),
14494 TEST_f_f (trunc, -72057594037927936.75L, -72057594037927936.0L),
14495 TEST_f_f (trunc, -72057594037927937.5L, -72057594037927937.0L),
14496
14497 TEST_f_f (trunc, 10141204801825835211973625643007.5L, 10141204801825835211973625643007.0L),
14498 TEST_f_f (trunc, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
14499 TEST_f_f (trunc, 10141204801825835211973625643008.5L, 10141204801825835211973625643008.0L),
14500 TEST_f_f (trunc, 10141204801825835211973625643008.75L, 10141204801825835211973625643008.0L),
14501 TEST_f_f (trunc, 10141204801825835211973625643009.5L, 10141204801825835211973625643009.0L),
14502#endif
14503 END_DATA (trunc)
14504 };
14505
14506static void
14507trunc_test (void)
14508{
14509 START (trunc);
14510 RUN_TEST_LOOP_f_f (trunc, trunc_test_data, );
14511 END (trunc);
14512}
14513
14514static const struct test_f_f_data y0_test_data[] =
14515 {
14516 START_DATA (y0),
14517 /* y0 is the Bessel function of the second kind of order 0 */
14518 TEST_f_f (y0, -1.0, minus_infty, INVALID_EXCEPTION),
14519 TEST_f_f (y0, -max_value, minus_infty, INVALID_EXCEPTION),
14520 TEST_f_f (y0, 0.0, minus_infty),
14521 TEST_f_f (y0, qnan_value, qnan_value),
14522 TEST_f_f (y0, plus_infty, 0),
14523
14524 TEST_f_f (y0, 0.125L, -1.38968062514384052915582277745018693L),
14525 TEST_f_f (y0, 0.75L, -0.137172769385772397522814379396581855L),
14526 TEST_f_f (y0, 1.0, 0.0882569642156769579829267660235151628L),
14527 TEST_f_f (y0, 1.5, 0.382448923797758843955068554978089862L),
14528 TEST_f_f (y0, 2.0, 0.510375672649745119596606592727157873L),
14529 TEST_f_f (y0, 8.0, 0.223521489387566220527323400498620359L),
14530 TEST_f_f (y0, 10.0, 0.0556711672835993914244598774101900481L),
f964490f 14531
74c57478 14532 TEST_f_f (y0, 0x1.3ffp+74L, 1.818984347516051243459467456433028748678e-12L),
f964490f 14533
74c57478
JM		 14534#ifndef TEST_FLOAT
14535 TEST_f_f (y0, 0x1.ff00000000002p+840L, 1.846591691699331493194965158699937660696e-127L),
14536 TEST_f_f (y0, 0x1p1023L, 8.2687542933709649327986678723012001545638e-155L),
f964490f 14537#endif
8847214f 14538
74c57478
JM		 14539#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
14540 TEST_f_f (y0, 0x1p16382L, 8.0839224448726336195866026476176740513439e-2467L),
14541 TEST_f_f (y0, 0x1p16383L, -3.8895531955766020648617743624167352352217e-2467L),
14542#endif
14543
14544 TEST_f_f (y0, 0x1p-10L, -4.4865150767109739412411806297168793661098L),
14545 TEST_f_f (y0, 0x1p-20L, -8.8992283012125827603076426611387876938160L),
14546 TEST_f_f (y0, 0x1p-30L, -1.3311940304267782826037118027401817264906e+1L),
14547 TEST_f_f (y0, 0x1p-40L, -1.7724652307320814696990854700366226762563e+1L),
14548 TEST_f_f (y0, 0x1p-50L, -2.2137364310373846564919987139743760738155e+1L),
14549 TEST_f_f (y0, 0x1p-60L, -2.6550076313426878432849115782108205929120e+1L),
14550 TEST_f_f (y0, 0x1p-70L, -3.0962788316479910300778244424468159753887e+1L),
14551 TEST_f_f (y0, 0x1p-80L, -3.5375500319532942168707373066828113573541e+1L),
14552 TEST_f_f (y0, 0x1p-90L, -3.9788212322585974036636501709188067393195e+1L),
14553 TEST_f_f (y0, 0x1p-100L, -4.420092432563900590456563035154802121284e+1L),
14554 TEST_f_f (y0, 0x1p-110L, -4.861363632869203777249475899390797503250e+1L),
14555 END_DATA (y0)
14556 };
8847214f
UD		 14557
14558static void
14559y0_test (void)
14560{
8a216c1b 14561 FLOAT s, c;
8847214f 14562 errno = 0;
cd53c157
UD		 14563 FUNC (sincos) (0, &s, &c);
14564 if (errno == ENOSYS)
14565 /* Required function not implemented. */
14566 return;
8847214f
UD		 14567 FUNC(y0) (1);
14568 if (errno == ENOSYS)
14569 /* Function not implemented. */
14570 return;
14571
8847214f 14572 START (y0);
74c57478
JM		 14573 RUN_TEST_LOOP_f_f (y0, y0_test_data, );
14574 END (y0);
14575}
14576
8847214f 14577
74c57478
JM		 14578static const struct test_f_f_data y1_test_data[] =
14579 {
14580 START_DATA (y1),
14581 /* y1 is the Bessel function of the second kind of order 1 */
14582 TEST_f_f (y1, -1.0, minus_infty, INVALID_EXCEPTION),
14583 TEST_f_f (y1, -max_value, minus_infty, INVALID_EXCEPTION),
14584 TEST_f_f (y1, 0.0, minus_infty),
14585 TEST_f_f (y1, plus_infty, 0),
14586 TEST_f_f (y1, qnan_value, qnan_value),
8847214f 14587
74c57478
JM		 14588 TEST_f_f (y1, 0.125L, -5.19993611253477499595928744876579921L),
14589 TEST_f_f (y1, 0.75L, -1.03759455076928541973767132140642198L),
14590 TEST_f_f (y1, 1.0, -0.781212821300288716547150000047964821L),
14591 TEST_f_f (y1, 1.5, -0.412308626973911295952829820633445323L),
14592 TEST_f_f (y1, 2.0, -0.107032431540937546888370772277476637L),
14593 TEST_f_f (y1, 8.0, -0.158060461731247494255555266187483550L),
14594 TEST_f_f (y1, 10.0, 0.249015424206953883923283474663222803L),
8847214f 14595
74c57478 14596 TEST_f_f (y1, 0x1.27e204p+99L, -8.881610148467797208469612080785210013461e-16L),
c36e1d23
JM		 14597
14598#ifndef TEST_FLOAT
74c57478
JM		 14599 TEST_f_f (y1, 0x1.001000001p+593L, 3.927269966354206207832593635798954916263e-90L),
14600 TEST_f_f (y1, 0x1p1023L, 1.5665258060609012834424478437196679802783e-155L),
c36e1d23
JM		 14601#endif
14602
d2f9799e 14603#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM		 14604 TEST_f_f (y1, 0x1p16382L, 1.2193782500509000574176799046642541129387e-2466L),
14605 TEST_f_f (y1, 0x1p16383L, -9.5859502826270374691362975419147645151233e-2467L),
14606#endif
14607
14608 TEST_f_f (y1, 0x1p-10L, -6.5190099301063115047395187618929589514382e+02L),
14609 TEST_f_f (y1, 0x1p-20L, -6.6754421443450423911167962313100637952285e+05L),
14610 TEST_f_f (y1, 0x1p-30L, -6.8356527557643159612937462812258975438856e+08L),
14611 TEST_f_f (y1, 0x1p-40L, -6.9997084219026594793707805777425993547887e+11L),
14612 TEST_f_f (y1, 0x1p-50L, -7.1677014240283233068755952926181262431559e+14L),
14613 TEST_f_f (y1, 0x1p-60L, -7.3397262582050030662406095795388448059822e+17L),
14614 TEST_f_f (y1, 0x1p-70L, -7.5158796884019231398303842094477769620063e+20L),
14615 TEST_f_f (y1, 0x1p-80L, -7.6962608009235692951863134304745236090943e+23L),
14616 TEST_f_f (y1, 0x1p-90L, -7.8809710601457349582707849528059121757126e+26L),
14617 TEST_f_f (y1, 0x1p-100L, -8.0701143655892325972692837916732540679297e+29L),
14618 TEST_f_f (y1, 0x1p-110L, -8.2637971103633741796037466026734121655600e+32L),
14619 END_DATA (y1)
14620 };
8847214f
UD		 14621
14622static void
14623y1_test (void)
14624{
8a216c1b 14625 FLOAT s, c;
8847214f 14626 errno = 0;
cd53c157
UD		 14627 FUNC (sincos) (0, &s, &c);
14628 if (errno == ENOSYS)
14629 /* Required function not implemented. */
14630 return;
8847214f
UD		 14631 FUNC(y1) (1);
14632 if (errno == ENOSYS)
14633 /* Function not implemented. */
14634 return;
14635
8847214f 14636 START (y1);
74c57478 14637 RUN_TEST_LOOP_f_f (y1, y1_test_data, );
8847214f
UD		 14638 END (y1);
14639}
14640
2550dfe9 14641
8847214f
UD		 14642static void
14643yn_test (void)
14644{
8a216c1b 14645 FLOAT s, c;
8847214f 14646 errno = 0;
cd53c157
UD		 14647 FUNC (sincos) (0, &s, &c);
14648 if (errno == ENOSYS)
14649 /* Required function not implemented. */
14650 return;
8847214f
UD		 14651 FUNC(yn) (1, 1);
14652 if (errno == ENOSYS)
14653 /* Function not implemented. */
14654 return;
14655
14656 /* yn is the Bessel function of the second kind of order n */
14657 START (yn);
14658
14659 /* yn (0, x) == y0 (x) */
ae08db3b
JM		 14660 TEST_if_f (yn, 0, -1.0, minus_infty, INVALID_EXCEPTION);
14661 TEST_if_f (yn, 0, -max_value, minus_infty, INVALID_EXCEPTION);
14662 TEST_if_f (yn, 0, 0.0, minus_infty);
14663 TEST_if_f (yn, 0, qnan_value, qnan_value);
14664 TEST_if_f (yn, 0, plus_infty, 0);
14665
14666 TEST_if_f (yn, 0, 0.125L, -1.38968062514384052915582277745018693L);
14667 TEST_if_f (yn, 0, 0.75L, -0.137172769385772397522814379396581855L);
14668 TEST_if_f (yn, 0, 1.0, 0.0882569642156769579829267660235151628L);
14669 TEST_if_f (yn, 0, 1.5, 0.382448923797758843955068554978089862L);
14670 TEST_if_f (yn, 0, 2.0, 0.510375672649745119596606592727157873L);
14671 TEST_if_f (yn, 0, 8.0, 0.223521489387566220527323400498620359L);
14672 TEST_if_f (yn, 0, 10.0, 0.0556711672835993914244598774101900481L);
8847214f
UD		 14673
14674 /* yn (1, x) == y1 (x) */
ae08db3b
JM		 14675 TEST_if_f (yn, 1, -1.0, minus_infty, INVALID_EXCEPTION);
14676 TEST_if_f (yn, 1, 0.0, minus_infty);
14677 TEST_if_f (yn, 1, plus_infty, 0);
14678 TEST_if_f (yn, 1, qnan_value, qnan_value);
14679
14680 TEST_if_f (yn, 1, 0.125L, -5.19993611253477499595928744876579921L);
14681 TEST_if_f (yn, 1, 0.75L, -1.03759455076928541973767132140642198L);
14682 TEST_if_f (yn, 1, 1.0, -0.781212821300288716547150000047964821L);
14683 TEST_if_f (yn, 1, 1.5, -0.412308626973911295952829820633445323L);
14684 TEST_if_f (yn, 1, 2.0, -0.107032431540937546888370772277476637L);
14685 TEST_if_f (yn, 1, 8.0, -0.158060461731247494255555266187483550L);
14686 TEST_if_f (yn, 1, 10.0, 0.249015424206953883923283474663222803L);
8847214f
UD		 14687
14688 /* yn (3, x) */
ae08db3b
JM		 14689 TEST_if_f (yn, 3, plus_infty, 0);
14690 TEST_if_f (yn, 3, qnan_value, qnan_value);
8847214f 14691
ae08db3b
JM		 14692 TEST_if_f (yn, 3, 0.125L, -2612.69757350066712600220955744091741L);
14693 TEST_if_f (yn, 3, 0.75L, -12.9877176234475433186319774484809207L);
14694 TEST_if_f (yn, 3, 1.0, -5.82151760596472884776175706442981440L);
14695 TEST_if_f (yn, 3, 2.0, -1.12778377684042778608158395773179238L);
14696 TEST_if_f (yn, 3, 10.0, -0.251362657183837329779204747654240998L);
8847214f
UD		 14697
14698 /* yn (10, x) */
ae08db3b
JM		 14699 TEST_if_f (yn, 10, plus_infty, 0);
14700 TEST_if_f (yn, 10, qnan_value, qnan_value);
8847214f 14701
ae08db3b
JM		 14702 TEST_if_f (yn, 10, 0.125L, -127057845771019398.252538486899753195L);
14703 TEST_if_f (yn, 10, 0.75L, -2133501638.90573424452445412893839236L);
14704 TEST_if_f (yn, 10, 1.0, -121618014.278689189288130426667971145L);
14705 TEST_if_f (yn, 10, 2.0, -129184.542208039282635913145923304214L);
14706 TEST_if_f (yn, 10, 10.0, -0.359814152183402722051986577343560609L);
8847214f 14707
541428fe
MP		 14708 /* Check whether yn returns correct value for LDBL_MIN, DBL_MIN,
14709 and FLT_MIN. See Bug 14173. */
ae08db3b 14710 TEST_if_f (yn, 10, min_value, minus_infty, OVERFLOW_EXCEPTION);
8847214f 14711
ae08db3b 14712 TEST_if_f (yn, 10, min_value, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE);
354691b7 14713
541428fe 14714 END (yn);
8847214f
UD		 14715}
14716
14717
74c57478
JM		 14718static const struct test_f_f_data significand_test_data[] =
14719 {
14720 START_DATA (significand),
14721 /* significand returns the mantissa of the exponential representation. */
14722 /* TODO: missing +/-Inf as well as qNaN tests. */
14723 TEST_f_f (significand, 4.0, 1.0),
14724 TEST_f_f (significand, 6.0, 1.5),
14725 TEST_f_f (significand, 8.0, 1.0),
14726 END_DATA (significand)
14727 };
14728
f5c8f285
UD		 14729static void
14730significand_test (void)
14731{
f5c8f285 14732 START (significand);
74c57478 14733 RUN_TEST_LOOP_f_f (significand, significand_test_data, );
f5c8f285
UD		 14734 END (significand);
14735}
14736
14737
8847214f
UD		 14738static void
14739initialize (void)
14740{
14741 fpstack_test ("start *init*");
8847214f 14742
8847214f
UD		 14743 /* Clear all exceptions. From now on we must not get random exceptions. */
14744 feclearexcept (FE_ALL_EXCEPT);
f2da7793 14745 errno = 0;
8847214f
UD		 14746
14747 /* Test to make sure we start correctly. */
14748 fpstack_test ("end *init*");
14749}
14750
14751/* Definitions of arguments for argp functions. */
14752static const struct argp_option options[] =
14753{
14754 { "verbose", 'v', "NUMBER", 0, "Level of verbosity (0..3)"},
14755 { "ulps-file", 'u', NULL, 0, "Output ulps to file ULPs"},
14756 { "no-max-error", 'f', NULL, 0,
14757 "Don't output maximal errors of functions"},
14758 { "no-points", 'p', NULL, 0,
14759 "Don't output results of functions invocations"},
cd33623e
UD		 14760 { "ignore-max-ulp", 'i', "yes/no", 0,
14761 "Ignore given maximal errors"},
26510bdd
CD		 14762 { "output-dir", 'o', "DIR", 0,
14763 "Directory where generated files will be placed"},
8847214f
UD		 14764 { NULL, 0, NULL, 0, NULL }
14765};
14766
14767/* Short description of program. */
14768static const char doc[] = "Math test suite: " TEST_MSG ;
14769
14770/* Prototype for option handler. */
fe559c5e 14771static error_t parse_opt (int key, char *arg, struct argp_state *state);
8847214f
UD		 14772
14773/* Data structure to communicate with argp functions. */
14774static struct argp argp =
14775{
14776 options, parse_opt, NULL, doc,
14777};
14778
14779
14780/* Handle program arguments. */
14781static error_t
14782parse_opt (int key, char *arg, struct argp_state *state)
14783{
14784 switch (key)
14785 {
14786 case 'f':
6815fabc 14787 output_max_error = 0;
8847214f 14788 break;
cd33623e
UD		 14789 case 'i':
14790 if (strcmp (arg, "yes") == 0)
14791 ignore_max_ulp = 1;
14792 else if (strcmp (arg, "no") == 0)
14793 ignore_max_ulp = 0;
14794 break;
26510bdd
CD		 14795 case 'o':
14796 output_dir = (char *) malloc (strlen (arg) + 1);
14797 if (output_dir != NULL)
14798 strcpy (output_dir, arg);
14799 else
14800 return errno;
14801 break;
8847214f 14802 case 'p':
6815fabc 14803 output_points = 0;
8847214f
UD		 14804 break;
14805 case 'u':
14806 output_ulps = 1;
14807 break;
14808 case 'v':
14809 if (optarg)
14810 verbose = (unsigned int) strtoul (optarg, NULL, 0);
14811 else
14812 verbose = 3;
14813 break;
14814 default:
14815 return ARGP_ERR_UNKNOWN;
14816 }
14817 return 0;
14818}
14819
14820#if 0
14821/* function to check our ulp calculation. */
14822void
14823check_ulp (void)
14824{
14825 int i;
14826
14827 FLOAT u, diff, ulp;
14828 /* This gives one ulp. */
14829 u = FUNC(nextafter) (10, 20);
14830 check_equal (10.0, u, 1, &diff, &ulp);
14831 printf ("One ulp: % .4" PRINTF_NEXPR "\n", ulp);
14832
14833 /* This gives one more ulp. */
14834 u = FUNC(nextafter) (u, 20);
14835 check_equal (10.0, u, 2, &diff, &ulp);
14836 printf ("two ulp: % .4" PRINTF_NEXPR "\n", ulp);
14837
14838 /* And now calculate 100 ulp. */
14839 for (i = 2; i < 100; i++)
14840 u = FUNC(nextafter) (u, 20);
14841 check_equal (10.0, u, 100, &diff, &ulp);
14842 printf ("100 ulp: % .4" PRINTF_NEXPR "\n", ulp);
14843}
14844#endif
14845
14846int
14847main (int argc, char **argv)
14848{
14849
14850 int remaining;
26510bdd
CD		 14851 char *ulps_file_path;
14852 size_t dir_len = 0;
8847214f
UD		 14853
14854 verbose = 1;
14855 output_ulps = 0;
14856 output_max_error = 1;
14857 output_points = 1;
26510bdd 14858 output_dir = NULL;
cd33623e
UD		 14859 /* XXX set to 0 for releases. */
14860 ignore_max_ulp = 0;
bdf09fab 14861
8847214f
UD		 14862 /* Parse and process arguments. */
14863 argp_parse (&argp, argc, argv, 0, &remaining, NULL);
14864
14865 if (remaining != argc)
14866 {
14867 fprintf (stderr, "wrong number of arguments");
14868 argp_help (&argp, stdout, ARGP_HELP_SEE, program_invocation_short_name);
14869 exit (EXIT_FAILURE);
14870 }
14871
14872 if (output_ulps)
14873 {
26510bdd
CD		 14874 if (output_dir != NULL)
14875 dir_len = strlen (output_dir);
14876 ulps_file_path = (char *) malloc (dir_len + strlen (ulps_file_name) + 1);
14877 if (ulps_file_path == NULL)
14878 {
14879 perror ("can't allocate path for `ULPs' file: ");
14880 exit (1);
14881 }
14882 sprintf (ulps_file_path, "%s%s", output_dir == NULL ? "" : output_dir, ulps_file_name);
14883 ulps_file = fopen (ulps_file_path, "a");
8847214f
UD		 14884 if (ulps_file == NULL)
14885 {
14886 perror ("can't open file `ULPs' for writing: ");
14887 exit (1);
14888 }
14889 }
14890
14891
14892 initialize ();
14893 printf (TEST_MSG);
14894
14895#if 0
14896 check_ulp ();
14897#endif
14898
ec751a23 14899 /* Keep the tests a wee bit ordered (according to ISO C99). */
8847214f 14900 /* Classification macros: */
ef1bb361 14901 finite_test ();
8847214f
UD		 14902 fpclassify_test ();
14903 isfinite_test ();
ef1bb361
JM		 14904 isinf_test ();
14905 isnan_test ();
8847214f 14906 isnormal_test ();
57267616 14907 issignaling_test ();
8847214f
UD		 14908 signbit_test ();
14909
14910 /* Trigonometric functions: */
14911 acos_test ();
5ba3cc69
JM		 14912 acos_test_tonearest ();
14913 acos_test_towardzero ();
14914 acos_test_downward ();
14915 acos_test_upward ();
8847214f 14916 asin_test ();
5ba3cc69
JM		 14917 asin_test_tonearest ();
14918 asin_test_towardzero ();
14919 asin_test_downward ();
14920 asin_test_upward ();
8847214f
UD		 14921 atan_test ();
14922 atan2_test ();
14923 cos_test ();
804360ed
JM		 14924 cos_test_tonearest ();
14925 cos_test_towardzero ();
14926 cos_test_downward ();
14927 cos_test_upward ();
8847214f 14928 sin_test ();
804360ed
JM		 14929 sin_test_tonearest ();
14930 sin_test_towardzero ();
14931 sin_test_downward ();
14932 sin_test_upward ();
8847214f
UD		 14933 sincos_test ();
14934 tan_test ();
804360ed
JM		 14935 tan_test_tonearest ();
14936 tan_test_towardzero ();
14937 tan_test_downward ();
14938 tan_test_upward ();
8847214f
UD		 14939
14940 /* Hyperbolic functions: */
14941 acosh_test ();
14942 asinh_test ();
14943 atanh_test ();
14944 cosh_test ();
ca811b22
JM		 14945 cosh_test_tonearest ();
14946 cosh_test_towardzero ();
14947 cosh_test_downward ();
14948 cosh_test_upward ();
8847214f 14949 sinh_test ();
ca811b22
JM		 14950 sinh_test_tonearest ();
14951 sinh_test_towardzero ();
14952 sinh_test_downward ();
14953 sinh_test_upward ();
8847214f
UD		 14954 tanh_test ();
14955
14956 /* Exponential and logarithmic functions: */
14957 exp_test ();
28afd92d
JM		 14958 exp_test_tonearest ();
14959 exp_test_towardzero ();
14960 exp_test_downward ();
14961 exp_test_upward ();
8847214f
UD		 14962 exp10_test ();
14963 exp2_test ();
14964 expm1_test ();
14965 frexp_test ();
14966 ldexp_test ();
14967 log_test ();
14968 log10_test ();
14969 log1p_test ();
14970 log2_test ();
14971 logb_test ();
a462cb63 14972 logb_test_downward ();
8847214f
UD		 14973 modf_test ();
14974 ilogb_test ();
14975 scalb_test ();
14976 scalbn_test ();
14977 scalbln_test ();
f5c8f285 14978 significand_test ();
8847214f
UD		 14979
14980 /* Power and absolute value functions: */
14981 cbrt_test ();
14982 fabs_test ();
14983 hypot_test ();
14984 pow_test ();
b7cd39e8
JM		 14985 pow_test_tonearest ();
14986 pow_test_towardzero ();
14987 pow_test_downward ();
14988 pow_test_upward ();
8847214f
UD		 14989 sqrt_test ();
14990
14991 /* Error and gamma functions: */
14992 erf_test ();
14993 erfc_test ();
14994 gamma_test ();
14995 lgamma_test ();
14996 tgamma_test ();
14997
14998 /* Nearest integer functions: */
14999 ceil_test ();
15000 floor_test ();
15001 nearbyint_test ();
15002 rint_test ();
4d37c8aa
UD		 15003 rint_test_tonearest ();
15004 rint_test_towardzero ();
15005 rint_test_downward ();
15006 rint_test_upward ();
8847214f 15007 lrint_test ();
6624dbc0
UD		 15008 lrint_test_tonearest ();
15009 lrint_test_towardzero ();
15010 lrint_test_downward ();
15011 lrint_test_upward ();
8847214f 15012 llrint_test ();
830fce04
RM		 15013 llrint_test_tonearest ();
15014 llrint_test_towardzero ();
15015 llrint_test_downward ();
15016 llrint_test_upward ();
8847214f
UD		 15017 round_test ();
15018 lround_test ();
15019 llround_test ();
15020 trunc_test ();
15021
15022 /* Remainder functions: */
15023 fmod_test ();
15024 remainder_test ();
15025 remquo_test ();
15026
15027 /* Manipulation functions: */
15028 copysign_test ();
15029 nextafter_test ();
fe559c5e 15030 nexttoward_test ();
8847214f
UD		 15031
15032 /* maximum, minimum and positive difference functions */
15033 fdim_test ();
15034 fmax_test ();
15035 fmin_test ();
15036
15037 /* Multiply and add: */
15038 fma_test ();
8ec5b013
JM		 15039 fma_test_towardzero ();
15040 fma_test_downward ();
15041 fma_test_upward ();
8847214f 15042
0e8e0c1c
JM		 15043 /* Comparison macros: */
15044 isgreater_test ();
15045 isgreaterequal_test ();
15046 isless_test ();
15047 islessequal_test ();
15048 islessgreater_test ();
15049 isunordered_test ();
15050
8847214f
UD		 15051 /* Complex functions: */
15052 cabs_test ();
15053 cacos_test ();
15054 cacosh_test ();
15055 carg_test ();
15056 casin_test ();
15057 casinh_test ();
15058 catan_test ();
15059 catanh_test ();
15060 ccos_test ();
15061 ccosh_test ();
15062 cexp_test ();
0cdc8e6f 15063 cimag_test ();
8847214f
UD		 15064 clog10_test ();
15065 clog_test ();
0cdc8e6f 15066 conj_test ();
8847214f
UD		 15067 cpow_test ();
15068 cproj_test ();
0cdc8e6f 15069 creal_test ();
8847214f
UD		 15070 csin_test ();
15071 csinh_test ();
15072 csqrt_test ();
15073 ctan_test ();
ca61cf32
JM		 15074 ctan_test_tonearest ();
15075 ctan_test_towardzero ();
15076 ctan_test_downward ();
15077 ctan_test_upward ();
8847214f 15078 ctanh_test ();
ca61cf32
JM		 15079 ctanh_test_tonearest ();
15080 ctanh_test_towardzero ();
15081 ctanh_test_downward ();
15082 ctanh_test_upward ();
8847214f
UD		 15083
15084 /* Bessel functions: */
15085 j0_test ();
15086 j1_test ();
15087 jn_test ();
15088 y0_test ();
15089 y1_test ();
15090 yn_test ();
15091
15092 if (output_ulps)
15093 fclose (ulps_file);
15094
15095 printf ("\nTest suite completed:\n");
f2da7793
JM		 15096 printf (" %d test cases plus %d tests for exception flags and\n"
15097 " %d tests for errno executed.\n",
15098 noTests, noExcTests, noErrnoTests);
8847214f
UD		 15099 if (noErrors)
15100 {
a9a56960 15101 printf (" %d errors occurred.\n", noErrors);
cf3141a5 15102 return 1;
8847214f
UD		 15103 }
15104 printf (" All tests passed successfully.\n");
cf3141a5
AJ		 15105
15106 return 0;
8847214f
UD		 15107}
15108
15109/*
15110 * Local Variables:
15111 * mode:c
15112 * End:
15113 */
A mirror of the official glibc repository