]> git.ipfire.org Git - thirdparty/glibc.git/blame - math/libm-test.inc
Add comments to vDSO hwcap loading process.
[thirdparty/glibc.git] / math / libm-test.inc
CommitLineData
568035b7 1/* Copyright (C) 1997-2013 Free Software Foundation, Inc.
8847214f 2 This file is part of the GNU C Library.
18394a08 3 Contributed by Andreas Jaeger <aj@suse.de>, 1997.
8847214f
UD
4
5 The GNU C Library is free software; you can redistribute it and/or
41bdb6e2
AJ
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
8847214f
UD
9
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
41bdb6e2 13 Lesser General Public License for more details.
8847214f 14
41bdb6e2 15 You should have received a copy of the GNU Lesser General Public
59ba27a6
PE
16 License along with the GNU C Library; if not, see
17 <http://www.gnu.org/licenses/>. */
8847214f
UD
18
19/* Part of testsuite for libm.
20
21 This file is processed by a perl script. The resulting file has to
22 be included by a master file that defines:
23
f964490f 24 Macros:
8847214f
UD
25 FUNC(function): converts general function name (like cos) to
26 name with correct suffix (e.g. cosl or cosf)
27 MATHCONST(x): like FUNC but for constants (e.g convert 0.0 to 0.0L)
28 FLOAT: floating point type to test
29 - TEST_MSG: informal message to be displayed
30 CHOOSE(Clongdouble,Cdouble,Cfloat,Cinlinelongdouble,Cinlinedouble,Cinlinefloat):
31 chooses one of the parameters as delta for testing
32 equality
33 PRINTF_EXPR Floating point conversion specification to print a variable
34 of type FLOAT with printf. PRINTF_EXPR just contains
35 the specifier, not the percent and width arguments,
36 e.g. "f".
37 PRINTF_XEXPR Like PRINTF_EXPR, but print in hexadecimal format.
38 PRINTF_NEXPR Like PRINTF_EXPR, but print nice. */
39
40/* This testsuite has currently tests for:
41 acos, acosh, asin, asinh, atan, atan2, atanh,
42 cbrt, ceil, copysign, cos, cosh, erf, erfc, exp, exp10, exp2, expm1,
ef1bb361 43 fabs, fdim, finite, floor, fma, fmax, fmin, fmod, fpclassify,
8847214f 44 frexp, gamma, hypot,
57267616 45 ilogb, isfinite, isinf, isnan, isnormal, issignaling,
0e8e0c1c 46 isless, islessequal, isgreater, isgreaterequal, islessgreater, isunordered,
8847214f
UD
47 j0, j1, jn,
48 ldexp, lgamma, log, log10, log1p, log2, logb,
28234b07 49 modf, nearbyint, nextafter, nexttoward,
8847214f
UD
50 pow, remainder, remquo, rint, lrint, llrint,
51 round, lround, llround,
52 scalb, scalbn, scalbln, signbit, sin, sincos, sinh, sqrt, tan, tanh, tgamma, trunc,
e9c7764e 53 y0, y1, yn, significand
8847214f
UD
54
55 and for the following complex math functions:
56 cabs, cacos, cacosh, carg, casin, casinh, catan, catanh,
28234b07
JM
57 ccos, ccosh, cexp, cimag, clog, clog10, conj, cpow, cproj, creal,
58 csin, csinh, csqrt, ctan, ctanh.
8847214f 59
28234b07
JM
60 At the moment the following functions and macros aren't tested:
61 drem (alias for remainder),
28234b07
JM
62 lgamma_r,
63 nan,
64 pow10 (alias for exp10).
8847214f
UD
65
66 Parameter handling is primitive in the moment:
67 --verbose=[0..3] for different levels of output:
68 0: only error count
69 1: basic report on failed tests (default)
70 2: full report on all tests
71 -v for full output (equals --verbose=3)
72 -u for generation of an ULPs file
73 */
74
75/* "Philosophy":
76
77 This suite tests some aspects of the correct implementation of
78 mathematical functions in libm. Some simple, specific parameters
79 are tested for correctness but there's no exhaustive
80 testing. Handling of specific inputs (e.g. infinity, not-a-number)
81 is also tested. Correct handling of exceptions is checked
82 against. These implemented tests should check all cases that are
ec751a23 83 specified in ISO C99.
8847214f 84
80bad0cc
JM
85 Exception testing: At the moment only divide-by-zero, invalid,
86 overflow and underflow exceptions are tested. Inexact exceptions
8847214f
UD
87 aren't checked at the moment.
88
89 NaN values: There exist signalling and quiet NaNs. This implementation
57267616
TS
90 only uses quiet NaN as parameter. Where the sign of a NaN is
91 significant, this is not tested. The payload of NaNs is not examined.
8847214f
UD
92
93 Inline functions: Inlining functions should give an improvement in
94 speed - but not in precission. The inlined functions return
95 reasonable values for a reasonable range of input values. The
96 result is not necessarily correct for all values and exceptions are
97 not correctly raised in all cases. Problematic input and return
98 values are infinity, not-a-number and minus zero. This suite
99 therefore does not check these specific inputs and the exception
100 handling for inlined mathematical functions - just the "reasonable"
101 values are checked.
102
103 Beware: The tests might fail for any of the following reasons:
104 - Tests are wrong
105 - Functions are wrong
106 - Floating Point Unit not working properly
107 - Compiler has errors
108
109 With e.g. gcc 2.7.2.2 the test for cexp fails because of a compiler error.
33996419
AJ
110
111
112 To Do: All parameter should be numbers that can be represented as
2550dfe9
AJ
113 exact floating point values. Currently some values cannot be
114 represented exactly and therefore the result is not the expected
115 result. For this we will use 36 digits so that numbers can be
116 represented exactly. */
8847214f
UD
117
118#ifndef _GNU_SOURCE
119# define _GNU_SOURCE
120#endif
121
122#include "libm-test-ulps.h"
123#include <complex.h>
124#include <math.h>
125#include <float.h>
126#include <fenv.h>
601d2942 127#include <limits.h>
8847214f
UD
128
129#include <errno.h>
130#include <stdlib.h>
131#include <stdio.h>
bdf09fab 132#include <string.h>
8847214f 133#include <argp.h>
ef82f4da 134#include <tininess.h>
8847214f 135
0af797de
CM
136/* Allow platforms without all rounding modes to test properly,
137 assuming they provide an __FE_UNDEFINED in <bits/fenv.h> which
138 causes fesetround() to return failure. */
139#ifndef FE_TONEAREST
140# define FE_TONEAREST __FE_UNDEFINED
141#endif
142#ifndef FE_TOWARDZERO
143# define FE_TOWARDZERO __FE_UNDEFINED
144#endif
145#ifndef FE_UPWARD
146# define FE_UPWARD __FE_UNDEFINED
147#endif
148#ifndef FE_DOWNWARD
149# define FE_DOWNWARD __FE_UNDEFINED
150#endif
151
8847214f
UD
152/* Possible exceptions */
153#define NO_EXCEPTION 0x0
154#define INVALID_EXCEPTION 0x1
155#define DIVIDE_BY_ZERO_EXCEPTION 0x2
c135cc1b 156#define OVERFLOW_EXCEPTION 0x4
80bad0cc 157#define UNDERFLOW_EXCEPTION 0x8
8847214f 158/* The next flags signals that those exceptions are allowed but not required. */
80bad0cc
JM
159#define INVALID_EXCEPTION_OK 0x10
160#define DIVIDE_BY_ZERO_EXCEPTION_OK 0x20
161#define OVERFLOW_EXCEPTION_OK 0x40
162#define UNDERFLOW_EXCEPTION_OK 0x80
8847214f 163#define EXCEPTIONS_OK INVALID_EXCEPTION_OK+DIVIDE_BY_ZERO_EXCEPTION_OK
80bad0cc
JM
164/* Some special test flags, passed together with exceptions. */
165#define IGNORE_ZERO_INF_SIGN 0x100
f2da7793
JM
166/* Indicate errno settings required or disallowed. */
167#define ERRNO_UNCHANGED 0x200
168#define ERRNO_EDOM 0x400
169#define ERRNO_ERANGE 0x800
80bad0cc
JM
170
171/* Values underflowing only for float. */
172#ifdef TEST_FLOAT
173# define UNDERFLOW_EXCEPTION_FLOAT UNDERFLOW_EXCEPTION
174# define UNDERFLOW_EXCEPTION_OK_FLOAT UNDERFLOW_EXCEPTION_OK
175#else
176# define UNDERFLOW_EXCEPTION_FLOAT 0
177# define UNDERFLOW_EXCEPTION_OK_FLOAT 0
178#endif
179/* Values underflowing only for double or types with a larger least
180 positive normal value. */
181#if defined TEST_FLOAT || defined TEST_DOUBLE \
182 || (defined TEST_LDOUBLE && LDBL_MIN_EXP >= DBL_MIN_EXP)
183# define UNDERFLOW_EXCEPTION_DOUBLE UNDERFLOW_EXCEPTION
ccc8cadf 184# define UNDERFLOW_EXCEPTION_OK_DOUBLE UNDERFLOW_EXCEPTION_OK
80bad0cc
JM
185#else
186# define UNDERFLOW_EXCEPTION_DOUBLE 0
ccc8cadf 187# define UNDERFLOW_EXCEPTION_OK_DOUBLE 0
80bad0cc
JM
188#endif
189/* Values underflowing only for IBM long double or types with a larger least
190 positive normal value. */
191#if defined TEST_FLOAT || (defined TEST_LDOUBLE && LDBL_MIN_EXP > DBL_MIN_EXP)
192# define UNDERFLOW_EXCEPTION_LDOUBLE_IBM UNDERFLOW_EXCEPTION
193#else
194# define UNDERFLOW_EXCEPTION_LDOUBLE_IBM 0
195#endif
ef82f4da
JM
196/* Values underflowing on architectures detecting tininess before
197 rounding, but not on those detecting tininess after rounding. */
198#define UNDERFLOW_EXCEPTION_BEFORE_ROUNDING (TININESS_AFTER_ROUNDING \
199 ? 0 \
200 : UNDERFLOW_EXCEPTION)
8847214f
UD
201
202/* Various constants (we must supply them precalculated for accuracy). */
42be70d4
UD
203#define M_PI_6l .52359877559829887307710723054658383L
204#define M_E2l 7.389056098930650227230427460575008L
205#define M_E3l 20.085536923187667740928529654581719L
206#define M_2_SQRT_PIl 3.5449077018110320545963349666822903L /* 2 sqrt (M_PIl) */
207#define M_SQRT_PIl 1.7724538509055160272981674833411451L /* sqrt (M_PIl) */
3c6cad26
UD
208#define M_LOG_SQRT_PIl 0.57236494292470008707171367567652933L /* log(sqrt(M_PIl)) */
209#define M_LOG_2_SQRT_PIl 1.265512123484645396488945797134706L /* log(2*sqrt(M_PIl)) */
faa7f811
JM
210#define M_PI_34l 2.356194490192344928846982537459627163L /* 3*pi/4 */
211#define M_PI_34_LOG10El 1.023282265381381010614337719073516828L
212#define M_PI2_LOG10El 0.682188176920920673742891812715677885L
213#define M_PI4_LOG10El 0.341094088460460336871445906357838943L
214#define M_PI_LOG10El 1.364376353841841347485783625431355770L
f98ece5f 215#define M_1_DIV_El 0.367879441171442321595523770161460867L /* 1 div e */
8847214f 216
26510bdd
CD
217#define ulps_file_name "ULPs" /* Name of the ULPs file. */
218static FILE *ulps_file; /* File to document difference. */
219static int output_ulps; /* Should ulps printed? */
220static char *output_dir; /* Directory where generated files will be written. */
8847214f
UD
221
222static int noErrors; /* number of errors */
223static int noTests; /* number of tests (without testing exceptions) */
224static int noExcTests; /* number of tests for exception flags */
f2da7793 225static int noErrnoTests;/* number of tests for errno values */
8847214f
UD
226
227static int verbose;
228static int output_max_error; /* Should the maximal errors printed? */
229static int output_points; /* Should the single function results printed? */
cd33623e 230static int ignore_max_ulp; /* Should we ignore max_ulp? */
8847214f 231
a0d9f9d7
JM
232#define PLUS_ZERO_INIT CHOOSE (0.0L, 0.0, 0.0f, \
233 0.0L, 0.0, 0.0f)
234#define MINUS_ZERO_INIT CHOOSE (-0.0L, -0.0, -0.0f, \
235 -0.0L, -0.0, -0.0f)
236#define PLUS_INFTY_INIT CHOOSE (HUGE_VALL, HUGE_VAL, HUGE_VALF, \
237 HUGE_VALL, HUGE_VAL, HUGE_VALF)
238#define MINUS_INFTY_INIT CHOOSE (-HUGE_VALL, -HUGE_VAL, -HUGE_VALF, \
239 -HUGE_VALL, -HUGE_VAL, -HUGE_VALF)
240#define QNAN_VALUE_INIT FUNC (__builtin_nan) ("")
241#define MAX_VALUE_INIT CHOOSE (LDBL_MAX, DBL_MAX, FLT_MAX, \
242 LDBL_MAX, DBL_MAX, FLT_MAX)
243#define MIN_VALUE_INIT CHOOSE (LDBL_MIN, DBL_MIN, FLT_MIN, \
244 LDBL_MIN, DBL_MIN, FLT_MIN)
245#define MIN_SUBNORM_VALUE_INIT CHOOSE (__LDBL_DENORM_MIN__, \
246 __DBL_DENORM_MIN__, \
247 __FLT_DENORM_MIN__, \
248 __LDBL_DENORM_MIN__, \
249 __DBL_DENORM_MIN__, \
250 __FLT_DENORM_MIN__)
251
252static const FLOAT plus_zero = PLUS_ZERO_INIT;
253static const FLOAT minus_zero = MINUS_ZERO_INIT;
254static const FLOAT plus_infty = PLUS_INFTY_INIT;
255static const FLOAT minus_infty = MINUS_INFTY_INIT;
256static const FLOAT qnan_value = QNAN_VALUE_INIT;
257static const FLOAT max_value = MAX_VALUE_INIT;
258static const FLOAT min_value = MIN_VALUE_INIT;
259static const FLOAT min_subnorm_value = MIN_SUBNORM_VALUE_INIT;
8847214f 260
6815fabc 261static FLOAT max_error, real_max_error, imag_max_error;
8847214f
UD
262
263
264#define BUILD_COMPLEX(real, imag) \
265 ({ __complex__ FLOAT __retval; \
266 __real__ __retval = (real); \
267 __imag__ __retval = (imag); \
268 __retval; })
08198877 269#define BUILD_COMPLEX_ULP(real, imag) ((real) + I * (imag))
8847214f
UD
270
271#define MANT_DIG CHOOSE ((LDBL_MANT_DIG-1), (DBL_MANT_DIG-1), (FLT_MANT_DIG-1), \
bf582445 272 (LDBL_MANT_DIG-1), (DBL_MANT_DIG-1), (FLT_MANT_DIG-1))
8847214f
UD
273
274static void
275init_max_error (void)
276{
277 max_error = 0;
6815fabc
UD
278 real_max_error = 0;
279 imag_max_error = 0;
aaca11d8 280 feclearexcept (FE_ALL_EXCEPT);
f2da7793 281 errno = 0;
8847214f
UD
282}
283
284static void
6815fabc 285set_max_error (FLOAT current, FLOAT *curr_max_error)
8847214f 286{
6815fabc
UD
287 if (current > *curr_max_error)
288 *curr_max_error = current;
8847214f
UD
289}
290
291
57267616
TS
292/* Print a FLOAT. */
293static void
294print_float (FLOAT f)
295{
296 /* As printf doesn't differ between a sNaN and a qNaN, do this manually. */
297 if (issignaling (f))
298 printf ("sNaN\n");
299 else if (isnan (f))
300 printf ("qNaN\n");
301 else
302 printf ("% .20" PRINTF_EXPR " % .20" PRINTF_XEXPR "\n", f, f);
303}
304
8847214f
UD
305/* Should the message print to screen? This depends on the verbose flag,
306 and the test status. */
307static int
b7dab1e4 308print_screen (int ok)
8847214f
UD
309{
310 if (output_points
311 && (verbose > 1
b7dab1e4 312 || (verbose == 1 && ok == 0)))
8847214f
UD
313 return 1;
314 return 0;
315}
316
317
318/* Should the message print to screen? This depends on the verbose flag,
319 and the test status. */
320static int
b7dab1e4 321print_screen_max_error (int ok)
8847214f
UD
322{
323 if (output_max_error
324 && (verbose > 1
b7dab1e4 325 || ((verbose == 1) && (ok == 0))))
8847214f
UD
326 return 1;
327 return 0;
328}
329
330/* Update statistic counters. */
331static void
b7dab1e4 332update_stats (int ok)
8847214f
UD
333{
334 ++noTests;
b7dab1e4 335 if (!ok)
8847214f
UD
336 ++noErrors;
337}
338
339static void
340print_ulps (const char *test_name, FLOAT ulp)
341{
342 if (output_ulps)
343 {
344 fprintf (ulps_file, "Test \"%s\":\n", test_name);
303f1335 345 fprintf (ulps_file, "%s: %.0" PRINTF_NEXPR "\n",
8847214f 346 CHOOSE("ldouble", "double", "float",
303f1335
AS
347 "ildouble", "idouble", "ifloat"),
348 FUNC(ceil) (ulp));
8847214f
UD
349 }
350}
351
352static void
353print_function_ulps (const char *function_name, FLOAT ulp)
354{
355 if (output_ulps)
356 {
6815fabc 357 fprintf (ulps_file, "Function: \"%s\":\n", function_name);
303f1335 358 fprintf (ulps_file, "%s: %.0" PRINTF_NEXPR "\n",
8847214f 359 CHOOSE("ldouble", "double", "float",
303f1335
AS
360 "ildouble", "idouble", "ifloat"),
361 FUNC(ceil) (ulp));
8847214f
UD
362 }
363}
364
365
6815fabc
UD
366static void
367print_complex_function_ulps (const char *function_name, FLOAT real_ulp,
368 FLOAT imag_ulp)
369{
370 if (output_ulps)
371 {
372 if (real_ulp != 0.0)
373 {
374 fprintf (ulps_file, "Function: Real part of \"%s\":\n", function_name);
303f1335 375 fprintf (ulps_file, "%s: %.0" PRINTF_NEXPR "\n",
6815fabc 376 CHOOSE("ldouble", "double", "float",
303f1335
AS
377 "ildouble", "idouble", "ifloat"),
378 FUNC(ceil) (real_ulp));
6815fabc
UD
379 }
380 if (imag_ulp != 0.0)
381 {
382 fprintf (ulps_file, "Function: Imaginary part of \"%s\":\n", function_name);
303f1335 383 fprintf (ulps_file, "%s: %.0" PRINTF_NEXPR "\n",
6815fabc 384 CHOOSE("ldouble", "double", "float",
303f1335
AS
385 "ildouble", "idouble", "ifloat"),
386 FUNC(ceil) (imag_ulp));
6815fabc 387 }
15daa639
UD
388
389
6815fabc
UD
390 }
391}
392
393
8847214f
UD
394
395/* Test if Floating-Point stack hasn't changed */
396static void
397fpstack_test (const char *test_name)
398{
64487e12 399#if defined (__i386__) || defined (__x86_64__)
8847214f
UD
400 static int old_stack;
401 int sw;
402
403 asm ("fnstsw" : "=a" (sw));
404 sw >>= 11;
405 sw &= 7;
406
407 if (sw != old_stack)
408 {
409 printf ("FP-Stack wrong after test %s (%d, should be %d)\n",
410 test_name, sw, old_stack);
411 ++noErrors;
412 old_stack = sw;
413 }
414#endif
415}
416
417
418static void
b7dab1e4 419print_max_error (const char *func_name, FLOAT allowed)
8847214f 420{
8847214f
UD
421 int ok = 0;
422
cd33623e 423 if (max_error == 0.0 || (max_error <= allowed && !ignore_max_ulp))
8847214f
UD
424 {
425 ok = 1;
426 }
427
428 if (!ok)
429 print_function_ulps (func_name, max_error);
430
431
b7dab1e4 432 if (print_screen_max_error (ok))
8847214f 433 {
6815fabc 434 printf ("Maximal error of `%s'\n", func_name);
303f1335
AS
435 printf (" is : %.0" PRINTF_NEXPR " ulp\n", FUNC(ceil) (max_error));
436 printf (" accepted: %.0" PRINTF_NEXPR " ulp\n", FUNC(ceil) (allowed));
8847214f
UD
437 }
438
b7dab1e4 439 update_stats (ok);
8847214f
UD
440}
441
442
6815fabc 443static void
b7dab1e4 444print_complex_max_error (const char *func_name, __complex__ FLOAT allowed)
6815fabc
UD
445{
446 int ok = 0;
447
303f1335
AS
448 if ((real_max_error == 0 && imag_max_error == 0)
449 || (real_max_error <= __real__ allowed
450 && imag_max_error <= __imag__ allowed
451 && !ignore_max_ulp))
6815fabc
UD
452 {
453 ok = 1;
454 }
455
456 if (!ok)
457 print_complex_function_ulps (func_name, real_max_error, imag_max_error);
458
459
b7dab1e4 460 if (print_screen_max_error (ok))
6815fabc
UD
461 {
462 printf ("Maximal error of real part of: %s\n", func_name);
303f1335
AS
463 printf (" is : %.0" PRINTF_NEXPR " ulp\n",
464 FUNC(ceil) (real_max_error));
465 printf (" accepted: %.0" PRINTF_NEXPR " ulp\n",
466 FUNC(ceil) (__real__ allowed));
6815fabc 467 printf ("Maximal error of imaginary part of: %s\n", func_name);
303f1335
AS
468 printf (" is : %.0" PRINTF_NEXPR " ulp\n",
469 FUNC(ceil) (imag_max_error));
470 printf (" accepted: %.0" PRINTF_NEXPR " ulp\n",
471 FUNC(ceil) (__imag__ allowed));
6815fabc
UD
472 }
473
b7dab1e4 474 update_stats (ok);
6815fabc
UD
475}
476
477
8847214f
UD
478/* Test whether a given exception was raised. */
479static void
480test_single_exception (const char *test_name,
481 int exception,
482 int exc_flag,
483 int fe_flag,
484 const char *flag_name)
485{
486#ifndef TEST_INLINE
487 int ok = 1;
488 if (exception & exc_flag)
489 {
490 if (fetestexcept (fe_flag))
491 {
b7dab1e4 492 if (print_screen (1))
8847214f
UD
493 printf ("Pass: %s: Exception \"%s\" set\n", test_name, flag_name);
494 }
495 else
496 {
497 ok = 0;
b7dab1e4 498 if (print_screen (0))
8847214f
UD
499 printf ("Failure: %s: Exception \"%s\" not set\n",
500 test_name, flag_name);
501 }
502 }
503 else
504 {
505 if (fetestexcept (fe_flag))
506 {
507 ok = 0;
b7dab1e4 508 if (print_screen (0))
8847214f
UD
509 printf ("Failure: %s: Exception \"%s\" set\n",
510 test_name, flag_name);
511 }
512 else
513 {
b7dab1e4 514 if (print_screen (1))
8847214f
UD
515 printf ("%s: Exception \"%s\" not set\n", test_name,
516 flag_name);
517 }
518 }
519 if (!ok)
520 ++noErrors;
521
522#endif
523}
524
525
526/* Test whether exceptions given by EXCEPTION are raised. Ignore thereby
527 allowed but not required exceptions.
528*/
529static void
530test_exceptions (const char *test_name, int exception)
531{
532 ++noExcTests;
533#ifdef FE_DIVBYZERO
534 if ((exception & DIVIDE_BY_ZERO_EXCEPTION_OK) == 0)
535 test_single_exception (test_name, exception,
536 DIVIDE_BY_ZERO_EXCEPTION, FE_DIVBYZERO,
537 "Divide by zero");
538#endif
539#ifdef FE_INVALID
540 if ((exception & INVALID_EXCEPTION_OK) == 0)
541 test_single_exception (test_name, exception, INVALID_EXCEPTION, FE_INVALID,
542 "Invalid operation");
c135cc1b
JM
543#endif
544#ifdef FE_OVERFLOW
545 if ((exception & OVERFLOW_EXCEPTION_OK) == 0)
546 test_single_exception (test_name, exception, OVERFLOW_EXCEPTION,
547 FE_OVERFLOW, "Overflow");
80bad0cc
JM
548#endif
549#ifdef FE_UNDERFLOW
550 if ((exception & UNDERFLOW_EXCEPTION_OK) == 0)
551 test_single_exception (test_name, exception, UNDERFLOW_EXCEPTION,
552 FE_UNDERFLOW, "Underflow");
8847214f
UD
553#endif
554 feclearexcept (FE_ALL_EXCEPT);
555}
556
f2da7793
JM
557/* Test whether errno for TEST_NAME, set to ERRNO_VALUE, has value
558 EXPECTED_VALUE (description EXPECTED_NAME). */
559static void
560test_single_errno (const char *test_name, int errno_value,
561 int expected_value, const char *expected_name)
562{
563 if (errno_value == expected_value)
564 {
b7dab1e4 565 if (print_screen (1))
f2da7793
JM
566 printf ("Pass: %s: errno set to %d (%s)\n", test_name, errno_value,
567 expected_name);
568 }
569 else
570 {
571 ++noErrors;
b7dab1e4 572 if (print_screen (0))
f2da7793
JM
573 printf ("Failure: %s: errno set to %d, expected %d (%s)\n",
574 test_name, errno_value, expected_value, expected_name);
575 }
576}
577
578/* Test whether errno (value ERRNO_VALUE) has been for TEST_NAME set
579 as required by EXCEPTIONS. */
580static void
581test_errno (const char *test_name, int errno_value, int exceptions)
582{
583 ++noErrnoTests;
584 if (exceptions & ERRNO_UNCHANGED)
585 test_single_errno (test_name, errno_value, 0, "unchanged");
586 if (exceptions & ERRNO_EDOM)
587 test_single_errno (test_name, errno_value, EDOM, "EDOM");
588 if (exceptions & ERRNO_ERANGE)
589 test_single_errno (test_name, errno_value, ERANGE, "ERANGE");
590}
8847214f
UD
591
592static void
6815fabc 593check_float_internal (const char *test_name, FLOAT computed, FLOAT expected,
b7dab1e4 594 FLOAT max_ulp, int exceptions,
6815fabc 595 FLOAT *curr_max_error)
8847214f
UD
596{
597 int ok = 0;
598 int print_diff = 0;
599 FLOAT diff = 0;
600 FLOAT ulp = 0;
f2da7793 601 int errno_value = errno;
8847214f
UD
602
603 test_exceptions (test_name, exceptions);
f2da7793 604 test_errno (test_name, errno_value, exceptions);
57267616
TS
605 if (issignaling (computed) && issignaling (expected))
606 ok = 1;
607 else if (issignaling (computed) || issignaling (expected))
608 ok = 0;
609 else if (isnan (computed) && isnan (expected))
8847214f
UD
610 ok = 1;
611 else if (isinf (computed) && isinf (expected))
612 {
613 /* Test for sign of infinities. */
ba3752d5
UD
614 if ((exceptions & IGNORE_ZERO_INF_SIGN) == 0
615 && signbit (computed) != signbit (expected))
8847214f
UD
616 {
617 ok = 0;
618 printf ("infinity has wrong sign.\n");
619 }
620 else
621 ok = 1;
622 }
57267616
TS
623 /* Don't calculate ULPs for infinities or any kind of NaNs. */
624 else if (isinf (computed) || isnan (computed)
625 || isinf (expected) || isnan (expected))
8847214f
UD
626 ok = 0;
627 else
628 {
629 diff = FUNC(fabs) (computed - expected);
e6b29af8
UD
630 switch (fpclassify (expected))
631 {
632 case FP_ZERO:
633 /* ilogb (0) isn't allowed. */
634 ulp = diff / FUNC(ldexp) (1.0, - MANT_DIG);
635 break;
636 case FP_NORMAL:
637 ulp = diff / FUNC(ldexp) (1.0, FUNC(ilogb) (expected) - MANT_DIG);
638 break;
639 case FP_SUBNORMAL:
6c23e11c
JM
640 /* 1ulp for a subnormal value, shifted by MANT_DIG, is the
641 least normal value. */
642 ulp = (FUNC(ldexp) (diff, MANT_DIG) / min_value);
e6b29af8
UD
643 break;
644 default:
645 /* It should never happen. */
646 abort ();
647 break;
648 }
6815fabc 649 set_max_error (ulp, curr_max_error);
8847214f 650 print_diff = 1;
ba3752d5
UD
651 if ((exceptions & IGNORE_ZERO_INF_SIGN) == 0
652 && computed == 0.0 && expected == 0.0
653 && signbit(computed) != signbit (expected))
3a8e65a0 654 ok = 0;
f964490f 655 else if (ulp <= 0.5 || (ulp <= max_ulp && !ignore_max_ulp))
8847214f
UD
656 ok = 1;
657 else
658 {
659 ok = 0;
660 print_ulps (test_name, ulp);
661 }
662
663 }
b7dab1e4 664 if (print_screen (ok))
8847214f
UD
665 {
666 if (!ok)
667 printf ("Failure: ");
668 printf ("Test: %s\n", test_name);
669 printf ("Result:\n");
57267616
TS
670 printf (" is: ");
671 print_float (computed);
672 printf (" should be: ");
673 print_float (expected);
8847214f
UD
674 if (print_diff)
675 {
676 printf (" difference: % .20" PRINTF_EXPR " % .20" PRINTF_XEXPR
677 "\n", diff, diff);
678 printf (" ulp : % .4" PRINTF_NEXPR "\n", ulp);
679 printf (" max.ulp : % .4" PRINTF_NEXPR "\n", max_ulp);
680 }
681 }
b7dab1e4 682 update_stats (ok);
8847214f
UD
683
684 fpstack_test (test_name);
f2da7793 685 errno = 0;
8847214f
UD
686}
687
688
689static void
6815fabc 690check_float (const char *test_name, FLOAT computed, FLOAT expected,
b7dab1e4 691 FLOAT max_ulp, int exceptions)
6815fabc 692{
b7dab1e4 693 check_float_internal (test_name, computed, expected, max_ulp,
6815fabc
UD
694 exceptions, &max_error);
695}
696
697
698static void
699check_complex (const char *test_name, __complex__ FLOAT computed,
700 __complex__ FLOAT expected,
b7dab1e4 701 __complex__ FLOAT max_ulp,
6815fabc 702 int exception)
8847214f 703{
6815fabc 704 FLOAT part_comp, part_exp, part_max_ulp;
2fd89785
MS
705 char *str;
706
707 if (asprintf (&str, "Real part of: %s", test_name) == -1)
708 abort ();
8847214f 709
8847214f
UD
710 part_comp = __real__ computed;
711 part_exp = __real__ expected;
6815fabc 712 part_max_ulp = __real__ max_ulp;
15daa639 713
b7dab1e4 714 check_float_internal (str, part_comp, part_exp, part_max_ulp,
6815fabc 715 exception, &real_max_error);
2fd89785
MS
716 free (str);
717
718 if (asprintf (&str, "Imaginary part of: %s", test_name) == -1)
719 abort ();
8847214f 720
8847214f
UD
721 part_comp = __imag__ computed;
722 part_exp = __imag__ expected;
6815fabc 723 part_max_ulp = __imag__ max_ulp;
15daa639 724
f2da7793 725 /* Don't check again for exceptions or errno, just pass through the
8847214f 726 zero/inf sign test. */
b7dab1e4 727 check_float_internal (str, part_comp, part_exp, part_max_ulp,
6815fabc
UD
728 exception & IGNORE_ZERO_INF_SIGN,
729 &imag_max_error);
2fd89785 730 free (str);
8847214f
UD
731}
732
733
734/* Check that computed and expected values are equal (int values). */
735static void
736check_int (const char *test_name, int computed, int expected, int max_ulp,
b7dab1e4 737 int exceptions)
8847214f
UD
738{
739 int diff = computed - expected;
740 int ok = 0;
f2da7793 741 int errno_value = errno;
8847214f
UD
742
743 test_exceptions (test_name, exceptions);
f2da7793 744 test_errno (test_name, errno_value, exceptions);
8847214f
UD
745 noTests++;
746 if (abs (diff) <= max_ulp)
747 ok = 1;
748
749 if (!ok)
750 print_ulps (test_name, diff);
751
b7dab1e4 752 if (print_screen (ok))
8847214f
UD
753 {
754 if (!ok)
755 printf ("Failure: ");
756 printf ("Test: %s\n", test_name);
757 printf ("Result:\n");
758 printf (" is: %d\n", computed);
759 printf (" should be: %d\n", expected);
760 }
761
b7dab1e4 762 update_stats (ok);
8847214f 763 fpstack_test (test_name);
f2da7793 764 errno = 0;
8847214f
UD
765}
766
767
768/* Check that computed and expected values are equal (long int values). */
769static void
770check_long (const char *test_name, long int computed, long int expected,
b7dab1e4 771 long int max_ulp, int exceptions)
8847214f
UD
772{
773 long int diff = computed - expected;
774 int ok = 0;
f2da7793 775 int errno_value = errno;
8847214f
UD
776
777 test_exceptions (test_name, exceptions);
f2da7793 778 test_errno (test_name, errno_value, exceptions);
8847214f
UD
779 noTests++;
780 if (labs (diff) <= max_ulp)
781 ok = 1;
782
783 if (!ok)
784 print_ulps (test_name, diff);
785
b7dab1e4 786 if (print_screen (ok))
8847214f
UD
787 {
788 if (!ok)
789 printf ("Failure: ");
790 printf ("Test: %s\n", test_name);
791 printf ("Result:\n");
792 printf (" is: %ld\n", computed);
793 printf (" should be: %ld\n", expected);
794 }
795
b7dab1e4 796 update_stats (ok);
8847214f 797 fpstack_test (test_name);
f2da7793 798 errno = 0;
8847214f
UD
799}
800
801
802/* Check that computed value is true/false. */
803static void
804check_bool (const char *test_name, int computed, int expected,
b7dab1e4 805 long int max_ulp, int exceptions)
8847214f
UD
806{
807 int ok = 0;
f2da7793 808 int errno_value = errno;
8847214f
UD
809
810 test_exceptions (test_name, exceptions);
f2da7793 811 test_errno (test_name, errno_value, exceptions);
8847214f
UD
812 noTests++;
813 if ((computed == 0) == (expected == 0))
814 ok = 1;
815
b7dab1e4 816 if (print_screen (ok))
8847214f
UD
817 {
818 if (!ok)
819 printf ("Failure: ");
820 printf ("Test: %s\n", test_name);
821 printf ("Result:\n");
822 printf (" is: %d\n", computed);
823 printf (" should be: %d\n", expected);
824 }
825
b7dab1e4 826 update_stats (ok);
8847214f 827 fpstack_test (test_name);
f2da7793 828 errno = 0;
8847214f
UD
829}
830
831
832/* check that computed and expected values are equal (long int values) */
833static void
834check_longlong (const char *test_name, long long int computed,
835 long long int expected,
b7dab1e4 836 long long int max_ulp,
8847214f
UD
837 int exceptions)
838{
839 long long int diff = computed - expected;
840 int ok = 0;
f2da7793 841 int errno_value = errno;
8847214f
UD
842
843 test_exceptions (test_name, exceptions);
f2da7793 844 test_errno (test_name, errno_value, exceptions);
8847214f
UD
845 noTests++;
846 if (llabs (diff) <= max_ulp)
847 ok = 1;
848
849 if (!ok)
850 print_ulps (test_name, diff);
851
b7dab1e4 852 if (print_screen (ok))
8847214f
UD
853 {
854 if (!ok)
855 printf ("Failure:");
856 printf ("Test: %s\n", test_name);
857 printf ("Result:\n");
858 printf (" is: %lld\n", computed);
859 printf (" should be: %lld\n", expected);
860 }
861
b7dab1e4 862 update_stats (ok);
8847214f 863 fpstack_test (test_name);
f2da7793 864 errno = 0;
8847214f
UD
865}
866
51df539d
JM
867/* Structures for each kind of test. */
868struct test_f_f_data
869{
870 const char *test_name;
871 FLOAT arg;
872 FLOAT expected;
873 FLOAT max_ulp;
874 int exceptions;
875};
601a3a5f
JM
876struct test_ff_f_data
877{
878 const char *test_name;
879 FLOAT arg1, arg2;
880 FLOAT expected;
881 FLOAT max_ulp;
882 int exceptions;
883};
884struct test_ff_f_data_nexttoward
885{
886 const char *test_name;
887 FLOAT arg1;
888 long double arg2;
889 FLOAT expected;
890 FLOAT max_ulp;
891 int exceptions;
892};
243216e1
JM
893struct test_fi_f_data
894{
895 const char *test_name;
896 FLOAT arg1;
897 int arg2;
898 FLOAT expected;
899 FLOAT max_ulp;
900 int exceptions;
901};
68fc074c
JM
902struct test_fl_f_data
903{
904 const char *test_name;
905 FLOAT arg1;
906 long int arg2;
907 FLOAT expected;
908 FLOAT max_ulp;
909 int exceptions;
910};
0e400df5
JM
911struct test_if_f_data
912{
913 const char *test_name;
914 int arg1;
915 FLOAT arg2;
916 FLOAT expected;
917 FLOAT max_ulp;
918 int exceptions;
919};
4f184d30
JM
920struct test_fff_f_data
921{
922 const char *test_name;
923 FLOAT arg1, arg2, arg3;
924 FLOAT expected;
925 FLOAT max_ulp;
926 int exceptions;
927};
6a1992e2
JM
928struct test_c_f_data
929{
930 const char *test_name;
931 FLOAT argr, argc;
932 FLOAT expected;
933 FLOAT max_ulp;
934 int exceptions;
935};
08198877
JM
936struct test_c_c_data
937{
938 const char *test_name;
939 FLOAT argr, argc;
940 FLOAT expr, expc;
941 __complex__ FLOAT max_ulp;
942 int exceptions;
943};
51df539d
JM
944
945/* Set the rounding mode, or restore the saved value. */
946#define IF_ROUND_INIT_ /* Empty. */
947#define IF_ROUND_INIT_FE_DOWNWARD \
948 int save_round_mode = fegetround (); \
949 if (fesetround (FE_DOWNWARD) == 0)
950#define IF_ROUND_INIT_FE_TONEAREST \
951 int save_round_mode = fegetround (); \
952 if (fesetround (FE_TONEAREST) == 0)
953#define IF_ROUND_INIT_FE_TOWARDZERO \
954 int save_round_mode = fegetround (); \
955 if (fesetround (FE_TOWARDZERO) == 0)
956#define IF_ROUND_INIT_FE_UPWARD \
957 int save_round_mode = fegetround (); \
958 if (fesetround (FE_UPWARD) == 0)
959#define ROUND_RESTORE_ /* Empty. */
960#define ROUND_RESTORE_FE_DOWNWARD \
961 fesetround (save_round_mode)
962#define ROUND_RESTORE_FE_TONEAREST \
963 fesetround (save_round_mode)
964#define ROUND_RESTORE_FE_TOWARDZERO \
965 fesetround (save_round_mode)
966#define ROUND_RESTORE_FE_UPWARD \
967 fesetround (save_round_mode)
968
f44bf14a 969/* Run an individual test, including any required setup and checking
51df539d 970 of results, or loop over all tests in an array. */
f44bf14a
JM
971#define RUN_TEST_f_f(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
972 MAX_ULP, EXCEPTIONS) \
973 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
974 MAX_ULP, EXCEPTIONS)
51df539d
JM
975#define RUN_TEST_LOOP_f_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
976 IF_ROUND_INIT_ ## ROUNDING_MODE \
977 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
978 RUN_TEST_f_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg, \
979 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
980 (ARRAY)[i].exceptions); \
981 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM
982#define RUN_TEST_2_f(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
983 MAX_ULP, EXCEPTIONS) \
984 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG1, ARG2), EXPECTED, \
985 MAX_ULP, EXCEPTIONS)
601a3a5f
JM
986#define RUN_TEST_LOOP_2_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
987 IF_ROUND_INIT_ ## ROUNDING_MODE \
988 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
989 RUN_TEST_2_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg1, \
990 (ARRAY)[i].arg2, (ARRAY)[i].expected, \
991 (ARRAY)[i].max_ulp, (ARRAY)[i].exceptions); \
992 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a 993#define RUN_TEST_ff_f RUN_TEST_2_f
601a3a5f 994#define RUN_TEST_LOOP_ff_f RUN_TEST_LOOP_2_f
f44bf14a 995#define RUN_TEST_fi_f RUN_TEST_2_f
243216e1 996#define RUN_TEST_LOOP_fi_f RUN_TEST_LOOP_2_f
f44bf14a 997#define RUN_TEST_fl_f RUN_TEST_2_f
68fc074c 998#define RUN_TEST_LOOP_fl_f RUN_TEST_LOOP_2_f
ae08db3b 999#define RUN_TEST_if_f RUN_TEST_2_f
0e400df5 1000#define RUN_TEST_LOOP_if_f RUN_TEST_LOOP_2_f
f44bf14a
JM
1001#define RUN_TEST_fff_f(TEST_NAME, FUNC_NAME, ARG1, ARG2, ARG3, \
1002 EXPECTED, MAX_ULP, EXCEPTIONS) \
1003 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG1, ARG2, ARG3), \
1004 EXPECTED, MAX_ULP, EXCEPTIONS)
4f184d30
JM
1005#define RUN_TEST_LOOP_fff_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1006 IF_ROUND_INIT_ ## ROUNDING_MODE \
1007 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1008 RUN_TEST_fff_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].arg1, \
1009 (ARRAY)[i].arg2, (ARRAY)[i].arg3, \
1010 (ARRAY)[i].expected, (ARRAY)[i].max_ulp, \
1011 (ARRAY)[i].exceptions); \
1012 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM
1013#define RUN_TEST_c_f(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
1014 MAX_ULP, EXCEPTIONS) \
1015 check_float (TEST_NAME, \
1016 FUNC (FUNC_NAME) (BUILD_COMPLEX (ARG1, ARG2)), \
1017 EXPECTED, MAX_ULP, EXCEPTIONS)
6a1992e2
JM
1018#define RUN_TEST_LOOP_c_f(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1019 IF_ROUND_INIT_ ## ROUNDING_MODE \
1020 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1021 RUN_TEST_c_f ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].argr, \
1022 (ARRAY)[i].argc, (ARRAY)[i].expected, \
1023 (ARRAY)[i].max_ulp, (ARRAY)[i].exceptions); \
1024 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM
1025#define RUN_TEST_f_f1(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1026 MAX_ULP, EXCEPTIONS, \
1027 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1028 EXTRA_EXPECTED, EXTRA_ULP) \
1029 do \
1030 { \
1031 (EXTRA_VAR) = (EXTRA_INIT); \
1032 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1033 MAX_ULP, EXCEPTIONS); \
1034 if (EXTRA_TEST) \
1035 check_int (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1036 EXTRA_ULP, 0); \
1037 } \
1038 while (0)
1039#define RUN_TEST_fF_f1(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1040 MAX_ULP, EXCEPTIONS, \
1041 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1042 EXTRA_EXPECTED, EXTRA_ULP) \
1043 do \
1044 { \
1045 (EXTRA_VAR) = (EXTRA_INIT); \
1046 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG, &(EXTRA_VAR)), \
1047 EXPECTED, MAX_ULP, EXCEPTIONS); \
1048 if (EXTRA_TEST) \
1049 check_float (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1050 EXTRA_ULP, 0); \
1051 } \
1052 while (0)
1053#define RUN_TEST_fI_f1(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1054 MAX_ULP, EXCEPTIONS, \
1055 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1056 EXTRA_EXPECTED, EXTRA_ULP) \
1057 do \
1058 { \
1059 (EXTRA_VAR) = (EXTRA_INIT); \
1060 check_float (TEST_NAME, FUNC (FUNC_NAME) (ARG, &(EXTRA_VAR)), \
1061 EXPECTED, MAX_ULP, EXCEPTIONS); \
1062 if (EXTRA_TEST) \
1063 check_int (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1064 EXTRA_ULP, 0); \
1065 } \
1066 while (0)
1067#define RUN_TEST_ffI_f1(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
1068 MAX_ULP, EXCEPTIONS, \
1069 EXTRA_NAME, EXTRA_VAR, EXTRA_INIT, EXTRA_TEST, \
1070 EXTRA_EXPECTED, EXTRA_ULP) \
1071 do \
1072 { \
1073 (EXTRA_VAR) = (EXTRA_INIT); \
1074 check_float (TEST_NAME, \
1075 FUNC (FUNC_NAME) (ARG1, ARG2, &(EXTRA_VAR)), \
1076 EXPECTED, MAX_ULP, EXCEPTIONS); \
1077 if (EXTRA_TEST) \
1078 check_int (EXTRA_NAME, EXTRA_VAR, EXTRA_EXPECTED, \
1079 EXTRA_ULP, 0); \
1080 } \
1081 while (0)
1082#define RUN_TEST_c_c(TEST_NAME, FUNC_NAME, ARGR, ARGC, EXPR, EXPC, \
1083 MAX_ULP, EXCEPTIONS) \
1084 check_complex (TEST_NAME, \
1085 FUNC (FUNC_NAME) (BUILD_COMPLEX (ARGR, ARGC)), \
1086 BUILD_COMPLEX (EXPR, EXPC), \
1087 MAX_ULP, EXCEPTIONS)
08198877
JM
1088#define RUN_TEST_LOOP_c_c(FUNC_NAME, ARRAY, ROUNDING_MODE) \
1089 IF_ROUND_INIT_ ## ROUNDING_MODE \
1090 for (size_t i = 0; i < sizeof (ARRAY) / sizeof (ARRAY)[0]; i++) \
1091 RUN_TEST_c_c ((ARRAY)[i].test_name, FUNC_NAME, (ARRAY)[i].argr, \
1092 (ARRAY)[i].argc, (ARRAY)[i].expr, (ARRAY)[i].expc, \
1093 (ARRAY)[i].max_ulp, (ARRAY)[i].exceptions); \
1094 ROUND_RESTORE_ ## ROUNDING_MODE
f44bf14a
JM
1095#define RUN_TEST_cc_c(TEST_NAME, FUNC_NAME, ARG1R, ARG1C, ARG2R, ARG2C, \
1096 EXPR, EXPC, MAX_ULP, EXCEPTIONS) \
1097 check_complex (TEST_NAME, \
1098 FUNC (FUNC_NAME) (BUILD_COMPLEX (ARG1R, ARG1C), \
1099 BUILD_COMPLEX (ARG2R, ARG2C)), \
1100 BUILD_COMPLEX (EXPR, EXPC), \
1101 MAX_ULP, EXCEPTIONS)
1102#define RUN_TEST_f_i(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1103 MAX_ULP, EXCEPTIONS) \
1104 check_int (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1105 MAX_ULP, EXCEPTIONS)
1106#define RUN_TEST_f_i_tg(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1107 MAX_ULP, EXCEPTIONS) \
1108 check_int (TEST_NAME, FUNC_NAME (ARG), EXPECTED, \
1109 MAX_ULP, EXCEPTIONS)
1110#define RUN_TEST_ff_i_tg(TEST_NAME, FUNC_NAME, ARG1, ARG2, EXPECTED, \
1111 MAX_ULP, EXCEPTIONS) \
1112 check_int (TEST_NAME, FUNC_NAME (ARG1, ARG2), EXPECTED, \
1113 MAX_ULP, EXCEPTIONS)
1114#define RUN_TEST_f_b(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1115 MAX_ULP, EXCEPTIONS) \
1116 check_bool (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1117 MAX_ULP, EXCEPTIONS)
1118#define RUN_TEST_f_b_tg(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1119 MAX_ULP, EXCEPTIONS) \
1120 check_bool (TEST_NAME, FUNC_NAME (ARG), EXPECTED, \
1121 MAX_ULP, EXCEPTIONS)
1122#define RUN_TEST_f_l(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1123 MAX_ULP, EXCEPTIONS) \
1124 check_long (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1125 MAX_ULP, EXCEPTIONS)
1126#define RUN_TEST_f_L(TEST_NAME, FUNC_NAME, ARG, EXPECTED, \
1127 MAX_ULP, EXCEPTIONS) \
1128 check_longlong (TEST_NAME, FUNC (FUNC_NAME) (ARG), EXPECTED, \
1129 MAX_ULP, EXCEPTIONS)
1130#define RUN_TEST_sincos(ARG, TEST_NAME_SIN, SIN_RES_VAR, EXPECTED_SIN, \
1131 MAX_ULP_SIN, TEST_NAME_COS, COS_RES_VAR, \
1132 EXPECTED_COS, MAX_ULP_COS, EXCEPTIONS) \
1133 do \
1134 { \
1135 FUNC (sincos) (ARG, &(SIN_RES_VAR), &(COS_RES_VAR)); \
1136 check_float (TEST_NAME_SIN, SIN_RES_VAR, \
1137 EXPECTED_SIN, MAX_ULP_SIN, EXCEPTIONS); \
1138 check_float (TEST_NAME_COS, COS_RES_VAR, \
1139 EXPECTED_COS, MAX_ULP_COS, 0); \
1140 } \
1141 while (0)
1142
8847214f
UD
1143
1144
1145/* This is to prevent messages from the SVID libm emulation. */
1146int
1147matherr (struct exception *x __attribute__ ((unused)))
1148{
1149 return 1;
1150}
1151
1152
1153/****************************************************************************
1154 Tests for single functions of libm.
1155 Please keep them alphabetically sorted!
1156****************************************************************************/
1157
51df539d
JM
1158static const struct test_f_f_data acos_test_data[] =
1159 {
1160 START_DATA (acos),
1161 TEST_f_f (acos, plus_infty, qnan_value, INVALID_EXCEPTION),
1162 TEST_f_f (acos, minus_infty, qnan_value, INVALID_EXCEPTION),
1163 TEST_f_f (acos, qnan_value, qnan_value),
1164
1165 /* |x| > 1: */
1166 TEST_f_f (acos, 1.125L, qnan_value, INVALID_EXCEPTION),
1167 TEST_f_f (acos, -1.125L, qnan_value, INVALID_EXCEPTION),
1168 TEST_f_f (acos, max_value, qnan_value, INVALID_EXCEPTION),
1169 TEST_f_f (acos, -max_value, qnan_value, INVALID_EXCEPTION),
1170
1171 TEST_f_f (acos, 0, M_PI_2l),
1172 TEST_f_f (acos, minus_zero, M_PI_2l),
1173 TEST_f_f (acos, 1, 0),
1174 TEST_f_f (acos, -1, M_PIl),
1175 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1176 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1177 TEST_f_f (acos, 0.75L, 0.722734247813415611178377352641333362L),
1178 TEST_f_f (acos, 2e-17L, 1.57079632679489659923132169163975144L),
1179 TEST_f_f (acos, 0.0625L, 1.50825556499840522843072005474337068L),
1180 TEST_f_f (acos, 0x0.ffffffp0L, 3.4526698471620358760324948263873649728491e-4L),
1181 TEST_f_f (acos, -0x0.ffffffp0L, 3.1412473866050770348750401337968641476999L),
1182#ifndef TEST_FLOAT
1183 TEST_f_f (acos, 0x0.ffffffff8p0L, 1.5258789062648029736620564947844627548516e-5L),
1184 TEST_f_f (acos, -0x0.ffffffff8p0L, 3.1415773948007305904329067627145550395696L),
1185 TEST_f_f (acos, 0x0.ffffffffffffp0L, 8.4293697021788088529885473244391795127130e-8L),
1186 TEST_f_f (acos, -0x0.ffffffffffffp0L, 3.1415925692960962166745548533940296398054L),
1187#endif
1188#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
1189 TEST_f_f (acos, 0x0.ffffffffffffffffp0L, 3.2927225399135962333718255320079907245059e-10L),
1190 TEST_f_f (acos, -0x0.ffffffffffffffffp0L, 3.1415926532605209844712837599423203309964L),
1191#endif
1192 END_DATA (acos)
1193 };
1194
8847214f
UD
1195static void
1196acos_test (void)
1197{
e6d3c4a7
AJ
1198 errno = 0;
1199 FUNC(acos) (0);
1200 if (errno == ENOSYS)
1201 /* Function not implemented. */
1202 return;
1203
8847214f 1204 START (acos);
51df539d 1205 RUN_TEST_LOOP_f_f (acos, acos_test_data, );
8847214f
UD
1206 END (acos);
1207}
1208
5ba3cc69 1209
51df539d
JM
1210static const struct test_f_f_data acos_tonearest_test_data[] =
1211 {
1212 START_DATA (acos_tonearest),
1213 TEST_f_f (acos, 0, M_PI_2l),
1214 TEST_f_f (acos, minus_zero, M_PI_2l),
1215 TEST_f_f (acos, 1, 0),
1216 TEST_f_f (acos, -1, M_PIl),
1217 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1218 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1219 END_DATA (acos_tonearest)
1220 };
1221
5ba3cc69
JM
1222static void
1223acos_test_tonearest (void)
1224{
5ba3cc69
JM
1225 errno = 0;
1226 FUNC(acos) (0);
1227 if (errno == ENOSYS)
1228 /* Function not implemented. */
1229 return;
1230
1231 START (acos_tonearest);
51df539d 1232 RUN_TEST_LOOP_f_f (acos, acos_tonearest_test_data, FE_TONEAREST);
5ba3cc69
JM
1233 END (acos_tonearest);
1234}
1235
1236
74c57478
JM
1237static const struct test_f_f_data acos_towardzero_test_data[] =
1238 {
1239 START_DATA (acos_towardzero),
1240 TEST_f_f (acos, 0, M_PI_2l),
1241 TEST_f_f (acos, minus_zero, M_PI_2l),
1242 TEST_f_f (acos, 1, 0),
1243 TEST_f_f (acos, -1, M_PIl),
1244 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1245 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1246 END_DATA (acos_towardzero)
1247 };
1248
5ba3cc69
JM
1249static void
1250acos_test_towardzero (void)
1251{
5ba3cc69
JM
1252 errno = 0;
1253 FUNC(acos) (0);
1254 if (errno == ENOSYS)
1255 /* Function not implemented. */
1256 return;
1257
1258 START (acos_towardzero);
74c57478 1259 RUN_TEST_LOOP_f_f (acos, acos_towardzero_test_data, FE_TOWARDZERO);
5ba3cc69
JM
1260 END (acos_towardzero);
1261}
1262
1263
74c57478
JM
1264static const struct test_f_f_data acos_downward_test_data[] =
1265 {
1266 START_DATA (acos_downward),
1267 TEST_f_f (acos, 0, M_PI_2l),
1268 TEST_f_f (acos, minus_zero, M_PI_2l),
1269 TEST_f_f (acos, 1, 0),
1270 TEST_f_f (acos, -1, M_PIl),
1271 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1272 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1273 END_DATA (acos_downward)
1274 };
1275
5ba3cc69
JM
1276static void
1277acos_test_downward (void)
1278{
5ba3cc69
JM
1279 errno = 0;
1280 FUNC(acos) (0);
1281 if (errno == ENOSYS)
1282 /* Function not implemented. */
1283 return;
1284
1285 START (acos_downward);
74c57478 1286 RUN_TEST_LOOP_f_f (acos, acos_downward_test_data, FE_DOWNWARD);
5ba3cc69
JM
1287 END (acos_downward);
1288}
1289
1290
74c57478
JM
1291static const struct test_f_f_data acos_upward_test_data[] =
1292 {
1293 START_DATA (acos_upward),
1294 TEST_f_f (acos, 0, M_PI_2l),
1295 TEST_f_f (acos, minus_zero, M_PI_2l),
1296 TEST_f_f (acos, 1, 0),
1297 TEST_f_f (acos, -1, M_PIl),
1298 TEST_f_f (acos, 0.5, M_PI_6l*2.0),
1299 TEST_f_f (acos, -0.5, M_PI_6l*4.0),
1300 END_DATA (acos_upward)
1301 };
1302
5ba3cc69
JM
1303static void
1304acos_test_upward (void)
1305{
5ba3cc69
JM
1306 errno = 0;
1307 FUNC(acos) (0);
1308 if (errno == ENOSYS)
1309 /* Function not implemented. */
1310 return;
1311
1312 START (acos_upward);
74c57478 1313 RUN_TEST_LOOP_f_f (acos, acos_upward_test_data, FE_UPWARD);
5ba3cc69
JM
1314 END (acos_upward);
1315}
1316
74c57478
JM
1317static const struct test_f_f_data acosh_test_data[] =
1318 {
1319 START_DATA (acosh),
1320 TEST_f_f (acosh, plus_infty, plus_infty),
1321 TEST_f_f (acosh, minus_infty, qnan_value, INVALID_EXCEPTION),
1322 TEST_f_f (acosh, qnan_value, qnan_value),
1323
1324 /* x < 1: */
1325 TEST_f_f (acosh, -1.125L, qnan_value, INVALID_EXCEPTION),
1326 TEST_f_f (acosh, -max_value, qnan_value, INVALID_EXCEPTION),
1327
1328 TEST_f_f (acosh, 1, 0),
1329 TEST_f_f (acosh, 7, 2.63391579384963341725009269461593689L),
1330 END_DATA (acosh)
1331 };
1332
8847214f
UD
1333static void
1334acosh_test (void)
1335{
aaca11d8
UD
1336 errno = 0;
1337 FUNC(acosh) (7);
1338 if (errno == ENOSYS)
1339 /* Function not implemented. */
1340 return;
1341
8847214f 1342 START (acosh);
74c57478 1343 RUN_TEST_LOOP_f_f (acosh, acosh_test_data, );
8847214f
UD
1344 END (acosh);
1345}
1346
74c57478
JM
1347static const struct test_f_f_data asin_test_data[] =
1348 {
1349 START_DATA (asin),
1350 TEST_f_f (asin, plus_infty, qnan_value, INVALID_EXCEPTION),
1351 TEST_f_f (asin, minus_infty, qnan_value, INVALID_EXCEPTION),
1352 TEST_f_f (asin, qnan_value, qnan_value),
1353
1354 /* asin x == qNaN plus invalid exception for |x| > 1. */
1355 TEST_f_f (asin, 1.125L, qnan_value, INVALID_EXCEPTION),
1356 TEST_f_f (asin, -1.125L, qnan_value, INVALID_EXCEPTION),
1357 TEST_f_f (asin, max_value, qnan_value, INVALID_EXCEPTION),
1358 TEST_f_f (asin, -max_value, qnan_value, INVALID_EXCEPTION),
1359
1360 TEST_f_f (asin, 0, 0),
1361 TEST_f_f (asin, minus_zero, minus_zero),
1362 TEST_f_f (asin, 0.5, M_PI_6l),
1363 TEST_f_f (asin, -0.5, -M_PI_6l),
1364 TEST_f_f (asin, 1.0, M_PI_2l),
1365 TEST_f_f (asin, -1.0, -M_PI_2l),
1366 TEST_f_f (asin, 0.75L, 0.848062078981481008052944338998418080L),
1367 TEST_f_f (asin, 0x0.ffffffp0L, 1.5704510598101804156437184421571127056013L),
1368 TEST_f_f (asin, -0x0.ffffffp0L, -1.5704510598101804156437184421571127056013L),
1369#ifndef TEST_FLOAT
1370 TEST_f_f (asin, 0x0.ffffffff8p0L, 1.5707810680058339712015850710748035974710L),
1371 TEST_f_f (asin, -0x0.ffffffff8p0L, -1.5707810680058339712015850710748035974710L),
1372 TEST_f_f (asin, 0x0.ffffffffffffp0L, 1.5707962425011995974432331617542781977068L),
1373 TEST_f_f (asin, -0x0.ffffffffffffp0L, -1.5707962425011995974432331617542781977068L),
1374#endif
1375#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
1376 TEST_f_f (asin, 0x0.ffffffffffffffffp0L, 1.5707963264656243652399620683025688888978L),
1377 TEST_f_f (asin, -0x0.ffffffffffffffffp0L, -1.5707963264656243652399620683025688888978L),
1378#endif
1379 END_DATA (asin)
1380 };
1381
8847214f
UD
1382static void
1383asin_test (void)
1384{
e6d3c4a7
AJ
1385 errno = 0;
1386 FUNC(asin) (0);
1387 if (errno == ENOSYS)
1388 /* Function not implemented. */
1389 return;
8847214f
UD
1390
1391 START (asin);
74c57478 1392 RUN_TEST_LOOP_f_f (asin, asin_test_data, );
8847214f
UD
1393 END (asin);
1394}
1395
5ba3cc69 1396
74c57478
JM
1397static const struct test_f_f_data asin_tonearest_test_data[] =
1398 {
1399 START_DATA (asin_tonearest),
1400 TEST_f_f (asin, 0, 0),
1401 TEST_f_f (asin, minus_zero, minus_zero),
1402 TEST_f_f (asin, 0.5, M_PI_6l),
1403 TEST_f_f (asin, -0.5, -M_PI_6l),
1404 TEST_f_f (asin, 1.0, M_PI_2l),
1405 TEST_f_f (asin, -1.0, -M_PI_2l),
1406 END_DATA (asin_tonearest)
1407 };
1408
5ba3cc69
JM
1409static void
1410asin_test_tonearest (void)
1411{
5ba3cc69
JM
1412 errno = 0;
1413 FUNC(asin) (0);
1414 if (errno == ENOSYS)
1415 /* Function not implemented. */
1416 return;
1417
1418 START (asin_tonearest);
74c57478 1419 RUN_TEST_LOOP_f_f (asin, asin_tonearest_test_data, FE_TONEAREST);
5ba3cc69
JM
1420 END (asin_tonearest);
1421}
1422
1423
74c57478
JM
1424static const struct test_f_f_data asin_towardzero_test_data[] =
1425 {
1426 START_DATA (asin_towardzero),
1427 TEST_f_f (asin, 0, 0),
1428 TEST_f_f (asin, minus_zero, minus_zero),
1429 TEST_f_f (asin, 0.5, M_PI_6l),
1430 TEST_f_f (asin, -0.5, -M_PI_6l),
1431 TEST_f_f (asin, 1.0, M_PI_2l),
1432 TEST_f_f (asin, -1.0, -M_PI_2l),
1433 END_DATA (asin_towardzero)
1434 };
1435
5ba3cc69
JM
1436static void
1437asin_test_towardzero (void)
1438{
5ba3cc69
JM
1439 errno = 0;
1440 FUNC(asin) (0);
1441 if (errno == ENOSYS)
1442 /* Function not implemented. */
1443 return;
1444
1445 START (asin_towardzero);
74c57478 1446 RUN_TEST_LOOP_f_f (asin, asin_towardzero_test_data, FE_TOWARDZERO);
5ba3cc69
JM
1447 END (asin_towardzero);
1448}
1449
1450
74c57478
JM
1451static const struct test_f_f_data asin_downward_test_data[] =
1452 {
1453 START_DATA (asin_downward),
1454 TEST_f_f (asin, 0, 0),
1455 TEST_f_f (asin, minus_zero, minus_zero),
1456 TEST_f_f (asin, 0.5, M_PI_6l),
1457 TEST_f_f (asin, -0.5, -M_PI_6l),
1458 TEST_f_f (asin, 1.0, M_PI_2l),
1459 TEST_f_f (asin, -1.0, -M_PI_2l),
1460 END_DATA (asin_downward)
1461 };
1462
5ba3cc69
JM
1463static void
1464asin_test_downward (void)
1465{
5ba3cc69
JM
1466 errno = 0;
1467 FUNC(asin) (0);
1468 if (errno == ENOSYS)
1469 /* Function not implemented. */
1470 return;
1471
1472 START (asin_downward);
74c57478 1473 RUN_TEST_LOOP_f_f (asin, asin_downward_test_data, FE_DOWNWARD);
5ba3cc69
JM
1474 END (asin_downward);
1475}
1476
1477
74c57478
JM
1478static const struct test_f_f_data asin_upward_test_data[] =
1479 {
1480 START_DATA (asin_upward),
1481 TEST_f_f (asin, 0, 0),
1482 TEST_f_f (asin, minus_zero, minus_zero),
1483 TEST_f_f (asin, 0.5, M_PI_6l),
1484 TEST_f_f (asin, -0.5, -M_PI_6l),
1485 TEST_f_f (asin, 1.0, M_PI_2l),
1486 TEST_f_f (asin, -1.0, -M_PI_2l),
1487 END_DATA (asin_upward)
1488 };
1489
5ba3cc69
JM
1490static void
1491asin_test_upward (void)
1492{
5ba3cc69
JM
1493 errno = 0;
1494 FUNC(asin) (0);
1495 if (errno == ENOSYS)
1496 /* Function not implemented. */
1497 return;
1498
1499 START (asin_upward);
74c57478 1500 RUN_TEST_LOOP_f_f (asin, asin_upward_test_data, FE_UPWARD);
5ba3cc69
JM
1501 END (asin_upward);
1502}
1503
74c57478
JM
1504static const struct test_f_f_data asinh_test_data[] =
1505 {
1506 START_DATA (asinh),
1507 TEST_f_f (asinh, 0, 0),
1508 TEST_f_f (asinh, minus_zero, minus_zero),
1509#ifndef TEST_INLINE
1510 TEST_f_f (asinh, plus_infty, plus_infty),
1511 TEST_f_f (asinh, minus_infty, minus_infty),
1512#endif
1513 TEST_f_f (asinh, qnan_value, qnan_value),
1514 TEST_f_f (asinh, 0.75L, 0.693147180559945309417232121458176568L),
1515 END_DATA (asinh)
1516 };
1517
8847214f
UD
1518static void
1519asinh_test (void)
1520{
aaca11d8 1521 errno = 0;
3c6cad26 1522 FUNC(asinh) (0.7L);
aaca11d8
UD
1523 if (errno == ENOSYS)
1524 /* Function not implemented. */
1525 return;
1526
8847214f 1527 START (asinh);
74c57478 1528 RUN_TEST_LOOP_f_f (asinh, asinh_test_data, );
8847214f
UD
1529 END (asinh);
1530}
1531
74c57478
JM
1532static const struct test_f_f_data atan_test_data[] =
1533 {
1534 START_DATA (atan),
1535 TEST_f_f (atan, 0, 0),
1536 TEST_f_f (atan, minus_zero, minus_zero),
1537
1538 TEST_f_f (atan, plus_infty, M_PI_2l),
1539 TEST_f_f (atan, minus_infty, -M_PI_2l),
1540 TEST_f_f (atan, qnan_value, qnan_value),
1541 TEST_f_f (atan, max_value, M_PI_2l),
1542 TEST_f_f (atan, -max_value, -M_PI_2l),
1543
1544 TEST_f_f (atan, 1, M_PI_4l),
1545 TEST_f_f (atan, -1, -M_PI_4l),
1546
1547 TEST_f_f (atan, 0.75L, 0.643501108793284386802809228717322638L),
1548
1549 TEST_f_f (atan, 0x1p-100L, 0x1p-100L),
1550#ifndef TEST_FLOAT
1551 TEST_f_f (atan, 0x1p-600L, 0x1p-600L),
1552#endif
1553#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
1554 TEST_f_f (atan, 0x1p-10000L, 0x1p-10000L),
1555#endif
1556 END_DATA (atan)
1557 };
1558
8847214f
UD
1559static void
1560atan_test (void)
1561{
e6d3c4a7
AJ
1562 errno = 0;
1563 FUNC(atan) (0);
1564 if (errno == ENOSYS)
1565 /* Function not implemented. */
1566 return;
8847214f
UD
1567
1568 START (atan);
74c57478 1569 RUN_TEST_LOOP_f_f (atan, atan_test_data, );
8847214f
UD
1570 END (atan);
1571}
1572
1573
1574
74c57478
JM
1575static const struct test_f_f_data atanh_test_data[] =
1576 {
1577 START_DATA (atanh),
1578 TEST_f_f (atanh, 0, 0),
1579 TEST_f_f (atanh, minus_zero, minus_zero),
1580
1581 TEST_f_f (atanh, 1, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
1582 TEST_f_f (atanh, -1, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
1583 TEST_f_f (atanh, qnan_value, qnan_value),
1584
1585 /* atanh (x) == qNaN plus invalid exception if |x| > 1. */
1586 TEST_f_f (atanh, 1.125L, qnan_value, INVALID_EXCEPTION),
1587 TEST_f_f (atanh, -1.125L, qnan_value, INVALID_EXCEPTION),
1588 TEST_f_f (atanh, max_value, qnan_value, INVALID_EXCEPTION),
1589 TEST_f_f (atanh, -max_value, qnan_value, INVALID_EXCEPTION),
1590
1591 TEST_f_f (atanh, 0.75L, 0.972955074527656652552676371721589865L),
1592 END_DATA (atanh)
1593 };
1594
8847214f
UD
1595static void
1596atanh_test (void)
1597{
aaca11d8 1598 errno = 0;
3c6cad26 1599 FUNC(atanh) (0.7L);
aaca11d8
UD
1600 if (errno == ENOSYS)
1601 /* Function not implemented. */
1602 return;
8847214f
UD
1603
1604 START (atanh);
74c57478 1605 RUN_TEST_LOOP_f_f (atanh, atanh_test_data, );
8847214f
UD
1606 END (atanh);
1607}
1608
601a3a5f
JM
1609static const struct test_ff_f_data atan2_test_data[] =
1610 {
1611 START_DATA (atan2),
1612 /* atan2 (0,x) == 0 for x > 0. */
1613 TEST_ff_f (atan2, 0, 1, 0),
8847214f 1614
601a3a5f
JM
1615 /* atan2 (-0,x) == -0 for x > 0. */
1616 TEST_ff_f (atan2, minus_zero, 1, minus_zero),
8847214f 1617
601a3a5f
JM
1618 TEST_ff_f (atan2, 0, 0, 0),
1619 TEST_ff_f (atan2, minus_zero, 0, minus_zero),
8847214f 1620
601a3a5f
JM
1621 /* atan2 (+0,x) == +pi for x < 0. */
1622 TEST_ff_f (atan2, 0, -1, M_PIl),
8847214f 1623
601a3a5f
JM
1624 /* atan2 (-0,x) == -pi for x < 0. */
1625 TEST_ff_f (atan2, minus_zero, -1, -M_PIl),
8847214f 1626
601a3a5f
JM
1627 TEST_ff_f (atan2, 0, minus_zero, M_PIl),
1628 TEST_ff_f (atan2, minus_zero, minus_zero, -M_PIl),
8847214f 1629
601a3a5f
JM
1630 /* atan2 (y,+0) == pi/2 for y > 0. */
1631 TEST_ff_f (atan2, 1, 0, M_PI_2l),
8847214f 1632
601a3a5f
JM
1633 /* atan2 (y,-0) == pi/2 for y > 0. */
1634 TEST_ff_f (atan2, 1, minus_zero, M_PI_2l),
8847214f 1635
601a3a5f
JM
1636 /* atan2 (y,+0) == -pi/2 for y < 0. */
1637 TEST_ff_f (atan2, -1, 0, -M_PI_2l),
8847214f 1638
601a3a5f
JM
1639 /* atan2 (y,-0) == -pi/2 for y < 0. */
1640 TEST_ff_f (atan2, -1, minus_zero, -M_PI_2l),
8847214f 1641
601a3a5f
JM
1642 /* atan2 (y,inf) == +0 for finite y > 0. */
1643 TEST_ff_f (atan2, 1, plus_infty, 0),
8847214f 1644
601a3a5f
JM
1645 /* atan2 (y,inf) == -0 for finite y < 0. */
1646 TEST_ff_f (atan2, -1, plus_infty, minus_zero),
8847214f 1647
601a3a5f
JM
1648 /* atan2(+inf, x) == pi/2 for finite x. */
1649 TEST_ff_f (atan2, plus_infty, -1, M_PI_2l),
8847214f 1650
601a3a5f
JM
1651 /* atan2(-inf, x) == -pi/2 for finite x. */
1652 TEST_ff_f (atan2, minus_infty, 1, -M_PI_2l),
8847214f 1653
601a3a5f
JM
1654 /* atan2 (y,-inf) == +pi for finite y > 0. */
1655 TEST_ff_f (atan2, 1, minus_infty, M_PIl),
8847214f 1656
601a3a5f
JM
1657 /* atan2 (y,-inf) == -pi for finite y < 0. */
1658 TEST_ff_f (atan2, -1, minus_infty, -M_PIl),
8847214f 1659
601a3a5f
JM
1660 TEST_ff_f (atan2, plus_infty, plus_infty, M_PI_4l),
1661 TEST_ff_f (atan2, minus_infty, plus_infty, -M_PI_4l),
1662 TEST_ff_f (atan2, plus_infty, minus_infty, M_PI_34l),
1663 TEST_ff_f (atan2, minus_infty, minus_infty, -M_PI_34l),
1664 TEST_ff_f (atan2, qnan_value, qnan_value, qnan_value),
8847214f 1665
601a3a5f 1666 TEST_ff_f (atan2, max_value, max_value, M_PI_4l),
7726d6a9 1667
601a3a5f
JM
1668 TEST_ff_f (atan2, max_value, min_value, M_PI_2l),
1669 TEST_ff_f (atan2, -max_value, -min_value, -M_PI_2l),
6d33cc9d 1670
601a3a5f
JM
1671 TEST_ff_f (atan2, 0.75L, 1, 0.643501108793284386802809228717322638L),
1672 TEST_ff_f (atan2, -0.75L, 1.0L, -0.643501108793284386802809228717322638L),
1673 TEST_ff_f (atan2, 0.75L, -1.0L, 2.49809154479650885165983415456218025L),
1674 TEST_ff_f (atan2, -0.75L, -1.0L, -2.49809154479650885165983415456218025L),
1675 TEST_ff_f (atan2, 0.390625L, .00029L, 1.57005392693128974780151246612928941L),
1676 TEST_ff_f (atan2, 1.390625L, 0.9296875L, 0.981498387184244311516296577615519772L),
8847214f 1677
601a3a5f 1678 TEST_ff_f (atan2, -0.00756827042671106339L, -.001792735857538728036L, -1.80338464113663849327153994379639112L),
16a0e2ec 1679#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
601a3a5f 1680 TEST_ff_f (atan2, 0x1.00000000000001p0L, 0x1.00000000000001p0L, M_PI_4l),
16a0e2ec 1681#endif
601a3a5f
JM
1682 END_DATA (atan2)
1683 };
bb3f4825 1684
601a3a5f
JM
1685static void
1686atan2_test (void)
1687{
1688 errno = 0;
1689 FUNC(atan2) (-0, 1);
1690 if (errno == ENOSYS)
1691 /* Function not implemented. */
1692 return;
1693
1694 START (atan2);
1695 RUN_TEST_LOOP_ff_f (atan2, atan2_test_data, );
8847214f
UD
1696 END (atan2);
1697}
1698
6a1992e2
JM
1699static const struct test_c_f_data cabs_test_data[] =
1700 {
1701 START_DATA (cabs);
1702 /* cabs (x + iy) is specified as hypot (x,y) */
1703
1704 /* cabs (+inf + i x) == +inf. */
1705 TEST_c_f (cabs, plus_infty, 1.0, plus_infty),
1706 /* cabs (-inf + i x) == +inf. */
1707 TEST_c_f (cabs, minus_infty, 1.0, plus_infty),
1708
1709 TEST_c_f (cabs, minus_infty, qnan_value, plus_infty),
1710 TEST_c_f (cabs, minus_infty, qnan_value, plus_infty),
1711
1712 TEST_c_f (cabs, qnan_value, qnan_value, qnan_value),
1713
1714 /* cabs (x,y) == cabs (y,x). */
1715 TEST_c_f (cabs, 0.75L, 12.390625L, 12.4133028598606664302388810868156657L),
1716 /* cabs (x,y) == cabs (-x,y). */
1717 TEST_c_f (cabs, -12.390625L, 0.75L, 12.4133028598606664302388810868156657L),
1718 /* cabs (x,y) == cabs (-y,x). */
1719 TEST_c_f (cabs, -0.75L, 12.390625L, 12.4133028598606664302388810868156657L),
1720 /* cabs (x,y) == cabs (-x,-y). */
1721 TEST_c_f (cabs, -12.390625L, -0.75L, 12.4133028598606664302388810868156657L),
1722 /* cabs (x,y) == cabs (-y,-x). */
1723 TEST_c_f (cabs, -0.75L, -12.390625L, 12.4133028598606664302388810868156657L),
1724 /* cabs (x,0) == fabs (x). */
1725 TEST_c_f (cabs, -0.75L, 0, 0.75L),
1726 TEST_c_f (cabs, 0.75L, 0, 0.75L),
1727 TEST_c_f (cabs, -1.0L, 0, 1.0L),
1728 TEST_c_f (cabs, 1.0L, 0, 1.0L),
1729 TEST_c_f (cabs, -5.7e7L, 0, 5.7e7L),
1730 TEST_c_f (cabs, 5.7e7L, 0, 5.7e7L),
1731
1732 TEST_c_f (cabs, 0.75L, 1.25L, 1.45773797371132511771853821938639577L),
1733 END_DATA (cabs);
1734 };
1735
8847214f
UD
1736static void
1737cabs_test (void)
1738{
aaca11d8 1739 errno = 0;
3c6cad26 1740 FUNC(cabs) (BUILD_COMPLEX (0.7L, 12.4L));
aaca11d8
UD
1741 if (errno == ENOSYS)
1742 /* Function not implemented. */
1743 return;
1744
8847214f 1745 START (cabs);
6a1992e2 1746 RUN_TEST_LOOP_c_f (cabs, cabs_test_data, );
8847214f
UD
1747 END (cabs);
1748}
1749
2550dfe9 1750
08198877
JM
1751static const struct test_c_c_data cacos_test_data[] =
1752 {
1753 START_DATA (cacos),
1754 TEST_c_c (cacos, 0, 0, M_PI_2l, minus_zero),
1755 TEST_c_c (cacos, minus_zero, 0, M_PI_2l, minus_zero),
1756 TEST_c_c (cacos, minus_zero, minus_zero, M_PI_2l, 0.0),
1757 TEST_c_c (cacos, 0, minus_zero, M_PI_2l, 0.0),
1758
1759 TEST_c_c (cacos, minus_infty, plus_infty, M_PI_34l, minus_infty),
1760 TEST_c_c (cacos, minus_infty, minus_infty, M_PI_34l, plus_infty),
1761
1762 TEST_c_c (cacos, plus_infty, plus_infty, M_PI_4l, minus_infty),
1763 TEST_c_c (cacos, plus_infty, minus_infty, M_PI_4l, plus_infty),
1764
1765 TEST_c_c (cacos, -10.0, plus_infty, M_PI_2l, minus_infty),
1766 TEST_c_c (cacos, -10.0, minus_infty, M_PI_2l, plus_infty),
1767 TEST_c_c (cacos, 0, plus_infty, M_PI_2l, minus_infty),
1768 TEST_c_c (cacos, 0, minus_infty, M_PI_2l, plus_infty),
1769 TEST_c_c (cacos, 0.1L, plus_infty, M_PI_2l, minus_infty),
1770 TEST_c_c (cacos, 0.1L, minus_infty, M_PI_2l, plus_infty),
1771
1772 TEST_c_c (cacos, minus_infty, 0, M_PIl, minus_infty),
1773 TEST_c_c (cacos, minus_infty, minus_zero, M_PIl, plus_infty),
1774 TEST_c_c (cacos, minus_infty, 100, M_PIl, minus_infty),
1775 TEST_c_c (cacos, minus_infty, -100, M_PIl, plus_infty),
1776
1777 TEST_c_c (cacos, plus_infty, 0, 0.0, minus_infty),
1778 TEST_c_c (cacos, plus_infty, minus_zero, 0.0, plus_infty),
1779 TEST_c_c (cacos, plus_infty, 0.5, 0.0, minus_infty),
1780 TEST_c_c (cacos, plus_infty, -0.5, 0.0, plus_infty),
1781
1782 TEST_c_c (cacos, plus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
1783 TEST_c_c (cacos, minus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
1784
1785 TEST_c_c (cacos, 0, qnan_value, M_PI_2l, qnan_value),
1786 TEST_c_c (cacos, minus_zero, qnan_value, M_PI_2l, qnan_value),
1787
1788 TEST_c_c (cacos, qnan_value, plus_infty, qnan_value, minus_infty),
1789 TEST_c_c (cacos, qnan_value, minus_infty, qnan_value, plus_infty),
1790
1791 TEST_c_c (cacos, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1792 TEST_c_c (cacos, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1793
1794 TEST_c_c (cacos, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1795 TEST_c_c (cacos, qnan_value, -0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
1796
1797 TEST_c_c (cacos, qnan_value, qnan_value, qnan_value, qnan_value),
1798
1799 TEST_c_c (cacos, plus_zero, -1.5L, M_PI_2l, 1.194763217287109304111930828519090523536L),
1800 TEST_c_c (cacos, minus_zero, -1.5L, M_PI_2l, 1.194763217287109304111930828519090523536L),
1801 TEST_c_c (cacos, plus_zero, -1.0L, M_PI_2l, 0.8813735870195430252326093249797923090282L),
1802 TEST_c_c (cacos, minus_zero, -1.0L, M_PI_2l, 0.8813735870195430252326093249797923090282L),
1803 TEST_c_c (cacos, plus_zero, -0.5L, M_PI_2l, 0.4812118250596034474977589134243684231352L),
1804 TEST_c_c (cacos, minus_zero, -0.5L, M_PI_2l, 0.4812118250596034474977589134243684231352L),
1805 TEST_c_c (cacos, plus_zero, 0.5L, M_PI_2l, -0.4812118250596034474977589134243684231352L),
1806 TEST_c_c (cacos, minus_zero, 0.5L, M_PI_2l, -0.4812118250596034474977589134243684231352L),
1807 TEST_c_c (cacos, plus_zero, 1.0L, M_PI_2l, -0.8813735870195430252326093249797923090282L),
1808 TEST_c_c (cacos, minus_zero, 1.0L, M_PI_2l, -0.8813735870195430252326093249797923090282L),
1809 TEST_c_c (cacos, plus_zero, 1.5L, M_PI_2l, -1.194763217287109304111930828519090523536L),
1810 TEST_c_c (cacos, minus_zero, 1.5L, M_PI_2l, -1.194763217287109304111930828519090523536L),
1811
1812 TEST_c_c (cacos, -1.5L, plus_zero, M_PIl, -0.9624236501192068949955178268487368462704L),
1813 TEST_c_c (cacos, -1.5L, minus_zero, M_PIl, 0.9624236501192068949955178268487368462704L),
1814 TEST_c_c (cacos, -1.0L, plus_zero, M_PIl, minus_zero),
1815 TEST_c_c (cacos, -1.0L, minus_zero, M_PIl, plus_zero),
1816 TEST_c_c (cacos, -0.5L, plus_zero, 2.094395102393195492308428922186335256131L, minus_zero),
1817 TEST_c_c (cacos, -0.5L, minus_zero, 2.094395102393195492308428922186335256131L, plus_zero),
1818 TEST_c_c (cacos, 0.5L, plus_zero, 1.047197551196597746154214461093167628066L, minus_zero),
1819 TEST_c_c (cacos, 0.5L, minus_zero, 1.047197551196597746154214461093167628066L, plus_zero),
1820 TEST_c_c (cacos, 1.0L, plus_zero, plus_zero, minus_zero),
1821 TEST_c_c (cacos, 1.0L, minus_zero, plus_zero, plus_zero),
1822 TEST_c_c (cacos, 1.5L, plus_zero, plus_zero, -0.9624236501192068949955178268487368462704L),
1823 TEST_c_c (cacos, 1.5L, minus_zero, plus_zero, 0.9624236501192068949955178268487368462704L),
1824
1825 TEST_c_c (cacos, 0x1p50L, 1.0L, 8.881784197001252323389053344727730248720e-16L, -3.535050620855721078027883819436720218708e1L),
1826 TEST_c_c (cacos, 0x1p50L, -1.0L, 8.881784197001252323389053344727730248720e-16L, 3.535050620855721078027883819436720218708e1L),
1827 TEST_c_c (cacos, -0x1p50L, 1.0L, 3.141592653589792350284223683154270545292L, -3.535050620855721078027883819436720218708e1L),
1828 TEST_c_c (cacos, -0x1p50L, -1.0L, 3.141592653589792350284223683154270545292L, 3.535050620855721078027883819436720218708e1L),
1829 TEST_c_c (cacos, 1.0L, 0x1p50L, 1.570796326794895731052901991514519103193L, -3.535050620855721078027883819436759661753e1L),
1830 TEST_c_c (cacos, -1.0L, 0x1p50L, 1.570796326794897507409741391764983781004L, -3.535050620855721078027883819436759661753e1L),
1831 TEST_c_c (cacos, 1.0L, -0x1p50L, 1.570796326794895731052901991514519103193L, 3.535050620855721078027883819436759661753e1L),
1832 TEST_c_c (cacos, -1.0L, -0x1p50L, 1.570796326794897507409741391764983781004L, 3.535050620855721078027883819436759661753e1L),
728d7b43 1833#ifndef TEST_FLOAT
08198877
JM
1834 TEST_c_c (cacos, 0x1p500L, 1.0L, 3.054936363499604682051979393213617699789e-151L, -3.472667374605326000180332928505464606058e2L),
1835 TEST_c_c (cacos, 0x1p500L, -1.0L, 3.054936363499604682051979393213617699789e-151L, 3.472667374605326000180332928505464606058e2L),
1836 TEST_c_c (cacos, -0x1p500L, 1.0L, 3.141592653589793238462643383279502884197L, -3.472667374605326000180332928505464606058e2L),
1837 TEST_c_c (cacos, -0x1p500L, -1.0L, 3.141592653589793238462643383279502884197L, 3.472667374605326000180332928505464606058e2L),
1838 TEST_c_c (cacos, 1.0L, 0x1p500L, 1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
1839 TEST_c_c (cacos, -1.0L, 0x1p500L, 1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
1840 TEST_c_c (cacos, 1.0L, -0x1p500L, 1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
1841 TEST_c_c (cacos, -1.0L, -0x1p500L, 1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
728d7b43
JM
1842#endif
1843#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
1844 TEST_c_c (cacos, 0x1p5000L, 1.0L, 7.079811261048172892385615158694057552948e-1506L, -3.466429049980286492395577839412341016946e3L),
1845 TEST_c_c (cacos, 0x1p5000L, -1.0L, 7.079811261048172892385615158694057552948e-1506L, 3.466429049980286492395577839412341016946e3L),
1846 TEST_c_c (cacos, -0x1p5000L, 1.0L, 3.141592653589793238462643383279502884197L, -3.466429049980286492395577839412341016946e3L),
1847 TEST_c_c (cacos, -0x1p5000L, -1.0L, 3.141592653589793238462643383279502884197L, 3.466429049980286492395577839412341016946e3L),
1848 TEST_c_c (cacos, 1.0L, 0x1p5000L, 1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
1849 TEST_c_c (cacos, -1.0L, 0x1p5000L, 1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
1850 TEST_c_c (cacos, 1.0L, -0x1p5000L, 1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
1851 TEST_c_c (cacos, -1.0L, -0x1p5000L, 1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
728d7b43
JM
1852#endif
1853
08198877 1854 TEST_c_c (cacos, 0x1.fp127L, 0x1.fp127L, 7.853981633974483096156608458198757210493e-1L, -8.973081118419833726837456344608533993585e1L),
728d7b43 1855#ifndef TEST_FLOAT
08198877 1856 TEST_c_c (cacos, 0x1.fp1023L, 0x1.fp1023L, 7.853981633974483096156608458198757210493e-1L, -7.107906849659093345062145442726115449315e2L),
728d7b43
JM
1857#endif
1858#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 1859 TEST_c_c (cacos, 0x1.fp16383L, 0x1.fp16383L, 7.853981633974483096156608458198757210493e-1L, -1.135753137836666928715489992987020363057e4L),
728d7b43
JM
1860#endif
1861
08198877
JM
1862 TEST_c_c (cacos, 0x1.fp-129L, 1.5L, 1.570796326794896619231321691639751442097L, -1.194763217287109304111930828519090523536L),
1863 TEST_c_c (cacos, 0x1.fp-129L, -1.5L, 1.570796326794896619231321691639751442097L, 1.194763217287109304111930828519090523536L),
1864 TEST_c_c (cacos, -0x1.fp-129L, 1.5L, 1.570796326794896619231321691639751442100L, -1.194763217287109304111930828519090523536L),
1865 TEST_c_c (cacos, -0x1.fp-129L, -1.5L, 1.570796326794896619231321691639751442100L, 1.194763217287109304111930828519090523536L),
1866 TEST_c_c (cacos, 1.5L, 0x1.fp-129L, 2.546345110742945032959687790021055102355e-39L, -9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_FLOAT),
1867 TEST_c_c (cacos, -1.5L, 0x1.fp-129L, 3.141592653589793238462643383279502884195L, -9.624236501192068949955178268487368462704e-1L),
1868 TEST_c_c (cacos, 1.5L, -0x1.fp-129L, 2.546345110742945032959687790021055102355e-39L, 9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_FLOAT),
1869 TEST_c_c (cacos, -1.5L, -0x1.fp-129L, 3.141592653589793238462643383279502884195L, 9.624236501192068949955178268487368462704e-1L),
8cf28c5e 1870#ifndef TEST_FLOAT
08198877
JM
1871 TEST_c_c (cacos, 0x1.fp-1025L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1872 TEST_c_c (cacos, 0x1.fp-1025L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1873 TEST_c_c (cacos, -0x1.fp-1025L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1874 TEST_c_c (cacos, -0x1.fp-1025L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1875 TEST_c_c (cacos, 1.5L, 0x1.fp-1025L, 4.819934639999230680322935210539402497827e-309L, -9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
1876 TEST_c_c (cacos, -1.5L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -9.624236501192068949955178268487368462704e-1L),
1877 TEST_c_c (cacos, 1.5L, -0x1.fp-1025L, 4.819934639999230680322935210539402497827e-309L, 9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
1878 TEST_c_c (cacos, -1.5L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 9.624236501192068949955178268487368462704e-1L),
8cf28c5e
JM
1879#endif
1880#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
1881 TEST_c_c (cacos, 0x1.fp-16385L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1882 TEST_c_c (cacos, 0x1.fp-16385L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1883 TEST_c_c (cacos, -0x1.fp-16385L, 1.5L, 1.570796326794896619231321691639751442099L, -1.194763217287109304111930828519090523536L),
1884 TEST_c_c (cacos, -0x1.fp-16385L, -1.5L, 1.570796326794896619231321691639751442099L, 1.194763217287109304111930828519090523536L),
1885 TEST_c_c (cacos, 1.5L, 0x1.fp-16385L, 7.282957076134209141226696333885150260319e-4933L, -9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION),
1886 TEST_c_c (cacos, -1.5L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -9.624236501192068949955178268487368462704e-1L),
1887 TEST_c_c (cacos, 1.5L, -0x1.fp-16385L, 7.282957076134209141226696333885150260319e-4933L, 9.624236501192068949955178268487368462704e-1L, UNDERFLOW_EXCEPTION),
1888 TEST_c_c (cacos, -1.5L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 9.624236501192068949955178268487368462704e-1L),
1889#endif
1890
1891 TEST_c_c (cacos, 0.5L, 1.0L, 1.221357263937683325603909865564381489366L, -9.261330313501824245501244453057873152694e-1L),
1892 TEST_c_c (cacos, 0.5L, -1.0L, 1.221357263937683325603909865564381489366L, 9.261330313501824245501244453057873152694e-1L),
1893 TEST_c_c (cacos, -0.5L, 1.0L, 1.920235389652109912858733517715121394831L, -9.261330313501824245501244453057873152694e-1L),
1894 TEST_c_c (cacos, -0.5L, -1.0L, 1.920235389652109912858733517715121394831L, 9.261330313501824245501244453057873152694e-1L),
1895 TEST_c_c (cacos, 1.0L, 0.5L, 6.748888455860063801646649673121744318756e-1L, -7.328576759736452608886724437653071523305e-1L),
1896 TEST_c_c (cacos, -1.0L, 0.5L, 2.466703808003786858297978415967328452322L, -7.328576759736452608886724437653071523305e-1L),
1897 TEST_c_c (cacos, 1.0L, -0.5L, 6.748888455860063801646649673121744318756e-1L, 7.328576759736452608886724437653071523305e-1L),
1898 TEST_c_c (cacos, -1.0L, -0.5L, 2.466703808003786858297978415967328452322L, 7.328576759736452608886724437653071523305e-1L),
1899 TEST_c_c (cacos, 0.25L, 1.0L, 1.394493894017929688812643125003661339452L, -8.924633639033482359562124741744951972772e-1L),
1900 TEST_c_c (cacos, 0.25L, -1.0L, 1.394493894017929688812643125003661339452L, 8.924633639033482359562124741744951972772e-1L),
1901 TEST_c_c (cacos, -0.25L, 1.0L, 1.747098759571863549650000258275841544745L, -8.924633639033482359562124741744951972772e-1L),
1902 TEST_c_c (cacos, -0.25L, -1.0L, 1.747098759571863549650000258275841544745L, 8.924633639033482359562124741744951972772e-1L),
1903 TEST_c_c (cacos, 1.0L, 0.25L, 4.890443302710802929202843732146540079124e-1L, -5.097911466811016354623559941115413499164e-1L),
1904 TEST_c_c (cacos, -1.0L, 0.25L, 2.652548323318712945542359010064848876285L, -5.097911466811016354623559941115413499164e-1L),
1905 TEST_c_c (cacos, 1.0L, -0.25L, 4.890443302710802929202843732146540079124e-1L, 5.097911466811016354623559941115413499164e-1L),
1906 TEST_c_c (cacos, -1.0L, -0.25L, 2.652548323318712945542359010064848876285L, 5.097911466811016354623559941115413499164e-1L),
1907 TEST_c_c (cacos, 0x1.fp-10L, 1.0L, 1.569458417435338878318763342108699202986L, -8.813742198809567991336704287826445879025e-1L),
1908 TEST_c_c (cacos, 0x1.fp-10L, -1.0L, 1.569458417435338878318763342108699202986L, 8.813742198809567991336704287826445879025e-1L),
1909 TEST_c_c (cacos, -0x1.fp-10L, 1.0L, 1.572134236154454360143880041170803681211L, -8.813742198809567991336704287826445879025e-1L),
1910 TEST_c_c (cacos, -0x1.fp-10L, -1.0L, 1.572134236154454360143880041170803681211L, 8.813742198809567991336704287826445879025e-1L),
1911 TEST_c_c (cacos, 1.0L, 0x1.fp-10L, 4.349129763101882771258049954181971959031e-2L, -4.350501469856803800217957402220976497152e-2L),
1912 TEST_c_c (cacos, -1.0L, 0x1.fp-10L, 3.098101355958774410750062883737683164607L, -4.350501469856803800217957402220976497152e-2L),
1913 TEST_c_c (cacos, 1.0L, -0x1.fp-10L, 4.349129763101882771258049954181971959031e-2L, 4.350501469856803800217957402220976497152e-2L),
1914 TEST_c_c (cacos, -1.0L, -0x1.fp-10L, 3.098101355958774410750062883737683164607L, 4.350501469856803800217957402220976497152e-2L),
1915 TEST_c_c (cacos, 0x1.fp-30L, 1.0L, 1.570796325518966635014803151387033957091L, -8.813735870195430258081932989769495326854e-1L),
1916 TEST_c_c (cacos, 0x1.fp-30L, -1.0L, 1.570796325518966635014803151387033957091L, 8.813735870195430258081932989769495326854e-1L),
1917 TEST_c_c (cacos, -0x1.fp-30L, 1.0L, 1.570796328070826603447840231892468927106L, -8.813735870195430258081932989769495326854e-1L),
1918 TEST_c_c (cacos, -0x1.fp-30L, -1.0L, 1.570796328070826603447840231892468927106L, 8.813735870195430258081932989769495326854e-1L),
1919 TEST_c_c (cacos, 1.0L, 0x1.fp-30L, 4.247867097467650115899790787875186617316e-5L, -4.247867098745151888768727039216644758847e-5L),
1920 TEST_c_c (cacos, -1.0L, 0x1.fp-30L, 3.141550174918818561961484385371624132331L, -4.247867098745151888768727039216644758847e-5L),
1921 TEST_c_c (cacos, 1.0L, -0x1.fp-30L, 4.247867097467650115899790787875186617316e-5L, 4.247867098745151888768727039216644758847e-5L),
1922 TEST_c_c (cacos, -1.0L, -0x1.fp-30L, 3.141550174918818561961484385371624132331L, 4.247867098745151888768727039216644758847e-5L),
1923 TEST_c_c (cacos, 0x1.fp-100L, 1.0L, 1.570796326794896619231321691638670687364L, -8.813735870195430252326093249797923090282e-1L),
1924 TEST_c_c (cacos, 0x1.fp-100L, -1.0L, 1.570796326794896619231321691638670687364L, 8.813735870195430252326093249797923090282e-1L),
1925 TEST_c_c (cacos, -0x1.fp-100L, 1.0L, 1.570796326794896619231321691640832196834L, -8.813735870195430252326093249797923090282e-1L),
1926 TEST_c_c (cacos, -0x1.fp-100L, -1.0L, 1.570796326794896619231321691640832196834L, 8.813735870195430252326093249797923090282e-1L),
1927 TEST_c_c (cacos, 1.0L, 0x1.fp-100L, 1.236292038260260888664514866456887257525e-15L, -1.236292038260260888664514866457202186027e-15L),
1928 TEST_c_c (cacos, -1.0L, 0x1.fp-100L, 3.141592653589792002170605123018614219682L, -1.236292038260260888664514866457202186027e-15L),
1929 TEST_c_c (cacos, 1.0L, -0x1.fp-100L, 1.236292038260260888664514866456887257525e-15L, 1.236292038260260888664514866457202186027e-15L),
1930 TEST_c_c (cacos, -1.0L, -0x1.fp-100L, 3.141592653589792002170605123018614219682L, 1.236292038260260888664514866457202186027e-15L),
1931 TEST_c_c (cacos, 0x1.fp-129L, 1.0L, 1.570796326794896619231321691639751442097L, -8.813735870195430252326093249797923090282e-1L),
1932 TEST_c_c (cacos, 0x1.fp-129L, -1.0L, 1.570796326794896619231321691639751442097L, 8.813735870195430252326093249797923090282e-1L),
1933 TEST_c_c (cacos, -0x1.fp-129L, 1.0L, 1.570796326794896619231321691639751442101L, -8.813735870195430252326093249797923090282e-1L),
1934 TEST_c_c (cacos, -0x1.fp-129L, -1.0L, 1.570796326794896619231321691639751442101L, 8.813735870195430252326093249797923090282e-1L),
1935 TEST_c_c (cacos, 1.0L, 0x1.fp-129L, 5.335635276982233498398987585285818977930e-20L, -5.335635276982233498398987585285818977933e-20L),
1936 TEST_c_c (cacos, -1.0L, 0x1.fp-129L, 3.141592653589793238409287030509680549213L, -5.335635276982233498398987585285818977933e-20L),
1937 TEST_c_c (cacos, 1.0L, -0x1.fp-129L, 5.335635276982233498398987585285818977930e-20L, 5.335635276982233498398987585285818977933e-20L),
1938 TEST_c_c (cacos, -1.0L, -0x1.fp-129L, 3.141592653589793238409287030509680549213L, 5.335635276982233498398987585285818977933e-20L),
0a1b2ae6 1939#ifndef TEST_FLOAT
08198877
JM
1940 TEST_c_c (cacos, 0x1.fp-1000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1941 TEST_c_c (cacos, 0x1.fp-1000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1942 TEST_c_c (cacos, -0x1.fp-1000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1943 TEST_c_c (cacos, -0x1.fp-1000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1944 TEST_c_c (cacos, 1.0L, 0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, -4.252291453851660175550490409247739011867e-151L),
1945 TEST_c_c (cacos, -1.0L, 0x1.fp-1000L, 3.141592653589793238462643383279502884197L, -4.252291453851660175550490409247739011867e-151L),
1946 TEST_c_c (cacos, 1.0L, -0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, 4.252291453851660175550490409247739011867e-151L),
1947 TEST_c_c (cacos, -1.0L, -0x1.fp-1000L, 3.141592653589793238462643383279502884197L, 4.252291453851660175550490409247739011867e-151L),
1948 TEST_c_c (cacos, 0x1.fp-1025L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1949 TEST_c_c (cacos, 0x1.fp-1025L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1950 TEST_c_c (cacos, -0x1.fp-1025L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1951 TEST_c_c (cacos, -0x1.fp-1025L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1952 TEST_c_c (cacos, 1.0L, 0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, -7.340879205566679497036857179189356754017e-155L),
1953 TEST_c_c (cacos, -1.0L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -7.340879205566679497036857179189356754017e-155L),
1954 TEST_c_c (cacos, 1.0L, -0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, 7.340879205566679497036857179189356754017e-155L),
1955 TEST_c_c (cacos, -1.0L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 7.340879205566679497036857179189356754017e-155L),
0a1b2ae6
JM
1956#endif
1957#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
1958 TEST_c_c (cacos, 0x1.fp-10000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1959 TEST_c_c (cacos, 0x1.fp-10000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1960 TEST_c_c (cacos, -0x1.fp-10000L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1961 TEST_c_c (cacos, -0x1.fp-10000L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1962 TEST_c_c (cacos, 1.0L, 0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, -9.854680208706673586644342922051388714633e-1506L),
1963 TEST_c_c (cacos, -1.0L, 0x1.fp-10000L, 3.141592653589793238462643383279502884197L, -9.854680208706673586644342922051388714633e-1506L),
1964 TEST_c_c (cacos, 1.0L, -0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, 9.854680208706673586644342922051388714633e-1506L),
1965 TEST_c_c (cacos, -1.0L, -0x1.fp-10000L, 3.141592653589793238462643383279502884197L, 9.854680208706673586644342922051388714633e-1506L),
1966 TEST_c_c (cacos, 0x1.fp-16385L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1967 TEST_c_c (cacos, 0x1.fp-16385L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1968 TEST_c_c (cacos, -0x1.fp-16385L, 1.0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797923090282e-1L),
1969 TEST_c_c (cacos, -0x1.fp-16385L, -1.0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797923090282e-1L),
1970 TEST_c_c (cacos, 1.0L, 0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, -9.023632056840860275214893047597614177639e-2467L),
1971 TEST_c_c (cacos, -1.0L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -9.023632056840860275214893047597614177639e-2467L),
1972 TEST_c_c (cacos, 1.0L, -0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, 9.023632056840860275214893047597614177639e-2467L),
1973 TEST_c_c (cacos, -1.0L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 9.023632056840860275214893047597614177639e-2467L),
1974#endif
1975
1976 TEST_c_c (cacos, 0x1p-23L, 0x1.000002p0L, 1.570796242501204621739026081991856762292L, -8.813736713132400470205730751186547909968e-1L),
1977 TEST_c_c (cacos, 0x1p-23L, -0x1.000002p0L, 1.570796242501204621739026081991856762292L, 8.813736713132400470205730751186547909968e-1L),
1978 TEST_c_c (cacos, -0x1p-23L, 0x1.000002p0L, 1.570796411088588616723617301287646121905L, -8.813736713132400470205730751186547909968e-1L),
1979 TEST_c_c (cacos, -0x1p-23L, -0x1.000002p0L, 1.570796411088588616723617301287646121905L, 8.813736713132400470205730751186547909968e-1L),
1980 TEST_c_c (cacos, 0x1.000002p0L, 0x1p-23L, 2.222118384408546368406374049167636760903e-4L, -5.364668491573609633134147164031476452679e-4L),
1981 TEST_c_c (cacos, -0x1.000002p0L, 0x1p-23L, 3.141370441751352383825802745874586120521L, -5.364668491573609633134147164031476452679e-4L),
1982 TEST_c_c (cacos, 0x1.000002p0L, -0x1p-23L, 2.222118384408546368406374049167636760903e-4L, 5.364668491573609633134147164031476452679e-4L),
1983 TEST_c_c (cacos, -0x1.000002p0L, -0x1p-23L, 3.141370441751352383825802745874586120521L, 5.364668491573609633134147164031476452679e-4L),
1984 TEST_c_c (cacos, 0x1.fp-129L, 0x1.000002p0L, 1.570796326794896619231321691639751442097L, -8.813736713132375348727889167749389235161e-1L),
1985 TEST_c_c (cacos, 0x1.fp-129L, -0x1.000002p0L, 1.570796326794896619231321691639751442097L, 8.813736713132375348727889167749389235161e-1L),
1986 TEST_c_c (cacos, -0x1.fp-129L, 0x1.000002p0L, 1.570796326794896619231321691639751442101L, -8.813736713132375348727889167749389235161e-1L),
1987 TEST_c_c (cacos, -0x1.fp-129L, -0x1.000002p0L, 1.570796326794896619231321691639751442101L, 8.813736713132375348727889167749389235161e-1L),
1988 TEST_c_c (cacos, 0x1.000002p0L, 0x1.fp-129L, 5.830451806317544230969669308596361881467e-36L, -4.882812451493617206486388134172712975070e-4L),
1989 TEST_c_c (cacos, -0x1.000002p0L, 0x1.fp-129L, 3.141592653589793238462643383279502878367L, -4.882812451493617206486388134172712975070e-4L),
1990 TEST_c_c (cacos, 0x1.000002p0L, -0x1.fp-129L, 5.830451806317544230969669308596361881467e-36L, 4.882812451493617206486388134172712975070e-4L),
1991 TEST_c_c (cacos, -0x1.000002p0L, -0x1.fp-129L, 3.141592653589793238462643383279502878367L, 4.882812451493617206486388134172712975070e-4L),
1992 TEST_c_c (cacos, 0.0L, 0x1.000002p0L, 1.570796326794896619231321691639751442099L, -8.813736713132375348727889167749389235161e-1L),
1993 TEST_c_c (cacos, 0.0L, -0x1.000002p0L, 1.570796326794896619231321691639751442099L, 8.813736713132375348727889167749389235161e-1L),
1994 TEST_c_c (cacos, -0.0L, 0x1.000002p0L, 1.570796326794896619231321691639751442099L, -8.813736713132375348727889167749389235161e-1L),
1995 TEST_c_c (cacos, -0.0L, -0x1.000002p0L, 1.570796326794896619231321691639751442099L, 8.813736713132375348727889167749389235161e-1L),
1996 TEST_c_c (cacos, 0x1.000002p0L, 0.0L, 0.0L, -4.882812451493617206486388134172712975070e-4L),
1997 TEST_c_c (cacos, -0x1.000002p0L, 0.0L, 3.141592653589793238462643383279502884197L, -4.882812451493617206486388134172712975070e-4L),
1998 TEST_c_c (cacos, 0x1.000002p0L, -0.0L, 0.0L, 4.882812451493617206486388134172712975070e-4L),
1999 TEST_c_c (cacos, -0x1.000002p0L, -0.0L, 3.141592653589793238462643383279502884197L, 4.882812451493617206486388134172712975070e-4L),
3a7182a1 2000#ifndef TEST_FLOAT
08198877
JM
2001 TEST_c_c (cacos, 0x1p-52L, 0x1.0000000000001p0L, 1.570796326794896462222075823262262934288L, -8.813735870195431822418551933572982483664e-1L),
2002 TEST_c_c (cacos, 0x1p-52L, -0x1.0000000000001p0L, 1.570796326794896462222075823262262934288L, 8.813735870195431822418551933572982483664e-1L),
2003 TEST_c_c (cacos, -0x1p-52L, 0x1.0000000000001p0L, 1.570796326794896776240567560017239949909L, -8.813735870195431822418551933572982483664e-1L),
2004 TEST_c_c (cacos, -0x1p-52L, -0x1.0000000000001p0L, 1.570796326794896776240567560017239949909L, 8.813735870195431822418551933572982483664e-1L),
2005 TEST_c_c (cacos, 0x1.0000000000001p0L, 0x1p-52L, 9.590301705980041385828904092662391018164e-9L, -2.315303644582684770975188768022139415020e-8L),
2006 TEST_c_c (cacos, -0x1.0000000000001p0L, 0x1p-52L, 3.141592643999491532482601997450598791535L, -2.315303644582684770975188768022139415020e-8L),
2007 TEST_c_c (cacos, 0x1.0000000000001p0L, -0x1p-52L, 9.590301705980041385828904092662391018164e-9L, 2.315303644582684770975188768022139415020e-8L),
2008 TEST_c_c (cacos, -0x1.0000000000001p0L, -0x1p-52L, 3.141592643999491532482601997450598791535L, 2.315303644582684770975188768022139415020e-8L),
2009 TEST_c_c (cacos, 0x1.fp-1025L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
2010 TEST_c_c (cacos, 0x1.fp-1025L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
2011 TEST_c_c (cacos, -0x1.fp-1025L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
2012 TEST_c_c (cacos, -0x1.fp-1025L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
2013 TEST_c_c (cacos, 0x1.0000000000001p0L, 0x1.fp-1025L, 2.557178503953494342609835913586108008322e-301L, -2.107342425544701550354780375182800088393e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2014 TEST_c_c (cacos, -0x1.0000000000001p0L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -2.107342425544701550354780375182800088393e-8L),
2015 TEST_c_c (cacos, 0x1.0000000000001p0L, -0x1.fp-1025L, 2.557178503953494342609835913586108008322e-301L, 2.107342425544701550354780375182800088393e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2016 TEST_c_c (cacos, -0x1.0000000000001p0L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 2.107342425544701550354780375182800088393e-8L),
2017 TEST_c_c (cacos, 0.0L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
2018 TEST_c_c (cacos, 0.0L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
2019 TEST_c_c (cacos, -0.0L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195431822418551933572895326024e-1L),
2020 TEST_c_c (cacos, -0.0L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195431822418551933572895326024e-1L),
2021 TEST_c_c (cacos, 0x1.0000000000001p0L, 0.0L, 0.0L, -2.107342425544701550354780375182800088393e-8L),
2022 TEST_c_c (cacos, -0x1.0000000000001p0L, 0.0L, 3.141592653589793238462643383279502884197L, -2.107342425544701550354780375182800088393e-8L),
2023 TEST_c_c (cacos, 0x1.0000000000001p0L, -0.0L, 0.0L, 2.107342425544701550354780375182800088393e-8L),
2024 TEST_c_c (cacos, -0x1.0000000000001p0L, -0.0L, 3.141592653589793238462643383279502884197L, 2.107342425544701550354780375182800088393e-8L),
3a7182a1
JM
2025#endif
2026#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM
2027 TEST_c_c (cacos, 0x1p-63L, 0x1.0000000000000002p0L, 1.570796326794896619154657020805582738031L, -8.813735870195430253092739958139610131001e-1L),
2028 TEST_c_c (cacos, 0x1p-63L, -0x1.0000000000000002p0L, 1.570796326794896619154657020805582738031L, 8.813735870195430253092739958139610131001e-1L),
2029 TEST_c_c (cacos, -0x1p-63L, 0x1.0000000000000002p0L, 1.570796326794896619307986362473920146166L, -8.813735870195430253092739958139610131001e-1L),
2030 TEST_c_c (cacos, -0x1p-63L, -0x1.0000000000000002p0L, 1.570796326794896619307986362473920146166L, 8.813735870195430253092739958139610131001e-1L),
2031 TEST_c_c (cacos, 0x1.0000000000000002p0L, 0x1p-63L, 2.119177303101063432592523199680782317447e-10L, -5.116146586219826555037807251857670783420e-10L),
2032 TEST_c_c (cacos, -0x1.0000000000000002p0L, 0x1p-63L, 3.141592653377875508152537040020250564229L, -5.116146586219826555037807251857670783420e-10L),
2033 TEST_c_c (cacos, 0x1.0000000000000002p0L, -0x1p-63L, 2.119177303101063432592523199680782317447e-10L, 5.116146586219826555037807251857670783420e-10L),
2034 TEST_c_c (cacos, -0x1.0000000000000002p0L, -0x1p-63L, 3.141592653377875508152537040020250564229L, 5.116146586219826555037807251857670783420e-10L),
3a7182a1 2035# if LDBL_MIN_EXP <= -16381
08198877
JM
2036 TEST_c_c (cacos, 0x1.fp-16385L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
2037 TEST_c_c (cacos, 0x1.fp-16385L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
2038 TEST_c_c (cacos, -0x1.fp-16385L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
2039 TEST_c_c (cacos, -0x1.fp-16385L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
2040 TEST_c_c (cacos, 0x1.0000000000000002p0L, 0x1.fp-16385L, 1.748608650034385653922359120438227480943e-4923L, -4.656612873077392578082927418388212703712e-10L),
2041 TEST_c_c (cacos, -0x1.0000000000000002p0L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -4.656612873077392578082927418388212703712e-10L),
2042 TEST_c_c (cacos, 0x1.0000000000000002p0L, -0x1.fp-16385L, 1.748608650034385653922359120438227480943e-4923L, 4.656612873077392578082927418388212703712e-10L),
2043 TEST_c_c (cacos, -0x1.0000000000000002p0L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 4.656612873077392578082927418388212703712e-10L),
3a7182a1 2044# endif
08198877
JM
2045 TEST_c_c (cacos, 0.0L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
2046 TEST_c_c (cacos, 0.0L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
2047 TEST_c_c (cacos, -0.0L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430253092739958139610130980e-1L),
2048 TEST_c_c (cacos, -0.0L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430253092739958139610130980e-1L),
2049 TEST_c_c (cacos, 0x1.0000000000000002p0L, 0.0L, 0.0L, -4.656612873077392578082927418388212703712e-10L),
2050 TEST_c_c (cacos, -0x1.0000000000000002p0L, 0.0L, 3.141592653589793238462643383279502884197L, -4.656612873077392578082927418388212703712e-10L),
2051 TEST_c_c (cacos, 0x1.0000000000000002p0L, -0.0L, 0.0L, 4.656612873077392578082927418388212703712e-10L),
2052 TEST_c_c (cacos, -0x1.0000000000000002p0L, -0.0L, 3.141592653589793238462643383279502884197L, 4.656612873077392578082927418388212703712e-10L),
3a7182a1
JM
2053#endif
2054#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM
2055 TEST_c_c (cacos, 0x1p-106L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639742726335L, -8.813735870195430252326093249798097405561e-1L),
2056 TEST_c_c (cacos, 0x1p-106L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639742726335L, 8.813735870195430252326093249798097405561e-1L),
2057 TEST_c_c (cacos, -0x1p-106L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639760157863L, -8.813735870195430252326093249798097405561e-1L),
2058 TEST_c_c (cacos, -0x1p-106L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639760157863L, 8.813735870195430252326093249798097405561e-1L),
2059 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, 0x1p-106L, 5.394221422390606848017034778914096659726e-17L, -2.285028863093221674154232933662774454211e-16L),
2060 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, 0x1p-106L, 3.141592653589793184520429159373434404027L, -2.285028863093221674154232933662774454211e-16L),
2061 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, -0x1p-106L, 5.394221422390606848017034778914096659726e-17L, 2.285028863093221674154232933662774454211e-16L),
2062 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, -0x1p-106L, 3.141592653589793184520429159373434404027L, 2.285028863093221674154232933662774454211e-16L),
2063 TEST_c_c (cacos, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2064 TEST_c_c (cacos, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2065 TEST_c_c (cacos, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2066 TEST_c_c (cacos, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2067 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 2.426922623448365473354662093431821897807e-293L, -2.220446049250313080847263336181636063482e-16L),
2068 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 3.141592653589793238462643383279502884197L, -2.220446049250313080847263336181636063482e-16L),
2069 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 2.426922623448365473354662093431821897807e-293L, 2.220446049250313080847263336181636063482e-16L),
2070 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 3.141592653589793238462643383279502884197L, 2.220446049250313080847263336181636063482e-16L),
2071 TEST_c_c (cacos, 0.0L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2072 TEST_c_c (cacos, 0.0L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2073 TEST_c_c (cacos, -0.0L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249798097405561e-1L),
2074 TEST_c_c (cacos, -0.0L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249798097405561e-1L),
2075 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, 0.0L, 0.0L, -2.220446049250313080847263336181636063482e-16L),
2076 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, 0.0L, 3.141592653589793238462643383279502884197L, -2.220446049250313080847263336181636063482e-16L),
2077 TEST_c_c (cacos, 0x1.000000000000000000000000008p0L, -0.0L, 0.0L, 2.220446049250313080847263336181636063482e-16L),
2078 TEST_c_c (cacos, -0x1.000000000000000000000000008p0L, -0.0L, 3.141592653589793238462643383279502884197L, 2.220446049250313080847263336181636063482e-16L),
3a7182a1
JM
2079#endif
2080#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM
2081 TEST_c_c (cacos, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751374007L, -8.813735870195430252326093249797924452120e-1L),
2082 TEST_c_c (cacos, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751374007L, 8.813735870195430252326093249797924452120e-1L),
2083 TEST_c_c (cacos, -0x1p-113L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751510190L, -8.813735870195430252326093249797924452120e-1L),
2084 TEST_c_c (cacos, -0x1p-113L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751510190L, 8.813735870195430252326093249797924452120e-1L),
2085 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 4.767863183742677481693563511435642755521e-18L, -2.019699255375255198156433710951064632386e-17L),
2086 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, 0x1p-113L, 3.141592653589793233694780199536825402504L, -2.019699255375255198156433710951064632386e-17L),
2087 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 4.767863183742677481693563511435642755521e-18L, 2.019699255375255198156433710951064632386e-17L),
2088 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, -0x1p-113L, 3.141592653589793233694780199536825402504L, 2.019699255375255198156433710951064632386e-17L),
2089 TEST_c_c (cacos, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2090 TEST_c_c (cacos, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2091 TEST_c_c (cacos, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2092 TEST_c_c (cacos, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2093 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 4.148847925325683229178506116378864361396e-4916L, -1.962615573354718824241727964954454332780e-17L),
2094 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 3.141592653589793238462643383279502884197L, -1.962615573354718824241727964954454332780e-17L),
2095 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 4.148847925325683229178506116378864361396e-4916L, 1.962615573354718824241727964954454332780e-17L),
2096 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 3.141592653589793238462643383279502884197L, 1.962615573354718824241727964954454332780e-17L),
2097 TEST_c_c (cacos, 0.0L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2098 TEST_c_c (cacos, 0.0L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2099 TEST_c_c (cacos, -0.0L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797924452120e-1L),
2100 TEST_c_c (cacos, -0.0L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797924452120e-1L),
2101 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, 0.0L, 0.0L, -1.962615573354718824241727964954454332780e-17L),
2102 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, 0.0L, 3.141592653589793238462643383279502884197L, -1.962615573354718824241727964954454332780e-17L),
2103 TEST_c_c (cacos, 0x1.0000000000000000000000000001p0L, -0.0L, 0.0L, 1.962615573354718824241727964954454332780e-17L),
2104 TEST_c_c (cacos, -0x1.0000000000000000000000000001p0L, -0.0L, 3.141592653589793238462643383279502884197L, 1.962615573354718824241727964954454332780e-17L),
2105#endif
2106
2107 TEST_c_c (cacos, 0x1p-23L, 0x0.ffffffp0L, 1.570796242501197085295336701632142060969L, -8.813735448726963984495965873956465777250e-1L),
2108 TEST_c_c (cacos, 0x1p-23L, -0x0.ffffffp0L, 1.570796242501197085295336701632142060969L, 8.813735448726963984495965873956465777250e-1L),
2109 TEST_c_c (cacos, -0x1p-23L, 0x0.ffffffp0L, 1.570796411088596153167306681647360823228L, -8.813735448726963984495965873956465777250e-1L),
2110 TEST_c_c (cacos, -0x1p-23L, -0x0.ffffffp0L, 1.570796411088596153167306681647360823228L, 8.813735448726963984495965873956465777250e-1L),
2111 TEST_c_c (cacos, 0x0.ffffffp0L, 0x1p-23L, 4.391863861910487109445187743978204002614e-4L, -2.714321200917194650737217746780928423385e-4L),
2112 TEST_c_c (cacos, -0x0.ffffffp0L, 0x1p-23L, 3.141153467203602189751698864505105063797L, -2.714321200917194650737217746780928423385e-4L),
2113 TEST_c_c (cacos, 0x0.ffffffp0L, -0x1p-23L, 4.391863861910487109445187743978204002614e-4L, 2.714321200917194650737217746780928423385e-4L),
2114 TEST_c_c (cacos, -0x0.ffffffp0L, -0x1p-23L, 3.141153467203602189751698864505105063797L, 2.714321200917194650737217746780928423385e-4L),
2115 TEST_c_c (cacos, 0x1.fp-129L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442097L, -8.813735448726938863015878255140556727969e-1L),
2116 TEST_c_c (cacos, 0x1.fp-129L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442097L, 8.813735448726938863015878255140556727969e-1L),
2117 TEST_c_c (cacos, -0x1.fp-129L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442101L, -8.813735448726938863015878255140556727969e-1L),
2118 TEST_c_c (cacos, -0x1.fp-129L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442101L, 8.813735448726938863015878255140556727969e-1L),
2119 TEST_c_c (cacos, 0x0.ffffffp0L, 0x1.fp-129L, 3.452669847162035876032494826387364972849e-4L, -8.245504387859737323891843603996428534945e-36L),
2120 TEST_c_c (cacos, -0x0.ffffffp0L, 0x1.fp-129L, 3.141247386605077034875040133796864147700L, -8.245504387859737323891843603996428534945e-36L),
2121 TEST_c_c (cacos, 0x0.ffffffp0L, -0x1.fp-129L, 3.452669847162035876032494826387364972849e-4L, 8.245504387859737323891843603996428534945e-36L),
2122 TEST_c_c (cacos, -0x0.ffffffp0L, -0x1.fp-129L, 3.141247386605077034875040133796864147700L, 8.245504387859737323891843603996428534945e-36L),
2123 TEST_c_c (cacos, 0.0L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735448726938863015878255140556727969e-1L),
2124 TEST_c_c (cacos, 0.0L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735448726938863015878255140556727969e-1L),
2125 TEST_c_c (cacos, -0.0L, 0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735448726938863015878255140556727969e-1L),
2126 TEST_c_c (cacos, -0.0L, -0x0.ffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735448726938863015878255140556727969e-1L),
2127 TEST_c_c (cacos, 0x0.ffffffp0L, 0.0L, 3.452669847162035876032494826387364972849e-4L, -0.0L),
2128 TEST_c_c (cacos, -0x0.ffffffp0L, 0.0L, 3.141247386605077034875040133796864147700L, -0.0L),
2129 TEST_c_c (cacos, 0x0.ffffffp0L, -0.0L, 3.452669847162035876032494826387364972849e-4L, 0.0L),
2130 TEST_c_c (cacos, -0x0.ffffffp0L, -0.0L, 3.141247386605077034875040133796864147700L, 0.0L),
2131 TEST_c_c (cacos, 0x1p-23L, 0.5L, 1.570796220170866625230343643673321150378L, -4.812118250596059896127318386463676808798e-1L),
2132 TEST_c_c (cacos, 0x1p-23L, -0.5L, 1.570796220170866625230343643673321150378L, 4.812118250596059896127318386463676808798e-1L),
2133 TEST_c_c (cacos, -0x1p-23L, 0.5L, 1.570796433418926613232299739606181733819L, -4.812118250596059896127318386463676808798e-1L),
2134 TEST_c_c (cacos, -0x1p-23L, -0.5L, 1.570796433418926613232299739606181733819L, 4.812118250596059896127318386463676808798e-1L),
2135 TEST_c_c (cacos, 0.5L, 0x1p-23L, 1.047197551196603215914744618665204532273L, -1.376510308240943236356088341381173571841e-7L),
2136 TEST_c_c (cacos, -0.5L, 0x1p-23L, 2.094395102393190022547898764614298351924L, -1.376510308240943236356088341381173571841e-7L),
2137 TEST_c_c (cacos, 0.5L, -0x1p-23L, 1.047197551196603215914744618665204532273L, 1.376510308240943236356088341381173571841e-7L),
2138 TEST_c_c (cacos, -0.5L, -0x1p-23L, 2.094395102393190022547898764614298351924L, 1.376510308240943236356088341381173571841e-7L),
2139 TEST_c_c (cacos, 0x1.fp-129L, 0.5L, 1.570796326794896619231321691639751442096L, -4.812118250596034474977589134243684231352e-1L),
2140 TEST_c_c (cacos, 0x1.fp-129L, -0.5L, 1.570796326794896619231321691639751442096L, 4.812118250596034474977589134243684231352e-1L),
2141 TEST_c_c (cacos, -0x1.fp-129L, 0.5L, 1.570796326794896619231321691639751442101L, -4.812118250596034474977589134243684231352e-1L),
2142 TEST_c_c (cacos, -0x1.fp-129L, -0.5L, 1.570796326794896619231321691639751442101L, 4.812118250596034474977589134243684231352e-1L),
2143 TEST_c_c (cacos, 0.5L, 0x1.fp-129L, 1.047197551196597746154214461093167628066L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2144 TEST_c_c (cacos, -0.5L, 0x1.fp-129L, 2.094395102393195492308428922186335256131L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2145 TEST_c_c (cacos, 0.5L, -0x1.fp-129L, 1.047197551196597746154214461093167628066L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2146 TEST_c_c (cacos, -0.5L, -0x1.fp-129L, 2.094395102393195492308428922186335256131L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2147 TEST_c_c (cacos, 0x1p-23L, 0x1p-23L, 1.570796207585607068450636380271254316214L, -1.192092895507818146886315028596704749235e-7L),
2148 TEST_c_c (cacos, 0x1p-23L, -0x1p-23L, 1.570796207585607068450636380271254316214L, 1.192092895507818146886315028596704749235e-7L),
2149 TEST_c_c (cacos, -0x1p-23L, 0x1p-23L, 1.570796446004186170012007003008248567984L, -1.192092895507818146886315028596704749235e-7L),
2150 TEST_c_c (cacos, -0x1p-23L, -0x1p-23L, 1.570796446004186170012007003008248567984L, 1.192092895507818146886315028596704749235e-7L),
2151 TEST_c_c (cacos, 0x1.fp-129L, 0x1p-23L, 1.570796326794896619231321691639751442096L, -1.192092895507809676556842485683592032154e-7L),
2152 TEST_c_c (cacos, 0x1.fp-129L, -0x1p-23L, 1.570796326794896619231321691639751442096L, 1.192092895507809676556842485683592032154e-7L),
2153 TEST_c_c (cacos, -0x1.fp-129L, 0x1p-23L, 1.570796326794896619231321691639751442101L, -1.192092895507809676556842485683592032154e-7L),
2154 TEST_c_c (cacos, -0x1.fp-129L, -0x1p-23L, 1.570796326794896619231321691639751442101L, 1.192092895507809676556842485683592032154e-7L),
2155 TEST_c_c (cacos, 0x1p-23L, 0x1.fp-129L, 1.570796207585607068449789347324000006847L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2156 TEST_c_c (cacos, -0x1p-23L, 0x1.fp-129L, 1.570796446004186170012854035955502877351L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2157 TEST_c_c (cacos, 0x1p-23L, -0x1.fp-129L, 1.570796207585607068449789347324000006847L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2158 TEST_c_c (cacos, -0x1p-23L, -0x1.fp-129L, 1.570796446004186170012854035955502877351L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2159 TEST_c_c (cacos, 0.0L, 0x1p-23L, 1.570796326794896619231321691639751442099L, -1.192092895507809676556842485683592032154e-7L),
2160 TEST_c_c (cacos, 0.0L, -0x1p-23L, 1.570796326794896619231321691639751442099L, 1.192092895507809676556842485683592032154e-7L),
2161 TEST_c_c (cacos, -0.0L, 0x1p-23L, 1.570796326794896619231321691639751442099L, -1.192092895507809676556842485683592032154e-7L),
2162 TEST_c_c (cacos, -0.0L, -0x1p-23L, 1.570796326794896619231321691639751442099L, 1.192092895507809676556842485683592032154e-7L),
2163 TEST_c_c (cacos, 0x1p-23L, 0.0L, 1.570796207585607068449789347324000006847L, -0.0L),
2164 TEST_c_c (cacos, -0x1p-23L, 0.0L, 1.570796446004186170012854035955502877351L, -0.0L),
2165 TEST_c_c (cacos, 0x1p-23L, -0.0L, 1.570796207585607068449789347324000006847L, 0.0L),
2166 TEST_c_c (cacos, -0x1p-23L, -0.0L, 1.570796446004186170012854035955502877351L, 0.0L),
2167 TEST_c_c (cacos, 0x1.fp-129L, 0x1.fp-129L, 1.570796326794896619231321691639751442096L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2168 TEST_c_c (cacos, 0x1.fp-129L, -0x1.fp-129L, 1.570796326794896619231321691639751442096L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2169 TEST_c_c (cacos, -0x1.fp-129L, 0x1.fp-129L, 1.570796326794896619231321691639751442101L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2170 TEST_c_c (cacos, -0x1.fp-129L, -0x1.fp-129L, 1.570796326794896619231321691639751442101L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
ccc8cadf 2171#ifndef TEST_FLOAT
08198877
JM
2172 TEST_c_c (cacos, 0x1p-52L, 0x0.fffffffffffff8p0L, 1.570796326794896462222075823262236786996L, -8.813735870195429467279863907910458761820e-1L),
2173 TEST_c_c (cacos, 0x1p-52L, -0x0.fffffffffffff8p0L, 1.570796326794896462222075823262236786996L, 8.813735870195429467279863907910458761820e-1L),
2174 TEST_c_c (cacos, -0x1p-52L, 0x0.fffffffffffff8p0L, 1.570796326794896776240567560017266097201L, -8.813735870195429467279863907910458761820e-1L),
2175 TEST_c_c (cacos, -0x1p-52L, -0x0.fffffffffffff8p0L, 1.570796326794896776240567560017266097201L, 8.813735870195429467279863907910458761820e-1L),
2176 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, 0x1p-52L, 1.895456983915074112227925127005564372844e-8L, -1.171456840272878582596796205397918831268e-8L),
2177 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, 0x1p-52L, 3.141592634635223399311902261000251614142L, -1.171456840272878582596796205397918831268e-8L),
2178 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, -0x1p-52L, 1.895456983915074112227925127005564372844e-8L, 1.171456840272878582596796205397918831268e-8L),
2179 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, -0x1p-52L, 3.141592634635223399311902261000251614142L, 1.171456840272878582596796205397918831268e-8L),
2180 TEST_c_c (cacos, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2181 TEST_c_c (cacos, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2182 TEST_c_c (cacos, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2183 TEST_c_c (cacos, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2184 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 1.490116119384765638786343542550461592240e-8L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2185 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, 3.141592638688632044614986995416067458693L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2186 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 1.490116119384765638786343542550461592240e-8L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2187 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, 3.141592638688632044614986995416067458693L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2188 TEST_c_c (cacos, 0.0L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2189 TEST_c_c (cacos, 0.0L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2190 TEST_c_c (cacos, -0.0L, 0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195429467279863907910371604180e-1L),
2191 TEST_c_c (cacos, -0.0L, -0x0.fffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195429467279863907910371604180e-1L),
2192 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, 0.0L, 1.490116119384765638786343542550461592240e-8L, -0.0L),
2193 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, 0.0L, 3.141592638688632044614986995416067458693L, -0.0L),
2194 TEST_c_c (cacos, 0x0.fffffffffffff8p0L, -0.0L, 1.490116119384765638786343542550461592240e-8L, 0.0L),
2195 TEST_c_c (cacos, -0x0.fffffffffffff8p0L, -0.0L, 3.141592638688632044614986995416067458693L, 0.0L),
2196#endif
2197 TEST_c_c (cacos, 0x1p-52L, 0.5L, 1.570796326794896420628589431857911675917L, -4.812118250596034474977589134243772428682e-1L),
2198 TEST_c_c (cacos, 0x1p-52L, -0.5L, 1.570796326794896420628589431857911675917L, 4.812118250596034474977589134243772428682e-1L),
2199 TEST_c_c (cacos, -0x1p-52L, 0.5L, 1.570796326794896817834053951421591208280L, -4.812118250596034474977589134243772428682e-1L),
2200 TEST_c_c (cacos, -0x1p-52L, -0.5L, 1.570796326794896817834053951421591208280L, 4.812118250596034474977589134243772428682e-1L),
2201 TEST_c_c (cacos, 0.5L, 0x1p-52L, 1.047197551196597746154214461093186605110L, -2.563950248511418570403591756798643804971e-16L),
2202 TEST_c_c (cacos, -0.5L, 0x1p-52L, 2.094395102393195492308428922186316279087L, -2.563950248511418570403591756798643804971e-16L),
2203 TEST_c_c (cacos, 0.5L, -0x1p-52L, 1.047197551196597746154214461093186605110L, 2.563950248511418570403591756798643804971e-16L),
2204 TEST_c_c (cacos, -0.5L, -0x1p-52L, 2.094395102393195492308428922186316279087L, 2.563950248511418570403591756798643804971e-16L),
ccc8cadf 2205#ifndef TEST_FLOAT
08198877
JM
2206 TEST_c_c (cacos, 0x1.fp-1025L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2207 TEST_c_c (cacos, 0x1.fp-1025L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2208 TEST_c_c (cacos, -0x1.fp-1025L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2209 TEST_c_c (cacos, -0x1.fp-1025L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2210 TEST_c_c (cacos, 0.5L, 0x1.fp-1025L, 1.047197551196597746154214461093167628066L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2211 TEST_c_c (cacos, -0.5L, 0x1.fp-1025L, 2.094395102393195492308428922186335256131L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2212 TEST_c_c (cacos, 0.5L, -0x1.fp-1025L, 1.047197551196597746154214461093167628066L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2213 TEST_c_c (cacos, -0.5L, -0x1.fp-1025L, 2.094395102393195492308428922186335256131L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2214#endif
2215 TEST_c_c (cacos, 0x1p-52L, 0x1p-52L, 1.570796326794896397186716766608443357372L, -2.220446049250313080847263336181677117148e-16L),
2216 TEST_c_c (cacos, 0x1p-52L, -0x1p-52L, 1.570796326794896397186716766608443357372L, 2.220446049250313080847263336181677117148e-16L),
2217 TEST_c_c (cacos, -0x1p-52L, 0x1p-52L, 1.570796326794896841275926616671059526825L, -2.220446049250313080847263336181677117148e-16L),
2218 TEST_c_c (cacos, -0x1p-52L, -0x1p-52L, 1.570796326794896841275926616671059526825L, 2.220446049250313080847263336181677117148e-16L),
ccc8cadf 2219#ifndef TEST_FLOAT
08198877
JM
2220 TEST_c_c (cacos, 0x1.fp-1025L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2221 TEST_c_c (cacos, 0x1.fp-1025L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2222 TEST_c_c (cacos, -0x1.fp-1025L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2223 TEST_c_c (cacos, -0x1.fp-1025L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2224 TEST_c_c (cacos, 0x1p-52L, 0x1.fp-1025L, 1.570796326794896397186716766608443357372L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2225 TEST_c_c (cacos, -0x1p-52L, 0x1.fp-1025L, 1.570796326794896841275926616671059526825L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2226 TEST_c_c (cacos, 0x1p-52L, -0x1.fp-1025L, 1.570796326794896397186716766608443357372L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2227 TEST_c_c (cacos, -0x1p-52L, -0x1.fp-1025L, 1.570796326794896841275926616671059526825L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2228#endif
2229 TEST_c_c (cacos, 0.0L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2230 TEST_c_c (cacos, 0.0L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2231 TEST_c_c (cacos, -0.0L, 0x1p-52L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181622378926e-16L),
2232 TEST_c_c (cacos, -0.0L, -0x1p-52L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181622378926e-16L),
2233 TEST_c_c (cacos, 0x1p-52L, 0.0L, 1.570796326794896397186716766608443357372L, -0.0L),
2234 TEST_c_c (cacos, -0x1p-52L, 0.0L, 1.570796326794896841275926616671059526825L, -0.0L),
2235 TEST_c_c (cacos, 0x1p-52L, -0.0L, 1.570796326794896397186716766608443357372L, 0.0L),
2236 TEST_c_c (cacos, -0x1p-52L, -0.0L, 1.570796326794896841275926616671059526825L, 0.0L),
ccc8cadf 2237#ifndef TEST_FLOAT
08198877
JM
2238 TEST_c_c (cacos, 0x1.fp-1025L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2239 TEST_c_c (cacos, 0x1.fp-1025L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2240 TEST_c_c (cacos, -0x1.fp-1025L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2241 TEST_c_c (cacos, -0x1.fp-1025L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
ccc8cadf
JM
2242#endif
2243#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM
2244 TEST_c_c (cacos, 0x1p-63L, 0x0.ffffffffffffffffp0L, 1.570796326794896619154657020805582738025L, -8.813735870195430251942769895627079569937e-1L),
2245 TEST_c_c (cacos, 0x1p-63L, -0x0.ffffffffffffffffp0L, 1.570796326794896619154657020805582738025L, 8.813735870195430251942769895627079569937e-1L),
2246 TEST_c_c (cacos, -0x1p-63L, 0x0.ffffffffffffffffp0L, 1.570796326794896619307986362473920146173L, -8.813735870195430251942769895627079569937e-1L),
2247 TEST_c_c (cacos, -0x1p-63L, -0x0.ffffffffffffffffp0L, 1.570796326794896619307986362473920146173L, 8.813735870195430251942769895627079569937e-1L),
2248 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, 0x1p-63L, 4.188407771167967636741951941902992986043e-10L, -2.588578361325995866221775673638805081337e-10L),
2249 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, 0x1p-63L, 3.141592653170952461345846619605307690007L, -2.588578361325995866221775673638805081337e-10L),
2250 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, -0x1p-63L, 4.188407771167967636741951941902992986043e-10L, 2.588578361325995866221775673638805081337e-10L),
2251 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, -0x1p-63L, 3.141592653170952461345846619605307690007L, 2.588578361325995866221775673638805081337e-10L),
ccc8cadf 2252# if LDBL_MIN_EXP <= -16381
08198877
JM
2253 TEST_c_c (cacos, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2254 TEST_c_c (cacos, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2255 TEST_c_c (cacos, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2256 TEST_c_c (cacos, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2257 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 3.292722539913596233371825532007990724506e-10L, -2.472906068161537187835415298076415423459e-4923L),
2258 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 3.141592653260520984471283759942320330996L, -2.472906068161537187835415298076415423459e-4923L),
2259 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 3.292722539913596233371825532007990724506e-10L, 2.472906068161537187835415298076415423459e-4923L),
2260 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 3.141592653260520984471283759942320330996L, 2.472906068161537187835415298076415423459e-4923L),
ccc8cadf 2261# endif
08198877
JM
2262 TEST_c_c (cacos, 0.0L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2263 TEST_c_c (cacos, 0.0L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2264 TEST_c_c (cacos, -0.0L, 0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430251942769895627079569917e-1L),
2265 TEST_c_c (cacos, -0.0L, -0x0.ffffffffffffffffp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430251942769895627079569917e-1L),
2266 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, 0.0L, 3.292722539913596233371825532007990724506e-10L, -0.0L),
2267 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, 0.0L, 3.141592653260520984471283759942320330996L, -0.0L),
2268 TEST_c_c (cacos, 0x0.ffffffffffffffffp0L, -0.0L, 3.292722539913596233371825532007990724506e-10L, 0.0L),
2269 TEST_c_c (cacos, -0x0.ffffffffffffffffp0L, -0.0L, 3.141592653260520984471283759942320330996L, 0.0L),
2270#endif
2271 TEST_c_c (cacos, 0x1p-63L, 0.5L, 1.570796326794896619134347701278529840650L, -4.812118250596034474977589134243684231373e-1L),
2272 TEST_c_c (cacos, 0x1p-63L, -0.5L, 1.570796326794896619134347701278529840650L, 4.812118250596034474977589134243684231373e-1L),
2273 TEST_c_c (cacos, -0x1p-63L, 0.5L, 1.570796326794896619328295682000973043547L, -4.812118250596034474977589134243684231373e-1L),
2274 TEST_c_c (cacos, -0x1p-63L, -0.5L, 1.570796326794896619328295682000973043547L, 4.812118250596034474977589134243684231373e-1L),
2275 TEST_c_c (cacos, 0.5L, 0x1p-63L, 1.047197551196597746154214461093167628070L, -1.251928832280966098829878787499365228659e-19L),
2276 TEST_c_c (cacos, -0.5L, 0x1p-63L, 2.094395102393195492308428922186335256127L, -1.251928832280966098829878787499365228659e-19L),
2277 TEST_c_c (cacos, 0.5L, -0x1p-63L, 1.047197551196597746154214461093167628070L, 1.251928832280966098829878787499365228659e-19L),
2278 TEST_c_c (cacos, -0.5L, -0x1p-63L, 2.094395102393195492308428922186335256127L, 1.251928832280966098829878787499365228659e-19L),
ccc8cadf 2279#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
2280 TEST_c_c (cacos, 0x1.fp-16385L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2281 TEST_c_c (cacos, 0x1.fp-16385L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2282 TEST_c_c (cacos, -0x1.fp-16385L, 0.5L, 1.570796326794896619231321691639751442099L, -4.812118250596034474977589134243684231352e-1L),
2283 TEST_c_c (cacos, -0x1.fp-16385L, -0.5L, 1.570796326794896619231321691639751442099L, 4.812118250596034474977589134243684231352e-1L),
2284 TEST_c_c (cacos, 0.5L, 0x1.fp-16385L, 1.047197551196597746154214461093167628066L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2285 TEST_c_c (cacos, -0.5L, 0x1.fp-16385L, 2.094395102393195492308428922186335256131L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2286 TEST_c_c (cacos, 0.5L, -0x1.fp-16385L, 1.047197551196597746154214461093167628066L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2287 TEST_c_c (cacos, -0.5L, -0x1.fp-16385L, 2.094395102393195492308428922186335256131L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
2288#endif
2289 TEST_c_c (cacos, 0x1p-63L, 0x1p-63L, 1.570796326794896619122901474391200998698L, -1.084202172485504434007452800869941711430e-19L),
2290 TEST_c_c (cacos, 0x1p-63L, -0x1p-63L, 1.570796326794896619122901474391200998698L, 1.084202172485504434007452800869941711430e-19L),
2291 TEST_c_c (cacos, -0x1p-63L, 0x1p-63L, 1.570796326794896619339741908888301885499L, -1.084202172485504434007452800869941711430e-19L),
2292 TEST_c_c (cacos, -0x1p-63L, -0x1p-63L, 1.570796326794896619339741908888301885499L, 1.084202172485504434007452800869941711430e-19L),
ccc8cadf 2293#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
2294 TEST_c_c (cacos, 0x1.fp-16385L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2295 TEST_c_c (cacos, 0x1.fp-16385L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2296 TEST_c_c (cacos, -0x1.fp-16385L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2297 TEST_c_c (cacos, -0x1.fp-16385L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2298 TEST_c_c (cacos, 0x1p-63L, 0x1.fp-16385L, 1.570796326794896619122901474391200998698L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2299 TEST_c_c (cacos, -0x1p-63L, 0x1.fp-16385L, 1.570796326794896619339741908888301885499L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2300 TEST_c_c (cacos, 0x1p-63L, -0x1.fp-16385L, 1.570796326794896619122901474391200998698L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2301 TEST_c_c (cacos, -0x1p-63L, -0x1.fp-16385L, 1.570796326794896619339741908888301885499L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
2302#endif
2303 TEST_c_c (cacos, 0.0L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2304 TEST_c_c (cacos, 0.0L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2305 TEST_c_c (cacos, -0.0L, 0x1p-63L, 1.570796326794896619231321691639751442099L, -1.084202172485504434007452800869941711424e-19L),
2306 TEST_c_c (cacos, -0.0L, -0x1p-63L, 1.570796326794896619231321691639751442099L, 1.084202172485504434007452800869941711424e-19L),
2307 TEST_c_c (cacos, 0x1p-63L, 0.0L, 1.570796326794896619122901474391200998698L, -0.0L),
2308 TEST_c_c (cacos, -0x1p-63L, 0.0L, 1.570796326794896619339741908888301885499L, -0.0L),
2309 TEST_c_c (cacos, 0x1p-63L, -0.0L, 1.570796326794896619122901474391200998698L, 0.0L),
2310 TEST_c_c (cacos, -0x1p-63L, -0.0L, 1.570796326794896619339741908888301885499L, 0.0L),
ccc8cadf 2311#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
2312 TEST_c_c (cacos, 0x1.fp-16385L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2313 TEST_c_c (cacos, 0x1.fp-16385L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2314 TEST_c_c (cacos, -0x1.fp-16385L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2315 TEST_c_c (cacos, -0x1.fp-16385L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf
JM
2316#endif
2317#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM
2318 TEST_c_c (cacos, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639734010571L, -8.813735870195430252326093249797835932642e-1L),
2319 TEST_c_c (cacos, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639734010571L, 8.813735870195430252326093249797835932642e-1L),
2320 TEST_c_c (cacos, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639768873627L, -8.813735870195430252326093249797835932642e-1L),
2321 TEST_c_c (cacos, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639768873627L, 8.813735870195430252326093249797835932642e-1L),
2322 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.997188458999618357060632049675702684031e-16L, -1.234330349600789959989661887846005659983e-16L),
2323 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 3.141592653589793038743797483317667178134L, -1.234330349600789959989661887846005659983e-16L),
2324 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.997188458999618357060632049675702684031e-16L, 1.234330349600789959989661887846005659983e-16L),
2325 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 3.141592653589793038743797483317667178134L, 1.234330349600789959989661887846005659983e-16L),
2326 TEST_c_c (cacos, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2327 TEST_c_c (cacos, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2328 TEST_c_c (cacos, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2329 TEST_c_c (cacos, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2330 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 1.570092458683775059393382371963565104164e-16L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2331 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 3.141592653589793081453397514901996944859L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2332 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 1.570092458683775059393382371963565104164e-16L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2333 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 3.141592653589793081453397514901996944859L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2334 TEST_c_c (cacos, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2335 TEST_c_c (cacos, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2336 TEST_c_c (cacos, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797835932642e-1L),
2337 TEST_c_c (cacos, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797835932642e-1L),
2338 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 1.570092458683775059393382371963565104164e-16L, -0.0L),
2339 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 3.141592653589793081453397514901996944859L, -0.0L),
2340 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 1.570092458683775059393382371963565104164e-16L, 0.0L),
2341 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 3.141592653589793081453397514901996944859L, 0.0L),
2342#endif
2343 TEST_c_c (cacos, 0x1p-105L, 0.5L, 1.570796326794896619231321691639729392766L, -4.812118250596034474977589134243684231352e-1L),
2344 TEST_c_c (cacos, 0x1p-105L, -0.5L, 1.570796326794896619231321691639729392766L, 4.812118250596034474977589134243684231352e-1L),
2345 TEST_c_c (cacos, -0x1p-105L, 0.5L, 1.570796326794896619231321691639773491431L, -4.812118250596034474977589134243684231352e-1L),
2346 TEST_c_c (cacos, -0x1p-105L, -0.5L, 1.570796326794896619231321691639773491431L, 4.812118250596034474977589134243684231352e-1L),
2347 TEST_c_c (cacos, 0.5L, 0x1p-105L, 1.047197551196597746154214461093167628066L, -2.846556599890768890940941645338546615370e-32L),
2348 TEST_c_c (cacos, -0.5L, 0x1p-105L, 2.094395102393195492308428922186335256131L, -2.846556599890768890940941645338546615370e-32L),
2349 TEST_c_c (cacos, 0.5L, -0x1p-105L, 1.047197551196597746154214461093167628066L, 2.846556599890768890940941645338546615370e-32L),
2350 TEST_c_c (cacos, -0.5L, -0x1p-105L, 2.094395102393195492308428922186335256131L, 2.846556599890768890940941645338546615370e-32L),
2351 TEST_c_c (cacos, 0x1p-105L, 0x1p-105L, 1.570796326794896619231321691639726790195L, -2.465190328815661891911651766508706967729e-32L),
2352 TEST_c_c (cacos, 0x1p-105L, -0x1p-105L, 1.570796326794896619231321691639726790195L, 2.465190328815661891911651766508706967729e-32L),
2353 TEST_c_c (cacos, -0x1p-105L, 0x1p-105L, 1.570796326794896619231321691639776094002L, -2.465190328815661891911651766508706967729e-32L),
2354 TEST_c_c (cacos, -0x1p-105L, -0x1p-105L, 1.570796326794896619231321691639776094002L, 2.465190328815661891911651766508706967729e-32L),
ccc8cadf 2355#ifndef TEST_FLOAT
08198877
JM
2356 TEST_c_c (cacos, 0x1.fp-1025L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2357 TEST_c_c (cacos, 0x1.fp-1025L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2358 TEST_c_c (cacos, -0x1.fp-1025L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2359 TEST_c_c (cacos, -0x1.fp-1025L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2360 TEST_c_c (cacos, 0x1p-105L, 0x1.fp-1025L, 1.570796326794896619231321691639726790195L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2361 TEST_c_c (cacos, -0x1p-105L, 0x1.fp-1025L, 1.570796326794896619231321691639776094002L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2362 TEST_c_c (cacos, 0x1p-105L, -0x1.fp-1025L, 1.570796326794896619231321691639726790195L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2363 TEST_c_c (cacos, -0x1p-105L, -0x1.fp-1025L, 1.570796326794896619231321691639776094002L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2364#endif
2365 TEST_c_c (cacos, 0.0L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2366 TEST_c_c (cacos, 0.0L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2367 TEST_c_c (cacos, -0.0L, 0x1p-105L, 1.570796326794896619231321691639751442099L, -2.465190328815661891911651766508706967729e-32L),
2368 TEST_c_c (cacos, -0.0L, -0x1p-105L, 1.570796326794896619231321691639751442099L, 2.465190328815661891911651766508706967729e-32L),
2369 TEST_c_c (cacos, 0x1p-105L, 0.0L, 1.570796326794896619231321691639726790195L, -0.0L),
2370 TEST_c_c (cacos, -0x1p-105L, 0.0L, 1.570796326794896619231321691639776094002L, -0.0L),
2371 TEST_c_c (cacos, 0x1p-105L, -0.0L, 1.570796326794896619231321691639726790195L, 0.0L),
2372 TEST_c_c (cacos, -0x1p-105L, -0.0L, 1.570796326794896619231321691639776094002L, 0.0L),
ccc8cadf 2373#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM
2374 TEST_c_c (cacos, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751305915L, -8.813735870195430252326093249797922409363e-1L),
2375 TEST_c_c (cacos, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751305915L, 8.813735870195430252326093249797922409363e-1L),
2376 TEST_c_c (cacos, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751578282L, -8.813735870195430252326093249797922409363e-1L),
2377 TEST_c_c (cacos, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751578282L, 8.813735870195430252326093249797922409363e-1L),
2378 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.765281878332676474347460257221369818872e-17L, -1.091004200533850618345330909857103457781e-17L),
2379 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 3.141592653589793220809824599952738140723L, -1.091004200533850618345330909857103457781e-17L),
2380 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.765281878332676474347460257221369818872e-17L, 1.091004200533850618345330909857103457781e-17L),
2381 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 3.141592653589793220809824599952738140723L, 1.091004200533850618345330909857103457781e-17L),
2382 TEST_c_c (cacos, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2383 TEST_c_c (cacos, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2384 TEST_c_c (cacos, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2385 TEST_c_c (cacos, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2386 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 1.387778780781445675529539585113525401762e-17L, -5.867357004219059108790368268900490184505e-4916L),
2387 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 3.141592653589793224584855575465046128902L, -5.867357004219059108790368268900490184505e-4916L),
2388 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 1.387778780781445675529539585113525401762e-17L, 5.867357004219059108790368268900490184505e-4916L),
2389 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 3.141592653589793224584855575465046128902L, 5.867357004219059108790368268900490184505e-4916L),
2390 TEST_c_c (cacos, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2391 TEST_c_c (cacos, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2392 TEST_c_c (cacos, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, -8.813735870195430252326093249797922409363e-1L),
2393 TEST_c_c (cacos, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.570796326794896619231321691639751442099L, 8.813735870195430252326093249797922409363e-1L),
2394 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 1.387778780781445675529539585113525401762e-17L, -0.0L),
2395 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 3.141592653589793224584855575465046128902L, -0.0L),
2396 TEST_c_c (cacos, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 1.387778780781445675529539585113525401762e-17L, 0.0L),
2397 TEST_c_c (cacos, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 3.141592653589793224584855575465046128902L, 0.0L),
2398#endif
2399 TEST_c_c (cacos, 0x1p-112L, 0.5L, 1.570796326794896619231321691639751269838L, -4.812118250596034474977589134243684231352e-1L),
2400 TEST_c_c (cacos, 0x1p-112L, -0.5L, 1.570796326794896619231321691639751269838L, 4.812118250596034474977589134243684231352e-1L),
2401 TEST_c_c (cacos, -0x1p-112L, 0.5L, 1.570796326794896619231321691639751614359L, -4.812118250596034474977589134243684231352e-1L),
2402 TEST_c_c (cacos, -0x1p-112L, -0.5L, 1.570796326794896619231321691639751614359L, 4.812118250596034474977589134243684231352e-1L),
2403 TEST_c_c (cacos, 0.5L, 0x1p-112L, 1.047197551196597746154214461093167628066L, -2.223872343664663196047610660420739543258e-34L),
2404 TEST_c_c (cacos, -0.5L, 0x1p-112L, 2.094395102393195492308428922186335256131L, -2.223872343664663196047610660420739543258e-34L),
2405 TEST_c_c (cacos, 0.5L, -0x1p-112L, 1.047197551196597746154214461093167628066L, 2.223872343664663196047610660420739543258e-34L),
2406 TEST_c_c (cacos, -0.5L, -0x1p-112L, 2.094395102393195492308428922186335256131L, 2.223872343664663196047610660420739543258e-34L),
2407 TEST_c_c (cacos, 0x1p-112L, 0x1p-112L, 1.570796326794896619231321691639751249506L, -1.925929944387235853055977942584927318538e-34L),
2408 TEST_c_c (cacos, 0x1p-112L, -0x1p-112L, 1.570796326794896619231321691639751249506L, 1.925929944387235853055977942584927318538e-34L),
2409 TEST_c_c (cacos, -0x1p-112L, 0x1p-112L, 1.570796326794896619231321691639751634692L, -1.925929944387235853055977942584927318538e-34L),
2410 TEST_c_c (cacos, -0x1p-112L, -0x1p-112L, 1.570796326794896619231321691639751634692L, 1.925929944387235853055977942584927318538e-34L),
ccc8cadf 2411#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
2412 TEST_c_c (cacos, 0x1.fp-16385L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2413 TEST_c_c (cacos, 0x1.fp-16385L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2414 TEST_c_c (cacos, -0x1.fp-16385L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2415 TEST_c_c (cacos, -0x1.fp-16385L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2416 TEST_c_c (cacos, 0x1p-112L, 0x1.fp-16385L, 1.570796326794896619231321691639751249506L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2417 TEST_c_c (cacos, -0x1p-112L, 0x1.fp-16385L, 1.570796326794896619231321691639751634692L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2418 TEST_c_c (cacos, 0x1p-112L, -0x1.fp-16385L, 1.570796326794896619231321691639751249506L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2419 TEST_c_c (cacos, -0x1p-112L, -0x1.fp-16385L, 1.570796326794896619231321691639751634692L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
2420#endif
2421 TEST_c_c (cacos, 0.0L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2422 TEST_c_c (cacos, 0.0L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2423 TEST_c_c (cacos, -0.0L, 0x1p-112L, 1.570796326794896619231321691639751442099L, -1.925929944387235853055977942584927318538e-34L),
2424 TEST_c_c (cacos, -0.0L, -0x1p-112L, 1.570796326794896619231321691639751442099L, 1.925929944387235853055977942584927318538e-34L),
2425 TEST_c_c (cacos, 0x1p-112L, 0.0L, 1.570796326794896619231321691639751249506L, -0.0L),
2426 TEST_c_c (cacos, -0x1p-112L, 0.0L, 1.570796326794896619231321691639751634692L, -0.0L),
2427 TEST_c_c (cacos, 0x1p-112L, -0.0L, 1.570796326794896619231321691639751249506L, 0.0L),
2428 TEST_c_c (cacos, -0x1p-112L, -0.0L, 1.570796326794896619231321691639751634692L, 0.0L),
2429
2430 TEST_c_c (cacos, 0.75L, 1.25L, 1.11752014915610270578240049553777969L, -1.13239363160530819522266333696834467L),
2431 TEST_c_c (cacos, -2, -3, 2.1414491111159960199416055713254211L, 1.9833870299165354323470769028940395L),
2432 END_DATA (cacos)
2433 };
8847214f 2434
8847214f 2435static void
08198877 2436cacos_test (void)
8847214f 2437{
aaca11d8 2438 errno = 0;
08198877 2439 FUNC(cacos) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD
2440 if (errno == ENOSYS)
2441 /* Function not implemented. */
2442 return;
2443
08198877
JM
2444 START (cacos);
2445 RUN_TEST_LOOP_c_c (cacos, cacos_test_data, );
2446 END (cacos, complex);
2447}
8847214f 2448
08198877
JM
2449static const struct test_c_c_data cacosh_test_data[] =
2450 {
2451 START_DATA (cacosh),
2452 TEST_c_c (cacosh, 0, 0, 0.0, M_PI_2l),
2453 TEST_c_c (cacosh, minus_zero, 0, 0.0, M_PI_2l),
2454 TEST_c_c (cacosh, 0, minus_zero, 0.0, -M_PI_2l),
2455 TEST_c_c (cacosh, minus_zero, minus_zero, 0.0, -M_PI_2l),
2456 TEST_c_c (cacosh, minus_infty, plus_infty, plus_infty, M_PI_34l),
2457 TEST_c_c (cacosh, minus_infty, minus_infty, plus_infty, -M_PI_34l),
2458
2459 TEST_c_c (cacosh, plus_infty, plus_infty, plus_infty, M_PI_4l),
2460 TEST_c_c (cacosh, plus_infty, minus_infty, plus_infty, -M_PI_4l),
2461
2462 TEST_c_c (cacosh, -10.0, plus_infty, plus_infty, M_PI_2l),
2463 TEST_c_c (cacosh, -10.0, minus_infty, plus_infty, -M_PI_2l),
2464 TEST_c_c (cacosh, 0, plus_infty, plus_infty, M_PI_2l),
2465 TEST_c_c (cacosh, 0, minus_infty, plus_infty, -M_PI_2l),
2466 TEST_c_c (cacosh, 0.1L, plus_infty, plus_infty, M_PI_2l),
2467 TEST_c_c (cacosh, 0.1L, minus_infty, plus_infty, -M_PI_2l),
2468
2469 TEST_c_c (cacosh, minus_infty, 0, plus_infty, M_PIl),
2470 TEST_c_c (cacosh, minus_infty, minus_zero, plus_infty, -M_PIl),
2471 TEST_c_c (cacosh, minus_infty, 100, plus_infty, M_PIl),
2472 TEST_c_c (cacosh, minus_infty, -100, plus_infty, -M_PIl),
2473
2474 TEST_c_c (cacosh, plus_infty, 0, plus_infty, 0.0),
2475 TEST_c_c (cacosh, plus_infty, minus_zero, plus_infty, minus_zero),
2476 TEST_c_c (cacosh, plus_infty, 0.5, plus_infty, 0.0),
2477 TEST_c_c (cacosh, plus_infty, -0.5, plus_infty, minus_zero),
2478
2479 TEST_c_c (cacosh, plus_infty, qnan_value, plus_infty, qnan_value),
2480 TEST_c_c (cacosh, minus_infty, qnan_value, plus_infty, qnan_value),
2481
2482 TEST_c_c (cacosh, 0, qnan_value, qnan_value, qnan_value),
2483 TEST_c_c (cacosh, minus_zero, qnan_value, qnan_value, qnan_value),
2484
2485 TEST_c_c (cacosh, qnan_value, plus_infty, plus_infty, qnan_value),
2486 TEST_c_c (cacosh, qnan_value, minus_infty, plus_infty, qnan_value),
2487
2488 TEST_c_c (cacosh, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2489 TEST_c_c (cacosh, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2490
2491 TEST_c_c (cacosh, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2492 TEST_c_c (cacosh, qnan_value, -0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
2493
2494 TEST_c_c (cacosh, qnan_value, qnan_value, qnan_value, qnan_value),
2495
2496 TEST_c_c (cacosh, plus_zero, -1.5L, 1.194763217287109304111930828519090523536L, -M_PI_2l),
2497 TEST_c_c (cacosh, minus_zero, -1.5L, 1.194763217287109304111930828519090523536L, -M_PI_2l),
2498 TEST_c_c (cacosh, plus_zero, -1.0L, 0.8813735870195430252326093249797923090282L, -M_PI_2l),
2499 TEST_c_c (cacosh, minus_zero, -1.0L, 0.8813735870195430252326093249797923090282L, -M_PI_2l),
2500 TEST_c_c (cacosh, plus_zero, -0.5L, 0.4812118250596034474977589134243684231352L, -M_PI_2l),
2501 TEST_c_c (cacosh, minus_zero, -0.5L, 0.4812118250596034474977589134243684231352L, -M_PI_2l),
2502 TEST_c_c (cacosh, plus_zero, 0.5L, 0.4812118250596034474977589134243684231352L, M_PI_2l),
2503 TEST_c_c (cacosh, minus_zero, 0.5L, 0.4812118250596034474977589134243684231352L, M_PI_2l),
2504 TEST_c_c (cacosh, plus_zero, 1.0L, 0.8813735870195430252326093249797923090282L, M_PI_2l),
2505 TEST_c_c (cacosh, minus_zero, 1.0L, 0.8813735870195430252326093249797923090282L, M_PI_2l),
2506 TEST_c_c (cacosh, plus_zero, 1.5L, 1.194763217287109304111930828519090523536L, M_PI_2l),
2507 TEST_c_c (cacosh, minus_zero, 1.5L, 1.194763217287109304111930828519090523536L, M_PI_2l),
2508
2509 TEST_c_c (cacosh, -1.5L, plus_zero, 0.9624236501192068949955178268487368462704L, M_PIl),
2510 TEST_c_c (cacosh, -1.5L, minus_zero, 0.9624236501192068949955178268487368462704L, -M_PIl),
2511 TEST_c_c (cacosh, -1.0L, plus_zero, plus_zero, M_PIl),
2512 TEST_c_c (cacosh, -1.0L, minus_zero, plus_zero, -M_PIl),
2513 TEST_c_c (cacosh, -0.5L, plus_zero, plus_zero, 2.094395102393195492308428922186335256131L),
2514 TEST_c_c (cacosh, -0.5L, minus_zero, plus_zero, -2.094395102393195492308428922186335256131L),
2515 TEST_c_c (cacosh, 0.5L, plus_zero, plus_zero, 1.047197551196597746154214461093167628066L),
2516 TEST_c_c (cacosh, 0.5L, minus_zero, plus_zero, -1.047197551196597746154214461093167628066L),
2517 TEST_c_c (cacosh, 1.0L, plus_zero, plus_zero, plus_zero),
2518 TEST_c_c (cacosh, 1.0L, minus_zero, plus_zero, minus_zero),
2519 TEST_c_c (cacosh, 1.5L, plus_zero, 0.9624236501192068949955178268487368462704L, plus_zero),
2520 TEST_c_c (cacosh, 1.5L, minus_zero, 0.9624236501192068949955178268487368462704L, minus_zero),
2521
2522 TEST_c_c (cacosh, 0x1p50L, 1.0L, 3.535050620855721078027883819436720218708e1L, 8.881784197001252323389053344727730248720e-16L),
2523 TEST_c_c (cacosh, 0x1p50L, -1.0L, 3.535050620855721078027883819436720218708e1L, -8.881784197001252323389053344727730248720e-16L),
2524 TEST_c_c (cacosh, -0x1p50L, 1.0L, 3.535050620855721078027883819436720218708e1L, 3.141592653589792350284223683154270545292L),
2525 TEST_c_c (cacosh, -0x1p50L, -1.0L, 3.535050620855721078027883819436720218708e1L, -3.141592653589792350284223683154270545292L),
2526 TEST_c_c (cacosh, 1.0L, 0x1p50L, 3.535050620855721078027883819436759661753e1L, 1.570796326794895731052901991514519103193L),
2527 TEST_c_c (cacosh, -1.0L, 0x1p50L, 3.535050620855721078027883819436759661753e1L, 1.570796326794897507409741391764983781004L),
2528 TEST_c_c (cacosh, 1.0L, -0x1p50L, 3.535050620855721078027883819436759661753e1L, -1.570796326794895731052901991514519103193L),
2529 TEST_c_c (cacosh, -1.0L, -0x1p50L, 3.535050620855721078027883819436759661753e1L, -1.570796326794897507409741391764983781004L),
52ce4860 2530#ifndef TEST_FLOAT
08198877
JM
2531 TEST_c_c (cacosh, 0x1p500L, 1.0L, 3.472667374605326000180332928505464606058e2L, 3.054936363499604682051979393213617699789e-151L),
2532 TEST_c_c (cacosh, 0x1p500L, -1.0L, 3.472667374605326000180332928505464606058e2L, -3.054936363499604682051979393213617699789e-151L),
2533 TEST_c_c (cacosh, -0x1p500L, 1.0L, 3.472667374605326000180332928505464606058e2L, 3.141592653589793238462643383279502884197L),
2534 TEST_c_c (cacosh, -0x1p500L, -1.0L, 3.472667374605326000180332928505464606058e2L, -3.141592653589793238462643383279502884197L),
2535 TEST_c_c (cacosh, 1.0L, 0x1p500L, 3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
2536 TEST_c_c (cacosh, -1.0L, 0x1p500L, 3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
2537 TEST_c_c (cacosh, 1.0L, -0x1p500L, 3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
2538 TEST_c_c (cacosh, -1.0L, -0x1p500L, 3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
52ce4860
JM
2539#endif
2540#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
2541 TEST_c_c (cacosh, 0x1p5000L, 1.0L, 3.466429049980286492395577839412341016946e3L, 7.079811261048172892385615158694057552948e-1506L),
2542 TEST_c_c (cacosh, 0x1p5000L, -1.0L, 3.466429049980286492395577839412341016946e3L, -7.079811261048172892385615158694057552948e-1506L),
2543 TEST_c_c (cacosh, -0x1p5000L, 1.0L, 3.466429049980286492395577839412341016946e3L, 3.141592653589793238462643383279502884197L),
2544 TEST_c_c (cacosh, -0x1p5000L, -1.0L, 3.466429049980286492395577839412341016946e3L, -3.141592653589793238462643383279502884197L),
2545 TEST_c_c (cacosh, 1.0L, 0x1p5000L, 3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
2546 TEST_c_c (cacosh, -1.0L, 0x1p5000L, 3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
2547 TEST_c_c (cacosh, 1.0L, -0x1p5000L, 3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
2548 TEST_c_c (cacosh, -1.0L, -0x1p5000L, 3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
2549#endif
2550 TEST_c_c (cacosh, 0x1.fp127L, 0x1.fp127L, 8.973081118419833726837456344608533993585e1L, 7.853981633974483096156608458198757210493e-1L),
52ce4860 2551#ifndef TEST_FLOAT
08198877 2552 TEST_c_c (cacosh, 0x1.fp1023L, 0x1.fp1023L, 7.107906849659093345062145442726115449315e2L, 7.853981633974483096156608458198757210493e-1L),
52ce4860
JM
2553#endif
2554#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
2555 TEST_c_c (cacosh, 0x1.fp16383L, 0x1.fp16383L, 1.135753137836666928715489992987020363057e4L, 7.853981633974483096156608458198757210493e-1L),
2556#endif
2557 TEST_c_c (cacosh, 0x1.fp-129L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442097L),
2558 TEST_c_c (cacosh, 0x1.fp-129L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442097L),
2559 TEST_c_c (cacosh, -0x1.fp-129L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442100L),
2560 TEST_c_c (cacosh, -0x1.fp-129L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442100L),
2561 TEST_c_c (cacosh, 1.5L, 0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, 2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2562 TEST_c_c (cacosh, -1.5L, 0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, 3.141592653589793238462643383279502884195L),
2563 TEST_c_c (cacosh, 1.5L, -0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, -2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
2564 TEST_c_c (cacosh, -1.5L, -0x1.fp-129L, 9.624236501192068949955178268487368462704e-1L, -3.141592653589793238462643383279502884195L),
52ce4860 2565#ifndef TEST_FLOAT
08198877
JM
2566 TEST_c_c (cacosh, 0x1.fp-1025L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2567 TEST_c_c (cacosh, 0x1.fp-1025L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2568 TEST_c_c (cacosh, -0x1.fp-1025L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2569 TEST_c_c (cacosh, -0x1.fp-1025L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2570 TEST_c_c (cacosh, 1.5L, 0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, 4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2571 TEST_c_c (cacosh, -1.5L, 0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, 3.141592653589793238462643383279502884197L),
2572 TEST_c_c (cacosh, 1.5L, -0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, -4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
2573 TEST_c_c (cacosh, -1.5L, -0x1.fp-1025L, 9.624236501192068949955178268487368462704e-1L, -3.141592653589793238462643383279502884197L),
52ce4860
JM
2574#endif
2575#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
2576 TEST_c_c (cacosh, 0x1.fp-16385L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2577 TEST_c_c (cacosh, 0x1.fp-16385L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2578 TEST_c_c (cacosh, -0x1.fp-16385L, 1.5L, 1.194763217287109304111930828519090523536L, 1.570796326794896619231321691639751442099L),
2579 TEST_c_c (cacosh, -0x1.fp-16385L, -1.5L, 1.194763217287109304111930828519090523536L, -1.570796326794896619231321691639751442099L),
2580 TEST_c_c (cacosh, 1.5L, 0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, 7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
2581 TEST_c_c (cacosh, -1.5L, 0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, 3.141592653589793238462643383279502884197L),
2582 TEST_c_c (cacosh, 1.5L, -0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, -7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
2583 TEST_c_c (cacosh, -1.5L, -0x1.fp-16385L, 9.624236501192068949955178268487368462704e-1L, -3.141592653589793238462643383279502884197L),
2584#endif
2585 TEST_c_c (cacosh, 0.5L, 1.0L, 9.261330313501824245501244453057873152694e-1L, 1.221357263937683325603909865564381489366L),
2586 TEST_c_c (cacosh, 0.5L, -1.0L, 9.261330313501824245501244453057873152694e-1L, -1.221357263937683325603909865564381489366L),
2587 TEST_c_c (cacosh, -0.5L, 1.0L, 9.261330313501824245501244453057873152694e-1L, 1.920235389652109912858733517715121394831L),
2588 TEST_c_c (cacosh, -0.5L, -1.0L, 9.261330313501824245501244453057873152694e-1L, -1.920235389652109912858733517715121394831L),
2589 TEST_c_c (cacosh, 1.0L, 0.5L, 7.328576759736452608886724437653071523305e-1L, 6.748888455860063801646649673121744318756e-1L),
2590 TEST_c_c (cacosh, -1.0L, 0.5L, 7.328576759736452608886724437653071523305e-1L, 2.466703808003786858297978415967328452322L),
2591 TEST_c_c (cacosh, 1.0L, -0.5L, 7.328576759736452608886724437653071523305e-1L, -6.748888455860063801646649673121744318756e-1L),
2592 TEST_c_c (cacosh, -1.0L, -0.5L, 7.328576759736452608886724437653071523305e-1L, -2.466703808003786858297978415967328452322L),
2593 TEST_c_c (cacosh, 0.25L, 1.0L, 8.924633639033482359562124741744951972772e-1L, 1.394493894017929688812643125003661339452L),
2594 TEST_c_c (cacosh, 0.25L, -1.0L, 8.924633639033482359562124741744951972772e-1L, -1.394493894017929688812643125003661339452L),
2595 TEST_c_c (cacosh, -0.25L, 1.0L, 8.924633639033482359562124741744951972772e-1L, 1.747098759571863549650000258275841544745L),
2596 TEST_c_c (cacosh, -0.25L, -1.0L, 8.924633639033482359562124741744951972772e-1L, -1.747098759571863549650000258275841544745L),
2597 TEST_c_c (cacosh, 1.0L, 0.25L, 5.097911466811016354623559941115413499164e-1L, 4.890443302710802929202843732146540079124e-1L),
2598 TEST_c_c (cacosh, -1.0L, 0.25L, 5.097911466811016354623559941115413499164e-1L, 2.652548323318712945542359010064848876285L),
2599 TEST_c_c (cacosh, 1.0L, -0.25L, 5.097911466811016354623559941115413499164e-1L, -4.890443302710802929202843732146540079124e-1L),
2600 TEST_c_c (cacosh, -1.0L, -0.25L, 5.097911466811016354623559941115413499164e-1L, -2.652548323318712945542359010064848876285L),
2601 TEST_c_c (cacosh, 0x1.fp-10L, 1.0L, 8.813742198809567991336704287826445879025e-1L, 1.569458417435338878318763342108699202986L),
2602 TEST_c_c (cacosh, 0x1.fp-10L, -1.0L, 8.813742198809567991336704287826445879025e-1L, -1.569458417435338878318763342108699202986L),
2603 TEST_c_c (cacosh, -0x1.fp-10L, 1.0L, 8.813742198809567991336704287826445879025e-1L, 1.572134236154454360143880041170803681211L),
2604 TEST_c_c (cacosh, -0x1.fp-10L, -1.0L, 8.813742198809567991336704287826445879025e-1L, -1.572134236154454360143880041170803681211L),
2605 TEST_c_c (cacosh, 1.0L, 0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, 4.349129763101882771258049954181971959031e-2L),
2606 TEST_c_c (cacosh, -1.0L, 0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, 3.098101355958774410750062883737683164607L),
2607 TEST_c_c (cacosh, 1.0L, -0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, -4.349129763101882771258049954181971959031e-2L),
2608 TEST_c_c (cacosh, -1.0L, -0x1.fp-10L, 4.350501469856803800217957402220976497152e-2L, -3.098101355958774410750062883737683164607L),
2609 TEST_c_c (cacosh, 0x1.fp-30L, 1.0L, 8.813735870195430258081932989769495326854e-1L, 1.570796325518966635014803151387033957091L),
2610 TEST_c_c (cacosh, 0x1.fp-30L, -1.0L, 8.813735870195430258081932989769495326854e-1L, -1.570796325518966635014803151387033957091L),
2611 TEST_c_c (cacosh, -0x1.fp-30L, 1.0L, 8.813735870195430258081932989769495326854e-1L, 1.570796328070826603447840231892468927106L),
2612 TEST_c_c (cacosh, -0x1.fp-30L, -1.0L, 8.813735870195430258081932989769495326854e-1L, -1.570796328070826603447840231892468927106L),
2613 TEST_c_c (cacosh, 1.0L, 0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, 4.247867097467650115899790787875186617316e-5L),
2614 TEST_c_c (cacosh, -1.0L, 0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, 3.141550174918818561961484385371624132331L),
2615 TEST_c_c (cacosh, 1.0L, -0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, -4.247867097467650115899790787875186617316e-5L),
2616 TEST_c_c (cacosh, -1.0L, -0x1.fp-30L, 4.247867098745151888768727039216644758847e-5L, -3.141550174918818561961484385371624132331L),
2617 TEST_c_c (cacosh, 0x1.fp-100L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691638670687364L),
2618 TEST_c_c (cacosh, 0x1.fp-100L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691638670687364L),
2619 TEST_c_c (cacosh, -0x1.fp-100L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691640832196834L),
2620 TEST_c_c (cacosh, -0x1.fp-100L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691640832196834L),
2621 TEST_c_c (cacosh, 1.0L, 0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, 1.236292038260260888664514866456887257525e-15L),
2622 TEST_c_c (cacosh, -1.0L, 0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, 3.141592653589792002170605123018614219682L),
2623 TEST_c_c (cacosh, 1.0L, -0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, -1.236292038260260888664514866456887257525e-15L),
2624 TEST_c_c (cacosh, -1.0L, -0x1.fp-100L, 1.236292038260260888664514866457202186027e-15L, -3.141592653589792002170605123018614219682L),
2625 TEST_c_c (cacosh, 0x1.fp-129L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442097L),
2626 TEST_c_c (cacosh, 0x1.fp-129L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442097L),
2627 TEST_c_c (cacosh, -0x1.fp-129L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442101L),
2628 TEST_c_c (cacosh, -0x1.fp-129L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442101L),
2629 TEST_c_c (cacosh, 1.0L, 0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, 5.335635276982233498398987585285818977930e-20L),
2630 TEST_c_c (cacosh, -1.0L, 0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, 3.141592653589793238409287030509680549213L),
2631 TEST_c_c (cacosh, 1.0L, -0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, -5.335635276982233498398987585285818977930e-20L),
2632 TEST_c_c (cacosh, -1.0L, -0x1.fp-129L, 5.335635276982233498398987585285818977933e-20L, -3.141592653589793238409287030509680549213L),
52ce4860 2633#ifndef TEST_FLOAT
08198877
JM
2634 TEST_c_c (cacosh, 0x1.fp-1000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2635 TEST_c_c (cacosh, 0x1.fp-1000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2636 TEST_c_c (cacosh, -0x1.fp-1000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2637 TEST_c_c (cacosh, -0x1.fp-1000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2638 TEST_c_c (cacosh, 1.0L, 0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, 4.252291453851660175550490409247739011867e-151L),
2639 TEST_c_c (cacosh, -1.0L, 0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, 3.141592653589793238462643383279502884197L),
2640 TEST_c_c (cacosh, 1.0L, -0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, -4.252291453851660175550490409247739011867e-151L),
2641 TEST_c_c (cacosh, -1.0L, -0x1.fp-1000L, 4.252291453851660175550490409247739011867e-151L, -3.141592653589793238462643383279502884197L),
2642 TEST_c_c (cacosh, 0x1.fp-1025L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2643 TEST_c_c (cacosh, 0x1.fp-1025L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2644 TEST_c_c (cacosh, -0x1.fp-1025L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2645 TEST_c_c (cacosh, -0x1.fp-1025L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2646 TEST_c_c (cacosh, 1.0L, 0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, 7.340879205566679497036857179189356754017e-155L),
2647 TEST_c_c (cacosh, -1.0L, 0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, 3.141592653589793238462643383279502884197L),
2648 TEST_c_c (cacosh, 1.0L, -0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, -7.340879205566679497036857179189356754017e-155L),
2649 TEST_c_c (cacosh, -1.0L, -0x1.fp-1025L, 7.340879205566679497036857179189356754017e-155L, -3.141592653589793238462643383279502884197L),
52ce4860
JM
2650#endif
2651#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
2652 TEST_c_c (cacosh, 0x1.fp-10000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2653 TEST_c_c (cacosh, 0x1.fp-10000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2654 TEST_c_c (cacosh, -0x1.fp-10000L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2655 TEST_c_c (cacosh, -0x1.fp-10000L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2656 TEST_c_c (cacosh, 1.0L, 0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, 9.854680208706673586644342922051388714633e-1506L),
2657 TEST_c_c (cacosh, -1.0L, 0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, 3.141592653589793238462643383279502884197L),
2658 TEST_c_c (cacosh, 1.0L, -0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, -9.854680208706673586644342922051388714633e-1506L),
2659 TEST_c_c (cacosh, -1.0L, -0x1.fp-10000L, 9.854680208706673586644342922051388714633e-1506L, -3.141592653589793238462643383279502884197L),
2660 TEST_c_c (cacosh, 0x1.fp-16385L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2661 TEST_c_c (cacosh, 0x1.fp-16385L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2662 TEST_c_c (cacosh, -0x1.fp-16385L, 1.0L, 8.813735870195430252326093249797923090282e-1L, 1.570796326794896619231321691639751442099L),
2663 TEST_c_c (cacosh, -0x1.fp-16385L, -1.0L, 8.813735870195430252326093249797923090282e-1L, -1.570796326794896619231321691639751442099L),
2664 TEST_c_c (cacosh, 1.0L, 0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, 9.023632056840860275214893047597614177639e-2467L),
2665 TEST_c_c (cacosh, -1.0L, 0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, 3.141592653589793238462643383279502884197L),
2666 TEST_c_c (cacosh, 1.0L, -0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, -9.023632056840860275214893047597614177639e-2467L),
2667 TEST_c_c (cacosh, -1.0L, -0x1.fp-16385L, 9.023632056840860275214893047597614177639e-2467L, -3.141592653589793238462643383279502884197L),
2668#endif
2669 TEST_c_c (cacosh, 0x1p-23L, 0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, 1.570796242501204621739026081991856762292L),
2670 TEST_c_c (cacosh, 0x1p-23L, -0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, -1.570796242501204621739026081991856762292L),
2671 TEST_c_c (cacosh, -0x1p-23L, 0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, 1.570796411088588616723617301287646121905L),
2672 TEST_c_c (cacosh, -0x1p-23L, -0x1.000002p0L, 8.813736713132400470205730751186547909968e-1L, -1.570796411088588616723617301287646121905L),
2673 TEST_c_c (cacosh, 0x1.000002p0L, 0x1p-23L, 5.364668491573609633134147164031476452679e-4L, 2.222118384408546368406374049167636760903e-4L),
2674 TEST_c_c (cacosh, -0x1.000002p0L, 0x1p-23L, 5.364668491573609633134147164031476452679e-4L, 3.141370441751352383825802745874586120521L),
2675 TEST_c_c (cacosh, 0x1.000002p0L, -0x1p-23L, 5.364668491573609633134147164031476452679e-4L, -2.222118384408546368406374049167636760903e-4L),
2676 TEST_c_c (cacosh, -0x1.000002p0L, -0x1p-23L, 5.364668491573609633134147164031476452679e-4L, -3.141370441751352383825802745874586120521L),
2677 TEST_c_c (cacosh, 0x1.fp-129L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442097L),
2678 TEST_c_c (cacosh, 0x1.fp-129L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442097L),
2679 TEST_c_c (cacosh, -0x1.fp-129L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442101L),
2680 TEST_c_c (cacosh, -0x1.fp-129L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442101L),
2681 TEST_c_c (cacosh, 0x1.000002p0L, 0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, 5.830451806317544230969669308596361881467e-36L),
2682 TEST_c_c (cacosh, -0x1.000002p0L, 0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, 3.141592653589793238462643383279502878367L),
2683 TEST_c_c (cacosh, 0x1.000002p0L, -0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, -5.830451806317544230969669308596361881467e-36L),
2684 TEST_c_c (cacosh, -0x1.000002p0L, -0x1.fp-129L, 4.882812451493617206486388134172712975070e-4L, -3.141592653589793238462643383279502878367L),
2685 TEST_c_c (cacosh, 0.0L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442099L),
2686 TEST_c_c (cacosh, 0.0L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442099L),
2687 TEST_c_c (cacosh, -0.0L, 0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, 1.570796326794896619231321691639751442099L),
2688 TEST_c_c (cacosh, -0.0L, -0x1.000002p0L, 8.813736713132375348727889167749389235161e-1L, -1.570796326794896619231321691639751442099L),
2689 TEST_c_c (cacosh, 0x1.000002p0L, 0.0L, 4.882812451493617206486388134172712975070e-4L, 0.0L),
2690 TEST_c_c (cacosh, -0x1.000002p0L, 0.0L, 4.882812451493617206486388134172712975070e-4L, 3.141592653589793238462643383279502884197L),
2691 TEST_c_c (cacosh, 0x1.000002p0L, -0.0L, 4.882812451493617206486388134172712975070e-4L, -0.0L),
2692 TEST_c_c (cacosh, -0x1.000002p0L, -0.0L, 4.882812451493617206486388134172712975070e-4L, -3.141592653589793238462643383279502884197L),
52ce4860 2693#ifndef TEST_FLOAT
08198877
JM
2694 TEST_c_c (cacosh, 0x1p-52L, 0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, 1.570796326794896462222075823262262934288L),
2695 TEST_c_c (cacosh, 0x1p-52L, -0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, -1.570796326794896462222075823262262934288L),
2696 TEST_c_c (cacosh, -0x1p-52L, 0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, 1.570796326794896776240567560017239949909L),
2697 TEST_c_c (cacosh, -0x1p-52L, -0x1.0000000000001p0L, 8.813735870195431822418551933572982483664e-1L, -1.570796326794896776240567560017239949909L),
2698 TEST_c_c (cacosh, 0x1.0000000000001p0L, 0x1p-52L, 2.315303644582684770975188768022139415020e-8L, 9.590301705980041385828904092662391018164e-9L),
2699 TEST_c_c (cacosh, -0x1.0000000000001p0L, 0x1p-52L, 2.315303644582684770975188768022139415020e-8L, 3.141592643999491532482601997450598791535L),
2700 TEST_c_c (cacosh, 0x1.0000000000001p0L, -0x1p-52L, 2.315303644582684770975188768022139415020e-8L, -9.590301705980041385828904092662391018164e-9L),
2701 TEST_c_c (cacosh, -0x1.0000000000001p0L, -0x1p-52L, 2.315303644582684770975188768022139415020e-8L, -3.141592643999491532482601997450598791535L),
2702 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2703 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2704 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2705 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2706 TEST_c_c (cacosh, 0x1.0000000000001p0L, 0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, 2.557178503953494342609835913586108008322e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2707 TEST_c_c (cacosh, -0x1.0000000000001p0L, 0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, 3.141592653589793238462643383279502884197L),
2708 TEST_c_c (cacosh, 0x1.0000000000001p0L, -0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, -2.557178503953494342609835913586108008322e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2709 TEST_c_c (cacosh, -0x1.0000000000001p0L, -0x1.fp-1025L, 2.107342425544701550354780375182800088393e-8L, -3.141592653589793238462643383279502884197L),
2710 TEST_c_c (cacosh, 0.0L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2711 TEST_c_c (cacosh, 0.0L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2712 TEST_c_c (cacosh, -0.0L, 0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, 1.570796326794896619231321691639751442099L),
2713 TEST_c_c (cacosh, -0.0L, -0x1.0000000000001p0L, 8.813735870195431822418551933572895326024e-1L, -1.570796326794896619231321691639751442099L),
2714 TEST_c_c (cacosh, 0x1.0000000000001p0L, 0.0L, 2.107342425544701550354780375182800088393e-8L, 0.0L),
2715 TEST_c_c (cacosh, -0x1.0000000000001p0L, 0.0L, 2.107342425544701550354780375182800088393e-8L, 3.141592653589793238462643383279502884197L),
2716 TEST_c_c (cacosh, 0x1.0000000000001p0L, -0.0L, 2.107342425544701550354780375182800088393e-8L, -0.0L),
2717 TEST_c_c (cacosh, -0x1.0000000000001p0L, -0.0L, 2.107342425544701550354780375182800088393e-8L, -3.141592653589793238462643383279502884197L),
52ce4860
JM
2718#endif
2719#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM
2720 TEST_c_c (cacosh, 0x1p-63L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, 1.570796326794896619154657020805582738031L),
2721 TEST_c_c (cacosh, 0x1p-63L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, -1.570796326794896619154657020805582738031L),
2722 TEST_c_c (cacosh, -0x1p-63L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, 1.570796326794896619307986362473920146166L),
2723 TEST_c_c (cacosh, -0x1p-63L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610131001e-1L, -1.570796326794896619307986362473920146166L),
2724 TEST_c_c (cacosh, 0x1.0000000000000002p0L, 0x1p-63L, 5.116146586219826555037807251857670783420e-10L, 2.119177303101063432592523199680782317447e-10L),
2725 TEST_c_c (cacosh, -0x1.0000000000000002p0L, 0x1p-63L, 5.116146586219826555037807251857670783420e-10L, 3.141592653377875508152537040020250564229L),
2726 TEST_c_c (cacosh, 0x1.0000000000000002p0L, -0x1p-63L, 5.116146586219826555037807251857670783420e-10L, -2.119177303101063432592523199680782317447e-10L),
2727 TEST_c_c (cacosh, -0x1.0000000000000002p0L, -0x1p-63L, 5.116146586219826555037807251857670783420e-10L, -3.141592653377875508152537040020250564229L),
52ce4860 2728# if LDBL_MIN_EXP <= -16381
08198877
JM
2729 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2730 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2731 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2732 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2733 TEST_c_c (cacosh, 0x1.0000000000000002p0L, 0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, 1.748608650034385653922359120438227480943e-4923L),
2734 TEST_c_c (cacosh, -0x1.0000000000000002p0L, 0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, 3.141592653589793238462643383279502884197L),
2735 TEST_c_c (cacosh, 0x1.0000000000000002p0L, -0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, -1.748608650034385653922359120438227480943e-4923L),
2736 TEST_c_c (cacosh, -0x1.0000000000000002p0L, -0x1.fp-16385L, 4.656612873077392578082927418388212703712e-10L, -3.141592653589793238462643383279502884197L),
52ce4860 2737# endif
08198877
JM
2738 TEST_c_c (cacosh, 0.0L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2739 TEST_c_c (cacosh, 0.0L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2740 TEST_c_c (cacosh, -0.0L, 0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, 1.570796326794896619231321691639751442099L),
2741 TEST_c_c (cacosh, -0.0L, -0x1.0000000000000002p0L, 8.813735870195430253092739958139610130980e-1L, -1.570796326794896619231321691639751442099L),
2742 TEST_c_c (cacosh, 0x1.0000000000000002p0L, 0.0L, 4.656612873077392578082927418388212703712e-10L, 0.0L),
2743 TEST_c_c (cacosh, -0x1.0000000000000002p0L, 0.0L, 4.656612873077392578082927418388212703712e-10L, 3.141592653589793238462643383279502884197L),
2744 TEST_c_c (cacosh, 0x1.0000000000000002p0L, -0.0L, 4.656612873077392578082927418388212703712e-10L, -0.0L),
2745 TEST_c_c (cacosh, -0x1.0000000000000002p0L, -0.0L, 4.656612873077392578082927418388212703712e-10L, -3.141592653589793238462643383279502884197L),
52ce4860
JM
2746#endif
2747#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM
2748 TEST_c_c (cacosh, 0x1p-106L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639742726335L),
2749 TEST_c_c (cacosh, 0x1p-106L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639742726335L),
2750 TEST_c_c (cacosh, -0x1p-106L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639760157863L),
2751 TEST_c_c (cacosh, -0x1p-106L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639760157863L),
2752 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, 0x1p-106L, 2.285028863093221674154232933662774454211e-16L, 5.394221422390606848017034778914096659726e-17L),
2753 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, 0x1p-106L, 2.285028863093221674154232933662774454211e-16L, 3.141592653589793184520429159373434404027L),
2754 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, -0x1p-106L, 2.285028863093221674154232933662774454211e-16L, -5.394221422390606848017034778914096659726e-17L),
2755 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, -0x1p-106L, 2.285028863093221674154232933662774454211e-16L, -3.141592653589793184520429159373434404027L),
2756 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2757 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2758 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2759 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2760 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, 2.426922623448365473354662093431821897807e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2761 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, 3.141592653589793238462643383279502884197L),
2762 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, -2.426922623448365473354662093431821897807e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2763 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 2.220446049250313080847263336181636063482e-16L, -3.141592653589793238462643383279502884197L),
2764 TEST_c_c (cacosh, 0.0L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2765 TEST_c_c (cacosh, 0.0L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2766 TEST_c_c (cacosh, -0.0L, 0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, 1.570796326794896619231321691639751442099L),
2767 TEST_c_c (cacosh, -0.0L, -0x1.000000000000000000000000008p0L, 8.813735870195430252326093249798097405561e-1L, -1.570796326794896619231321691639751442099L),
2768 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, 0.0L, 2.220446049250313080847263336181636063482e-16L, 0.0L),
2769 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, 0.0L, 2.220446049250313080847263336181636063482e-16L, 3.141592653589793238462643383279502884197L),
2770 TEST_c_c (cacosh, 0x1.000000000000000000000000008p0L, -0.0L, 2.220446049250313080847263336181636063482e-16L, -0.0L),
2771 TEST_c_c (cacosh, -0x1.000000000000000000000000008p0L, -0.0L, 2.220446049250313080847263336181636063482e-16L, -3.141592653589793238462643383279502884197L),
52ce4860
JM
2772#endif
2773#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM
2774 TEST_c_c (cacosh, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751374007L),
2775 TEST_c_c (cacosh, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751374007L),
2776 TEST_c_c (cacosh, -0x1p-113L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751510190L),
2777 TEST_c_c (cacosh, -0x1p-113L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751510190L),
2778 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 2.019699255375255198156433710951064632386e-17L, 4.767863183742677481693563511435642755521e-18L),
2779 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, 0x1p-113L, 2.019699255375255198156433710951064632386e-17L, 3.141592653589793233694780199536825402504L),
2780 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 2.019699255375255198156433710951064632386e-17L, -4.767863183742677481693563511435642755521e-18L),
2781 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, -0x1p-113L, 2.019699255375255198156433710951064632386e-17L, -3.141592653589793233694780199536825402504L),
2782 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2783 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2784 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2785 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2786 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, 4.148847925325683229178506116378864361396e-4916L),
2787 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, 3.141592653589793238462643383279502884197L),
2788 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, -4.148847925325683229178506116378864361396e-4916L),
2789 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 1.962615573354718824241727964954454332780e-17L, -3.141592653589793238462643383279502884197L),
2790 TEST_c_c (cacosh, 0.0L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2791 TEST_c_c (cacosh, 0.0L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2792 TEST_c_c (cacosh, -0.0L, 0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, 1.570796326794896619231321691639751442099L),
2793 TEST_c_c (cacosh, -0.0L, -0x1.0000000000000000000000000001p0L, 8.813735870195430252326093249797924452120e-1L, -1.570796326794896619231321691639751442099L),
2794 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, 0.0L, 1.962615573354718824241727964954454332780e-17L, 0.0L),
2795 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, 0.0L, 1.962615573354718824241727964954454332780e-17L, 3.141592653589793238462643383279502884197L),
2796 TEST_c_c (cacosh, 0x1.0000000000000000000000000001p0L, -0.0L, 1.962615573354718824241727964954454332780e-17L, -0.0L),
2797 TEST_c_c (cacosh, -0x1.0000000000000000000000000001p0L, -0.0L, 1.962615573354718824241727964954454332780e-17L, -3.141592653589793238462643383279502884197L),
2798#endif
2799 TEST_c_c (cacosh, 0x1p-23L, 0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, 1.570796242501197085295336701632142060969L),
2800 TEST_c_c (cacosh, 0x1p-23L, -0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, -1.570796242501197085295336701632142060969L),
2801 TEST_c_c (cacosh, -0x1p-23L, 0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, 1.570796411088596153167306681647360823228L),
2802 TEST_c_c (cacosh, -0x1p-23L, -0x0.ffffffp0L, 8.813735448726963984495965873956465777250e-1L, -1.570796411088596153167306681647360823228L),
2803 TEST_c_c (cacosh, 0x0.ffffffp0L, 0x1p-23L, 2.714321200917194650737217746780928423385e-4L, 4.391863861910487109445187743978204002614e-4L),
2804 TEST_c_c (cacosh, -0x0.ffffffp0L, 0x1p-23L, 2.714321200917194650737217746780928423385e-4L, 3.141153467203602189751698864505105063797L),
2805 TEST_c_c (cacosh, 0x0.ffffffp0L, -0x1p-23L, 2.714321200917194650737217746780928423385e-4L, -4.391863861910487109445187743978204002614e-4L),
2806 TEST_c_c (cacosh, -0x0.ffffffp0L, -0x1p-23L, 2.714321200917194650737217746780928423385e-4L, -3.141153467203602189751698864505105063797L),
2807 TEST_c_c (cacosh, 0x1.fp-129L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442097L),
2808 TEST_c_c (cacosh, 0x1.fp-129L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442097L),
2809 TEST_c_c (cacosh, -0x1.fp-129L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442101L),
2810 TEST_c_c (cacosh, -0x1.fp-129L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442101L),
2811 TEST_c_c (cacosh, 0x0.ffffffp0L, 0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, 3.452669847162035876032494826387364972849e-4L),
2812 TEST_c_c (cacosh, -0x0.ffffffp0L, 0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, 3.141247386605077034875040133796864147700L),
2813 TEST_c_c (cacosh, 0x0.ffffffp0L, -0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, -3.452669847162035876032494826387364972849e-4L),
2814 TEST_c_c (cacosh, -0x0.ffffffp0L, -0x1.fp-129L, 8.245504387859737323891843603996428534945e-36L, -3.141247386605077034875040133796864147700L),
2815 TEST_c_c (cacosh, 0.0L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442099L),
2816 TEST_c_c (cacosh, 0.0L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442099L),
2817 TEST_c_c (cacosh, -0.0L, 0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, 1.570796326794896619231321691639751442099L),
2818 TEST_c_c (cacosh, -0.0L, -0x0.ffffffp0L, 8.813735448726938863015878255140556727969e-1L, -1.570796326794896619231321691639751442099L),
2819 TEST_c_c (cacosh, 0x0.ffffffp0L, 0.0L, 0.0L, 3.452669847162035876032494826387364972849e-4L),
2820 TEST_c_c (cacosh, -0x0.ffffffp0L, 0.0L, 0.0L, 3.141247386605077034875040133796864147700L),
2821 TEST_c_c (cacosh, 0x0.ffffffp0L, -0.0L, 0.0L, -3.452669847162035876032494826387364972849e-4L),
2822 TEST_c_c (cacosh, -0x0.ffffffp0L, -0.0L, 0.0L, -3.141247386605077034875040133796864147700L),
2823 TEST_c_c (cacosh, 0x1p-23L, 0.5L, 4.812118250596059896127318386463676808798e-1L, 1.570796220170866625230343643673321150378L),
2824 TEST_c_c (cacosh, 0x1p-23L, -0.5L, 4.812118250596059896127318386463676808798e-1L, -1.570796220170866625230343643673321150378L),
2825 TEST_c_c (cacosh, -0x1p-23L, 0.5L, 4.812118250596059896127318386463676808798e-1L, 1.570796433418926613232299739606181733819L),
2826 TEST_c_c (cacosh, -0x1p-23L, -0.5L, 4.812118250596059896127318386463676808798e-1L, -1.570796433418926613232299739606181733819L),
2827 TEST_c_c (cacosh, 0.5L, 0x1p-23L, 1.376510308240943236356088341381173571841e-7L, 1.047197551196603215914744618665204532273L),
2828 TEST_c_c (cacosh, -0.5L, 0x1p-23L, 1.376510308240943236356088341381173571841e-7L, 2.094395102393190022547898764614298351924L),
2829 TEST_c_c (cacosh, 0.5L, -0x1p-23L, 1.376510308240943236356088341381173571841e-7L, -1.047197551196603215914744618665204532273L),
2830 TEST_c_c (cacosh, -0.5L, -0x1p-23L, 1.376510308240943236356088341381173571841e-7L, -2.094395102393190022547898764614298351924L),
2831 TEST_c_c (cacosh, 0x1.fp-129L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442096L),
2832 TEST_c_c (cacosh, 0x1.fp-129L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442096L),
2833 TEST_c_c (cacosh, -0x1.fp-129L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442101L),
2834 TEST_c_c (cacosh, -0x1.fp-129L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442101L),
2835 TEST_c_c (cacosh, 0.5L, 0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, 1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_FLOAT),
2836 TEST_c_c (cacosh, -0.5L, 0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, 2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_FLOAT),
2837 TEST_c_c (cacosh, 0.5L, -0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, -1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_FLOAT),
2838 TEST_c_c (cacosh, -0.5L, -0x1.fp-129L, 3.287317402534702257036015056278368274737e-39L, -2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_FLOAT),
2839 TEST_c_c (cacosh, 0x1p-23L, 0x1p-23L, 1.192092895507818146886315028596704749235e-7L, 1.570796207585607068450636380271254316214L),
2840 TEST_c_c (cacosh, 0x1p-23L, -0x1p-23L, 1.192092895507818146886315028596704749235e-7L, -1.570796207585607068450636380271254316214L),
2841 TEST_c_c (cacosh, -0x1p-23L, 0x1p-23L, 1.192092895507818146886315028596704749235e-7L, 1.570796446004186170012007003008248567984L),
2842 TEST_c_c (cacosh, -0x1p-23L, -0x1p-23L, 1.192092895507818146886315028596704749235e-7L, -1.570796446004186170012007003008248567984L),
2843 TEST_c_c (cacosh, 0x1.fp-129L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442096L),
2844 TEST_c_c (cacosh, 0x1.fp-129L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442096L),
2845 TEST_c_c (cacosh, -0x1.fp-129L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442101L),
2846 TEST_c_c (cacosh, -0x1.fp-129L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442101L),
2847 TEST_c_c (cacosh, 0x1p-23L, 0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, 1.570796207585607068449789347324000006847L, UNDERFLOW_EXCEPTION_FLOAT),
2848 TEST_c_c (cacosh, -0x1p-23L, 0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, 1.570796446004186170012854035955502877351L, UNDERFLOW_EXCEPTION_FLOAT),
2849 TEST_c_c (cacosh, 0x1p-23L, -0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, -1.570796207585607068449789347324000006847L, UNDERFLOW_EXCEPTION_FLOAT),
2850 TEST_c_c (cacosh, -0x1p-23L, -0x1.fp-129L, 2.846900380897747786805634596726756660388e-39L, -1.570796446004186170012854035955502877351L, UNDERFLOW_EXCEPTION_FLOAT),
2851 TEST_c_c (cacosh, 0.0L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442099L),
2852 TEST_c_c (cacosh, 0.0L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442099L),
2853 TEST_c_c (cacosh, -0.0L, 0x1p-23L, 1.192092895507809676556842485683592032154e-7L, 1.570796326794896619231321691639751442099L),
2854 TEST_c_c (cacosh, -0.0L, -0x1p-23L, 1.192092895507809676556842485683592032154e-7L, -1.570796326794896619231321691639751442099L),
2855 TEST_c_c (cacosh, 0x1p-23L, 0.0L, 0.0L, 1.570796207585607068449789347324000006847L),
2856 TEST_c_c (cacosh, -0x1p-23L, 0.0L, 0.0L, 1.570796446004186170012854035955502877351L),
2857 TEST_c_c (cacosh, 0x1p-23L, -0.0L, 0.0L, -1.570796207585607068449789347324000006847L),
2858 TEST_c_c (cacosh, -0x1p-23L, -0.0L, 0.0L, -1.570796446004186170012854035955502877351L),
2859 TEST_c_c (cacosh, 0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 1.570796326794896619231321691639751442096L, UNDERFLOW_EXCEPTION_FLOAT),
2860 TEST_c_c (cacosh, 0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -1.570796326794896619231321691639751442096L, UNDERFLOW_EXCEPTION_FLOAT),
2861 TEST_c_c (cacosh, -0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 1.570796326794896619231321691639751442101L, UNDERFLOW_EXCEPTION_FLOAT),
2862 TEST_c_c (cacosh, -0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -1.570796326794896619231321691639751442101L, UNDERFLOW_EXCEPTION_FLOAT),
52ce4860 2863#ifndef TEST_FLOAT
08198877
JM
2864 TEST_c_c (cacosh, 0x1p-52L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, 1.570796326794896462222075823262236786996L),
2865 TEST_c_c (cacosh, 0x1p-52L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, -1.570796326794896462222075823262236786996L),
2866 TEST_c_c (cacosh, -0x1p-52L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, 1.570796326794896776240567560017266097201L),
2867 TEST_c_c (cacosh, -0x1p-52L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910458761820e-1L, -1.570796326794896776240567560017266097201L),
2868 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, 0x1p-52L, 1.171456840272878582596796205397918831268e-8L, 1.895456983915074112227925127005564372844e-8L),
2869 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, 0x1p-52L, 1.171456840272878582596796205397918831268e-8L, 3.141592634635223399311902261000251614142L),
2870 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, -0x1p-52L, 1.171456840272878582596796205397918831268e-8L, -1.895456983915074112227925127005564372844e-8L),
2871 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, -0x1p-52L, 1.171456840272878582596796205397918831268e-8L, -3.141592634635223399311902261000251614142L),
2872 TEST_c_c (cacosh, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2873 TEST_c_c (cacosh, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2874 TEST_c_c (cacosh, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2875 TEST_c_c (cacosh, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2876 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, 1.490116119384765638786343542550461592240e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2877 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, 3.141592638688632044614986995416067458693L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2878 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, -1.490116119384765638786343542550461592240e-8L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2879 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, 3.616396521699973256461764099945789620604e-301L, -3.141592638688632044614986995416067458693L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
2880 TEST_c_c (cacosh, 0.0L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2881 TEST_c_c (cacosh, 0.0L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2882 TEST_c_c (cacosh, -0.0L, 0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, 1.570796326794896619231321691639751442099L),
2883 TEST_c_c (cacosh, -0.0L, -0x0.fffffffffffff8p0L, 8.813735870195429467279863907910371604180e-1L, -1.570796326794896619231321691639751442099L),
2884 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, 0.0L, 0.0L, 1.490116119384765638786343542550461592240e-8L),
2885 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, 0.0L, 0.0L, 3.141592638688632044614986995416067458693L),
2886 TEST_c_c (cacosh, 0x0.fffffffffffff8p0L, -0.0L, 0.0L, -1.490116119384765638786343542550461592240e-8L),
2887 TEST_c_c (cacosh, -0x0.fffffffffffff8p0L, -0.0L, 0.0L, -3.141592638688632044614986995416067458693L),
2888#endif
2889 TEST_c_c (cacosh, 0x1p-52L, 0.5L, 4.812118250596034474977589134243772428682e-1L, 1.570796326794896420628589431857911675917L),
2890 TEST_c_c (cacosh, 0x1p-52L, -0.5L, 4.812118250596034474977589134243772428682e-1L, -1.570796326794896420628589431857911675917L),
2891 TEST_c_c (cacosh, -0x1p-52L, 0.5L, 4.812118250596034474977589134243772428682e-1L, 1.570796326794896817834053951421591208280L),
2892 TEST_c_c (cacosh, -0x1p-52L, -0.5L, 4.812118250596034474977589134243772428682e-1L, -1.570796326794896817834053951421591208280L),
2893 TEST_c_c (cacosh, 0.5L, 0x1p-52L, 2.563950248511418570403591756798643804971e-16L, 1.047197551196597746154214461093186605110L),
2894 TEST_c_c (cacosh, -0.5L, 0x1p-52L, 2.563950248511418570403591756798643804971e-16L, 2.094395102393195492308428922186316279087L),
2895 TEST_c_c (cacosh, 0.5L, -0x1p-52L, 2.563950248511418570403591756798643804971e-16L, -1.047197551196597746154214461093186605110L),
2896 TEST_c_c (cacosh, -0.5L, -0x1p-52L, 2.563950248511418570403591756798643804971e-16L, -2.094395102393195492308428922186316279087L),
52ce4860 2897#ifndef TEST_FLOAT
08198877
JM
2898 TEST_c_c (cacosh, 0x1.fp-1025L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
2899 TEST_c_c (cacosh, 0x1.fp-1025L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
2900 TEST_c_c (cacosh, -0x1.fp-1025L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
2901 TEST_c_c (cacosh, -0x1.fp-1025L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
2902 TEST_c_c (cacosh, 0.5L, 0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, 1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_DOUBLE),
2903 TEST_c_c (cacosh, -0.5L, 0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, 2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_DOUBLE),
2904 TEST_c_c (cacosh, 0.5L, -0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, -1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION_DOUBLE),
2905 TEST_c_c (cacosh, -0.5L, -0x1.fp-1025L, 6.222508863508420569166420770843207333493e-309L, -2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION_DOUBLE),
2906#endif
2907 TEST_c_c (cacosh, 0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181677117148e-16L, 1.570796326794896397186716766608443357372L),
2908 TEST_c_c (cacosh, 0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181677117148e-16L, -1.570796326794896397186716766608443357372L),
2909 TEST_c_c (cacosh, -0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181677117148e-16L, 1.570796326794896841275926616671059526825L),
2910 TEST_c_c (cacosh, -0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181677117148e-16L, -1.570796326794896841275926616671059526825L),
52ce4860 2911#ifndef TEST_FLOAT
08198877
JM
2912 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2913 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2914 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2915 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2916 TEST_c_c (cacosh, 0x1p-52L, 0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, 1.570796326794896397186716766608443357372L, UNDERFLOW_EXCEPTION_DOUBLE),
2917 TEST_c_c (cacosh, -0x1p-52L, 0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, 1.570796326794896841275926616671059526825L, UNDERFLOW_EXCEPTION_DOUBLE),
2918 TEST_c_c (cacosh, 0x1p-52L, -0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, -1.570796326794896397186716766608443357372L, UNDERFLOW_EXCEPTION_DOUBLE),
2919 TEST_c_c (cacosh, -0x1p-52L, -0x1.fp-1025L, 5.388850751072128349671657362289548938458e-309L, -1.570796326794896841275926616671059526825L, UNDERFLOW_EXCEPTION_DOUBLE),
2920#endif
2921 TEST_c_c (cacosh, 0.0L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2922 TEST_c_c (cacosh, 0.0L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2923 TEST_c_c (cacosh, -0.0L, 0x1p-52L, 2.220446049250313080847263336181622378926e-16L, 1.570796326794896619231321691639751442099L),
2924 TEST_c_c (cacosh, -0.0L, -0x1p-52L, 2.220446049250313080847263336181622378926e-16L, -1.570796326794896619231321691639751442099L),
2925 TEST_c_c (cacosh, 0x1p-52L, 0.0L, 0.0L, 1.570796326794896397186716766608443357372L),
2926 TEST_c_c (cacosh, -0x1p-52L, 0.0L, 0.0L, 1.570796326794896841275926616671059526825L),
2927 TEST_c_c (cacosh, 0x1p-52L, -0.0L, 0.0L, -1.570796326794896397186716766608443357372L),
2928 TEST_c_c (cacosh, -0x1p-52L, -0.0L, 0.0L, -1.570796326794896841275926616671059526825L),
52ce4860 2929#ifndef TEST_FLOAT
08198877
JM
2930 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
2931 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
2932 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
2933 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
52ce4860
JM
2934#endif
2935#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM
2936 TEST_c_c (cacosh, 0x1p-63L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, 1.570796326794896619154657020805582738025L),
2937 TEST_c_c (cacosh, 0x1p-63L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, -1.570796326794896619154657020805582738025L),
2938 TEST_c_c (cacosh, -0x1p-63L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, 1.570796326794896619307986362473920146173L),
2939 TEST_c_c (cacosh, -0x1p-63L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569937e-1L, -1.570796326794896619307986362473920146173L),
2940 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, 0x1p-63L, 2.588578361325995866221775673638805081337e-10L, 4.188407771167967636741951941902992986043e-10L),
2941 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, 0x1p-63L, 2.588578361325995866221775673638805081337e-10L, 3.141592653170952461345846619605307690007L),
2942 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, -0x1p-63L, 2.588578361325995866221775673638805081337e-10L, -4.188407771167967636741951941902992986043e-10L),
2943 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, -0x1p-63L, 2.588578361325995866221775673638805081337e-10L, -3.141592653170952461345846619605307690007L),
52ce4860 2944# if LDBL_MIN_EXP <= -16381
08198877
JM
2945 TEST_c_c (cacosh, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
2946 TEST_c_c (cacosh, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
2947 TEST_c_c (cacosh, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
2948 TEST_c_c (cacosh, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
2949 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, 3.292722539913596233371825532007990724506e-10L),
2950 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, 3.141592653260520984471283759942320330996L),
2951 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, -3.292722539913596233371825532007990724506e-10L),
2952 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 2.472906068161537187835415298076415423459e-4923L, -3.141592653260520984471283759942320330996L),
52ce4860 2953# endif
08198877
JM
2954 TEST_c_c (cacosh, 0.0L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
2955 TEST_c_c (cacosh, 0.0L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
2956 TEST_c_c (cacosh, -0.0L, 0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, 1.570796326794896619231321691639751442099L),
2957 TEST_c_c (cacosh, -0.0L, -0x0.ffffffffffffffffp0L, 8.813735870195430251942769895627079569917e-1L, -1.570796326794896619231321691639751442099L),
2958 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, 0.0L, 0.0L, 3.292722539913596233371825532007990724506e-10L),
2959 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, 0.0L, 0.0L, 3.141592653260520984471283759942320330996L),
2960 TEST_c_c (cacosh, 0x0.ffffffffffffffffp0L, -0.0L, 0.0L, -3.292722539913596233371825532007990724506e-10L),
2961 TEST_c_c (cacosh, -0x0.ffffffffffffffffp0L, -0.0L, 0.0L, -3.141592653260520984471283759942320330996L),
2962#endif
2963 TEST_c_c (cacosh, 0x1p-63L, 0.5L, 4.812118250596034474977589134243684231373e-1L, 1.570796326794896619134347701278529840650L),
2964 TEST_c_c (cacosh, 0x1p-63L, -0.5L, 4.812118250596034474977589134243684231373e-1L, -1.570796326794896619134347701278529840650L),
2965 TEST_c_c (cacosh, -0x1p-63L, 0.5L, 4.812118250596034474977589134243684231373e-1L, 1.570796326794896619328295682000973043547L),
2966 TEST_c_c (cacosh, -0x1p-63L, -0.5L, 4.812118250596034474977589134243684231373e-1L, -1.570796326794896619328295682000973043547L),
2967 TEST_c_c (cacosh, 0.5L, 0x1p-63L, 1.251928832280966098829878787499365228659e-19L, 1.047197551196597746154214461093167628070L),
2968 TEST_c_c (cacosh, -0.5L, 0x1p-63L, 1.251928832280966098829878787499365228659e-19L, 2.094395102393195492308428922186335256127L),
2969 TEST_c_c (cacosh, 0.5L, -0x1p-63L, 1.251928832280966098829878787499365228659e-19L, -1.047197551196597746154214461093167628070L),
2970 TEST_c_c (cacosh, -0.5L, -0x1p-63L, 1.251928832280966098829878787499365228659e-19L, -2.094395102393195492308428922186335256127L),
52ce4860 2971#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
2972 TEST_c_c (cacosh, 0x1.fp-16385L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
2973 TEST_c_c (cacosh, 0x1.fp-16385L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
2974 TEST_c_c (cacosh, -0x1.fp-16385L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751442099L),
2975 TEST_c_c (cacosh, -0x1.fp-16385L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751442099L),
2976 TEST_c_c (cacosh, 0.5L, 0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, 1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION),
2977 TEST_c_c (cacosh, -0.5L, 0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, 2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION),
2978 TEST_c_c (cacosh, 0.5L, -0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, -1.047197551196597746154214461093167628066L, UNDERFLOW_EXCEPTION),
2979 TEST_c_c (cacosh, -0.5L, -0x1.fp-16385L, 9.402257155670418112159334875199821342890e-4933L, -2.094395102393195492308428922186335256131L, UNDERFLOW_EXCEPTION),
2980#endif
2981 TEST_c_c (cacosh, 0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711430e-19L, 1.570796326794896619122901474391200998698L),
2982 TEST_c_c (cacosh, 0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711430e-19L, -1.570796326794896619122901474391200998698L),
2983 TEST_c_c (cacosh, -0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711430e-19L, 1.570796326794896619339741908888301885499L),
2984 TEST_c_c (cacosh, -0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711430e-19L, -1.570796326794896619339741908888301885499L),
52ce4860 2985#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
2986 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
2987 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
2988 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
2989 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
2990 TEST_c_c (cacosh, 0x1p-63L, 0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION),
2991 TEST_c_c (cacosh, -0x1p-63L, 0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, 1.570796326794896619339741908888301885499L, UNDERFLOW_EXCEPTION),
2992 TEST_c_c (cacosh, 0x1p-63L, -0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, -1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION),
2993 TEST_c_c (cacosh, -0x1p-63L, -0x1.fp-16385L, 8.142593549724601460479922838826119584465e-4933L, -1.570796326794896619339741908888301885499L, UNDERFLOW_EXCEPTION),
2994#endif
2995 TEST_c_c (cacosh, 0.0L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
2996 TEST_c_c (cacosh, 0.0L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
2997 TEST_c_c (cacosh, -0.0L, 0x1p-63L, 1.084202172485504434007452800869941711424e-19L, 1.570796326794896619231321691639751442099L),
2998 TEST_c_c (cacosh, -0.0L, -0x1p-63L, 1.084202172485504434007452800869941711424e-19L, -1.570796326794896619231321691639751442099L),
2999 TEST_c_c (cacosh, 0x1p-63L, 0.0L, 0.0L, 1.570796326794896619122901474391200998698L),
3000 TEST_c_c (cacosh, -0x1p-63L, 0.0L, 0.0L, 1.570796326794896619339741908888301885499L),
3001 TEST_c_c (cacosh, 0x1p-63L, -0.0L, 0.0L, -1.570796326794896619122901474391200998698L),
3002 TEST_c_c (cacosh, -0x1p-63L, -0.0L, 0.0L, -1.570796326794896619339741908888301885499L),
52ce4860 3003#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
3004 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
3005 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
3006 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
3007 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
52ce4860
JM
3008#endif
3009#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM
3010 TEST_c_c (cacosh, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639734010571L),
3011 TEST_c_c (cacosh, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639734010571L),
3012 TEST_c_c (cacosh, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639768873627L),
3013 TEST_c_c (cacosh, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639768873627L),
3014 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.234330349600789959989661887846005659983e-16L, 1.997188458999618357060632049675702684031e-16L),
3015 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.234330349600789959989661887846005659983e-16L, 3.141592653589793038743797483317667178134L),
3016 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.234330349600789959989661887846005659983e-16L, -1.997188458999618357060632049675702684031e-16L),
3017 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.234330349600789959989661887846005659983e-16L, -3.141592653589793038743797483317667178134L),
3018 TEST_c_c (cacosh, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
3019 TEST_c_c (cacosh, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
3020 TEST_c_c (cacosh, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
3021 TEST_c_c (cacosh, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
3022 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, 1.570092458683775059393382371963565104164e-16L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3023 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, 3.141592653589793081453397514901996944859L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3024 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, -1.570092458683775059393382371963565104164e-16L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3025 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 3.432186888910770473784103112009399360940e-293L, -3.141592653589793081453397514901996944859L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3026 TEST_c_c (cacosh, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
3027 TEST_c_c (cacosh, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
3028 TEST_c_c (cacosh, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, 1.570796326794896619231321691639751442099L),
3029 TEST_c_c (cacosh, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 8.813735870195430252326093249797835932642e-1L, -1.570796326794896619231321691639751442099L),
3030 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 0.0L, 1.570092458683775059393382371963565104164e-16L),
3031 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 0.0L, 3.141592653589793081453397514901996944859L),
3032 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 0.0L, -1.570092458683775059393382371963565104164e-16L),
3033 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 0.0L, -3.141592653589793081453397514901996944859L),
3034#endif
3035 TEST_c_c (cacosh, 0x1p-105L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639729392766L),
3036 TEST_c_c (cacosh, 0x1p-105L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639729392766L),
3037 TEST_c_c (cacosh, -0x1p-105L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639773491431L),
3038 TEST_c_c (cacosh, -0x1p-105L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639773491431L),
3039 TEST_c_c (cacosh, 0.5L, 0x1p-105L, 2.846556599890768890940941645338546615370e-32L, 1.047197551196597746154214461093167628066L),
3040 TEST_c_c (cacosh, -0.5L, 0x1p-105L, 2.846556599890768890940941645338546615370e-32L, 2.094395102393195492308428922186335256131L),
3041 TEST_c_c (cacosh, 0.5L, -0x1p-105L, 2.846556599890768890940941645338546615370e-32L, -1.047197551196597746154214461093167628066L),
3042 TEST_c_c (cacosh, -0.5L, -0x1p-105L, 2.846556599890768890940941645338546615370e-32L, -2.094395102393195492308428922186335256131L),
3043 TEST_c_c (cacosh, 0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639726790195L),
3044 TEST_c_c (cacosh, 0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639726790195L),
3045 TEST_c_c (cacosh, -0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639776094002L),
3046 TEST_c_c (cacosh, -0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639776094002L),
52ce4860 3047#ifndef TEST_FLOAT
08198877
JM
3048 TEST_c_c (cacosh, 0x1.fp-1025L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3049 TEST_c_c (cacosh, 0x1.fp-1025L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3050 TEST_c_c (cacosh, -0x1.fp-1025L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3051 TEST_c_c (cacosh, -0x1.fp-1025L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3052 TEST_c_c (cacosh, 0x1p-105L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639726790195L, UNDERFLOW_EXCEPTION_DOUBLE),
3053 TEST_c_c (cacosh, -0x1p-105L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 1.570796326794896619231321691639776094002L, UNDERFLOW_EXCEPTION_DOUBLE),
3054 TEST_c_c (cacosh, 0x1p-105L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639726790195L, UNDERFLOW_EXCEPTION_DOUBLE),
3055 TEST_c_c (cacosh, -0x1p-105L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -1.570796326794896619231321691639776094002L, UNDERFLOW_EXCEPTION_DOUBLE),
3056#endif
3057 TEST_c_c (cacosh, 0.0L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3058 TEST_c_c (cacosh, 0.0L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3059 TEST_c_c (cacosh, -0.0L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 1.570796326794896619231321691639751442099L),
3060 TEST_c_c (cacosh, -0.0L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -1.570796326794896619231321691639751442099L),
3061 TEST_c_c (cacosh, 0x1p-105L, 0.0L, 0.0L, 1.570796326794896619231321691639726790195L),
3062 TEST_c_c (cacosh, -0x1p-105L, 0.0L, 0.0L, 1.570796326794896619231321691639776094002L),
3063 TEST_c_c (cacosh, 0x1p-105L, -0.0L, 0.0L, -1.570796326794896619231321691639726790195L),
3064 TEST_c_c (cacosh, -0x1p-105L, -0.0L, 0.0L, -1.570796326794896619231321691639776094002L),
52ce4860 3065#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM
3066 TEST_c_c (cacosh, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751305915L),
3067 TEST_c_c (cacosh, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751305915L),
3068 TEST_c_c (cacosh, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751578282L),
3069 TEST_c_c (cacosh, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751578282L),
3070 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.091004200533850618345330909857103457781e-17L, 1.765281878332676474347460257221369818872e-17L),
3071 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.091004200533850618345330909857103457781e-17L, 3.141592653589793220809824599952738140723L),
3072 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.091004200533850618345330909857103457781e-17L, -1.765281878332676474347460257221369818872e-17L),
3073 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.091004200533850618345330909857103457781e-17L, -3.141592653589793220809824599952738140723L),
3074 TEST_c_c (cacosh, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3075 TEST_c_c (cacosh, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3076 TEST_c_c (cacosh, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3077 TEST_c_c (cacosh, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3078 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, 1.387778780781445675529539585113525401762e-17L),
3079 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, 3.141592653589793224584855575465046128902L),
3080 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, -1.387778780781445675529539585113525401762e-17L),
3081 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 5.867357004219059108790368268900490184505e-4916L, -3.141592653589793224584855575465046128902L),
3082 TEST_c_c (cacosh, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3083 TEST_c_c (cacosh, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3084 TEST_c_c (cacosh, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, 1.570796326794896619231321691639751442099L),
3085 TEST_c_c (cacosh, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 8.813735870195430252326093249797922409363e-1L, -1.570796326794896619231321691639751442099L),
3086 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 0.0L, 1.387778780781445675529539585113525401762e-17L),
3087 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 0.0L, 3.141592653589793224584855575465046128902L),
3088 TEST_c_c (cacosh, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 0.0L, -1.387778780781445675529539585113525401762e-17L),
3089 TEST_c_c (cacosh, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 0.0L, -3.141592653589793224584855575465046128902L),
3090#endif
3091 TEST_c_c (cacosh, 0x1p-112L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751269838L),
3092 TEST_c_c (cacosh, 0x1p-112L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751269838L),
3093 TEST_c_c (cacosh, -0x1p-112L, 0.5L, 4.812118250596034474977589134243684231352e-1L, 1.570796326794896619231321691639751614359L),
3094 TEST_c_c (cacosh, -0x1p-112L, -0.5L, 4.812118250596034474977589134243684231352e-1L, -1.570796326794896619231321691639751614359L),
3095 TEST_c_c (cacosh, 0.5L, 0x1p-112L, 2.223872343664663196047610660420739543258e-34L, 1.047197551196597746154214461093167628066L),
3096 TEST_c_c (cacosh, -0.5L, 0x1p-112L, 2.223872343664663196047610660420739543258e-34L, 2.094395102393195492308428922186335256131L),
3097 TEST_c_c (cacosh, 0.5L, -0x1p-112L, 2.223872343664663196047610660420739543258e-34L, -1.047197551196597746154214461093167628066L),
3098 TEST_c_c (cacosh, -0.5L, -0x1p-112L, 2.223872343664663196047610660420739543258e-34L, -2.094395102393195492308428922186335256131L),
3099 TEST_c_c (cacosh, 0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751249506L),
3100 TEST_c_c (cacosh, 0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751249506L),
3101 TEST_c_c (cacosh, -0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751634692L),
3102 TEST_c_c (cacosh, -0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751634692L),
52ce4860 3103#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
3104 TEST_c_c (cacosh, 0x1.fp-16385L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3105 TEST_c_c (cacosh, 0x1.fp-16385L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3106 TEST_c_c (cacosh, -0x1.fp-16385L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3107 TEST_c_c (cacosh, -0x1.fp-16385L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3108 TEST_c_c (cacosh, 0x1p-112L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751249506L, UNDERFLOW_EXCEPTION),
3109 TEST_c_c (cacosh, -0x1p-112L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 1.570796326794896619231321691639751634692L, UNDERFLOW_EXCEPTION),
3110 TEST_c_c (cacosh, 0x1p-112L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751249506L, UNDERFLOW_EXCEPTION),
3111 TEST_c_c (cacosh, -0x1p-112L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -1.570796326794896619231321691639751634692L, UNDERFLOW_EXCEPTION),
3112#endif
3113 TEST_c_c (cacosh, 0.0L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3114 TEST_c_c (cacosh, 0.0L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3115 TEST_c_c (cacosh, -0.0L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.570796326794896619231321691639751442099L),
3116 TEST_c_c (cacosh, -0.0L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.570796326794896619231321691639751442099L),
3117 TEST_c_c (cacosh, 0x1p-112L, 0.0L, 0.0L, 1.570796326794896619231321691639751249506L),
3118 TEST_c_c (cacosh, -0x1p-112L, 0.0L, 0.0L, 1.570796326794896619231321691639751634692L),
3119 TEST_c_c (cacosh, 0x1p-112L, -0.0L, 0.0L, -1.570796326794896619231321691639751249506L),
3120 TEST_c_c (cacosh, -0x1p-112L, -0.0L, 0.0L, -1.570796326794896619231321691639751634692L),
3121
3122 TEST_c_c (cacosh, 0.75L, 1.25L, 1.13239363160530819522266333696834467L, 1.11752014915610270578240049553777969L),
3123 TEST_c_c (cacosh, -2, -3, 1.9833870299165354323470769028940395L, -2.1414491111159960199416055713254211L),
3124 END_DATA (cacosh)
3125 };
3126
3127static void
3128cacosh_test (void)
3129{
3130 errno = 0;
3131 FUNC(cacosh) (BUILD_COMPLEX (0.7L, 1.2L));
3132 if (errno == ENOSYS)
3133 /* Function not implemented. */
3134 return;
8847214f 3135
08198877
JM
3136 START (cacosh);
3137 RUN_TEST_LOOP_c_c (cacosh, cacosh_test_data, );
6815fabc 3138 END (cacosh, complex);
8847214f
UD
3139}
3140
2550dfe9 3141
6a1992e2
JM
3142static const struct test_c_f_data carg_test_data[] =
3143 {
3144 START_DATA (carg);
3145 /* carg (x + iy) is specified as atan2 (y, x) */
8847214f 3146
6a1992e2
JM
3147 /* carg (x + i 0) == 0 for x > 0. */
3148 TEST_c_f (carg, 2.0, 0, 0),
3149 /* carg (x - i 0) == -0 for x > 0. */
3150 TEST_c_f (carg, 2.0, minus_zero, minus_zero),
8847214f 3151
6a1992e2
JM
3152 TEST_c_f (carg, 0, 0, 0),
3153 TEST_c_f (carg, 0, minus_zero, minus_zero),
8847214f 3154
6a1992e2
JM
3155 /* carg (x + i 0) == +pi for x < 0. */
3156 TEST_c_f (carg, -2.0, 0, M_PIl),
8847214f 3157
6a1992e2
JM
3158 /* carg (x - i 0) == -pi for x < 0. */
3159 TEST_c_f (carg, -2.0, minus_zero, -M_PIl),
8847214f 3160
6a1992e2
JM
3161 TEST_c_f (carg, minus_zero, 0, M_PIl),
3162 TEST_c_f (carg, minus_zero, minus_zero, -M_PIl),
8847214f 3163
6a1992e2
JM
3164 /* carg (+0 + i y) == pi/2 for y > 0. */
3165 TEST_c_f (carg, 0, 2.0, M_PI_2l),
8847214f 3166
6a1992e2
JM
3167 /* carg (-0 + i y) == pi/2 for y > 0. */
3168 TEST_c_f (carg, minus_zero, 2.0, M_PI_2l),
8847214f 3169
6a1992e2
JM
3170 /* carg (+0 + i y) == -pi/2 for y < 0. */
3171 TEST_c_f (carg, 0, -2.0, -M_PI_2l),
8847214f 3172
6a1992e2
JM
3173 /* carg (-0 + i y) == -pi/2 for y < 0. */
3174 TEST_c_f (carg, minus_zero, -2.0, -M_PI_2l),
8847214f 3175
6a1992e2
JM
3176 /* carg (inf + i y) == +0 for finite y > 0. */
3177 TEST_c_f (carg, plus_infty, 2.0, 0),
8847214f 3178
6a1992e2
JM
3179 /* carg (inf + i y) == -0 for finite y < 0. */
3180 TEST_c_f (carg, plus_infty, -2.0, minus_zero),
8847214f 3181
6a1992e2
JM
3182 /* carg(x + i inf) == pi/2 for finite x. */
3183 TEST_c_f (carg, 10.0, plus_infty, M_PI_2l),
8847214f 3184
6a1992e2
JM
3185 /* carg(x - i inf) == -pi/2 for finite x. */
3186 TEST_c_f (carg, 10.0, minus_infty, -M_PI_2l),
8847214f 3187
6a1992e2
JM
3188 /* carg (-inf + i y) == +pi for finite y > 0. */
3189 TEST_c_f (carg, minus_infty, 10.0, M_PIl),
8847214f 3190
6a1992e2
JM
3191 /* carg (-inf + i y) == -pi for finite y < 0. */
3192 TEST_c_f (carg, minus_infty, -10.0, -M_PIl),
8847214f 3193
6a1992e2 3194 TEST_c_f (carg, plus_infty, plus_infty, M_PI_4l),
8847214f 3195
6a1992e2 3196 TEST_c_f (carg, plus_infty, minus_infty, -M_PI_4l),
8847214f 3197
6a1992e2 3198 TEST_c_f (carg, minus_infty, plus_infty, M_PI_34l),
8847214f 3199
6a1992e2 3200 TEST_c_f (carg, minus_infty, minus_infty, -M_PI_34l),
8847214f 3201
6a1992e2
JM
3202 TEST_c_f (carg, qnan_value, qnan_value, qnan_value),
3203 END_DATA (carg);
3204 };
15daa639 3205
6a1992e2
JM
3206static void
3207carg_test (void)
3208{
3209 START (carg);
3210 RUN_TEST_LOOP_c_f (carg, carg_test_data, );
8847214f
UD
3211 END (carg);
3212}
3213
08198877
JM
3214static const struct test_c_c_data casin_test_data[] =
3215 {
3216 START_DATA (casin),
3217 TEST_c_c (casin, 0, 0, 0.0, 0.0),
3218 TEST_c_c (casin, minus_zero, 0, minus_zero, 0.0),
3219 TEST_c_c (casin, 0, minus_zero, 0.0, minus_zero),
3220 TEST_c_c (casin, minus_zero, minus_zero, minus_zero, minus_zero),
3221
3222 TEST_c_c (casin, plus_infty, plus_infty, M_PI_4l, plus_infty),
3223 TEST_c_c (casin, plus_infty, minus_infty, M_PI_4l, minus_infty),
3224 TEST_c_c (casin, minus_infty, plus_infty, -M_PI_4l, plus_infty),
3225 TEST_c_c (casin, minus_infty, minus_infty, -M_PI_4l, minus_infty),
3226
3227 TEST_c_c (casin, -10.0, plus_infty, minus_zero, plus_infty),
3228 TEST_c_c (casin, -10.0, minus_infty, minus_zero, minus_infty),
3229 TEST_c_c (casin, 0, plus_infty, 0.0, plus_infty),
3230 TEST_c_c (casin, 0, minus_infty, 0.0, minus_infty),
3231 TEST_c_c (casin, minus_zero, plus_infty, minus_zero, plus_infty),
3232 TEST_c_c (casin, minus_zero, minus_infty, minus_zero, minus_infty),
3233 TEST_c_c (casin, 0.1L, plus_infty, 0.0, plus_infty),
3234 TEST_c_c (casin, 0.1L, minus_infty, 0.0, minus_infty),
3235
3236 TEST_c_c (casin, minus_infty, 0, -M_PI_2l, plus_infty),
3237 TEST_c_c (casin, minus_infty, minus_zero, -M_PI_2l, minus_infty),
3238 TEST_c_c (casin, minus_infty, 100, -M_PI_2l, plus_infty),
3239 TEST_c_c (casin, minus_infty, -100, -M_PI_2l, minus_infty),
3240
3241 TEST_c_c (casin, plus_infty, 0, M_PI_2l, plus_infty),
3242 TEST_c_c (casin, plus_infty, minus_zero, M_PI_2l, minus_infty),
3243 TEST_c_c (casin, plus_infty, 0.5, M_PI_2l, plus_infty),
3244 TEST_c_c (casin, plus_infty, -0.5, M_PI_2l, minus_infty),
3245
3246 TEST_c_c (casin, qnan_value, plus_infty, qnan_value, plus_infty),
3247 TEST_c_c (casin, qnan_value, minus_infty, qnan_value, minus_infty),
3248
3249 TEST_c_c (casin, 0.0, qnan_value, 0.0, qnan_value),
3250 TEST_c_c (casin, minus_zero, qnan_value, minus_zero, qnan_value),
3251
3252 TEST_c_c (casin, plus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
3253 TEST_c_c (casin, minus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
3254
3255 TEST_c_c (casin, qnan_value, 10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3256 TEST_c_c (casin, qnan_value, -10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3257
3258 TEST_c_c (casin, 0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3259 TEST_c_c (casin, -0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3260
3261 TEST_c_c (casin, qnan_value, qnan_value, qnan_value, qnan_value),
3262
3263 TEST_c_c (casin, plus_zero, -1.5L, plus_zero, -1.194763217287109304111930828519090523536L),
3264 TEST_c_c (casin, minus_zero, -1.5L, minus_zero, -1.194763217287109304111930828519090523536L),
3265 TEST_c_c (casin, plus_zero, -1.0L, plus_zero, -0.8813735870195430252326093249797923090282L),
3266 TEST_c_c (casin, minus_zero, -1.0L, minus_zero, -0.8813735870195430252326093249797923090282L),
3267 TEST_c_c (casin, plus_zero, -0.5L, plus_zero, -0.4812118250596034474977589134243684231352L),
3268 TEST_c_c (casin, minus_zero, -0.5L, minus_zero, -0.4812118250596034474977589134243684231352L),
3269 TEST_c_c (casin, plus_zero, 0.5L, plus_zero, 0.4812118250596034474977589134243684231352L),
3270 TEST_c_c (casin, minus_zero, 0.5L, minus_zero, 0.4812118250596034474977589134243684231352L),
3271 TEST_c_c (casin, plus_zero, 1.0L, plus_zero, 0.8813735870195430252326093249797923090282L),
3272 TEST_c_c (casin, minus_zero, 1.0L, minus_zero, 0.8813735870195430252326093249797923090282L),
3273 TEST_c_c (casin, plus_zero, 1.5L, plus_zero, 1.194763217287109304111930828519090523536L),
3274 TEST_c_c (casin, minus_zero, 1.5L, minus_zero, 1.194763217287109304111930828519090523536L),
3275
3276 TEST_c_c (casin, -1.5L, plus_zero, -M_PI_2l, 0.9624236501192068949955178268487368462704L),
3277 TEST_c_c (casin, -1.5L, minus_zero, -M_PI_2l, -0.9624236501192068949955178268487368462704L),
3278 TEST_c_c (casin, -1.0L, plus_zero, -M_PI_2l, plus_zero),
3279 TEST_c_c (casin, -1.0L, minus_zero, -M_PI_2l, minus_zero),
3280 TEST_c_c (casin, -0.5L, plus_zero, -0.5235987755982988730771072305465838140329L, plus_zero),
3281 TEST_c_c (casin, -0.5L, minus_zero, -0.5235987755982988730771072305465838140329L, minus_zero),
3282 TEST_c_c (casin, 0.5L, plus_zero, 0.5235987755982988730771072305465838140329L, plus_zero),
3283 TEST_c_c (casin, 0.5L, minus_zero, 0.5235987755982988730771072305465838140329L, minus_zero),
3284 TEST_c_c (casin, 1.0L, plus_zero, M_PI_2l, plus_zero),
3285 TEST_c_c (casin, 1.0L, minus_zero, M_PI_2l, minus_zero),
3286 TEST_c_c (casin, 1.5L, plus_zero, M_PI_2l, 0.9624236501192068949955178268487368462704L),
3287 TEST_c_c (casin, 1.5L, minus_zero, M_PI_2l, -0.9624236501192068949955178268487368462704L),
3288
3289 TEST_c_c (casin, 0x1p50L, 1.0L, 1.570796326794895731052901991514519103193L, 3.535050620855721078027883819436720218708e1L),
3290 TEST_c_c (casin, 0x1p50L, -1.0L, 1.570796326794895731052901991514519103193L, -3.535050620855721078027883819436720218708e1L),
3291 TEST_c_c (casin, -0x1p50L, 1.0L, -1.570796326794895731052901991514519103193L, 3.535050620855721078027883819436720218708e1L),
3292 TEST_c_c (casin, -0x1p50L, -1.0L, -1.570796326794895731052901991514519103193L, -3.535050620855721078027883819436720218708e1L),
3293 TEST_c_c (casin, 1.0L, 0x1p50L, 8.881784197001252323389053344720723756399e-16L, 3.535050620855721078027883819436759661753e1L),
3294 TEST_c_c (casin, -1.0L, 0x1p50L, -8.881784197001252323389053344720723756399e-16L, 3.535050620855721078027883819436759661753e1L),
3295 TEST_c_c (casin, 1.0L, -0x1p50L, 8.881784197001252323389053344720723756399e-16L, -3.535050620855721078027883819436759661753e1L),
3296 TEST_c_c (casin, -1.0L, -0x1p50L, -8.881784197001252323389053344720723756399e-16L, -3.535050620855721078027883819436759661753e1L),
cdc1c96f 3297#ifndef TEST_FLOAT
08198877
JM
3298 TEST_c_c (casin, 0x1p500L, 1.0L, 1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
3299 TEST_c_c (casin, 0x1p500L, -1.0L, 1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
3300 TEST_c_c (casin, -0x1p500L, 1.0L, -1.570796326794896619231321691639751442099L, 3.472667374605326000180332928505464606058e2L),
3301 TEST_c_c (casin, -0x1p500L, -1.0L, -1.570796326794896619231321691639751442099L, -3.472667374605326000180332928505464606058e2L),
3302 TEST_c_c (casin, 1.0L, 0x1p500L, 3.054936363499604682051979393213617699789e-151L, 3.472667374605326000180332928505464606058e2L),
3303 TEST_c_c (casin, -1.0L, 0x1p500L, -3.054936363499604682051979393213617699789e-151L, 3.472667374605326000180332928505464606058e2L),
3304 TEST_c_c (casin, 1.0L, -0x1p500L, 3.054936363499604682051979393213617699789e-151L, -3.472667374605326000180332928505464606058e2L),
3305 TEST_c_c (casin, -1.0L, -0x1p500L, -3.054936363499604682051979393213617699789e-151L, -3.472667374605326000180332928505464606058e2L),
cdc1c96f
JM
3306#endif
3307#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
3308 TEST_c_c (casin, 0x1p5000L, 1.0L, 1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
3309 TEST_c_c (casin, 0x1p5000L, -1.0L, 1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
3310 TEST_c_c (casin, -0x1p5000L, 1.0L, -1.570796326794896619231321691639751442099L, 3.466429049980286492395577839412341016946e3L),
3311 TEST_c_c (casin, -0x1p5000L, -1.0L, -1.570796326794896619231321691639751442099L, -3.466429049980286492395577839412341016946e3L),
3312 TEST_c_c (casin, 1.0L, 0x1p5000L, 7.079811261048172892385615158694057552948e-1506L, 3.466429049980286492395577839412341016946e3L),
3313 TEST_c_c (casin, -1.0L, 0x1p5000L, -7.079811261048172892385615158694057552948e-1506L, 3.466429049980286492395577839412341016946e3L),
3314 TEST_c_c (casin, 1.0L, -0x1p5000L, 7.079811261048172892385615158694057552948e-1506L, -3.466429049980286492395577839412341016946e3L),
3315 TEST_c_c (casin, -1.0L, -0x1p5000L, -7.079811261048172892385615158694057552948e-1506L, -3.466429049980286492395577839412341016946e3L),
cdc1c96f
JM
3316#endif
3317
08198877 3318 TEST_c_c (casin, 0x1.fp127L, 0x1.fp127L, 7.853981633974483096156608458198757210493e-1L, 8.973081118419833726837456344608533993585e1L),
a9708fed 3319#ifndef TEST_FLOAT
08198877 3320 TEST_c_c (casin, 0x1.fp1023L, 0x1.fp1023L, 7.853981633974483096156608458198757210493e-1L, 7.107906849659093345062145442726115449315e2L),
a9708fed
JM
3321#endif
3322#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 3323 TEST_c_c (casin, 0x1.fp16383L, 0x1.fp16383L, 7.853981633974483096156608458198757210493e-1L, 1.135753137836666928715489992987020363057e4L),
a9708fed
JM
3324#endif
3325
08198877
JM
3326 TEST_c_c (casin, 0x1.fp-129L, 1.5L, 1.579176199917649005841160751101628985741e-39L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3327 TEST_c_c (casin, 0x1.fp-129L, -1.5L, 1.579176199917649005841160751101628985741e-39L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3328 TEST_c_c (casin, -0x1.fp-129L, 1.5L, -1.579176199917649005841160751101628985741e-39L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3329 TEST_c_c (casin, -0x1.fp-129L, -1.5L, -1.579176199917649005841160751101628985741e-39L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_FLOAT),
3330 TEST_c_c (casin, 1.5L, 0x1.fp-129L, 1.570796326794896619231321691639751442096L, 9.624236501192068949955178268487368462704e-1L),
3331 TEST_c_c (casin, -1.5L, 0x1.fp-129L, -1.570796326794896619231321691639751442096L, 9.624236501192068949955178268487368462704e-1L),
3332 TEST_c_c (casin, 1.5L, -0x1.fp-129L, 1.570796326794896619231321691639751442096L, -9.624236501192068949955178268487368462704e-1L),
3333 TEST_c_c (casin, -1.5L, -0x1.fp-129L, -1.570796326794896619231321691639751442096L, -9.624236501192068949955178268487368462704e-1L),
8cf28c5e 3334#ifndef TEST_FLOAT
08198877
JM
3335 TEST_c_c (casin, 0x1.fp-1025L, 1.5L, 2.989196569048182929051881765490354365918e-309L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3336 TEST_c_c (casin, 0x1.fp-1025L, -1.5L, 2.989196569048182929051881765490354365918e-309L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3337 TEST_c_c (casin, -0x1.fp-1025L, 1.5L, -2.989196569048182929051881765490354365918e-309L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3338 TEST_c_c (casin, -0x1.fp-1025L, -1.5L, -2.989196569048182929051881765490354365918e-309L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION_DOUBLE),
3339 TEST_c_c (casin, 1.5L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3340 TEST_c_c (casin, -1.5L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3341 TEST_c_c (casin, 1.5L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3342 TEST_c_c (casin, -1.5L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
8cf28c5e
JM
3343#endif
3344#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
3345 TEST_c_c (casin, 0x1.fp-16385L, 1.5L, 4.516698239814521372306784062043266700598e-4933L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3346 TEST_c_c (casin, 0x1.fp-16385L, -1.5L, 4.516698239814521372306784062043266700598e-4933L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3347 TEST_c_c (casin, -0x1.fp-16385L, 1.5L, -4.516698239814521372306784062043266700598e-4933L, 1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3348 TEST_c_c (casin, -0x1.fp-16385L, -1.5L, -4.516698239814521372306784062043266700598e-4933L, -1.194763217287109304111930828519090523536L, UNDERFLOW_EXCEPTION),
3349 TEST_c_c (casin, 1.5L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3350 TEST_c_c (casin, -1.5L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 9.624236501192068949955178268487368462704e-1L),
3351 TEST_c_c (casin, 1.5L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3352 TEST_c_c (casin, -1.5L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -9.624236501192068949955178268487368462704e-1L),
3353#endif
3354
3355 TEST_c_c (casin, 0.5L, 1.0L, 3.494390628572132936274118260753699527325e-1L, 9.261330313501824245501244453057873152694e-1L),
3356 TEST_c_c (casin, 0.5L, -1.0L, 3.494390628572132936274118260753699527325e-1L, -9.261330313501824245501244453057873152694e-1L),
3357 TEST_c_c (casin, -0.5L, 1.0L, -3.494390628572132936274118260753699527325e-1L, 9.261330313501824245501244453057873152694e-1L),
3358 TEST_c_c (casin, -0.5L, -1.0L, -3.494390628572132936274118260753699527325e-1L, -9.261330313501824245501244453057873152694e-1L),
3359 TEST_c_c (casin, 1.0L, 0.5L, 8.959074812088902390666567243275770102229e-1L, 7.328576759736452608886724437653071523305e-1L),
3360 TEST_c_c (casin, -1.0L, 0.5L, -8.959074812088902390666567243275770102229e-1L, 7.328576759736452608886724437653071523305e-1L),
3361 TEST_c_c (casin, 1.0L, -0.5L, 8.959074812088902390666567243275770102229e-1L, -7.328576759736452608886724437653071523305e-1L),
3362 TEST_c_c (casin, -1.0L, -0.5L, -8.959074812088902390666567243275770102229e-1L, -7.328576759736452608886724437653071523305e-1L),
3363 TEST_c_c (casin, 0.25L, 1.0L, 1.763024327769669304186785666360901026468e-1L, 8.924633639033482359562124741744951972772e-1L),
3364 TEST_c_c (casin, 0.25L, -1.0L, 1.763024327769669304186785666360901026468e-1L, -8.924633639033482359562124741744951972772e-1L),
3365 TEST_c_c (casin, -0.25L, 1.0L, -1.763024327769669304186785666360901026468e-1L, 8.924633639033482359562124741744951972772e-1L),
3366 TEST_c_c (casin, -0.25L, -1.0L, -1.763024327769669304186785666360901026468e-1L, -8.924633639033482359562124741744951972772e-1L),
3367 TEST_c_c (casin, 1.0L, 0.25L, 1.081751996523816326311037318425097434186L, 5.097911466811016354623559941115413499164e-1L),
3368 TEST_c_c (casin, -1.0L, 0.25L, -1.081751996523816326311037318425097434186L, 5.097911466811016354623559941115413499164e-1L),
3369 TEST_c_c (casin, 1.0L, -0.25L, 1.081751996523816326311037318425097434186L, -5.097911466811016354623559941115413499164e-1L),
3370 TEST_c_c (casin, -1.0L, -0.25L, -1.081751996523816326311037318425097434186L, -5.097911466811016354623559941115413499164e-1L),
3371 TEST_c_c (casin, 0x1.fp-10L, 1.0L, 1.337909359557740912558349531052239112857e-3L, 8.813742198809567991336704287826445879025e-1L),
3372 TEST_c_c (casin, 0x1.fp-10L, -1.0L, 1.337909359557740912558349531052239112857e-3L, -8.813742198809567991336704287826445879025e-1L),
3373 TEST_c_c (casin, -0x1.fp-10L, 1.0L, -1.337909359557740912558349531052239112857e-3L, 8.813742198809567991336704287826445879025e-1L),
3374 TEST_c_c (casin, -0x1.fp-10L, -1.0L, -1.337909359557740912558349531052239112857e-3L, -8.813742198809567991336704287826445879025e-1L),
3375 TEST_c_c (casin, 1.0L, 0x1.fp-10L, 1.527305029163877791518741192097931722508L, 4.350501469856803800217957402220976497152e-2L),
3376 TEST_c_c (casin, -1.0L, 0x1.fp-10L, -1.527305029163877791518741192097931722508L, 4.350501469856803800217957402220976497152e-2L),
3377 TEST_c_c (casin, 1.0L, -0x1.fp-10L, 1.527305029163877791518741192097931722508L, -4.350501469856803800217957402220976497152e-2L),
3378 TEST_c_c (casin, -1.0L, -0x1.fp-10L, -1.527305029163877791518741192097931722508L, -4.350501469856803800217957402220976497152e-2L),
3379 TEST_c_c (casin, 0x1.fp-30L, 1.0L, 1.275929984216518540252717485007112529021e-9L, 8.813735870195430258081932989769495326854e-1L),
3380 TEST_c_c (casin, 0x1.fp-30L, -1.0L, 1.275929984216518540252717485007112529021e-9L, -8.813735870195430258081932989769495326854e-1L),
3381 TEST_c_c (casin, -0x1.fp-30L, 1.0L, -1.275929984216518540252717485007112529021e-9L, 8.813735870195430258081932989769495326854e-1L),
3382 TEST_c_c (casin, -0x1.fp-30L, -1.0L, -1.275929984216518540252717485007112529021e-9L, -8.813735870195430258081932989769495326854e-1L),
3383 TEST_c_c (casin, 1.0L, 0x1.fp-30L, 1.570753848123921942730162693731872690232L, 4.247867098745151888768727039216644758847e-5L),
3384 TEST_c_c (casin, -1.0L, 0x1.fp-30L, -1.570753848123921942730162693731872690232L, 4.247867098745151888768727039216644758847e-5L),
3385 TEST_c_c (casin, 1.0L, -0x1.fp-30L, 1.570753848123921942730162693731872690232L, -4.247867098745151888768727039216644758847e-5L),
3386 TEST_c_c (casin, -1.0L, -0x1.fp-30L, -1.570753848123921942730162693731872690232L, -4.247867098745151888768727039216644758847e-5L),
3387 TEST_c_c (casin, 0x1.fp-100L, 1.0L, 1.080754735021050612990719608916167354321e-30L, 8.813735870195430252326093249797923090282e-1L),
3388 TEST_c_c (casin, 0x1.fp-100L, -1.0L, 1.080754735021050612990719608916167354321e-30L, -8.813735870195430252326093249797923090282e-1L),
3389 TEST_c_c (casin, -0x1.fp-100L, 1.0L, -1.080754735021050612990719608916167354321e-30L, 8.813735870195430252326093249797923090282e-1L),
3390 TEST_c_c (casin, -0x1.fp-100L, -1.0L, -1.080754735021050612990719608916167354321e-30L, -8.813735870195430252326093249797923090282e-1L),
3391 TEST_c_c (casin, 1.0L, 0x1.fp-100L, 1.570796326794895382939283431378862777584L, 1.236292038260260888664514866457202186027e-15L),
3392 TEST_c_c (casin, -1.0L, 0x1.fp-100L, -1.570796326794895382939283431378862777584L, 1.236292038260260888664514866457202186027e-15L),
3393 TEST_c_c (casin, 1.0L, -0x1.fp-100L, 1.570796326794895382939283431378862777584L, -1.236292038260260888664514866457202186027e-15L),
3394 TEST_c_c (casin, -1.0L, -0x1.fp-100L, -1.570796326794895382939283431378862777584L, -1.236292038260260888664514866457202186027e-15L),
3395 TEST_c_c (casin, 0x1.fp-129L, 1.0L, 2.013062564695348242280482517399205554874e-39L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3396 TEST_c_c (casin, 0x1.fp-129L, -1.0L, 2.013062564695348242280482517399205554874e-39L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3397 TEST_c_c (casin, -0x1.fp-129L, 1.0L, -2.013062564695348242280482517399205554874e-39L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3398 TEST_c_c (casin, -0x1.fp-129L, -1.0L, -2.013062564695348242280482517399205554874e-39L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3399 TEST_c_c (casin, 1.0L, 0x1.fp-129L, 1.570796326794896619177965338869929107115L, 5.335635276982233498398987585285818977933e-20L),
3400 TEST_c_c (casin, -1.0L, 0x1.fp-129L, -1.570796326794896619177965338869929107115L, 5.335635276982233498398987585285818977933e-20L),
3401 TEST_c_c (casin, 1.0L, -0x1.fp-129L, 1.570796326794896619177965338869929107115L, -5.335635276982233498398987585285818977933e-20L),
3402 TEST_c_c (casin, -1.0L, -0x1.fp-129L, -1.570796326794896619177965338869929107115L, -5.335635276982233498398987585285818977933e-20L),
0a1b2ae6 3403#ifndef TEST_FLOAT
08198877
JM
3404 TEST_c_c (casin, 0x1.fp-1000L, 1.0L, 1.278589251976747242280879285935084814093e-301L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3405 TEST_c_c (casin, 0x1.fp-1000L, -1.0L, 1.278589251976747242280879285935084814093e-301L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3406 TEST_c_c (casin, -0x1.fp-1000L, 1.0L, -1.278589251976747242280879285935084814093e-301L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3407 TEST_c_c (casin, -0x1.fp-1000L, -1.0L, -1.278589251976747242280879285935084814093e-301L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3408 TEST_c_c (casin, 1.0L, 0x1.fp-1000L, 1.570796326794896619231321691639751442099L, 4.252291453851660175550490409247739011867e-151L),
3409 TEST_c_c (casin, -1.0L, 0x1.fp-1000L, -1.570796326794896619231321691639751442099L, 4.252291453851660175550490409247739011867e-151L),
3410 TEST_c_c (casin, 1.0L, -0x1.fp-1000L, 1.570796326794896619231321691639751442099L, -4.252291453851660175550490409247739011867e-151L),
3411 TEST_c_c (casin, -1.0L, -0x1.fp-1000L, -1.570796326794896619231321691639751442099L, -4.252291453851660175550490409247739011867e-151L),
3412 TEST_c_c (casin, 0x1.fp-1025L, 1.0L, 3.810492908885321743133304375216617626230e-309L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3413 TEST_c_c (casin, 0x1.fp-1025L, -1.0L, 3.810492908885321743133304375216617626230e-309L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3414 TEST_c_c (casin, -0x1.fp-1025L, 1.0L, -3.810492908885321743133304375216617626230e-309L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3415 TEST_c_c (casin, -0x1.fp-1025L, -1.0L, -3.810492908885321743133304375216617626230e-309L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3416 TEST_c_c (casin, 1.0L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 7.340879205566679497036857179189356754017e-155L),
3417 TEST_c_c (casin, -1.0L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 7.340879205566679497036857179189356754017e-155L),
3418 TEST_c_c (casin, 1.0L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -7.340879205566679497036857179189356754017e-155L),
3419 TEST_c_c (casin, -1.0L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -7.340879205566679497036857179189356754017e-155L),
0a1b2ae6
JM
3420#endif
3421#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
3422 TEST_c_c (casin, 0x1.fp-10000L, 1.0L, 6.867047849047171855399183659351043150871e-3011L, 8.813735870195430252326093249797923090282e-1L),
3423 TEST_c_c (casin, 0x1.fp-10000L, -1.0L, 6.867047849047171855399183659351043150871e-3011L, -8.813735870195430252326093249797923090282e-1L),
3424 TEST_c_c (casin, -0x1.fp-10000L, 1.0L, -6.867047849047171855399183659351043150871e-3011L, 8.813735870195430252326093249797923090282e-1L),
3425 TEST_c_c (casin, -0x1.fp-10000L, -1.0L, -6.867047849047171855399183659351043150871e-3011L, -8.813735870195430252326093249797923090282e-1L),
3426 TEST_c_c (casin, 1.0L, 0x1.fp-10000L, 1.570796326794896619231321691639751442099L, 9.854680208706673586644342922051388714633e-1506L),
3427 TEST_c_c (casin, -1.0L, 0x1.fp-10000L, -1.570796326794896619231321691639751442099L, 9.854680208706673586644342922051388714633e-1506L),
3428 TEST_c_c (casin, 1.0L, -0x1.fp-10000L, 1.570796326794896619231321691639751442099L, -9.854680208706673586644342922051388714633e-1506L),
3429 TEST_c_c (casin, -1.0L, -0x1.fp-10000L, -1.570796326794896619231321691639751442099L, -9.854680208706673586644342922051388714633e-1506L),
3430 TEST_c_c (casin, 0x1.fp-16385L, 1.0L, 5.757683115456107044131264955348448954458e-4933L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3431 TEST_c_c (casin, 0x1.fp-16385L, -1.0L, 5.757683115456107044131264955348448954458e-4933L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3432 TEST_c_c (casin, -0x1.fp-16385L, 1.0L, -5.757683115456107044131264955348448954458e-4933L, 8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3433 TEST_c_c (casin, -0x1.fp-16385L, -1.0L, -5.757683115456107044131264955348448954458e-4933L, -8.813735870195430252326093249797923090282e-1L, UNDERFLOW_EXCEPTION),
3434 TEST_c_c (casin, 1.0L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 9.023632056840860275214893047597614177639e-2467L),
3435 TEST_c_c (casin, -1.0L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 9.023632056840860275214893047597614177639e-2467L),
3436 TEST_c_c (casin, 1.0L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -9.023632056840860275214893047597614177639e-2467L),
3437 TEST_c_c (casin, -1.0L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -9.023632056840860275214893047597614177639e-2467L),
3438#endif
3439
3440 TEST_c_c (casin, 0x1p-23L, 0x1.000002p0L, 8.429369199749229560964789467980644296420e-8L, 8.813736713132400470205730751186547909968e-1L),
3441 TEST_c_c (casin, 0x1p-23L, -0x1.000002p0L, 8.429369199749229560964789467980644296420e-8L, -8.813736713132400470205730751186547909968e-1L),
3442 TEST_c_c (casin, -0x1p-23L, 0x1.000002p0L, -8.429369199749229560964789467980644296420e-8L, 8.813736713132400470205730751186547909968e-1L),
3443 TEST_c_c (casin, -0x1p-23L, -0x1.000002p0L, -8.429369199749229560964789467980644296420e-8L, -8.813736713132400470205730751186547909968e-1L),
3444 TEST_c_c (casin, 0x1.000002p0L, 0x1p-23L, 1.570574114956455764594481054234834678422L, 5.364668491573609633134147164031476452679e-4L),
3445 TEST_c_c (casin, -0x1.000002p0L, 0x1p-23L, -1.570574114956455764594481054234834678422L, 5.364668491573609633134147164031476452679e-4L),
3446 TEST_c_c (casin, 0x1.000002p0L, -0x1p-23L, 1.570574114956455764594481054234834678422L, -5.364668491573609633134147164031476452679e-4L),
3447 TEST_c_c (casin, -0x1.000002p0L, -0x1p-23L, -1.570574114956455764594481054234834678422L, -5.364668491573609633134147164031476452679e-4L),
3448 TEST_c_c (casin, 0x1.fp-129L, 0x1.000002p0L, 2.013062444707472738895109955455676357057e-39L, 8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3449 TEST_c_c (casin, 0x1.fp-129L, -0x1.000002p0L, 2.013062444707472738895109955455676357057e-39L, -8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3450 TEST_c_c (casin, -0x1.fp-129L, 0x1.000002p0L, -2.013062444707472738895109955455676357057e-39L, 8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3451 TEST_c_c (casin, -0x1.fp-129L, -0x1.000002p0L, -2.013062444707472738895109955455676357057e-39L, -8.813736713132375348727889167749389235161e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3452 TEST_c_c (casin, 0x1.000002p0L, 0x1.fp-129L, 1.570796326794896619231321691639751436268L, 4.882812451493617206486388134172712975070e-4L),
3453 TEST_c_c (casin, -0x1.000002p0L, 0x1.fp-129L, -1.570796326794896619231321691639751436268L, 4.882812451493617206486388134172712975070e-4L),
3454 TEST_c_c (casin, 0x1.000002p0L, -0x1.fp-129L, 1.570796326794896619231321691639751436268L, -4.882812451493617206486388134172712975070e-4L),
3455 TEST_c_c (casin, -0x1.000002p0L, -0x1.fp-129L, -1.570796326794896619231321691639751436268L, -4.882812451493617206486388134172712975070e-4L),
3456 TEST_c_c (casin, 0.0L, 0x1.000002p0L, 0.0L, 8.813736713132375348727889167749389235161e-1L),
3457 TEST_c_c (casin, 0.0L, -0x1.000002p0L, 0.0L, -8.813736713132375348727889167749389235161e-1L),
3458 TEST_c_c (casin, -0.0L, 0x1.000002p0L, -0.0L, 8.813736713132375348727889167749389235161e-1L),
3459 TEST_c_c (casin, -0.0L, -0x1.000002p0L, -0.0L, -8.813736713132375348727889167749389235161e-1L),
3460 TEST_c_c (casin, 0x1.000002p0L, 0.0L, 1.570796326794896619231321691639751442099L, 4.882812451493617206486388134172712975070e-4L),
3461 TEST_c_c (casin, -0x1.000002p0L, 0.0L, -1.570796326794896619231321691639751442099L, 4.882812451493617206486388134172712975070e-4L),
3462 TEST_c_c (casin, 0x1.000002p0L, -0.0L, 1.570796326794896619231321691639751442099L, -4.882812451493617206486388134172712975070e-4L),
3463 TEST_c_c (casin, -0x1.000002p0L, -0.0L, -1.570796326794896619231321691639751442099L, -4.882812451493617206486388134172712975070e-4L),
3a7182a1 3464#ifndef TEST_FLOAT
08198877
JM
3465 TEST_c_c (casin, 0x1p-52L, 0x1.0000000000001p0L, 1.570092458683774885078102529858632363236e-16L, 8.813735870195431822418551933572982483664e-1L),
3466 TEST_c_c (casin, 0x1p-52L, -0x1.0000000000001p0L, 1.570092458683774885078102529858632363236e-16L, -8.813735870195431822418551933572982483664e-1L),
3467 TEST_c_c (casin, -0x1p-52L, 0x1.0000000000001p0L, -1.570092458683774885078102529858632363236e-16L, 8.813735870195431822418551933572982483664e-1L),
3468 TEST_c_c (casin, -0x1p-52L, -0x1.0000000000001p0L, -1.570092458683774885078102529858632363236e-16L, -8.813735870195431822418551933572982483664e-1L),
3469 TEST_c_c (casin, 0x1.0000000000001p0L, 0x1p-52L, 1.570796317204594913251280305810847349436L, 2.315303644582684770975188768022139415020e-8L),
3470 TEST_c_c (casin, -0x1.0000000000001p0L, 0x1p-52L, -1.570796317204594913251280305810847349436L, 2.315303644582684770975188768022139415020e-8L),
3471 TEST_c_c (casin, 0x1.0000000000001p0L, -0x1p-52L, 1.570796317204594913251280305810847349436L, -2.315303644582684770975188768022139415020e-8L),
3472 TEST_c_c (casin, -0x1.0000000000001p0L, -0x1p-52L, -1.570796317204594913251280305810847349436L, -2.315303644582684770975188768022139415020e-8L),
3473 TEST_c_c (casin, 0x1.fp-1025L, 0x1.0000000000001p0L, 3.810492908885321320083608113679347200012e-309L, 8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3474 TEST_c_c (casin, 0x1.fp-1025L, -0x1.0000000000001p0L, 3.810492908885321320083608113679347200012e-309L, -8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3475 TEST_c_c (casin, -0x1.fp-1025L, 0x1.0000000000001p0L, -3.810492908885321320083608113679347200012e-309L, 8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3476 TEST_c_c (casin, -0x1.fp-1025L, -0x1.0000000000001p0L, -3.810492908885321320083608113679347200012e-309L, -8.813735870195431822418551933572895326024e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3477 TEST_c_c (casin, 0x1.0000000000001p0L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3478 TEST_c_c (casin, -0x1.0000000000001p0L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3479 TEST_c_c (casin, 0x1.0000000000001p0L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3480 TEST_c_c (casin, -0x1.0000000000001p0L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3481 TEST_c_c (casin, 0.0L, 0x1.0000000000001p0L, 0.0L, 8.813735870195431822418551933572895326024e-1L),
3482 TEST_c_c (casin, 0.0L, -0x1.0000000000001p0L, 0.0L, -8.813735870195431822418551933572895326024e-1L),
3483 TEST_c_c (casin, -0.0L, 0x1.0000000000001p0L, -0.0L, 8.813735870195431822418551933572895326024e-1L),
3484 TEST_c_c (casin, -0.0L, -0x1.0000000000001p0L, -0.0L, -8.813735870195431822418551933572895326024e-1L),
3485 TEST_c_c (casin, 0x1.0000000000001p0L, 0.0L, 1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3486 TEST_c_c (casin, -0x1.0000000000001p0L, 0.0L, -1.570796326794896619231321691639751442099L, 2.107342425544701550354780375182800088393e-8L),
3487 TEST_c_c (casin, 0x1.0000000000001p0L, -0.0L, 1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3488 TEST_c_c (casin, -0x1.0000000000001p0L, -0.0L, -1.570796326794896619231321691639751442099L, -2.107342425544701550354780375182800088393e-8L),
3a7182a1
JM
3489#endif
3490#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM
3491 TEST_c_c (casin, 0x1p-63L, 0x1.0000000000000002p0L, 7.666467083416870406778649849746878368519e-20L, 8.813735870195430253092739958139610131001e-1L),
3492 TEST_c_c (casin, 0x1p-63L, -0x1.0000000000000002p0L, 7.666467083416870406778649849746878368519e-20L, -8.813735870195430253092739958139610131001e-1L),
3493 TEST_c_c (casin, -0x1p-63L, 0x1.0000000000000002p0L, -7.666467083416870406778649849746878368519e-20L, 8.813735870195430253092739958139610131001e-1L),
3494 TEST_c_c (casin, -0x1p-63L, -0x1.0000000000000002p0L, -7.666467083416870406778649849746878368519e-20L, -8.813735870195430253092739958139610131001e-1L),
3495 TEST_c_c (casin, 0x1.0000000000000002p0L, 0x1p-63L, 1.570796326582978888921215348380499122131L, 5.116146586219826555037807251857670783420e-10L),
3496 TEST_c_c (casin, -0x1.0000000000000002p0L, 0x1p-63L, -1.570796326582978888921215348380499122131L, 5.116146586219826555037807251857670783420e-10L),
3497 TEST_c_c (casin, 0x1.0000000000000002p0L, -0x1p-63L, 1.570796326582978888921215348380499122131L, -5.116146586219826555037807251857670783420e-10L),
3498 TEST_c_c (casin, -0x1.0000000000000002p0L, -0x1p-63L, -1.570796326582978888921215348380499122131L, -5.116146586219826555037807251857670783420e-10L),
3a7182a1 3499# if LDBL_MIN_EXP <= -16381
08198877
JM
3500 TEST_c_c (casin, 0x1.fp-16385L, 0x1.0000000000000002p0L, 5.757683115456107043819140328235418018963e-4933L, 8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3501 TEST_c_c (casin, 0x1.fp-16385L, -0x1.0000000000000002p0L, 5.757683115456107043819140328235418018963e-4933L, -8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3502 TEST_c_c (casin, -0x1.fp-16385L, 0x1.0000000000000002p0L, -5.757683115456107043819140328235418018963e-4933L, 8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3503 TEST_c_c (casin, -0x1.fp-16385L, -0x1.0000000000000002p0L, -5.757683115456107043819140328235418018963e-4933L, -8.813735870195430253092739958139610130980e-1L, UNDERFLOW_EXCEPTION),
3504 TEST_c_c (casin, 0x1.0000000000000002p0L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3505 TEST_c_c (casin, -0x1.0000000000000002p0L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3506 TEST_c_c (casin, 0x1.0000000000000002p0L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3507 TEST_c_c (casin, -0x1.0000000000000002p0L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3a7182a1 3508# endif
08198877
JM
3509 TEST_c_c (casin, 0.0L, 0x1.0000000000000002p0L, 0.0L, 8.813735870195430253092739958139610130980e-1L),
3510 TEST_c_c (casin, 0.0L, -0x1.0000000000000002p0L, 0.0L, -8.813735870195430253092739958139610130980e-1L),
3511 TEST_c_c (casin, -0.0L, 0x1.0000000000000002p0L, -0.0L, 8.813735870195430253092739958139610130980e-1L),
3512 TEST_c_c (casin, -0.0L, -0x1.0000000000000002p0L, -0.0L, -8.813735870195430253092739958139610130980e-1L),
3513 TEST_c_c (casin, 0x1.0000000000000002p0L, 0.0L, 1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3514 TEST_c_c (casin, -0x1.0000000000000002p0L, 0.0L, -1.570796326794896619231321691639751442099L, 4.656612873077392578082927418388212703712e-10L),
3515 TEST_c_c (casin, 0x1.0000000000000002p0L, -0.0L, 1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3516 TEST_c_c (casin, -0x1.0000000000000002p0L, -0.0L, -1.570796326794896619231321691639751442099L, -4.656612873077392578082927418388212703712e-10L),
3a7182a1
JM
3517#endif
3518#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM
3519 TEST_c_c (casin, 0x1p-106L, 0x1.000000000000000000000000008p0L, 8.715763992105246878957416200936726072500e-33L, 8.813735870195430252326093249798097405561e-1L),
3520 TEST_c_c (casin, 0x1p-106L, -0x1.000000000000000000000000008p0L, 8.715763992105246878957416200936726072500e-33L, -8.813735870195430252326093249798097405561e-1L),
3521 TEST_c_c (casin, -0x1p-106L, 0x1.000000000000000000000000008p0L, -8.715763992105246878957416200936726072500e-33L, 8.813735870195430252326093249798097405561e-1L),
3522 TEST_c_c (casin, -0x1p-106L, -0x1.000000000000000000000000008p0L, -8.715763992105246878957416200936726072500e-33L, -8.813735870195430252326093249798097405561e-1L),
3523 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, 0x1p-106L, 1.570796326794896565289107467733682961928L, 2.285028863093221674154232933662774454211e-16L),
3524 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, 0x1p-106L, -1.570796326794896565289107467733682961928L, 2.285028863093221674154232933662774454211e-16L),
3525 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, -0x1p-106L, 1.570796326794896565289107467733682961928L, -2.285028863093221674154232933662774454211e-16L),
3526 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, -0x1p-106L, -1.570796326794896565289107467733682961928L, -2.285028863093221674154232933662774454211e-16L),
3527 TEST_c_c (casin, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 3.810492908885321743133304375216570658278e-309L, 8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3528 TEST_c_c (casin, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 3.810492908885321743133304375216570658278e-309L, -8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3529 TEST_c_c (casin, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, -3.810492908885321743133304375216570658278e-309L, 8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3530 TEST_c_c (casin, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, -3.810492908885321743133304375216570658278e-309L, -8.813735870195430252326093249798097405561e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3531 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3532 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, -1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3533 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3534 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, -1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3535 TEST_c_c (casin, 0.0L, 0x1.000000000000000000000000008p0L, 0.0L, 8.813735870195430252326093249798097405561e-1L),
3536 TEST_c_c (casin, 0.0L, -0x1.000000000000000000000000008p0L, 0.0L, -8.813735870195430252326093249798097405561e-1L),
3537 TEST_c_c (casin, -0.0L, 0x1.000000000000000000000000008p0L, -0.0L, 8.813735870195430252326093249798097405561e-1L),
3538 TEST_c_c (casin, -0.0L, -0x1.000000000000000000000000008p0L, -0.0L, -8.813735870195430252326093249798097405561e-1L),
3539 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, 0.0L, 1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3540 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, 0.0L, -1.570796326794896619231321691639751442099L, 2.220446049250313080847263336181636063482e-16L),
3541 TEST_c_c (casin, 0x1.000000000000000000000000008p0L, -0.0L, 1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3542 TEST_c_c (casin, -0x1.000000000000000000000000008p0L, -0.0L, -1.570796326794896619231321691639751442099L, -2.220446049250313080847263336181636063482e-16L),
3a7182a1
JM
3543#endif
3544#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM
3545 TEST_c_c (casin, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 6.809190618832224124185481406981900518193e-35L, 8.813735870195430252326093249797924452120e-1L),
3546 TEST_c_c (casin, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 6.809190618832224124185481406981900518193e-35L, -8.813735870195430252326093249797924452120e-1L),
3547 TEST_c_c (casin, -0x1p-113L, 0x1.0000000000000000000000000001p0L, -6.809190618832224124185481406981900518193e-35L, 8.813735870195430252326093249797924452120e-1L),
3548 TEST_c_c (casin, -0x1p-113L, -0x1.0000000000000000000000000001p0L, -6.809190618832224124185481406981900518193e-35L, -8.813735870195430252326093249797924452120e-1L),
3549 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 1.570796326794896614463458507897073960405L, 2.019699255375255198156433710951064632386e-17L),
3550 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, 0x1p-113L, -1.570796326794896614463458507897073960405L, 2.019699255375255198156433710951064632386e-17L),
3551 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 1.570796326794896614463458507897073960405L, -2.019699255375255198156433710951064632386e-17L),
3552 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, -0x1p-113L, -1.570796326794896614463458507897073960405L, -2.019699255375255198156433710951064632386e-17L),
3553 TEST_c_c (casin, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 5.757683115456107044131264955348448400014e-4933L, 8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3554 TEST_c_c (casin, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 5.757683115456107044131264955348448400014e-4933L, -8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3555 TEST_c_c (casin, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, -5.757683115456107044131264955348448400014e-4933L, 8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3556 TEST_c_c (casin, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, -5.757683115456107044131264955348448400014e-4933L, -8.813735870195430252326093249797924452120e-1L, UNDERFLOW_EXCEPTION),
3557 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3558 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, -1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3559 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3560 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, -1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3561 TEST_c_c (casin, 0.0L, 0x1.0000000000000000000000000001p0L, 0.0L, 8.813735870195430252326093249797924452120e-1L),
3562 TEST_c_c (casin, 0.0L, -0x1.0000000000000000000000000001p0L, 0.0L, -8.813735870195430252326093249797924452120e-1L),
3563 TEST_c_c (casin, -0.0L, 0x1.0000000000000000000000000001p0L, -0.0L, 8.813735870195430252326093249797924452120e-1L),
3564 TEST_c_c (casin, -0.0L, -0x1.0000000000000000000000000001p0L, -0.0L, -8.813735870195430252326093249797924452120e-1L),
3565 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, 0.0L, 1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3566 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, 0.0L, -1.570796326794896619231321691639751442099L, 1.962615573354718824241727964954454332780e-17L),
3567 TEST_c_c (casin, 0x1.0000000000000000000000000001p0L, -0.0L, 1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3568 TEST_c_c (casin, -0x1.0000000000000000000000000001p0L, -0.0L, -1.570796326794896619231321691639751442099L, -1.962615573354718824241727964954454332780e-17L),
3569#endif
3570
3571 TEST_c_c (casin, 0x1p-23L, 0x0.ffffffp0L, 8.429369953393598499000760938112968755257e-8L, 8.813735448726963984495965873956465777250e-1L),
3572 TEST_c_c (casin, 0x1p-23L, -0x0.ffffffp0L, 8.429369953393598499000760938112968755257e-8L, -8.813735448726963984495965873956465777250e-1L),
3573 TEST_c_c (casin, -0x1p-23L, 0x0.ffffffp0L, -8.429369953393598499000760938112968755257e-8L, 8.813735448726963984495965873956465777250e-1L),
3574 TEST_c_c (casin, -0x1p-23L, -0x0.ffffffp0L, -8.429369953393598499000760938112968755257e-8L, -8.813735448726963984495965873956465777250e-1L),
3575 TEST_c_c (casin, 0x0.ffffffp0L, 0x1p-23L, 1.570357140408705570520377172865353621698L, 2.714321200917194650737217746780928423385e-4L),
3576 TEST_c_c (casin, -0x0.ffffffp0L, 0x1p-23L, -1.570357140408705570520377172865353621698L, 2.714321200917194650737217746780928423385e-4L),
3577 TEST_c_c (casin, 0x0.ffffffp0L, -0x1p-23L, 1.570357140408705570520377172865353621698L, -2.714321200917194650737217746780928423385e-4L),
3578 TEST_c_c (casin, -0x0.ffffffp0L, -0x1p-23L, -1.570357140408705570520377172865353621698L, -2.714321200917194650737217746780928423385e-4L),
3579 TEST_c_c (casin, 0x1.fp-129L, 0x0.ffffffp0L, 2.013062624689288675911339929224634593425e-39L, 8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3580 TEST_c_c (casin, 0x1.fp-129L, -0x0.ffffffp0L, 2.013062624689288675911339929224634593425e-39L, -8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3581 TEST_c_c (casin, -0x1.fp-129L, 0x0.ffffffp0L, -2.013062624689288675911339929224634593425e-39L, 8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3582 TEST_c_c (casin, -0x1.fp-129L, -0x0.ffffffp0L, -2.013062624689288675911339929224634593425e-39L, -8.813735448726938863015878255140556727969e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3583 TEST_c_c (casin, 0x0.ffffffp0L, 0x1.fp-129L, 1.570451059810180415643718442157112705601L, 8.245504387859737323891843603996428534945e-36L),
3584 TEST_c_c (casin, -0x0.ffffffp0L, 0x1.fp-129L, -1.570451059810180415643718442157112705601L, 8.245504387859737323891843603996428534945e-36L),
3585 TEST_c_c (casin, 0x0.ffffffp0L, -0x1.fp-129L, 1.570451059810180415643718442157112705601L, -8.245504387859737323891843603996428534945e-36L),
3586 TEST_c_c (casin, -0x0.ffffffp0L, -0x1.fp-129L, -1.570451059810180415643718442157112705601L, -8.245504387859737323891843603996428534945e-36L),
3587 TEST_c_c (casin, 0.0L, 0x0.ffffffp0L, 0.0L, 8.813735448726938863015878255140556727969e-1L),
3588 TEST_c_c (casin, 0.0L, -0x0.ffffffp0L, 0.0L, -8.813735448726938863015878255140556727969e-1L),
3589 TEST_c_c (casin, -0.0L, 0x0.ffffffp0L, -0.0L, 8.813735448726938863015878255140556727969e-1L),
3590 TEST_c_c (casin, -0.0L, -0x0.ffffffp0L, -0.0L, -8.813735448726938863015878255140556727969e-1L),
3591 TEST_c_c (casin, 0x0.ffffffp0L, 0.0L, 1.570451059810180415643718442157112705601L, 0.0L),
3592 TEST_c_c (casin, -0x0.ffffffp0L, 0.0L, -1.570451059810180415643718442157112705601L, 0.0L),
3593 TEST_c_c (casin, 0x0.ffffffp0L, -0.0L, 1.570451059810180415643718442157112705601L, -0.0L),
3594 TEST_c_c (casin, -0x0.ffffffp0L, -0.0L, -1.570451059810180415643718442157112705601L, -0.0L),
3595 TEST_c_c (casin, 0x1p-23L, 0.5L, 1.066240299940009780479664302917201696886e-7L, 4.812118250596059896127318386463676808798e-1L),
3596 TEST_c_c (casin, 0x1p-23L, -0.5L, 1.066240299940009780479664302917201696886e-7L, -4.812118250596059896127318386463676808798e-1L),
3597 TEST_c_c (casin, -0x1p-23L, 0.5L, -1.066240299940009780479664302917201696886e-7L, 4.812118250596059896127318386463676808798e-1L),
3598 TEST_c_c (casin, -0x1p-23L, -0.5L, -1.066240299940009780479664302917201696886e-7L, -4.812118250596059896127318386463676808798e-1L),
3599 TEST_c_c (casin, 0.5L, 0x1p-23L, 5.235987755982934033165770729745469098254e-1L, 1.376510308240943236356088341381173571841e-7L),
3600 TEST_c_c (casin, -0.5L, 0x1p-23L, -5.235987755982934033165770729745469098254e-1L, 1.376510308240943236356088341381173571841e-7L),
3601 TEST_c_c (casin, 0.5L, -0x1p-23L, 5.235987755982934033165770729745469098254e-1L, -1.376510308240943236356088341381173571841e-7L),
3602 TEST_c_c (casin, -0.5L, -0x1p-23L, -5.235987755982934033165770729745469098254e-1L, -1.376510308240943236356088341381173571841e-7L),
3603 TEST_c_c (casin, 0x1.fp-129L, 0.5L, 2.546345110742945032959687790021055102355e-39L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3604 TEST_c_c (casin, 0x1.fp-129L, -0.5L, 2.546345110742945032959687790021055102355e-39L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3605 TEST_c_c (casin, -0x1.fp-129L, 0.5L, -2.546345110742945032959687790021055102355e-39L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3606 TEST_c_c (casin, -0x1.fp-129L, -0.5L, -2.546345110742945032959687790021055102355e-39L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_FLOAT),
3607 TEST_c_c (casin, 0.5L, 0x1.fp-129L, 5.235987755982988730771072305465838140329e-1L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3608 TEST_c_c (casin, -0.5L, 0x1.fp-129L, -5.235987755982988730771072305465838140329e-1L, 3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3609 TEST_c_c (casin, 0.5L, -0x1.fp-129L, 5.235987755982988730771072305465838140329e-1L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3610 TEST_c_c (casin, -0.5L, -0x1.fp-129L, -5.235987755982988730771072305465838140329e-1L, -3.287317402534702257036015056278368274737e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3611 TEST_c_c (casin, 0x1p-23L, 0x1p-23L, 1.192092895507806853113684971258850504935e-7L, 1.192092895507818146886315028596704749235e-7L),
3612 TEST_c_c (casin, 0x1p-23L, -0x1p-23L, 1.192092895507806853113684971258850504935e-7L, -1.192092895507818146886315028596704749235e-7L),
3613 TEST_c_c (casin, -0x1p-23L, 0x1p-23L, -1.192092895507806853113684971258850504935e-7L, 1.192092895507818146886315028596704749235e-7L),
3614 TEST_c_c (casin, -0x1p-23L, -0x1p-23L, -1.192092895507806853113684971258850504935e-7L, -1.192092895507818146886315028596704749235e-7L),
3615 /* Bug 15319: underflow exception may be missing. */
3616 TEST_c_c (casin, 0x1.fp-129L, 0x1p-23L, 2.846900380897707329917933005874691056564e-39L, 1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3617 TEST_c_c (casin, 0x1.fp-129L, -0x1p-23L, 2.846900380897707329917933005874691056564e-39L, -1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3618 TEST_c_c (casin, -0x1.fp-129L, 0x1p-23L, -2.846900380897707329917933005874691056564e-39L, 1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3619 TEST_c_c (casin, -0x1.fp-129L, -0x1p-23L, -2.846900380897707329917933005874691056564e-39L, -1.192092895507809676556842485683592032154e-7L, UNDERFLOW_EXCEPTION_OK_FLOAT),
3620 TEST_c_c (casin, 0x1p-23L, 0x1.fp-129L, 1.192092895507815323443157514352519154304e-7L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3621 TEST_c_c (casin, -0x1p-23L, 0x1.fp-129L, -1.192092895507815323443157514352519154304e-7L, 2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3622 TEST_c_c (casin, 0x1p-23L, -0x1.fp-129L, 1.192092895507815323443157514352519154304e-7L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3623 TEST_c_c (casin, -0x1p-23L, -0x1.fp-129L, -1.192092895507815323443157514352519154304e-7L, -2.846900380897747786805634596726756660388e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3624 TEST_c_c (casin, 0.0L, 0x1p-23L, 0.0L, 1.192092895507809676556842485683592032154e-7L),
3625 TEST_c_c (casin, 0.0L, -0x1p-23L, 0.0L, -1.192092895507809676556842485683592032154e-7L),
3626 TEST_c_c (casin, -0.0L, 0x1p-23L, -0.0L, 1.192092895507809676556842485683592032154e-7L),
3627 TEST_c_c (casin, -0.0L, -0x1p-23L, -0.0L, -1.192092895507809676556842485683592032154e-7L),
3628 TEST_c_c (casin, 0x1p-23L, 0.0L, 1.192092895507815323443157514352519154304e-7L, 0.0L),
3629 TEST_c_c (casin, -0x1p-23L, 0.0L, -1.192092895507815323443157514352519154304e-7L, 0.0L),
3630 TEST_c_c (casin, 0x1p-23L, -0.0L, 1.192092895507815323443157514352519154304e-7L, -0.0L),
3631 TEST_c_c (casin, -0x1p-23L, -0.0L, -1.192092895507815323443157514352519154304e-7L, -0.0L),
3632 TEST_c_c (casin, 0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3633 TEST_c_c (casin, 0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3634 TEST_c_c (casin, -0x1.fp-129L, 0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
3635 TEST_c_c (casin, -0x1.fp-129L, -0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
ccc8cadf 3636#ifndef TEST_FLOAT
08198877
JM
3637 TEST_c_c (casin, 0x1p-52L, 0x0.fffffffffffff8p0L, 1.570092458683775146551022293016031474627e-16L, 8.813735870195429467279863907910458761820e-1L),
3638 TEST_c_c (casin, 0x1p-52L, -0x0.fffffffffffff8p0L, 1.570092458683775146551022293016031474627e-16L, -8.813735870195429467279863907910458761820e-1L),
3639 TEST_c_c (casin, -0x1p-52L, 0x0.fffffffffffff8p0L, -1.570092458683775146551022293016031474627e-16L, 8.813735870195429467279863907910458761820e-1L),
3640 TEST_c_c (casin, -0x1p-52L, -0x0.fffffffffffff8p0L, -1.570092458683775146551022293016031474627e-16L, -8.813735870195429467279863907910458761820e-1L),
3641 TEST_c_c (casin, 0x0.fffffffffffff8p0L, 0x1p-52L, 1.570796307840326780080580569360500172043L, 1.171456840272878582596796205397918831268e-8L),
3642 TEST_c_c (casin, -0x0.fffffffffffff8p0L, 0x1p-52L, -1.570796307840326780080580569360500172043L, 1.171456840272878582596796205397918831268e-8L),
3643 TEST_c_c (casin, 0x0.fffffffffffff8p0L, -0x1p-52L, 1.570796307840326780080580569360500172043L, -1.171456840272878582596796205397918831268e-8L),
3644 TEST_c_c (casin, -0x0.fffffffffffff8p0L, -0x1p-52L, -1.570796307840326780080580569360500172043L, -1.171456840272878582596796205397918831268e-8L),
3645 TEST_c_c (casin, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 3.810492908885321954658152505985270452320e-309L, 8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3646 TEST_c_c (casin, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 3.810492908885321954658152505985270452320e-309L, -8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3647 TEST_c_c (casin, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, -3.810492908885321954658152505985270452320e-309L, 8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3648 TEST_c_c (casin, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, -3.810492908885321954658152505985270452320e-309L, -8.813735870195429467279863907910371604180e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3649 TEST_c_c (casin, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 1.570796311893735425383665303776316016594L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3650 TEST_c_c (casin, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, -1.570796311893735425383665303776316016594L, 3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3651 TEST_c_c (casin, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 1.570796311893735425383665303776316016594L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3652 TEST_c_c (casin, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, -1.570796311893735425383665303776316016594L, -3.616396521699973256461764099945789620604e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3653 TEST_c_c (casin, 0.0L, 0x0.fffffffffffff8p0L, 0.0L, 8.813735870195429467279863907910371604180e-1L),
3654 TEST_c_c (casin, 0.0L, -0x0.fffffffffffff8p0L, 0.0L, -8.813735870195429467279863907910371604180e-1L),
3655 TEST_c_c (casin, -0.0L, 0x0.fffffffffffff8p0L, -0.0L, 8.813735870195429467279863907910371604180e-1L),
3656 TEST_c_c (casin, -0.0L, -0x0.fffffffffffff8p0L, -0.0L, -8.813735870195429467279863907910371604180e-1L),
3657 TEST_c_c (casin, 0x0.fffffffffffff8p0L, 0.0L, 1.570796311893735425383665303776316016594L, 0.0L),
3658 TEST_c_c (casin, -0x0.fffffffffffff8p0L, 0.0L, -1.570796311893735425383665303776316016594L, 0.0L),
3659 TEST_c_c (casin, 0x0.fffffffffffff8p0L, -0.0L, 1.570796311893735425383665303776316016594L, -0.0L),
3660 TEST_c_c (casin, -0x0.fffffffffffff8p0L, -0.0L, -1.570796311893735425383665303776316016594L, -0.0L),
3661#endif
3662 TEST_c_c (casin, 0x1p-52L, 0.5L, 1.986027322597818397661816253158024383707e-16L, 4.812118250596034474977589134243772428682e-1L),
3663 TEST_c_c (casin, 0x1p-52L, -0.5L, 1.986027322597818397661816253158024383707e-16L, -4.812118250596034474977589134243772428682e-1L),
3664 TEST_c_c (casin, -0x1p-52L, 0.5L, -1.986027322597818397661816253158024383707e-16L, 4.812118250596034474977589134243772428682e-1L),
3665 TEST_c_c (casin, -0x1p-52L, -0.5L, -1.986027322597818397661816253158024383707e-16L, -4.812118250596034474977589134243772428682e-1L),
3666 TEST_c_c (casin, 0.5L, 0x1p-52L, 5.235987755982988730771072305465648369889e-1L, 2.563950248511418570403591756798643804971e-16L),
3667 TEST_c_c (casin, -0.5L, 0x1p-52L, -5.235987755982988730771072305465648369889e-1L, 2.563950248511418570403591756798643804971e-16L),
3668 TEST_c_c (casin, 0.5L, -0x1p-52L, 5.235987755982988730771072305465648369889e-1L, -2.563950248511418570403591756798643804971e-16L),
3669 TEST_c_c (casin, -0.5L, -0x1p-52L, -5.235987755982988730771072305465648369889e-1L, -2.563950248511418570403591756798643804971e-16L),
ccc8cadf 3670#ifndef TEST_FLOAT
08198877
JM
3671 TEST_c_c (casin, 0x1.fp-1025L, 0.5L, 4.819934639999230680322935210539402497827e-309L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3672 TEST_c_c (casin, 0x1.fp-1025L, -0.5L, 4.819934639999230680322935210539402497827e-309L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3673 TEST_c_c (casin, -0x1.fp-1025L, 0.5L, -4.819934639999230680322935210539402497827e-309L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3674 TEST_c_c (casin, -0x1.fp-1025L, -0.5L, -4.819934639999230680322935210539402497827e-309L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3675 TEST_c_c (casin, 0.5L, 0x1.fp-1025L, 5.235987755982988730771072305465838140329e-1L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3676 TEST_c_c (casin, -0.5L, 0x1.fp-1025L, -5.235987755982988730771072305465838140329e-1L, 6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3677 TEST_c_c (casin, 0.5L, -0x1.fp-1025L, 5.235987755982988730771072305465838140329e-1L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3678 TEST_c_c (casin, -0.5L, -0x1.fp-1025L, -5.235987755982988730771072305465838140329e-1L, -6.222508863508420569166420770843207333493e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3679#endif
3680 TEST_c_c (casin, 0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181604132852e-16L, 2.220446049250313080847263336181677117148e-16L),
3681 TEST_c_c (casin, 0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181604132852e-16L, -2.220446049250313080847263336181677117148e-16L),
3682 TEST_c_c (casin, -0x1p-52L, 0x1p-52L, -2.220446049250313080847263336181604132852e-16L, 2.220446049250313080847263336181677117148e-16L),
3683 TEST_c_c (casin, -0x1p-52L, -0x1p-52L, -2.220446049250313080847263336181604132852e-16L, -2.220446049250313080847263336181677117148e-16L),
ccc8cadf 3684#ifndef TEST_FLOAT
08198877
JM
3685 /* Bug 15319: underflow exception may be missing. */
3686 TEST_c_c (casin, 0x1.fp-1025L, 0x1p-52L, 5.388850751072128349671657362289283247603e-309L, 2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3687 TEST_c_c (casin, 0x1.fp-1025L, -0x1p-52L, 5.388850751072128349671657362289283247603e-309L, -2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3688 TEST_c_c (casin, -0x1.fp-1025L, 0x1p-52L, -5.388850751072128349671657362289283247603e-309L, 2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3689 TEST_c_c (casin, -0x1.fp-1025L, -0x1p-52L, -5.388850751072128349671657362289283247603e-309L, -2.220446049250313080847263336181622378926e-16L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3690 TEST_c_c (casin, 0x1p-52L, 0x1.fp-1025L, 2.220446049250313080847263336181658871074e-16L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3691 TEST_c_c (casin, -0x1p-52L, 0x1.fp-1025L, -2.220446049250313080847263336181658871074e-16L, 5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3692 TEST_c_c (casin, 0x1p-52L, -0x1.fp-1025L, 2.220446049250313080847263336181658871074e-16L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3693 TEST_c_c (casin, -0x1p-52L, -0x1.fp-1025L, -2.220446049250313080847263336181658871074e-16L, -5.388850751072128349671657362289548938458e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3694#endif
3695 TEST_c_c (casin, 0.0L, 0x1p-52L, 0.0L, 2.220446049250313080847263336181622378926e-16L),
3696 TEST_c_c (casin, 0.0L, -0x1p-52L, 0.0L, -2.220446049250313080847263336181622378926e-16L),
3697 TEST_c_c (casin, -0.0L, 0x1p-52L, -0.0L, 2.220446049250313080847263336181622378926e-16L),
3698 TEST_c_c (casin, -0.0L, -0x1p-52L, -0.0L, -2.220446049250313080847263336181622378926e-16L),
3699 TEST_c_c (casin, 0x1p-52L, 0.0L, 2.220446049250313080847263336181658871074e-16L, 0.0L),
3700 TEST_c_c (casin, -0x1p-52L, 0.0L, -2.220446049250313080847263336181658871074e-16L, 0.0L),
3701 TEST_c_c (casin, 0x1p-52L, -0.0L, 2.220446049250313080847263336181658871074e-16L, -0.0L),
3702 TEST_c_c (casin, -0x1p-52L, -0.0L, -2.220446049250313080847263336181658871074e-16L, -0.0L),
ccc8cadf 3703#ifndef TEST_FLOAT
08198877
JM
3704 TEST_c_c (casin, 0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3705 TEST_c_c (casin, 0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3706 TEST_c_c (casin, -0x1.fp-1025L, 0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3707 TEST_c_c (casin, -0x1.fp-1025L, -0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
ccc8cadf
JM
3708#endif
3709#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM
3710 TEST_c_c (casin, 0x1p-63L, 0x0.ffffffffffffffffp0L, 7.666467083416870407402049869781566856442e-20L, 8.813735870195430251942769895627079569937e-1L),
3711 TEST_c_c (casin, 0x1p-63L, -0x0.ffffffffffffffffp0L, 7.666467083416870407402049869781566856442e-20L, -8.813735870195430251942769895627079569937e-1L),
3712 TEST_c_c (casin, -0x1p-63L, 0x0.ffffffffffffffffp0L, -7.666467083416870407402049869781566856442e-20L, 8.813735870195430251942769895627079569937e-1L),
3713 TEST_c_c (casin, -0x1p-63L, -0x0.ffffffffffffffffp0L, -7.666467083416870407402049869781566856442e-20L, -8.813735870195430251942769895627079569937e-1L),
3714 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, 0x1p-63L, 1.570796326376055842114524927965556247908L, 2.588578361325995866221775673638805081337e-10L),
3715 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, 0x1p-63L, -1.570796326376055842114524927965556247908L, 2.588578361325995866221775673638805081337e-10L),
3716 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, -0x1p-63L, 1.570796326376055842114524927965556247908L, -2.588578361325995866221775673638805081337e-10L),
3717 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, -0x1p-63L, -1.570796326376055842114524927965556247908L, -2.588578361325995866221775673638805081337e-10L),
ccc8cadf 3718# if LDBL_MIN_EXP <= -16381
08198877
JM
3719 TEST_c_c (casin, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 5.757683115456107044287327268904964422212e-4933L, 8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3720 TEST_c_c (casin, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 5.757683115456107044287327268904964422212e-4933L, -8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3721 TEST_c_c (casin, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, -5.757683115456107044287327268904964422212e-4933L, 8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3722 TEST_c_c (casin, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, -5.757683115456107044287327268904964422212e-4933L, -8.813735870195430251942769895627079569917e-1L, UNDERFLOW_EXCEPTION),
3723 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 1.570796326465624365239962068302568888898L, 2.472906068161537187835415298076415423459e-4923L),
3724 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, -1.570796326465624365239962068302568888898L, 2.472906068161537187835415298076415423459e-4923L),
3725 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 1.570796326465624365239962068302568888898L, -2.472906068161537187835415298076415423459e-4923L),
3726 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, -1.570796326465624365239962068302568888898L, -2.472906068161537187835415298076415423459e-4923L),
ccc8cadf 3727# endif
08198877
JM
3728 TEST_c_c (casin, 0.0L, 0x0.ffffffffffffffffp0L, 0.0L, 8.813735870195430251942769895627079569917e-1L),
3729 TEST_c_c (casin, 0.0L, -0x0.ffffffffffffffffp0L, 0.0L, -8.813735870195430251942769895627079569917e-1L),
3730 TEST_c_c (casin, -0.0L, 0x0.ffffffffffffffffp0L, -0.0L, 8.813735870195430251942769895627079569917e-1L),
3731 TEST_c_c (casin, -0.0L, -0x0.ffffffffffffffffp0L, -0.0L, -8.813735870195430251942769895627079569917e-1L),
3732 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, 0.0L, 1.570796326465624365239962068302568888898L, 0.0L),
3733 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, 0.0L, -1.570796326465624365239962068302568888898L, 0.0L),
3734 TEST_c_c (casin, 0x0.ffffffffffffffffp0L, -0.0L, 1.570796326465624365239962068302568888898L, -0.0L),
3735 TEST_c_c (casin, -0x0.ffffffffffffffffp0L, -0.0L, -1.570796326465624365239962068302568888898L, -0.0L),
3736#endif
3737 TEST_c_c (casin, 0x1p-63L, 0.5L, 9.697399036122160144833087173623140436413e-20L, 4.812118250596034474977589134243684231373e-1L),
3738 TEST_c_c (casin, 0x1p-63L, -0.5L, 9.697399036122160144833087173623140436413e-20L, -4.812118250596034474977589134243684231373e-1L),
3739 TEST_c_c (casin, -0x1p-63L, 0.5L, -9.697399036122160144833087173623140436413e-20L, 4.812118250596034474977589134243684231373e-1L),
3740 TEST_c_c (casin, -0x1p-63L, -0.5L, -9.697399036122160144833087173623140436413e-20L, -4.812118250596034474977589134243684231373e-1L),
3741 TEST_c_c (casin, 0.5L, 0x1p-63L, 5.235987755982988730771072305465838140283e-1L, 1.251928832280966098829878787499365228659e-19L),
3742 TEST_c_c (casin, -0.5L, 0x1p-63L, -5.235987755982988730771072305465838140283e-1L, 1.251928832280966098829878787499365228659e-19L),
3743 TEST_c_c (casin, 0.5L, -0x1p-63L, 5.235987755982988730771072305465838140283e-1L, -1.251928832280966098829878787499365228659e-19L),
3744 TEST_c_c (casin, -0.5L, -0x1p-63L, -5.235987755982988730771072305465838140283e-1L, -1.251928832280966098829878787499365228659e-19L),
ccc8cadf 3745#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
3746 TEST_c_c (casin, 0x1.fp-16385L, 0.5L, 7.282957076134209141226696333885150260319e-4933L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3747 TEST_c_c (casin, 0x1.fp-16385L, -0.5L, 7.282957076134209141226696333885150260319e-4933L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3748 TEST_c_c (casin, -0x1.fp-16385L, 0.5L, -7.282957076134209141226696333885150260319e-4933L, 4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3749 TEST_c_c (casin, -0x1.fp-16385L, -0.5L, -7.282957076134209141226696333885150260319e-4933L, -4.812118250596034474977589134243684231352e-1L, UNDERFLOW_EXCEPTION),
3750 TEST_c_c (casin, 0.5L, 0x1.fp-16385L, 5.235987755982988730771072305465838140329e-1L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3751 TEST_c_c (casin, -0.5L, 0x1.fp-16385L, -5.235987755982988730771072305465838140329e-1L, 9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3752 TEST_c_c (casin, 0.5L, -0x1.fp-16385L, 5.235987755982988730771072305465838140329e-1L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3753 TEST_c_c (casin, -0.5L, -0x1.fp-16385L, -5.235987755982988730771072305465838140329e-1L, -9.402257155670418112159334875199821342890e-4933L, UNDERFLOW_EXCEPTION),
3754#endif
3755 TEST_c_c (casin, 0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711422e-19L, 1.084202172485504434007452800869941711430e-19L),
3756 TEST_c_c (casin, 0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711422e-19L, -1.084202172485504434007452800869941711430e-19L),
3757 TEST_c_c (casin, -0x1p-63L, 0x1p-63L, -1.084202172485504434007452800869941711422e-19L, 1.084202172485504434007452800869941711430e-19L),
3758 TEST_c_c (casin, -0x1p-63L, -0x1p-63L, -1.084202172485504434007452800869941711422e-19L, -1.084202172485504434007452800869941711430e-19L),
ccc8cadf 3759#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
3760 TEST_c_c (casin, 0x1.fp-16385L, 0x1p-63L, 8.142593549724601460479922838826119584369e-4933L, 1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3761 TEST_c_c (casin, 0x1.fp-16385L, -0x1p-63L, 8.142593549724601460479922838826119584369e-4933L, -1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3762 TEST_c_c (casin, -0x1.fp-16385L, 0x1p-63L, -8.142593549724601460479922838826119584369e-4933L, 1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3763 TEST_c_c (casin, -0x1.fp-16385L, -0x1p-63L, -8.142593549724601460479922838826119584369e-4933L, -1.084202172485504434007452800869941711424e-19L, UNDERFLOW_EXCEPTION),
3764 TEST_c_c (casin, 0x1p-63L, 0x1.fp-16385L, 1.084202172485504434007452800869941711428e-19L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3765 TEST_c_c (casin, -0x1p-63L, 0x1.fp-16385L, -1.084202172485504434007452800869941711428e-19L, 8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3766 TEST_c_c (casin, 0x1p-63L, -0x1.fp-16385L, 1.084202172485504434007452800869941711428e-19L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3767 TEST_c_c (casin, -0x1p-63L, -0x1.fp-16385L, -1.084202172485504434007452800869941711428e-19L, -8.142593549724601460479922838826119584465e-4933L, UNDERFLOW_EXCEPTION),
3768#endif
3769 TEST_c_c (casin, 0.0L, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711424e-19L),
3770 TEST_c_c (casin, 0.0L, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711424e-19L),
3771 TEST_c_c (casin, -0.0L, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711424e-19L),
3772 TEST_c_c (casin, -0.0L, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711424e-19L),
3773 TEST_c_c (casin, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711428e-19L, 0.0L),
3774 TEST_c_c (casin, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711428e-19L, 0.0L),
3775 TEST_c_c (casin, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711428e-19L, -0.0L),
3776 TEST_c_c (casin, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711428e-19L, -0.0L),
ccc8cadf 3777#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
3778 TEST_c_c (casin, 0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3779 TEST_c_c (casin, 0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3780 TEST_c_c (casin, -0x1.fp-16385L, 0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3781 TEST_c_c (casin, -0x1.fp-16385L, -0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf
JM
3782#endif
3783#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM
3784 TEST_c_c (casin, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.743152798421049375791483240187377443526e-32L, 8.813735870195430252326093249797835932642e-1L),
3785 TEST_c_c (casin, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.743152798421049375791483240187377443526e-32L, -8.813735870195430252326093249797835932642e-1L),
3786 TEST_c_c (casin, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, -1.743152798421049375791483240187377443526e-32L, 8.813735870195430252326093249797835932642e-1L),
3787 TEST_c_c (casin, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, -1.743152798421049375791483240187377443526e-32L, -8.813735870195430252326093249797835932642e-1L),
3788 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 1.570796326794896419512475791677915736035L, 1.234330349600789959989661887846005659983e-16L),
3789 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, -1.570796326794896419512475791677915736035L, 1.234330349600789959989661887846005659983e-16L),
3790 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 1.570796326794896419512475791677915736035L, -1.234330349600789959989661887846005659983e-16L),
3791 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, -1.570796326794896419512475791677915736035L, -1.234330349600789959989661887846005659983e-16L),
3792 TEST_c_c (casin, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 3.810492908885321743133304375216641110205e-309L, 8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3793 TEST_c_c (casin, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 3.810492908885321743133304375216641110205e-309L, -8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3794 TEST_c_c (casin, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, -3.810492908885321743133304375216641110205e-309L, 8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3795 TEST_c_c (casin, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, -3.810492908885321743133304375216641110205e-309L, -8.813735870195430252326093249797835932642e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
3796 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 1.570796326794896462222075823262245502760L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3797 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, -1.570796326794896462222075823262245502760L, 3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3798 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 1.570796326794896462222075823262245502760L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3799 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, -1.570796326794896462222075823262245502760L, -3.432186888910770473784103112009399360940e-293L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
3800 TEST_c_c (casin, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 8.813735870195430252326093249797835932642e-1L),
3801 TEST_c_c (casin, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -8.813735870195430252326093249797835932642e-1L),
3802 TEST_c_c (casin, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 8.813735870195430252326093249797835932642e-1L),
3803 TEST_c_c (casin, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -8.813735870195430252326093249797835932642e-1L),
3804 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 1.570796326794896462222075823262245502760L, 0.0L),
3805 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -1.570796326794896462222075823262245502760L, 0.0L),
3806 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 1.570796326794896462222075823262245502760L, -0.0L),
3807 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -1.570796326794896462222075823262245502760L, -0.0L),
3808#endif
3809 TEST_c_c (casin, 0x1p-105L, 0.5L, 2.204933261082751447436996198490110245167e-32L, 4.812118250596034474977589134243684231352e-1L),
3810 TEST_c_c (casin, 0x1p-105L, -0.5L, 2.204933261082751447436996198490110245167e-32L, -4.812118250596034474977589134243684231352e-1L),
3811 TEST_c_c (casin, -0x1p-105L, 0.5L, -2.204933261082751447436996198490110245167e-32L, 4.812118250596034474977589134243684231352e-1L),
3812 TEST_c_c (casin, -0x1p-105L, -0.5L, -2.204933261082751447436996198490110245167e-32L, -4.812118250596034474977589134243684231352e-1L),
3813 TEST_c_c (casin, 0.5L, 0x1p-105L, 5.235987755982988730771072305465838140329e-1L, 2.846556599890768890940941645338546615370e-32L),
3814 TEST_c_c (casin, -0.5L, 0x1p-105L, -5.235987755982988730771072305465838140329e-1L, 2.846556599890768890940941645338546615370e-32L),
3815 TEST_c_c (casin, 0.5L, -0x1p-105L, 5.235987755982988730771072305465838140329e-1L, -2.846556599890768890940941645338546615370e-32L),
3816 TEST_c_c (casin, -0.5L, -0x1p-105L, -5.235987755982988730771072305465838140329e-1L, -2.846556599890768890940941645338546615370e-32L),
3817 TEST_c_c (casin, 0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
3818 TEST_c_c (casin, 0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
3819 TEST_c_c (casin, -0x1p-105L, 0x1p-105L, -2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
3820 TEST_c_c (casin, -0x1p-105L, -0x1p-105L, -2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
ccc8cadf 3821#ifndef TEST_FLOAT
08198877
JM
3822 /* Bug 15319: underflow exception may be missing. */
3823 TEST_c_c (casin, 0x1.fp-1025L, 0x1p-105L, 5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3824 TEST_c_c (casin, 0x1.fp-1025L, -0x1p-105L, 5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3825 TEST_c_c (casin, -0x1.fp-1025L, 0x1p-105L, -5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3826 TEST_c_c (casin, -0x1.fp-1025L, -0x1p-105L, -5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
3827 TEST_c_c (casin, 0x1p-105L, 0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3828 TEST_c_c (casin, -0x1p-105L, 0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3829 TEST_c_c (casin, 0x1p-105L, -0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3830 TEST_c_c (casin, -0x1p-105L, -0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
3831#endif
3832 TEST_c_c (casin, 0.0L, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L),
3833 TEST_c_c (casin, 0.0L, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L),
3834 TEST_c_c (casin, -0.0L, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L),
3835 TEST_c_c (casin, -0.0L, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L),
3836 TEST_c_c (casin, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L, 0.0L),
3837 TEST_c_c (casin, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L, 0.0L),
3838 TEST_c_c (casin, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L, -0.0L),
3839 TEST_c_c (casin, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L, -0.0L),
ccc8cadf 3840#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM
3841 TEST_c_c (casin, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.361838123766444824837096281396380300349e-34L, 8.813735870195430252326093249797922409363e-1L),
3842 TEST_c_c (casin, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.361838123766444824837096281396380300349e-34L, -8.813735870195430252326093249797922409363e-1L),
3843 TEST_c_c (casin, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.361838123766444824837096281396380300349e-34L, 8.813735870195430252326093249797922409363e-1L),
3844 TEST_c_c (casin, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.361838123766444824837096281396380300349e-34L, -8.813735870195430252326093249797922409363e-1L),
3845 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 1.570796326794896601578502908312986698624L, 1.091004200533850618345330909857103457781e-17L),
3846 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, -1.570796326794896601578502908312986698624L, 1.091004200533850618345330909857103457781e-17L),
3847 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 1.570796326794896601578502908312986698624L, -1.091004200533850618345330909857103457781e-17L),
3848 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, -1.570796326794896601578502908312986698624L, -1.091004200533850618345330909857103457781e-17L),
3849 TEST_c_c (casin, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 5.757683115456107044131264955348449231681e-4933L, 8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3850 TEST_c_c (casin, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 5.757683115456107044131264955348449231681e-4933L, -8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3851 TEST_c_c (casin, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, -5.757683115456107044131264955348449231681e-4933L, 8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3852 TEST_c_c (casin, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, -5.757683115456107044131264955348449231681e-4933L, -8.813735870195430252326093249797922409363e-1L, UNDERFLOW_EXCEPTION),
3853 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 1.570796326794896605353533883825294686803L, 5.867357004219059108790368268900490184505e-4916L),
3854 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, -1.570796326794896605353533883825294686803L, 5.867357004219059108790368268900490184505e-4916L),
3855 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 1.570796326794896605353533883825294686803L, -5.867357004219059108790368268900490184505e-4916L),
3856 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, -1.570796326794896605353533883825294686803L, -5.867357004219059108790368268900490184505e-4916L),
3857 TEST_c_c (casin, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 8.813735870195430252326093249797922409363e-1L),
3858 TEST_c_c (casin, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -8.813735870195430252326093249797922409363e-1L),
3859 TEST_c_c (casin, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 8.813735870195430252326093249797922409363e-1L),
3860 TEST_c_c (casin, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -8.813735870195430252326093249797922409363e-1L),
3861 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 1.570796326794896605353533883825294686803L, 0.0L),
3862 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -1.570796326794896605353533883825294686803L, 0.0L),
3863 TEST_c_c (casin, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 1.570796326794896605353533883825294686803L, -0.0L),
3864 TEST_c_c (casin, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -1.570796326794896605353533883825294686803L, -0.0L),
3865#endif
3866 TEST_c_c (casin, 0x1p-112L, 0.5L, 1.722604110220899568310153280070398629037e-34L, 4.812118250596034474977589134243684231352e-1L),
3867 TEST_c_c (casin, 0x1p-112L, -0.5L, 1.722604110220899568310153280070398629037e-34L, -4.812118250596034474977589134243684231352e-1L),
3868 TEST_c_c (casin, -0x1p-112L, 0.5L, -1.722604110220899568310153280070398629037e-34L, 4.812118250596034474977589134243684231352e-1L),
3869 TEST_c_c (casin, -0x1p-112L, -0.5L, -1.722604110220899568310153280070398629037e-34L, -4.812118250596034474977589134243684231352e-1L),
3870 TEST_c_c (casin, 0.5L, 0x1p-112L, 5.235987755982988730771072305465838140329e-1L, 2.223872343664663196047610660420739543258e-34L),
3871 TEST_c_c (casin, -0.5L, 0x1p-112L, -5.235987755982988730771072305465838140329e-1L, 2.223872343664663196047610660420739543258e-34L),
3872 TEST_c_c (casin, 0.5L, -0x1p-112L, 5.235987755982988730771072305465838140329e-1L, -2.223872343664663196047610660420739543258e-34L),
3873 TEST_c_c (casin, -0.5L, -0x1p-112L, -5.235987755982988730771072305465838140329e-1L, -2.223872343664663196047610660420739543258e-34L),
3874 TEST_c_c (casin, 0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
3875 TEST_c_c (casin, 0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
3876 TEST_c_c (casin, -0x1p-112L, 0x1p-112L, -1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
3877 TEST_c_c (casin, -0x1p-112L, -0x1p-112L, -1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
ccc8cadf 3878#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
3879 TEST_c_c (casin, 0x1.fp-16385L, 0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3880 TEST_c_c (casin, 0x1.fp-16385L, -0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3881 TEST_c_c (casin, -0x1.fp-16385L, 0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3882 TEST_c_c (casin, -0x1.fp-16385L, -0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
3883 TEST_c_c (casin, 0x1p-112L, 0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3884 TEST_c_c (casin, -0x1p-112L, 0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3885 TEST_c_c (casin, 0x1p-112L, -0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3886 TEST_c_c (casin, -0x1p-112L, -0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
3887#endif
3888 TEST_c_c (casin, 0.0L, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L),
3889 TEST_c_c (casin, 0.0L, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L),
3890 TEST_c_c (casin, -0.0L, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L),
3891 TEST_c_c (casin, -0.0L, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L),
3892 TEST_c_c (casin, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L, 0.0L),
3893 TEST_c_c (casin, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L, 0.0L),
3894 TEST_c_c (casin, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L, -0.0L),
3895 TEST_c_c (casin, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L, -0.0L),
3896
3897 TEST_c_c (casin, 0.75L, 1.25L, 0.453276177638793913448921196101971749L, 1.13239363160530819522266333696834467L),
3898 TEST_c_c (casin, -2, -3, -0.57065278432109940071028387968566963L, -1.9833870299165354323470769028940395L),
3899 END_DATA (casin)
3900 };
8847214f
UD
3901
3902static void
08198877 3903casin_test (void)
8847214f 3904{
aaca11d8 3905 errno = 0;
08198877 3906 FUNC(casin) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD
3907 if (errno == ENOSYS)
3908 /* Function not implemented. */
3909 return;
3910
08198877
JM
3911 START (casin);
3912 RUN_TEST_LOOP_c_c (casin, casin_test_data, );
3913 END (casin, complex);
3914}
8847214f 3915
08198877
JM
3916
3917static const struct test_c_c_data casinh_test_data[] =
3918 {
3919 START_DATA (casinh),
3920 TEST_c_c (casinh, 0, 0, 0.0, 0.0),
3921 TEST_c_c (casinh, minus_zero, 0, minus_zero, 0),
3922 TEST_c_c (casinh, 0, minus_zero, 0.0, minus_zero),
3923 TEST_c_c (casinh, minus_zero, minus_zero, minus_zero, minus_zero),
3924
3925 TEST_c_c (casinh, plus_infty, plus_infty, plus_infty, M_PI_4l),
3926 TEST_c_c (casinh, plus_infty, minus_infty, plus_infty, -M_PI_4l),
3927 TEST_c_c (casinh, minus_infty, plus_infty, minus_infty, M_PI_4l),
3928 TEST_c_c (casinh, minus_infty, minus_infty, minus_infty, -M_PI_4l),
3929
3930 TEST_c_c (casinh, -10.0, plus_infty, minus_infty, M_PI_2l),
3931 TEST_c_c (casinh, -10.0, minus_infty, minus_infty, -M_PI_2l),
3932 TEST_c_c (casinh, 0, plus_infty, plus_infty, M_PI_2l),
3933 TEST_c_c (casinh, 0, minus_infty, plus_infty, -M_PI_2l),
3934 TEST_c_c (casinh, minus_zero, plus_infty, minus_infty, M_PI_2l),
3935 TEST_c_c (casinh, minus_zero, minus_infty, minus_infty, -M_PI_2l),
3936 TEST_c_c (casinh, 0.1L, plus_infty, plus_infty, M_PI_2l),
3937 TEST_c_c (casinh, 0.1L, minus_infty, plus_infty, -M_PI_2l),
3938
3939 TEST_c_c (casinh, minus_infty, 0, minus_infty, 0.0),
3940 TEST_c_c (casinh, minus_infty, minus_zero, minus_infty, minus_zero),
3941 TEST_c_c (casinh, minus_infty, 100, minus_infty, 0.0),
3942 TEST_c_c (casinh, minus_infty, -100, minus_infty, minus_zero),
3943
3944 TEST_c_c (casinh, plus_infty, 0, plus_infty, 0.0),
3945 TEST_c_c (casinh, plus_infty, minus_zero, plus_infty, minus_zero),
3946 TEST_c_c (casinh, plus_infty, 0.5, plus_infty, 0.0),
3947 TEST_c_c (casinh, plus_infty, -0.5, plus_infty, minus_zero),
3948
3949 TEST_c_c (casinh, plus_infty, qnan_value, plus_infty, qnan_value),
3950 TEST_c_c (casinh, minus_infty, qnan_value, minus_infty, qnan_value),
3951
3952 TEST_c_c (casinh, qnan_value, 0, qnan_value, 0.0),
3953 TEST_c_c (casinh, qnan_value, minus_zero, qnan_value, minus_zero),
3954
3955 TEST_c_c (casinh, qnan_value, plus_infty, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
3956 TEST_c_c (casinh, qnan_value, minus_infty, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
3957
3958 TEST_c_c (casinh, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3959 TEST_c_c (casinh, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3960
3961 TEST_c_c (casinh, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3962 TEST_c_c (casinh, -0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
3963
3964 TEST_c_c (casinh, qnan_value, qnan_value, qnan_value, qnan_value),
3965
3966 TEST_c_c (casinh, plus_zero, -1.5L, 0.9624236501192068949955178268487368462704L, -M_PI_2l),
3967 TEST_c_c (casinh, minus_zero, -1.5L, -0.9624236501192068949955178268487368462704L, -M_PI_2l),
3968 TEST_c_c (casinh, plus_zero, -1.0L, plus_zero, -M_PI_2l),
3969 TEST_c_c (casinh, minus_zero, -1.0L, minus_zero, -M_PI_2l),
3970 TEST_c_c (casinh, plus_zero, -0.5L, plus_zero, -0.5235987755982988730771072305465838140329L),
3971 TEST_c_c (casinh, minus_zero, -0.5L, minus_zero, -0.5235987755982988730771072305465838140329L),
3972 TEST_c_c (casinh, plus_zero, 0.5L, plus_zero, 0.5235987755982988730771072305465838140329L),
3973 TEST_c_c (casinh, minus_zero, 0.5L, minus_zero, 0.5235987755982988730771072305465838140329L),
3974 TEST_c_c (casinh, plus_zero, 1.0L, plus_zero, M_PI_2l),
3975 TEST_c_c (casinh, minus_zero, 1.0L, minus_zero, M_PI_2l),
3976 TEST_c_c (casinh, plus_zero, 1.5L, 0.9624236501192068949955178268487368462704L, M_PI_2l),
3977 TEST_c_c (casinh, minus_zero, 1.5L, -0.9624236501192068949955178268487368462704L, M_PI_2l),
3978
3979 TEST_c_c (casinh, -1.5L, plus_zero, -1.194763217287109304111930828519090523536L, plus_zero),
3980 TEST_c_c (casinh, -1.5L, minus_zero, -1.194763217287109304111930828519090523536L, minus_zero),
3981 TEST_c_c (casinh, -1.0L, plus_zero, -0.8813735870195430252326093249797923090282L, plus_zero),
3982 TEST_c_c (casinh, -1.0L, minus_zero, -0.8813735870195430252326093249797923090282L, minus_zero),
3983 TEST_c_c (casinh, -0.5L, plus_zero, -0.4812118250596034474977589134243684231352L, plus_zero),
3984 TEST_c_c (casinh, -0.5L, minus_zero, -0.4812118250596034474977589134243684231352L, minus_zero),
3985 TEST_c_c (casinh, 0.5L, plus_zero, 0.4812118250596034474977589134243684231352L, plus_zero),
3986 TEST_c_c (casinh, 0.5L, minus_zero, 0.4812118250596034474977589134243684231352L, minus_zero),
3987 TEST_c_c (casinh, 1.0L, plus_zero, 0.8813735870195430252326093249797923090282L, plus_zero),
3988 TEST_c_c (casinh, 1.0L, minus_zero, 0.8813735870195430252326093249797923090282L, minus_zero),
3989 TEST_c_c (casinh, 1.5L, plus_zero, 1.194763217287109304111930828519090523536L, plus_zero),
3990 TEST_c_c (casinh, 1.5L, minus_zero, 1.194763217287109304111930828519090523536L, minus_zero),
3991
3992 TEST_c_c (casinh, 0x1p50L, 1.0L, 3.535050620855721078027883819436759661753e1L, 8.881784197001252323389053344720723756399e-16L),
3993 TEST_c_c (casinh, 0x1p50L, -1.0L, 3.535050620855721078027883819436759661753e1L, -8.881784197001252323389053344720723756399e-16L),
3994 TEST_c_c (casinh, -0x1p50L, 1.0L, -3.535050620855721078027883819436759661753e1L, 8.881784197001252323389053344720723756399e-16L),
3995 TEST_c_c (casinh, -0x1p50L, -1.0L, -3.535050620855721078027883819436759661753e1L, -8.881784197001252323389053344720723756399e-16L),
3996 TEST_c_c (casinh, 1.0L, 0x1p50L, 3.535050620855721078027883819436720218708e1L, 1.570796326794895731052901991514519103193L),
3997 TEST_c_c (casinh, -1.0L, 0x1p50L, -3.535050620855721078027883819436720218708e1L, 1.570796326794895731052901991514519103193L),
3998 TEST_c_c (casinh, 1.0L, -0x1p50L, 3.535050620855721078027883819436720218708e1L, -1.570796326794895731052901991514519103193L),
3999 TEST_c_c (casinh, -1.0L, -0x1p50L, -3.535050620855721078027883819436720218708e1L, -1.570796326794895731052901991514519103193L),
cdc1c96f 4000#ifndef TEST_FLOAT
08198877
JM
4001 TEST_c_c (casinh, 0x1p500L, 1.0L, 3.472667374605326000180332928505464606058e2L, 3.054936363499604682051979393213617699789e-151L),
4002 TEST_c_c (casinh, 0x1p500L, -1.0L, 3.472667374605326000180332928505464606058e2L, -3.054936363499604682051979393213617699789e-151L),
4003 TEST_c_c (casinh, -0x1p500L, 1.0L, -3.472667374605326000180332928505464606058e2L, 3.054936363499604682051979393213617699789e-151L),
4004 TEST_c_c (casinh, -0x1p500L, -1.0L, -3.472667374605326000180332928505464606058e2L, -3.054936363499604682051979393213617699789e-151L),
4005 TEST_c_c (casinh, 1.0L, 0x1p500L, 3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
4006 TEST_c_c (casinh, -1.0L, 0x1p500L, -3.472667374605326000180332928505464606058e2L, 1.570796326794896619231321691639751442099L),
4007 TEST_c_c (casinh, 1.0L, -0x1p500L, 3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
4008 TEST_c_c (casinh, -1.0L, -0x1p500L, -3.472667374605326000180332928505464606058e2L, -1.570796326794896619231321691639751442099L),
cdc1c96f
JM
4009#endif
4010#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
4011 TEST_c_c (casinh, 0x1p5000L, 1.0L, 3.466429049980286492395577839412341016946e3L, 7.079811261048172892385615158694057552948e-1506L),
4012 TEST_c_c (casinh, 0x1p5000L, -1.0L, 3.466429049980286492395577839412341016946e3L, -7.079811261048172892385615158694057552948e-1506L),
4013 TEST_c_c (casinh, -0x1p5000L, 1.0L, -3.466429049980286492395577839412341016946e3L, 7.079811261048172892385615158694057552948e-1506L),
4014 TEST_c_c (casinh, -0x1p5000L, -1.0L, -3.466429049980286492395577839412341016946e3L, -7.079811261048172892385615158694057552948e-1506L),
4015 TEST_c_c (casinh, 1.0L, 0x1p5000L, 3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
4016 TEST_c_c (casinh, -1.0L, 0x1p5000L, -3.466429049980286492395577839412341016946e3L, 1.570796326794896619231321691639751442099L),
4017 TEST_c_c (casinh, 1.0L, -0x1p5000L, 3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
4018 TEST_c_c (casinh, -1.0L, -0x1p5000L, -3.466429049980286492395577839412341016946e3L, -1.570796326794896619231321691639751442099L),
cdc1c96f
JM
4019#endif
4020
08198877 4021 TEST_c_c (casinh, 0x1.fp127L, 0x1.fp127L, 8.973081118419833726837456344608533993585e1L, 7.853981633974483096156608458198757210493e-1L),
a9708fed 4022#ifndef TEST_FLOAT
08198877 4023 TEST_c_c (casinh, 0x1.fp1023L, 0x1.fp1023L, 7.107906849659093345062145442726115449315e2L, 7.853981633974483096156608458198757210493e-1L),
a9708fed
JM
4024#endif
4025#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 4026 TEST_c_c (casinh, 0x1.fp16383L, 0x1.fp16383L, 1.135753137836666928715489992987020363057e4L, 7.853981633974483096156608458198757210493e-1L),
a9708fed
JM
4027#endif
4028
08198877
JM
4029 TEST_c_c (casinh, 0x1.fp-129L, 1.5L, 9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442096L),
4030 TEST_c_c (casinh, 0x1.fp-129L, -1.5L, 9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442096L),
4031 TEST_c_c (casinh, -0x1.fp-129L, 1.5L, -9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442096L),
4032 TEST_c_c (casinh, -0x1.fp-129L, -1.5L, -9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442096L),
4033 TEST_c_c (casinh, 1.5L, 0x1.fp-129L, 1.194763217287109304111930828519090523536L, 1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4034 TEST_c_c (casinh, -1.5L, 0x1.fp-129L, -1.194763217287109304111930828519090523536L, 1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4035 TEST_c_c (casinh, 1.5L, -0x1.fp-129L, 1.194763217287109304111930828519090523536L, -1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4036 TEST_c_c (casinh, -1.5L, -0x1.fp-129L, -1.194763217287109304111930828519090523536L, -1.579176199917649005841160751101628985741e-39L, UNDERFLOW_EXCEPTION_FLOAT),
8cf28c5e 4037#ifndef TEST_FLOAT
08198877
JM
4038 TEST_c_c (casinh, 0x1.fp-1025L, 1.5L, 9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
4039 TEST_c_c (casinh, 0x1.fp-1025L, -1.5L, 9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
4040 TEST_c_c (casinh, -0x1.fp-1025L, 1.5L, -9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
4041 TEST_c_c (casinh, -0x1.fp-1025L, -1.5L, -9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
4042 TEST_c_c (casinh, 1.5L, 0x1.fp-1025L, 1.194763217287109304111930828519090523536L, 2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4043 TEST_c_c (casinh, -1.5L, 0x1.fp-1025L, -1.194763217287109304111930828519090523536L, 2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4044 TEST_c_c (casinh, 1.5L, -0x1.fp-1025L, 1.194763217287109304111930828519090523536L, -2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4045 TEST_c_c (casinh, -1.5L, -0x1.fp-1025L, -1.194763217287109304111930828519090523536L, -2.989196569048182929051881765490354365918e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
8cf28c5e
JM
4046#endif
4047#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
4048 TEST_c_c (casinh, 0x1.fp-16385L, 1.5L, 9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
4049 TEST_c_c (casinh, 0x1.fp-16385L, -1.5L, 9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
4050 TEST_c_c (casinh, -0x1.fp-16385L, 1.5L, -9.624236501192068949955178268487368462704e-1L, 1.570796326794896619231321691639751442099L),
4051 TEST_c_c (casinh, -0x1.fp-16385L, -1.5L, -9.624236501192068949955178268487368462704e-1L, -1.570796326794896619231321691639751442099L),
4052 TEST_c_c (casinh, 1.5L, 0x1.fp-16385L, 1.194763217287109304111930828519090523536L, 4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4053 TEST_c_c (casinh, -1.5L, 0x1.fp-16385L, -1.194763217287109304111930828519090523536L, 4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4054 TEST_c_c (casinh, 1.5L, -0x1.fp-16385L, 1.194763217287109304111930828519090523536L, -4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4055 TEST_c_c (casinh, -1.5L, -0x1.fp-16385L, -1.194763217287109304111930828519090523536L, -4.516698239814521372306784062043266700598e-4933L, UNDERFLOW_EXCEPTION),
4056#endif
4057
4058 TEST_c_c (casinh, 0.5L, 1.0L, 7.328576759736452608886724437653071523305e-1L, 8.959074812088902390666567243275770102229e-1L),
4059 TEST_c_c (casinh, 0.5L, -1.0L, 7.328576759736452608886724437653071523305e-1L, -8.959074812088902390666567243275770102229e-1L),
4060 TEST_c_c (casinh, -0.5L, 1.0L, -7.328576759736452608886724437653071523305e-1L, 8.959074812088902390666567243275770102229e-1L),
4061 TEST_c_c (casinh, -0.5L, -1.0L, -7.328576759736452608886724437653071523305e-1L, -8.959074812088902390666567243275770102229e-1L),
4062 TEST_c_c (casinh, 1.0L, 0.5L, 9.261330313501824245501244453057873152694e-1L, 3.494390628572132936274118260753699527325e-1L),
4063 TEST_c_c (casinh, -1.0L, 0.5L, -9.261330313501824245501244453057873152694e-1L, 3.494390628572132936274118260753699527325e-1L),
4064 TEST_c_c (casinh, 1.0L, -0.5L, 9.261330313501824245501244453057873152694e-1L, -3.494390628572132936274118260753699527325e-1L),
4065 TEST_c_c (casinh, -1.0L, -0.5L, -9.261330313501824245501244453057873152694e-1L, -3.494390628572132936274118260753699527325e-1L),
4066 TEST_c_c (casinh, 0.25L, 1.0L, 5.097911466811016354623559941115413499164e-1L, 1.081751996523816326311037318425097434186L),
4067 TEST_c_c (casinh, 0.25L, -1.0L, 5.097911466811016354623559941115413499164e-1L, -1.081751996523816326311037318425097434186L),
4068 TEST_c_c (casinh, -0.25L, 1.0L, -5.097911466811016354623559941115413499164e-1L, 1.081751996523816326311037318425097434186L),
4069 TEST_c_c (casinh, -0.25L, -1.0L, -5.097911466811016354623559941115413499164e-1L, -1.081751996523816326311037318425097434186L),
4070 TEST_c_c (casinh, 1.0L, 0.25L, 8.924633639033482359562124741744951972772e-1L, 1.763024327769669304186785666360901026468e-1L),
4071 TEST_c_c (casinh, -1.0L, 0.25L, -8.924633639033482359562124741744951972772e-1L, 1.763024327769669304186785666360901026468e-1L),
4072 TEST_c_c (casinh, 1.0L, -0.25L, 8.924633639033482359562124741744951972772e-1L, -1.763024327769669304186785666360901026468e-1L),
4073 TEST_c_c (casinh, -1.0L, -0.25L, -8.924633639033482359562124741744951972772e-1L, -1.763024327769669304186785666360901026468e-1L),
4074 TEST_c_c (casinh, 0x1.fp-10L, 1.0L, 4.350501469856803800217957402220976497152e-2L, 1.527305029163877791518741192097931722508L),
4075 TEST_c_c (casinh, 0x1.fp-10L, -1.0L, 4.350501469856803800217957402220976497152e-2L, -1.527305029163877791518741192097931722508L),
4076 TEST_c_c (casinh, -0x1.fp-10L, 1.0L, -4.350501469856803800217957402220976497152e-2L, 1.527305029163877791518741192097931722508L),
4077 TEST_c_c (casinh, -0x1.fp-10L, -1.0L, -4.350501469856803800217957402220976497152e-2L, -1.527305029163877791518741192097931722508L),
4078 TEST_c_c (casinh, 1.0L, 0x1.fp-10L, 8.813742198809567991336704287826445879025e-1L, 1.337909359557740912558349531052239112857e-3L),
4079 TEST_c_c (casinh, -1.0L, 0x1.fp-10L, -8.813742198809567991336704287826445879025e-1L, 1.337909359557740912558349531052239112857e-3L),
4080 TEST_c_c (casinh, 1.0L, -0x1.fp-10L, 8.813742198809567991336704287826445879025e-1L, -1.337909359557740912558349531052239112857e-3L),
4081 TEST_c_c (casinh, -1.0L, -0x1.fp-10L, -8.813742198809567991336704287826445879025e-1L, -1.337909359557740912558349531052239112857e-3L),
4082 TEST_c_c (casinh, 0x1.fp-30L, 1.0L, 4.247867098745151888768727039216644758847e-5L, 1.570753848123921942730162693731872690232L),
4083 TEST_c_c (casinh, 0x1.fp-30L, -1.0L, 4.247867098745151888768727039216644758847e-5L, -1.570753848123921942730162693731872690232L),
4084 TEST_c_c (casinh, -0x1.fp-30L, 1.0L, -4.247867098745151888768727039216644758847e-5L, 1.570753848123921942730162693731872690232L),
4085 TEST_c_c (casinh, -0x1.fp-30L, -1.0L, -4.247867098745151888768727039216644758847e-5L, -1.570753848123921942730162693731872690232L),
4086 TEST_c_c (casinh, 1.0L, 0x1.fp-30L, 8.813735870195430258081932989769495326854e-1L, 1.275929984216518540252717485007112529021e-9L),
4087 TEST_c_c (casinh, -1.0L, 0x1.fp-30L, -8.813735870195430258081932989769495326854e-1L, 1.275929984216518540252717485007112529021e-9L),
4088 TEST_c_c (casinh, 1.0L, -0x1.fp-30L, 8.813735870195430258081932989769495326854e-1L, -1.275929984216518540252717485007112529021e-9L),
4089 TEST_c_c (casinh, -1.0L, -0x1.fp-30L, -8.813735870195430258081932989769495326854e-1L, -1.275929984216518540252717485007112529021e-9L),
4090 TEST_c_c (casinh, 0x1.fp-100L, 1.0L, 1.236292038260260888664514866457202186027e-15L, 1.570796326794895382939283431378862777584L),
4091 TEST_c_c (casinh, 0x1.fp-100L, -1.0L, 1.236292038260260888664514866457202186027e-15L, -1.570796326794895382939283431378862777584L),
4092 TEST_c_c (casinh, -0x1.fp-100L, 1.0L, -1.236292038260260888664514866457202186027e-15L, 1.570796326794895382939283431378862777584L),
4093 TEST_c_c (casinh, -0x1.fp-100L, -1.0L, -1.236292038260260888664514866457202186027e-15L, -1.570796326794895382939283431378862777584L),
4094 TEST_c_c (casinh, 1.0L, 0x1.fp-100L, 8.813735870195430252326093249797923090282e-1L, 1.080754735021050612990719608916167354321e-30L),
4095 TEST_c_c (casinh, -1.0L, 0x1.fp-100L, -8.813735870195430252326093249797923090282e-1L, 1.080754735021050612990719608916167354321e-30L),
4096 TEST_c_c (casinh, 1.0L, -0x1.fp-100L, 8.813735870195430252326093249797923090282e-1L, -1.080754735021050612990719608916167354321e-30L),
4097 TEST_c_c (casinh, -1.0L, -0x1.fp-100L, -8.813735870195430252326093249797923090282e-1L, -1.080754735021050612990719608916167354321e-30L),
4098 TEST_c_c (casinh, 0x1.fp-129L, 1.0L, 5.335635276982233498398987585285818977933e-20L, 1.570796326794896619177965338869929107115L),
4099 TEST_c_c (casinh, 0x1.fp-129L, -1.0L, 5.335635276982233498398987585285818977933e-20L, -1.570796326794896619177965338869929107115L),
4100 TEST_c_c (casinh, -0x1.fp-129L, 1.0L, -5.335635276982233498398987585285818977933e-20L, 1.570796326794896619177965338869929107115L),
4101 TEST_c_c (casinh, -0x1.fp-129L, -1.0L, -5.335635276982233498398987585285818977933e-20L, -1.570796326794896619177965338869929107115L),
4102 TEST_c_c (casinh, 1.0L, 0x1.fp-129L, 8.813735870195430252326093249797923090282e-1L, 2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4103 TEST_c_c (casinh, -1.0L, 0x1.fp-129L, -8.813735870195430252326093249797923090282e-1L, 2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4104 TEST_c_c (casinh, 1.0L, -0x1.fp-129L, 8.813735870195430252326093249797923090282e-1L, -2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4105 TEST_c_c (casinh, -1.0L, -0x1.fp-129L, -8.813735870195430252326093249797923090282e-1L, -2.013062564695348242280482517399205554874e-39L, UNDERFLOW_EXCEPTION_FLOAT),
0a1b2ae6 4106#ifndef TEST_FLOAT
08198877
JM
4107 TEST_c_c (casinh, 0x1.fp-1000L, 1.0L, 4.252291453851660175550490409247739011867e-151L, 1.570796326794896619231321691639751442099L),
4108 TEST_c_c (casinh, 0x1.fp-1000L, -1.0L, 4.252291453851660175550490409247739011867e-151L, -1.570796326794896619231321691639751442099L),
4109 TEST_c_c (casinh, -0x1.fp-1000L, 1.0L, -4.252291453851660175550490409247739011867e-151L, 1.570796326794896619231321691639751442099L),
4110 TEST_c_c (casinh, -0x1.fp-1000L, -1.0L, -4.252291453851660175550490409247739011867e-151L, -1.570796326794896619231321691639751442099L),
4111 TEST_c_c (casinh, 1.0L, 0x1.fp-1000L, 8.813735870195430252326093249797923090282e-1L, 1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4112 TEST_c_c (casinh, -1.0L, 0x1.fp-1000L, -8.813735870195430252326093249797923090282e-1L, 1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4113 TEST_c_c (casinh, 1.0L, -0x1.fp-1000L, 8.813735870195430252326093249797923090282e-1L, -1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4114 TEST_c_c (casinh, -1.0L, -0x1.fp-1000L, -8.813735870195430252326093249797923090282e-1L, -1.278589251976747242280879285935084814093e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4115 TEST_c_c (casinh, 0x1.fp-1025L, 1.0L, 7.340879205566679497036857179189356754017e-155L, 1.570796326794896619231321691639751442099L),
4116 TEST_c_c (casinh, 0x1.fp-1025L, -1.0L, 7.340879205566679497036857179189356754017e-155L, -1.570796326794896619231321691639751442099L),
4117 TEST_c_c (casinh, -0x1.fp-1025L, 1.0L, -7.340879205566679497036857179189356754017e-155L, 1.570796326794896619231321691639751442099L),
4118 TEST_c_c (casinh, -0x1.fp-1025L, -1.0L, -7.340879205566679497036857179189356754017e-155L, -1.570796326794896619231321691639751442099L),
4119 TEST_c_c (casinh, 1.0L, 0x1.fp-1025L, 8.813735870195430252326093249797923090282e-1L, 3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4120 TEST_c_c (casinh, -1.0L, 0x1.fp-1025L, -8.813735870195430252326093249797923090282e-1L, 3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4121 TEST_c_c (casinh, 1.0L, -0x1.fp-1025L, 8.813735870195430252326093249797923090282e-1L, -3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4122 TEST_c_c (casinh, -1.0L, -0x1.fp-1025L, -8.813735870195430252326093249797923090282e-1L, -3.810492908885321743133304375216617626230e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
0a1b2ae6
JM
4123#endif
4124#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
4125 TEST_c_c (casinh, 0x1.fp-10000L, 1.0L, 9.854680208706673586644342922051388714633e-1506L, 1.570796326794896619231321691639751442099L),
4126 TEST_c_c (casinh, 0x1.fp-10000L, -1.0L, 9.854680208706673586644342922051388714633e-1506L, -1.570796326794896619231321691639751442099L),
4127 TEST_c_c (casinh, -0x1.fp-10000L, 1.0L, -9.854680208706673586644342922051388714633e-1506L, 1.570796326794896619231321691639751442099L),
4128 TEST_c_c (casinh, -0x1.fp-10000L, -1.0L, -9.854680208706673586644342922051388714633e-1506L, -1.570796326794896619231321691639751442099L),
4129 TEST_c_c (casinh, 1.0L, 0x1.fp-10000L, 8.813735870195430252326093249797923090282e-1L, 6.867047849047171855399183659351043150871e-3011L),
4130 TEST_c_c (casinh, -1.0L, 0x1.fp-10000L, -8.813735870195430252326093249797923090282e-1L, 6.867047849047171855399183659351043150871e-3011L),
4131 TEST_c_c (casinh, 1.0L, -0x1.fp-10000L, 8.813735870195430252326093249797923090282e-1L, -6.867047849047171855399183659351043150871e-3011L),
4132 TEST_c_c (casinh, -1.0L, -0x1.fp-10000L, -8.813735870195430252326093249797923090282e-1L, -6.867047849047171855399183659351043150871e-3011L),
4133 TEST_c_c (casinh, 0x1.fp-16385L, 1.0L, 9.023632056840860275214893047597614177639e-2467L, 1.570796326794896619231321691639751442099L),
4134 TEST_c_c (casinh, 0x1.fp-16385L, -1.0L, 9.023632056840860275214893047597614177639e-2467L, -1.570796326794896619231321691639751442099L),
4135 TEST_c_c (casinh, -0x1.fp-16385L, 1.0L, -9.023632056840860275214893047597614177639e-2467L, 1.570796326794896619231321691639751442099L),
4136 TEST_c_c (casinh, -0x1.fp-16385L, -1.0L, -9.023632056840860275214893047597614177639e-2467L, -1.570796326794896619231321691639751442099L),
4137 TEST_c_c (casinh, 1.0L, 0x1.fp-16385L, 8.813735870195430252326093249797923090282e-1L, 5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4138 TEST_c_c (casinh, -1.0L, 0x1.fp-16385L, -8.813735870195430252326093249797923090282e-1L, 5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4139 TEST_c_c (casinh, 1.0L, -0x1.fp-16385L, 8.813735870195430252326093249797923090282e-1L, -5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4140 TEST_c_c (casinh, -1.0L, -0x1.fp-16385L, -8.813735870195430252326093249797923090282e-1L, -5.757683115456107044131264955348448954458e-4933L, UNDERFLOW_EXCEPTION),
4141#endif
4142
4143 TEST_c_c (casinh, 0x1p-23L, 0x1.000002p0L, 5.364668491573609633134147164031476452679e-4L, 1.570574114956455764594481054234834678422L),
4144 TEST_c_c (casinh, 0x1p-23L, -0x1.000002p0L, 5.364668491573609633134147164031476452679e-4L, -1.570574114956455764594481054234834678422L),
4145 TEST_c_c (casinh, -0x1p-23L, 0x1.000002p0L, -5.364668491573609633134147164031476452679e-4L, 1.570574114956455764594481054234834678422L),
4146 TEST_c_c (casinh, -0x1p-23L, -0x1.000002p0L, -5.364668491573609633134147164031476452679e-4L, -1.570574114956455764594481054234834678422L),
4147 TEST_c_c (casinh, 0x1.000002p0L, 0x1p-23L, 8.813736713132400470205730751186547909968e-1L, 8.429369199749229560964789467980644296420e-8L),
4148 TEST_c_c (casinh, -0x1.000002p0L, 0x1p-23L, -8.813736713132400470205730751186547909968e-1L, 8.429369199749229560964789467980644296420e-8L),
4149 TEST_c_c (casinh, 0x1.000002p0L, -0x1p-23L, 8.813736713132400470205730751186547909968e-1L, -8.429369199749229560964789467980644296420e-8L),
4150 TEST_c_c (casinh, -0x1.000002p0L, -0x1p-23L, -8.813736713132400470205730751186547909968e-1L, -8.429369199749229560964789467980644296420e-8L),
4151 TEST_c_c (casinh, 0x1.fp-129L, 0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751436268L),
4152 TEST_c_c (casinh, 0x1.fp-129L, -0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751436268L),
4153 TEST_c_c (casinh, -0x1.fp-129L, 0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751436268L),
4154 TEST_c_c (casinh, -0x1.fp-129L, -0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751436268L),
4155 TEST_c_c (casinh, 0x1.000002p0L, 0x1.fp-129L, 8.813736713132375348727889167749389235161e-1L, 2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4156 TEST_c_c (casinh, -0x1.000002p0L, 0x1.fp-129L, -8.813736713132375348727889167749389235161e-1L, 2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4157 TEST_c_c (casinh, 0x1.000002p0L, -0x1.fp-129L, 8.813736713132375348727889167749389235161e-1L, -2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4158 TEST_c_c (casinh, -0x1.000002p0L, -0x1.fp-129L, -8.813736713132375348727889167749389235161e-1L, -2.013062444707472738895109955455676357057e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4159 TEST_c_c (casinh, 0.0L, 0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751442099L),
4160 TEST_c_c (casinh, 0.0L, -0x1.000002p0L, 4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751442099L),
4161 TEST_c_c (casinh, -0.0L, 0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, 1.570796326794896619231321691639751442099L),
4162 TEST_c_c (casinh, -0.0L, -0x1.000002p0L, -4.882812451493617206486388134172712975070e-4L, -1.570796326794896619231321691639751442099L),
4163 TEST_c_c (casinh, 0x1.000002p0L, 0.0L, 8.813736713132375348727889167749389235161e-1L, 0.0L),
4164 TEST_c_c (casinh, -0x1.000002p0L, 0.0L, -8.813736713132375348727889167749389235161e-1L, 0.0L),
4165 TEST_c_c (casinh, 0x1.000002p0L, -0.0L, 8.813736713132375348727889167749389235161e-1L, -0.0L),
4166 TEST_c_c (casinh, -0x1.000002p0L, -0.0L, -8.813736713132375348727889167749389235161e-1L, -0.0L),
3a7182a1 4167#ifndef TEST_FLOAT
08198877
JM
4168 TEST_c_c (casinh, 0x1p-52L, 0x1.0000000000001p0L, 2.315303644582684770975188768022139415020e-8L, 1.570796317204594913251280305810847349436L),
4169 TEST_c_c (casinh, 0x1p-52L, -0x1.0000000000001p0L, 2.315303644582684770975188768022139415020e-8L, -1.570796317204594913251280305810847349436L),
4170 TEST_c_c (casinh, -0x1p-52L, 0x1.0000000000001p0L, -2.315303644582684770975188768022139415020e-8L, 1.570796317204594913251280305810847349436L),
4171 TEST_c_c (casinh, -0x1p-52L, -0x1.0000000000001p0L, -2.315303644582684770975188768022139415020e-8L, -1.570796317204594913251280305810847349436L),
4172 TEST_c_c (casinh, 0x1.0000000000001p0L, 0x1p-52L, 8.813735870195431822418551933572982483664e-1L, 1.570092458683774885078102529858632363236e-16L),
4173 TEST_c_c (casinh, -0x1.0000000000001p0L, 0x1p-52L, -8.813735870195431822418551933572982483664e-1L, 1.570092458683774885078102529858632363236e-16L),
4174 TEST_c_c (casinh, 0x1.0000000000001p0L, -0x1p-52L, 8.813735870195431822418551933572982483664e-1L, -1.570092458683774885078102529858632363236e-16L),
4175 TEST_c_c (casinh, -0x1.0000000000001p0L, -0x1p-52L, -8.813735870195431822418551933572982483664e-1L, -1.570092458683774885078102529858632363236e-16L),
4176 TEST_c_c (casinh, 0x1.fp-1025L, 0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4177 TEST_c_c (casinh, 0x1.fp-1025L, -0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4178 TEST_c_c (casinh, -0x1.fp-1025L, 0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4179 TEST_c_c (casinh, -0x1.fp-1025L, -0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4180 TEST_c_c (casinh, 0x1.0000000000001p0L, 0x1.fp-1025L, 8.813735870195431822418551933572895326024e-1L, 3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4181 TEST_c_c (casinh, -0x1.0000000000001p0L, 0x1.fp-1025L, -8.813735870195431822418551933572895326024e-1L, 3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4182 TEST_c_c (casinh, 0x1.0000000000001p0L, -0x1.fp-1025L, 8.813735870195431822418551933572895326024e-1L, -3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4183 TEST_c_c (casinh, -0x1.0000000000001p0L, -0x1.fp-1025L, -8.813735870195431822418551933572895326024e-1L, -3.810492908885321320083608113679347200012e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4184 TEST_c_c (casinh, 0.0L, 0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4185 TEST_c_c (casinh, 0.0L, -0x1.0000000000001p0L, 2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4186 TEST_c_c (casinh, -0.0L, 0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, 1.570796326794896619231321691639751442099L),
4187 TEST_c_c (casinh, -0.0L, -0x1.0000000000001p0L, -2.107342425544701550354780375182800088393e-8L, -1.570796326794896619231321691639751442099L),
4188 TEST_c_c (casinh, 0x1.0000000000001p0L, 0.0L, 8.813735870195431822418551933572895326024e-1L, 0.0L),
4189 TEST_c_c (casinh, -0x1.0000000000001p0L, 0.0L, -8.813735870195431822418551933572895326024e-1L, 0.0L),
4190 TEST_c_c (casinh, 0x1.0000000000001p0L, -0.0L, 8.813735870195431822418551933572895326024e-1L, -0.0L),
4191 TEST_c_c (casinh, -0x1.0000000000001p0L, -0.0L, -8.813735870195431822418551933572895326024e-1L, -0.0L),
3a7182a1
JM
4192#endif
4193#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM
4194 TEST_c_c (casinh, 0x1p-63L, 0x1.0000000000000002p0L, 5.116146586219826555037807251857670783420e-10L, 1.570796326582978888921215348380499122131L),
4195 TEST_c_c (casinh, 0x1p-63L, -0x1.0000000000000002p0L, 5.116146586219826555037807251857670783420e-10L, -1.570796326582978888921215348380499122131L),
4196 TEST_c_c (casinh, -0x1p-63L, 0x1.0000000000000002p0L, -5.116146586219826555037807251857670783420e-10L, 1.570796326582978888921215348380499122131L),
4197 TEST_c_c (casinh, -0x1p-63L, -0x1.0000000000000002p0L, -5.116146586219826555037807251857670783420e-10L, -1.570796326582978888921215348380499122131L),
4198 TEST_c_c (casinh, 0x1.0000000000000002p0L, 0x1p-63L, 8.813735870195430253092739958139610131001e-1L, 7.666467083416870406778649849746878368519e-20L),
4199 TEST_c_c (casinh, -0x1.0000000000000002p0L, 0x1p-63L, -8.813735870195430253092739958139610131001e-1L, 7.666467083416870406778649849746878368519e-20L),
4200 TEST_c_c (casinh, 0x1.0000000000000002p0L, -0x1p-63L, 8.813735870195430253092739958139610131001e-1L, -7.666467083416870406778649849746878368519e-20L),
4201 TEST_c_c (casinh, -0x1.0000000000000002p0L, -0x1p-63L, -8.813735870195430253092739958139610131001e-1L, -7.666467083416870406778649849746878368519e-20L),
3a7182a1 4202# if LDBL_MIN_EXP <= -16381
08198877
JM
4203 TEST_c_c (casinh, 0x1.fp-16385L, 0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4204 TEST_c_c (casinh, 0x1.fp-16385L, -0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4205 TEST_c_c (casinh, -0x1.fp-16385L, 0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4206 TEST_c_c (casinh, -0x1.fp-16385L, -0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4207 TEST_c_c (casinh, 0x1.0000000000000002p0L, 0x1.fp-16385L, 8.813735870195430253092739958139610130980e-1L, 5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4208 TEST_c_c (casinh, -0x1.0000000000000002p0L, 0x1.fp-16385L, -8.813735870195430253092739958139610130980e-1L, 5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4209 TEST_c_c (casinh, 0x1.0000000000000002p0L, -0x1.fp-16385L, 8.813735870195430253092739958139610130980e-1L, -5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
4210 TEST_c_c (casinh, -0x1.0000000000000002p0L, -0x1.fp-16385L, -8.813735870195430253092739958139610130980e-1L, -5.757683115456107043819140328235418018963e-4933L, UNDERFLOW_EXCEPTION),
3a7182a1 4211# endif
08198877
JM
4212 TEST_c_c (casinh, 0.0L, 0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4213 TEST_c_c (casinh, 0.0L, -0x1.0000000000000002p0L, 4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4214 TEST_c_c (casinh, -0.0L, 0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, 1.570796326794896619231321691639751442099L),
4215 TEST_c_c (casinh, -0.0L, -0x1.0000000000000002p0L, -4.656612873077392578082927418388212703712e-10L, -1.570796326794896619231321691639751442099L),
4216 TEST_c_c (casinh, 0x1.0000000000000002p0L, 0.0L, 8.813735870195430253092739958139610130980e-1L, 0.0L),
4217 TEST_c_c (casinh, -0x1.0000000000000002p0L, 0.0L, -8.813735870195430253092739958139610130980e-1L, 0.0L),
4218 TEST_c_c (casinh, 0x1.0000000000000002p0L, -0.0L, 8.813735870195430253092739958139610130980e-1L, -0.0L),
4219 TEST_c_c (casinh, -0x1.0000000000000002p0L, -0.0L, -8.813735870195430253092739958139610130980e-1L, -0.0L),
3a7182a1
JM
4220#endif
4221#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM
4222 TEST_c_c (casinh, 0x1p-106L, 0x1.000000000000000000000000008p0L, 2.285028863093221674154232933662774454211e-16L, 1.570796326794896565289107467733682961928L),
4223 TEST_c_c (casinh, 0x1p-106L, -0x1.000000000000000000000000008p0L, 2.285028863093221674154232933662774454211e-16L, -1.570796326794896565289107467733682961928L),
4224 TEST_c_c (casinh, -0x1p-106L, 0x1.000000000000000000000000008p0L, -2.285028863093221674154232933662774454211e-16L, 1.570796326794896565289107467733682961928L),
4225 TEST_c_c (casinh, -0x1p-106L, -0x1.000000000000000000000000008p0L, -2.285028863093221674154232933662774454211e-16L, -1.570796326794896565289107467733682961928L),
4226 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, 0x1p-106L, 8.813735870195430252326093249798097405561e-1L, 8.715763992105246878957416200936726072500e-33L),
4227 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, 0x1p-106L, -8.813735870195430252326093249798097405561e-1L, 8.715763992105246878957416200936726072500e-33L),
4228 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, -0x1p-106L, 8.813735870195430252326093249798097405561e-1L, -8.715763992105246878957416200936726072500e-33L),
4229 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, -0x1p-106L, -8.813735870195430252326093249798097405561e-1L, -8.715763992105246878957416200936726072500e-33L),
4230 TEST_c_c (casinh, 0x1.fp-1025L, 0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4231 TEST_c_c (casinh, 0x1.fp-1025L, -0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4232 TEST_c_c (casinh, -0x1.fp-1025L, 0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4233 TEST_c_c (casinh, -0x1.fp-1025L, -0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4234 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, 0x1.fp-1025L, 8.813735870195430252326093249798097405561e-1L, 3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4235 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, 0x1.fp-1025L, -8.813735870195430252326093249798097405561e-1L, 3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4236 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, -0x1.fp-1025L, 8.813735870195430252326093249798097405561e-1L, -3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4237 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, -0x1.fp-1025L, -8.813735870195430252326093249798097405561e-1L, -3.810492908885321743133304375216570658278e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4238 TEST_c_c (casinh, 0.0L, 0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4239 TEST_c_c (casinh, 0.0L, -0x1.000000000000000000000000008p0L, 2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4240 TEST_c_c (casinh, -0.0L, 0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, 1.570796326794896619231321691639751442099L),
4241 TEST_c_c (casinh, -0.0L, -0x1.000000000000000000000000008p0L, -2.220446049250313080847263336181636063482e-16L, -1.570796326794896619231321691639751442099L),
4242 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, 0.0L, 8.813735870195430252326093249798097405561e-1L, 0.0L),
4243 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, 0.0L, -8.813735870195430252326093249798097405561e-1L, 0.0L),
4244 TEST_c_c (casinh, 0x1.000000000000000000000000008p0L, -0.0L, 8.813735870195430252326093249798097405561e-1L, -0.0L),
4245 TEST_c_c (casinh, -0x1.000000000000000000000000008p0L, -0.0L, -8.813735870195430252326093249798097405561e-1L, -0.0L),
3a7182a1
JM
4246#endif
4247#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM
4248 TEST_c_c (casinh, 0x1p-113L, 0x1.0000000000000000000000000001p0L, 2.019699255375255198156433710951064632386e-17L, 1.570796326794896614463458507897073960405L),
4249 TEST_c_c (casinh, 0x1p-113L, -0x1.0000000000000000000000000001p0L, 2.019699255375255198156433710951064632386e-17L, -1.570796326794896614463458507897073960405L),
4250 TEST_c_c (casinh, -0x1p-113L, 0x1.0000000000000000000000000001p0L, -2.019699255375255198156433710951064632386e-17L, 1.570796326794896614463458507897073960405L),
4251 TEST_c_c (casinh, -0x1p-113L, -0x1.0000000000000000000000000001p0L, -2.019699255375255198156433710951064632386e-17L, -1.570796326794896614463458507897073960405L),
4252 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, 0x1p-113L, 8.813735870195430252326093249797924452120e-1L, 6.809190618832224124185481406981900518193e-35L),
4253 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, 0x1p-113L, -8.813735870195430252326093249797924452120e-1L, 6.809190618832224124185481406981900518193e-35L),
4254 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, -0x1p-113L, 8.813735870195430252326093249797924452120e-1L, -6.809190618832224124185481406981900518193e-35L),
4255 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, -0x1p-113L, -8.813735870195430252326093249797924452120e-1L, -6.809190618832224124185481406981900518193e-35L),
4256 TEST_c_c (casinh, 0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4257 TEST_c_c (casinh, 0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4258 TEST_c_c (casinh, -0x1.fp-16385L, 0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4259 TEST_c_c (casinh, -0x1.fp-16385L, -0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4260 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, 8.813735870195430252326093249797924452120e-1L, 5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4261 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, 0x1.fp-16385L, -8.813735870195430252326093249797924452120e-1L, 5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4262 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, 8.813735870195430252326093249797924452120e-1L, -5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4263 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, -0x1.fp-16385L, -8.813735870195430252326093249797924452120e-1L, -5.757683115456107044131264955348448400014e-4933L, UNDERFLOW_EXCEPTION),
4264 TEST_c_c (casinh, 0.0L, 0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4265 TEST_c_c (casinh, 0.0L, -0x1.0000000000000000000000000001p0L, 1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4266 TEST_c_c (casinh, -0.0L, 0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, 1.570796326794896619231321691639751442099L),
4267 TEST_c_c (casinh, -0.0L, -0x1.0000000000000000000000000001p0L, -1.962615573354718824241727964954454332780e-17L, -1.570796326794896619231321691639751442099L),
4268 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, 0.0L, 8.813735870195430252326093249797924452120e-1L, 0.0L),
4269 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, 0.0L, -8.813735870195430252326093249797924452120e-1L, 0.0L),
4270 TEST_c_c (casinh, 0x1.0000000000000000000000000001p0L, -0.0L, 8.813735870195430252326093249797924452120e-1L, -0.0L),
4271 TEST_c_c (casinh, -0x1.0000000000000000000000000001p0L, -0.0L, -8.813735870195430252326093249797924452120e-1L, -0.0L),
4272#endif
4273
4274 TEST_c_c (casinh, 0x1p-23L, 0x0.ffffffp0L, 2.714321200917194650737217746780928423385e-4L, 1.570357140408705570520377172865353621698L),
4275 TEST_c_c (casinh, 0x1p-23L, -0x0.ffffffp0L, 2.714321200917194650737217746780928423385e-4L, -1.570357140408705570520377172865353621698L),
4276 TEST_c_c (casinh, -0x1p-23L, 0x0.ffffffp0L, -2.714321200917194650737217746780928423385e-4L, 1.570357140408705570520377172865353621698L),
4277 TEST_c_c (casinh, -0x1p-23L, -0x0.ffffffp0L, -2.714321200917194650737217746780928423385e-4L, -1.570357140408705570520377172865353621698L),
4278 TEST_c_c (casinh, 0x0.ffffffp0L, 0x1p-23L, 8.813735448726963984495965873956465777250e-1L, 8.429369953393598499000760938112968755257e-8L),
4279 TEST_c_c (casinh, -0x0.ffffffp0L, 0x1p-23L, -8.813735448726963984495965873956465777250e-1L, 8.429369953393598499000760938112968755257e-8L),
4280 TEST_c_c (casinh, 0x0.ffffffp0L, -0x1p-23L, 8.813735448726963984495965873956465777250e-1L, -8.429369953393598499000760938112968755257e-8L),
4281 TEST_c_c (casinh, -0x0.ffffffp0L, -0x1p-23L, -8.813735448726963984495965873956465777250e-1L, -8.429369953393598499000760938112968755257e-8L),
4282 TEST_c_c (casinh, 0x1.fp-129L, 0x0.ffffffp0L, 8.245504387859737323891843603996428534945e-36L, 1.570451059810180415643718442157112705601L),
4283 TEST_c_c (casinh, 0x1.fp-129L, -0x0.ffffffp0L, 8.245504387859737323891843603996428534945e-36L, -1.570451059810180415643718442157112705601L),
4284 TEST_c_c (casinh, -0x1.fp-129L, 0x0.ffffffp0L, -8.245504387859737323891843603996428534945e-36L, 1.570451059810180415643718442157112705601L),
4285 TEST_c_c (casinh, -0x1.fp-129L, -0x0.ffffffp0L, -8.245504387859737323891843603996428534945e-36L, -1.570451059810180415643718442157112705601L),
4286 TEST_c_c (casinh, 0x0.ffffffp0L, 0x1.fp-129L, 8.813735448726938863015878255140556727969e-1L, 2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4287 TEST_c_c (casinh, -0x0.ffffffp0L, 0x1.fp-129L, -8.813735448726938863015878255140556727969e-1L, 2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4288 TEST_c_c (casinh, 0x0.ffffffp0L, -0x1.fp-129L, 8.813735448726938863015878255140556727969e-1L, -2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4289 TEST_c_c (casinh, -0x0.ffffffp0L, -0x1.fp-129L, -8.813735448726938863015878255140556727969e-1L, -2.013062624689288675911339929224634593425e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4290 TEST_c_c (casinh, 0.0L, 0x0.ffffffp0L, 0.0L, 1.570451059810180415643718442157112705601L),
4291 TEST_c_c (casinh, 0.0L, -0x0.ffffffp0L, 0.0L, -1.570451059810180415643718442157112705601L),
4292 TEST_c_c (casinh, -0.0L, 0x0.ffffffp0L, -0.0L, 1.570451059810180415643718442157112705601L),
4293 TEST_c_c (casinh, -0.0L, -0x0.ffffffp0L, -0.0L, -1.570451059810180415643718442157112705601L),
4294 TEST_c_c (casinh, 0x0.ffffffp0L, 0.0L, 8.813735448726938863015878255140556727969e-1L, 0.0L),
4295 TEST_c_c (casinh, -0x0.ffffffp0L, 0.0L, -8.813735448726938863015878255140556727969e-1L, 0.0L),
4296 TEST_c_c (casinh, 0x0.ffffffp0L, -0.0L, 8.813735448726938863015878255140556727969e-1L, -0.0L),
4297 TEST_c_c (casinh, -0x0.ffffffp0L, -0.0L, -8.813735448726938863015878255140556727969e-1L, -0.0L),
4298 TEST_c_c (casinh, 0x1p-23L, 0.5L, 1.376510308240943236356088341381173571841e-7L, 5.235987755982934033165770729745469098254e-1L),
4299 TEST_c_c (casinh, 0x1p-23L, -0.5L, 1.376510308240943236356088341381173571841e-7L, -5.235987755982934033165770729745469098254e-1L),
4300 TEST_c_c (casinh, -0x1p-23L, 0.5L, -1.376510308240943236356088341381173571841e-7L, 5.235987755982934033165770729745469098254e-1L),
4301 TEST_c_c (casinh, -0x1p-23L, -0.5L, -1.376510308240943236356088341381173571841e-7L, -5.235987755982934033165770729745469098254e-1L),
4302 TEST_c_c (casinh, 0.5L, 0x1p-23L, 4.812118250596059896127318386463676808798e-1L, 1.066240299940009780479664302917201696886e-7L),
4303 TEST_c_c (casinh, -0.5L, 0x1p-23L, -4.812118250596059896127318386463676808798e-1L, 1.066240299940009780479664302917201696886e-7L),
4304 TEST_c_c (casinh, 0.5L, -0x1p-23L, 4.812118250596059896127318386463676808798e-1L, -1.066240299940009780479664302917201696886e-7L),
4305 TEST_c_c (casinh, -0.5L, -0x1p-23L, -4.812118250596059896127318386463676808798e-1L, -1.066240299940009780479664302917201696886e-7L),
4306 TEST_c_c (casinh, 0x1.fp-129L, 0.5L, 3.287317402534702257036015056278368274737e-39L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4307 TEST_c_c (casinh, 0x1.fp-129L, -0.5L, 3.287317402534702257036015056278368274737e-39L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4308 TEST_c_c (casinh, -0x1.fp-129L, 0.5L, -3.287317402534702257036015056278368274737e-39L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4309 TEST_c_c (casinh, -0x1.fp-129L, -0.5L, -3.287317402534702257036015056278368274737e-39L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_FLOAT),
4310 TEST_c_c (casinh, 0.5L, 0x1.fp-129L, 4.812118250596034474977589134243684231352e-1L, 2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4311 TEST_c_c (casinh, -0.5L, 0x1.fp-129L, -4.812118250596034474977589134243684231352e-1L, 2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4312 TEST_c_c (casinh, 0.5L, -0x1.fp-129L, 4.812118250596034474977589134243684231352e-1L, -2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4313 TEST_c_c (casinh, -0.5L, -0x1.fp-129L, -4.812118250596034474977589134243684231352e-1L, -2.546345110742945032959687790021055102355e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4314 TEST_c_c (casinh, 0x1p-23L, 0x1p-23L, 1.192092895507818146886315028596704749235e-7L, 1.192092895507806853113684971258850504935e-7L),
4315 TEST_c_c (casinh, 0x1p-23L, -0x1p-23L, 1.192092895507818146886315028596704749235e-7L, -1.192092895507806853113684971258850504935e-7L),
4316 TEST_c_c (casinh, -0x1p-23L, 0x1p-23L, -1.192092895507818146886315028596704749235e-7L, 1.192092895507806853113684971258850504935e-7L),
4317 TEST_c_c (casinh, -0x1p-23L, -0x1p-23L, -1.192092895507818146886315028596704749235e-7L, -1.192092895507806853113684971258850504935e-7L),
4318 TEST_c_c (casinh, 0x1.fp-129L, 0x1p-23L, 2.846900380897747786805634596726756660388e-39L, 1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4319 TEST_c_c (casinh, 0x1.fp-129L, -0x1p-23L, 2.846900380897747786805634596726756660388e-39L, -1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4320 TEST_c_c (casinh, -0x1.fp-129L, 0x1p-23L, -2.846900380897747786805634596726756660388e-39L, 1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4321 TEST_c_c (casinh, -0x1.fp-129L, -0x1p-23L, -2.846900380897747786805634596726756660388e-39L, -1.192092895507815323443157514352519154304e-7L, UNDERFLOW_EXCEPTION_FLOAT),
4322 /* Bug 15319: underflow exception may be missing. */
4323 TEST_c_c (casinh, 0x1p-23L, 0x1.fp-129L, 1.192092895507809676556842485683592032154e-7L, 2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4324 TEST_c_c (casinh, -0x1p-23L, 0x1.fp-129L, -1.192092895507809676556842485683592032154e-7L, 2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4325 TEST_c_c (casinh, 0x1p-23L, -0x1.fp-129L, 1.192092895507809676556842485683592032154e-7L, -2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4326 TEST_c_c (casinh, -0x1p-23L, -0x1.fp-129L, -1.192092895507809676556842485683592032154e-7L, -2.846900380897707329917933005874691056564e-39L, UNDERFLOW_EXCEPTION_OK_FLOAT),
4327 TEST_c_c (casinh, 0.0L, 0x1p-23L, 0.0L, 1.192092895507815323443157514352519154304e-7L),
4328 TEST_c_c (casinh, 0.0L, -0x1p-23L, 0.0L, -1.192092895507815323443157514352519154304e-7L),
4329 TEST_c_c (casinh, -0.0L, 0x1p-23L, -0.0L, 1.192092895507815323443157514352519154304e-7L),
4330 TEST_c_c (casinh, -0.0L, -0x1p-23L, -0.0L, -1.192092895507815323443157514352519154304e-7L),
4331 TEST_c_c (casinh, 0x1p-23L, 0.0L, 1.192092895507809676556842485683592032154e-7L, 0.0L),
4332 TEST_c_c (casinh, -0x1p-23L, 0.0L, -1.192092895507809676556842485683592032154e-7L, 0.0L),
4333 TEST_c_c (casinh, 0x1p-23L, -0.0L, 1.192092895507809676556842485683592032154e-7L, -0.0L),
4334 TEST_c_c (casinh, -0x1p-23L, -0.0L, -1.192092895507809676556842485683592032154e-7L, -0.0L),
4335 TEST_c_c (casinh, 0x1.fp-129L, 0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4336 TEST_c_c (casinh, 0x1.fp-129L, -0x1.fp-129L, 2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4337 TEST_c_c (casinh, -0x1.fp-129L, 0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, 2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4338 TEST_c_c (casinh, -0x1.fp-129L, -0x1.fp-129L, -2.846900380897727558361783801085126250967e-39L, -2.846900380897727558361783801085126250967e-39L, UNDERFLOW_EXCEPTION_FLOAT),
ccc8cadf 4339#ifndef TEST_FLOAT
08198877
JM
4340 TEST_c_c (casinh, 0x1p-52L, 0x0.fffffffffffff8p0L, 1.171456840272878582596796205397918831268e-8L, 1.570796307840326780080580569360500172043L),
4341 TEST_c_c (casinh, 0x1p-52L, -0x0.fffffffffffff8p0L, 1.171456840272878582596796205397918831268e-8L, -1.570796307840326780080580569360500172043L),
4342 TEST_c_c (casinh, -0x1p-52L, 0x0.fffffffffffff8p0L, -1.171456840272878582596796205397918831268e-8L, 1.570796307840326780080580569360500172043L),
4343 TEST_c_c (casinh, -0x1p-52L, -0x0.fffffffffffff8p0L, -1.171456840272878582596796205397918831268e-8L, -1.570796307840326780080580569360500172043L),
4344 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, 0x1p-52L, 8.813735870195429467279863907910458761820e-1L, 1.570092458683775146551022293016031474627e-16L),
4345 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, 0x1p-52L, -8.813735870195429467279863907910458761820e-1L, 1.570092458683775146551022293016031474627e-16L),
4346 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, -0x1p-52L, 8.813735870195429467279863907910458761820e-1L, -1.570092458683775146551022293016031474627e-16L),
4347 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, -0x1p-52L, -8.813735870195429467279863907910458761820e-1L, -1.570092458683775146551022293016031474627e-16L),
4348 TEST_c_c (casinh, 0x1.fp-1025L, 0x0.fffffffffffff8p0L, 3.616396521699973256461764099945789620604e-301L, 1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4349 TEST_c_c (casinh, 0x1.fp-1025L, -0x0.fffffffffffff8p0L, 3.616396521699973256461764099945789620604e-301L, -1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4350 TEST_c_c (casinh, -0x1.fp-1025L, 0x0.fffffffffffff8p0L, -3.616396521699973256461764099945789620604e-301L, 1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4351 TEST_c_c (casinh, -0x1.fp-1025L, -0x0.fffffffffffff8p0L, -3.616396521699973256461764099945789620604e-301L, -1.570796311893735425383665303776316016594L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4352 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, 0x1.fp-1025L, 8.813735870195429467279863907910371604180e-1L, 3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4353 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, 0x1.fp-1025L, -8.813735870195429467279863907910371604180e-1L, 3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4354 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, -0x1.fp-1025L, 8.813735870195429467279863907910371604180e-1L, -3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4355 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, -0x1.fp-1025L, -8.813735870195429467279863907910371604180e-1L, -3.810492908885321954658152505985270452320e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4356 TEST_c_c (casinh, 0.0L, 0x0.fffffffffffff8p0L, 0.0L, 1.570796311893735425383665303776316016594L),
4357 TEST_c_c (casinh, 0.0L, -0x0.fffffffffffff8p0L, 0.0L, -1.570796311893735425383665303776316016594L),
4358 TEST_c_c (casinh, -0.0L, 0x0.fffffffffffff8p0L, -0.0L, 1.570796311893735425383665303776316016594L),
4359 TEST_c_c (casinh, -0.0L, -0x0.fffffffffffff8p0L, -0.0L, -1.570796311893735425383665303776316016594L),
4360 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, 0.0L, 8.813735870195429467279863907910371604180e-1L, 0.0L),
4361 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, 0.0L, -8.813735870195429467279863907910371604180e-1L, 0.0L),
4362 TEST_c_c (casinh, 0x0.fffffffffffff8p0L, -0.0L, 8.813735870195429467279863907910371604180e-1L, -0.0L),
4363 TEST_c_c (casinh, -0x0.fffffffffffff8p0L, -0.0L, -8.813735870195429467279863907910371604180e-1L, -0.0L),
4364#endif
4365 TEST_c_c (casinh, 0x1p-52L, 0.5L, 2.563950248511418570403591756798643804971e-16L, 5.235987755982988730771072305465648369889e-1L),
4366 TEST_c_c (casinh, 0x1p-52L, -0.5L, 2.563950248511418570403591756798643804971e-16L, -5.235987755982988730771072305465648369889e-1L),
4367 TEST_c_c (casinh, -0x1p-52L, 0.5L, -2.563950248511418570403591756798643804971e-16L, 5.235987755982988730771072305465648369889e-1L),
4368 TEST_c_c (casinh, -0x1p-52L, -0.5L, -2.563950248511418570403591756798643804971e-16L, -5.235987755982988730771072305465648369889e-1L),
4369 TEST_c_c (casinh, 0.5L, 0x1p-52L, 4.812118250596034474977589134243772428682e-1L, 1.986027322597818397661816253158024383707e-16L),
4370 TEST_c_c (casinh, -0.5L, 0x1p-52L, -4.812118250596034474977589134243772428682e-1L, 1.986027322597818397661816253158024383707e-16L),
4371 TEST_c_c (casinh, 0.5L, -0x1p-52L, 4.812118250596034474977589134243772428682e-1L, -1.986027322597818397661816253158024383707e-16L),
4372 TEST_c_c (casinh, -0.5L, -0x1p-52L, -4.812118250596034474977589134243772428682e-1L, -1.986027322597818397661816253158024383707e-16L),
ccc8cadf 4373#ifndef TEST_FLOAT
08198877
JM
4374 TEST_c_c (casinh, 0x1.fp-1025L, 0.5L, 6.222508863508420569166420770843207333493e-309L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4375 TEST_c_c (casinh, 0x1.fp-1025L, -0.5L, 6.222508863508420569166420770843207333493e-309L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4376 TEST_c_c (casinh, -0x1.fp-1025L, 0.5L, -6.222508863508420569166420770843207333493e-309L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4377 TEST_c_c (casinh, -0x1.fp-1025L, -0.5L, -6.222508863508420569166420770843207333493e-309L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
4378 TEST_c_c (casinh, 0.5L, 0x1.fp-1025L, 4.812118250596034474977589134243684231352e-1L, 4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4379 TEST_c_c (casinh, -0.5L, 0x1.fp-1025L, -4.812118250596034474977589134243684231352e-1L, 4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4380 TEST_c_c (casinh, 0.5L, -0x1.fp-1025L, 4.812118250596034474977589134243684231352e-1L, -4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4381 TEST_c_c (casinh, -0.5L, -0x1.fp-1025L, -4.812118250596034474977589134243684231352e-1L, -4.819934639999230680322935210539402497827e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4382#endif
4383 TEST_c_c (casinh, 0x1p-52L, 0x1p-52L, 2.220446049250313080847263336181677117148e-16L, 2.220446049250313080847263336181604132852e-16L),
4384 TEST_c_c (casinh, 0x1p-52L, -0x1p-52L, 2.220446049250313080847263336181677117148e-16L, -2.220446049250313080847263336181604132852e-16L),
4385 TEST_c_c (casinh, -0x1p-52L, 0x1p-52L, -2.220446049250313080847263336181677117148e-16L, 2.220446049250313080847263336181604132852e-16L),
4386 TEST_c_c (casinh, -0x1p-52L, -0x1p-52L, -2.220446049250313080847263336181677117148e-16L, -2.220446049250313080847263336181604132852e-16L),
ccc8cadf 4387#ifndef TEST_FLOAT
08198877
JM
4388 TEST_c_c (casinh, 0x1.fp-1025L, 0x1p-52L, 5.388850751072128349671657362289548938458e-309L, 2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4389 TEST_c_c (casinh, 0x1.fp-1025L, -0x1p-52L, 5.388850751072128349671657362289548938458e-309L, -2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4390 TEST_c_c (casinh, -0x1.fp-1025L, 0x1p-52L, -5.388850751072128349671657362289548938458e-309L, 2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4391 TEST_c_c (casinh, -0x1.fp-1025L, -0x1p-52L, -5.388850751072128349671657362289548938458e-309L, -2.220446049250313080847263336181658871074e-16L, UNDERFLOW_EXCEPTION_DOUBLE),
4392 /* Bug 15319: underflow exception may be missing. */
4393 TEST_c_c (casinh, 0x1p-52L, 0x1.fp-1025L, 2.220446049250313080847263336181622378926e-16L, 5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4394 TEST_c_c (casinh, -0x1p-52L, 0x1.fp-1025L, -2.220446049250313080847263336181622378926e-16L, 5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4395 TEST_c_c (casinh, 0x1p-52L, -0x1.fp-1025L, 2.220446049250313080847263336181622378926e-16L, -5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4396 TEST_c_c (casinh, -0x1p-52L, -0x1.fp-1025L, -2.220446049250313080847263336181622378926e-16L, -5.388850751072128349671657362289283247603e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4397#endif
4398 TEST_c_c (casinh, 0.0L, 0x1p-52L, 0.0L, 2.220446049250313080847263336181658871074e-16L),
4399 TEST_c_c (casinh, 0.0L, -0x1p-52L, 0.0L, -2.220446049250313080847263336181658871074e-16L),
4400 TEST_c_c (casinh, -0.0L, 0x1p-52L, -0.0L, 2.220446049250313080847263336181658871074e-16L),
4401 TEST_c_c (casinh, -0.0L, -0x1p-52L, -0.0L, -2.220446049250313080847263336181658871074e-16L),
4402 TEST_c_c (casinh, 0x1p-52L, 0.0L, 2.220446049250313080847263336181622378926e-16L, 0.0L),
4403 TEST_c_c (casinh, -0x1p-52L, 0.0L, -2.220446049250313080847263336181622378926e-16L, 0.0L),
4404 TEST_c_c (casinh, 0x1p-52L, -0.0L, 2.220446049250313080847263336181622378926e-16L, -0.0L),
4405 TEST_c_c (casinh, -0x1p-52L, -0.0L, -2.220446049250313080847263336181622378926e-16L, -0.0L),
ccc8cadf 4406#ifndef TEST_FLOAT
08198877
JM
4407 TEST_c_c (casinh, 0x1.fp-1025L, 0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4408 TEST_c_c (casinh, 0x1.fp-1025L, -0x1.fp-1025L, 5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4409 TEST_c_c (casinh, -0x1.fp-1025L, 0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4410 TEST_c_c (casinh, -0x1.fp-1025L, -0x1.fp-1025L, -5.388850751072128349671657362289416093031e-309L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
ccc8cadf
JM
4411#endif
4412#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM
4413 TEST_c_c (casinh, 0x1p-63L, 0x0.ffffffffffffffffp0L, 2.588578361325995866221775673638805081337e-10L, 1.570796326376055842114524927965556247908L),
4414 TEST_c_c (casinh, 0x1p-63L, -0x0.ffffffffffffffffp0L, 2.588578361325995866221775673638805081337e-10L, -1.570796326376055842114524927965556247908L),
4415 TEST_c_c (casinh, -0x1p-63L, 0x0.ffffffffffffffffp0L, -2.588578361325995866221775673638805081337e-10L, 1.570796326376055842114524927965556247908L),
4416 TEST_c_c (casinh, -0x1p-63L, -0x0.ffffffffffffffffp0L, -2.588578361325995866221775673638805081337e-10L, -1.570796326376055842114524927965556247908L),
4417 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, 0x1p-63L, 8.813735870195430251942769895627079569937e-1L, 7.666467083416870407402049869781566856442e-20L),
4418 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, 0x1p-63L, -8.813735870195430251942769895627079569937e-1L, 7.666467083416870407402049869781566856442e-20L),
4419 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, -0x1p-63L, 8.813735870195430251942769895627079569937e-1L, -7.666467083416870407402049869781566856442e-20L),
4420 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, -0x1p-63L, -8.813735870195430251942769895627079569937e-1L, -7.666467083416870407402049869781566856442e-20L),
ccc8cadf 4421# if LDBL_MIN_EXP <= -16381
08198877
JM
4422 TEST_c_c (casinh, 0x1.fp-16385L, 0x0.ffffffffffffffffp0L, 2.472906068161537187835415298076415423459e-4923L, 1.570796326465624365239962068302568888898L),
4423 TEST_c_c (casinh, 0x1.fp-16385L, -0x0.ffffffffffffffffp0L, 2.472906068161537187835415298076415423459e-4923L, -1.570796326465624365239962068302568888898L),
4424 TEST_c_c (casinh, -0x1.fp-16385L, 0x0.ffffffffffffffffp0L, -2.472906068161537187835415298076415423459e-4923L, 1.570796326465624365239962068302568888898L),
4425 TEST_c_c (casinh, -0x1.fp-16385L, -0x0.ffffffffffffffffp0L, -2.472906068161537187835415298076415423459e-4923L, -1.570796326465624365239962068302568888898L),
4426 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, 0x1.fp-16385L, 8.813735870195430251942769895627079569917e-1L, 5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4427 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, 0x1.fp-16385L, -8.813735870195430251942769895627079569917e-1L, 5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4428 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, -0x1.fp-16385L, 8.813735870195430251942769895627079569917e-1L, -5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
4429 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, -0x1.fp-16385L, -8.813735870195430251942769895627079569917e-1L, -5.757683115456107044287327268904964422212e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf 4430# endif
08198877
JM
4431 TEST_c_c (casinh, 0.0L, 0x0.ffffffffffffffffp0L, 0.0L, 1.570796326465624365239962068302568888898L),
4432 TEST_c_c (casinh, 0.0L, -0x0.ffffffffffffffffp0L, 0.0L, -1.570796326465624365239962068302568888898L),
4433 TEST_c_c (casinh, -0.0L, 0x0.ffffffffffffffffp0L, -0.0L, 1.570796326465624365239962068302568888898L),
4434 TEST_c_c (casinh, -0.0L, -0x0.ffffffffffffffffp0L, -0.0L, -1.570796326465624365239962068302568888898L),
4435 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, 0.0L, 8.813735870195430251942769895627079569917e-1L, 0.0L),
4436 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, 0.0L, -8.813735870195430251942769895627079569917e-1L, 0.0L),
4437 TEST_c_c (casinh, 0x0.ffffffffffffffffp0L, -0.0L, 8.813735870195430251942769895627079569917e-1L, -0.0L),
4438 TEST_c_c (casinh, -0x0.ffffffffffffffffp0L, -0.0L, -8.813735870195430251942769895627079569917e-1L, -0.0L),
4439#endif
4440 TEST_c_c (casinh, 0x1p-63L, 0.5L, 1.251928832280966098829878787499365228659e-19L, 5.235987755982988730771072305465838140283e-1L),
4441 TEST_c_c (casinh, 0x1p-63L, -0.5L, 1.251928832280966098829878787499365228659e-19L, -5.235987755982988730771072305465838140283e-1L),
4442 TEST_c_c (casinh, -0x1p-63L, 0.5L, -1.251928832280966098829878787499365228659e-19L, 5.235987755982988730771072305465838140283e-1L),
4443 TEST_c_c (casinh, -0x1p-63L, -0.5L, -1.251928832280966098829878787499365228659e-19L, -5.235987755982988730771072305465838140283e-1L),
4444 TEST_c_c (casinh, 0.5L, 0x1p-63L, 4.812118250596034474977589134243684231373e-1L, 9.697399036122160144833087173623140436413e-20L),
4445 TEST_c_c (casinh, -0.5L, 0x1p-63L, -4.812118250596034474977589134243684231373e-1L, 9.697399036122160144833087173623140436413e-20L),
4446 TEST_c_c (casinh, 0.5L, -0x1p-63L, 4.812118250596034474977589134243684231373e-1L, -9.697399036122160144833087173623140436413e-20L),
4447 TEST_c_c (casinh, -0.5L, -0x1p-63L, -4.812118250596034474977589134243684231373e-1L, -9.697399036122160144833087173623140436413e-20L),
ccc8cadf 4448#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
4449 TEST_c_c (casinh, 0x1.fp-16385L, 0.5L, 9.402257155670418112159334875199821342890e-4933L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4450 TEST_c_c (casinh, 0x1.fp-16385L, -0.5L, 9.402257155670418112159334875199821342890e-4933L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4451 TEST_c_c (casinh, -0x1.fp-16385L, 0.5L, -9.402257155670418112159334875199821342890e-4933L, 5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4452 TEST_c_c (casinh, -0x1.fp-16385L, -0.5L, -9.402257155670418112159334875199821342890e-4933L, -5.235987755982988730771072305465838140329e-1L, UNDERFLOW_EXCEPTION),
4453 TEST_c_c (casinh, 0.5L, 0x1.fp-16385L, 4.812118250596034474977589134243684231352e-1L, 7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4454 TEST_c_c (casinh, -0.5L, 0x1.fp-16385L, -4.812118250596034474977589134243684231352e-1L, 7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4455 TEST_c_c (casinh, 0.5L, -0x1.fp-16385L, 4.812118250596034474977589134243684231352e-1L, -7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4456 TEST_c_c (casinh, -0.5L, -0x1.fp-16385L, -4.812118250596034474977589134243684231352e-1L, -7.282957076134209141226696333885150260319e-4933L, UNDERFLOW_EXCEPTION),
4457#endif
4458 TEST_c_c (casinh, 0x1p-63L, 0x1p-63L, 1.084202172485504434007452800869941711430e-19L, 1.084202172485504434007452800869941711422e-19L),
4459 TEST_c_c (casinh, 0x1p-63L, -0x1p-63L, 1.084202172485504434007452800869941711430e-19L, -1.084202172485504434007452800869941711422e-19L),
4460 TEST_c_c (casinh, -0x1p-63L, 0x1p-63L, -1.084202172485504434007452800869941711430e-19L, 1.084202172485504434007452800869941711422e-19L),
4461 TEST_c_c (casinh, -0x1p-63L, -0x1p-63L, -1.084202172485504434007452800869941711430e-19L, -1.084202172485504434007452800869941711422e-19L),
ccc8cadf 4462#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
4463 TEST_c_c (casinh, 0x1.fp-16385L, 0x1p-63L, 8.142593549724601460479922838826119584465e-4933L, 1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4464 TEST_c_c (casinh, 0x1.fp-16385L, -0x1p-63L, 8.142593549724601460479922838826119584465e-4933L, -1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4465 TEST_c_c (casinh, -0x1.fp-16385L, 0x1p-63L, -8.142593549724601460479922838826119584465e-4933L, 1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4466 TEST_c_c (casinh, -0x1.fp-16385L, -0x1p-63L, -8.142593549724601460479922838826119584465e-4933L, -1.084202172485504434007452800869941711428e-19L, UNDERFLOW_EXCEPTION),
4467 TEST_c_c (casinh, 0x1p-63L, 0x1.fp-16385L, 1.084202172485504434007452800869941711424e-19L, 8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4468 TEST_c_c (casinh, -0x1p-63L, 0x1.fp-16385L, -1.084202172485504434007452800869941711424e-19L, 8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4469 TEST_c_c (casinh, 0x1p-63L, -0x1.fp-16385L, 1.084202172485504434007452800869941711424e-19L, -8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4470 TEST_c_c (casinh, -0x1p-63L, -0x1.fp-16385L, -1.084202172485504434007452800869941711424e-19L, -8.142593549724601460479922838826119584369e-4933L, UNDERFLOW_EXCEPTION),
4471#endif
4472 TEST_c_c (casinh, 0.0L, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711428e-19L),
4473 TEST_c_c (casinh, 0.0L, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711428e-19L),
4474 TEST_c_c (casinh, -0.0L, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711428e-19L),
4475 TEST_c_c (casinh, -0.0L, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711428e-19L),
4476 TEST_c_c (casinh, 0x1p-63L, 0.0L, 1.084202172485504434007452800869941711424e-19L, 0.0L),
4477 TEST_c_c (casinh, -0x1p-63L, 0.0L, -1.084202172485504434007452800869941711424e-19L, 0.0L),
4478 TEST_c_c (casinh, 0x1p-63L, -0.0L, 1.084202172485504434007452800869941711424e-19L, -0.0L),
4479 TEST_c_c (casinh, -0x1p-63L, -0.0L, -1.084202172485504434007452800869941711424e-19L, -0.0L),
ccc8cadf 4480#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
4481 TEST_c_c (casinh, 0x1.fp-16385L, 0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4482 TEST_c_c (casinh, 0x1.fp-16385L, -0x1.fp-16385L, 8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4483 TEST_c_c (casinh, -0x1.fp-16385L, 0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4484 TEST_c_c (casinh, -0x1.fp-16385L, -0x1.fp-16385L, -8.142593549724601460479922838826119584417e-4933L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
ccc8cadf
JM
4485#endif
4486#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM
4487 TEST_c_c (casinh, 0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, 1.234330349600789959989661887846005659983e-16L, 1.570796326794896419512475791677915736035L),
4488 TEST_c_c (casinh, 0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, 1.234330349600789959989661887846005659983e-16L, -1.570796326794896419512475791677915736035L),
4489 TEST_c_c (casinh, -0x1p-105L, 0x0.ffffffffffffffffffffffffffcp0L, -1.234330349600789959989661887846005659983e-16L, 1.570796326794896419512475791677915736035L),
4490 TEST_c_c (casinh, -0x1p-105L, -0x0.ffffffffffffffffffffffffffcp0L, -1.234330349600789959989661887846005659983e-16L, -1.570796326794896419512475791677915736035L),
4491 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, 8.813735870195430252326093249797835932642e-1L, 1.743152798421049375791483240187377443526e-32L),
4492 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-105L, -8.813735870195430252326093249797835932642e-1L, 1.743152798421049375791483240187377443526e-32L),
4493 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, 8.813735870195430252326093249797835932642e-1L, -1.743152798421049375791483240187377443526e-32L),
4494 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-105L, -8.813735870195430252326093249797835932642e-1L, -1.743152798421049375791483240187377443526e-32L),
4495 TEST_c_c (casinh, 0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, 3.432186888910770473784103112009399360940e-293L, 1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4496 TEST_c_c (casinh, 0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, 3.432186888910770473784103112009399360940e-293L, -1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4497 TEST_c_c (casinh, -0x1.fp-1025L, 0x0.ffffffffffffffffffffffffffcp0L, -3.432186888910770473784103112009399360940e-293L, 1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4498 TEST_c_c (casinh, -0x1.fp-1025L, -0x0.ffffffffffffffffffffffffffcp0L, -3.432186888910770473784103112009399360940e-293L, -1.570796326794896462222075823262245502760L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4499 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, 8.813735870195430252326093249797835932642e-1L, 3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4500 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1.fp-1025L, -8.813735870195430252326093249797835932642e-1L, 3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4501 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, 8.813735870195430252326093249797835932642e-1L, -3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4502 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1.fp-1025L, -8.813735870195430252326093249797835932642e-1L, -3.810492908885321743133304375216641110205e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4503 TEST_c_c (casinh, 0.0L, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 1.570796326794896462222075823262245502760L),
4504 TEST_c_c (casinh, 0.0L, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -1.570796326794896462222075823262245502760L),
4505 TEST_c_c (casinh, -0.0L, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 1.570796326794896462222075823262245502760L),
4506 TEST_c_c (casinh, -0.0L, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -1.570796326794896462222075823262245502760L),
4507 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, 0.0L, 8.813735870195430252326093249797835932642e-1L, 0.0L),
4508 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, 0.0L, -8.813735870195430252326093249797835932642e-1L, 0.0L),
4509 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffcp0L, -0.0L, 8.813735870195430252326093249797835932642e-1L, -0.0L),
4510 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffcp0L, -0.0L, -8.813735870195430252326093249797835932642e-1L, -0.0L),
4511#endif
4512 TEST_c_c (casinh, 0x1p-105L, 0.5L, 2.846556599890768890940941645338546615370e-32L, 5.235987755982988730771072305465838140329e-1L),
4513 TEST_c_c (casinh, 0x1p-105L, -0.5L, 2.846556599890768890940941645338546615370e-32L, -5.235987755982988730771072305465838140329e-1L),
4514 TEST_c_c (casinh, -0x1p-105L, 0.5L, -2.846556599890768890940941645338546615370e-32L, 5.235987755982988730771072305465838140329e-1L),
4515 TEST_c_c (casinh, -0x1p-105L, -0.5L, -2.846556599890768890940941645338546615370e-32L, -5.235987755982988730771072305465838140329e-1L),
4516 TEST_c_c (casinh, 0.5L, 0x1p-105L, 4.812118250596034474977589134243684231352e-1L, 2.204933261082751447436996198490110245167e-32L),
4517 TEST_c_c (casinh, -0.5L, 0x1p-105L, -4.812118250596034474977589134243684231352e-1L, 2.204933261082751447436996198490110245167e-32L),
4518 TEST_c_c (casinh, 0.5L, -0x1p-105L, 4.812118250596034474977589134243684231352e-1L, -2.204933261082751447436996198490110245167e-32L),
4519 TEST_c_c (casinh, -0.5L, -0x1p-105L, -4.812118250596034474977589134243684231352e-1L, -2.204933261082751447436996198490110245167e-32L),
4520 TEST_c_c (casinh, 0x1p-105L, 0x1p-105L, 2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
4521 TEST_c_c (casinh, 0x1p-105L, -0x1p-105L, 2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
4522 TEST_c_c (casinh, -0x1p-105L, 0x1p-105L, -2.465190328815661891911651766508706967729e-32L, 2.465190328815661891911651766508706967729e-32L),
4523 TEST_c_c (casinh, -0x1p-105L, -0x1p-105L, -2.465190328815661891911651766508706967729e-32L, -2.465190328815661891911651766508706967729e-32L),
ccc8cadf 4524#ifndef TEST_FLOAT
08198877
JM
4525 TEST_c_c (casinh, 0x1.fp-1025L, 0x1p-105L, 5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4526 TEST_c_c (casinh, 0x1.fp-1025L, -0x1p-105L, 5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4527 TEST_c_c (casinh, -0x1.fp-1025L, 0x1p-105L, -5.388850751072128349671657362289416093031e-309L, 2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4528 TEST_c_c (casinh, -0x1.fp-1025L, -0x1p-105L, -5.388850751072128349671657362289416093031e-309L, -2.465190328815661891911651766508706967729e-32L, UNDERFLOW_EXCEPTION_DOUBLE),
4529 /* Bug 15319: underflow exception may be missing. */
4530 TEST_c_c (casinh, 0x1p-105L, 0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4531 TEST_c_c (casinh, -0x1p-105L, 0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, 5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4532 TEST_c_c (casinh, 0x1p-105L, -0x1.fp-1025L, 2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4533 TEST_c_c (casinh, -0x1p-105L, -0x1.fp-1025L, -2.465190328815661891911651766508706967729e-32L, -5.388850751072128349671657362289416093031e-309L, UNDERFLOW_EXCEPTION_OK_DOUBLE),
4534#endif
4535 TEST_c_c (casinh, 0.0L, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L),
4536 TEST_c_c (casinh, 0.0L, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L),
4537 TEST_c_c (casinh, -0.0L, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L),
4538 TEST_c_c (casinh, -0.0L, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L),
4539 TEST_c_c (casinh, 0x1p-105L, 0.0L, 2.465190328815661891911651766508706967729e-32L, 0.0L),
4540 TEST_c_c (casinh, -0x1p-105L, 0.0L, -2.465190328815661891911651766508706967729e-32L, 0.0L),
4541 TEST_c_c (casinh, 0x1p-105L, -0.0L, 2.465190328815661891911651766508706967729e-32L, -0.0L),
4542 TEST_c_c (casinh, -0x1p-105L, -0.0L, -2.465190328815661891911651766508706967729e-32L, -0.0L),
ccc8cadf 4543#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM
4544 TEST_c_c (casinh, 0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.091004200533850618345330909857103457781e-17L, 1.570796326794896601578502908312986698624L),
4545 TEST_c_c (casinh, 0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.091004200533850618345330909857103457781e-17L, -1.570796326794896601578502908312986698624L),
4546 TEST_c_c (casinh, -0x1p-112L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.091004200533850618345330909857103457781e-17L, 1.570796326794896601578502908312986698624L),
4547 TEST_c_c (casinh, -0x1p-112L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.091004200533850618345330909857103457781e-17L, -1.570796326794896601578502908312986698624L),
4548 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, 8.813735870195430252326093249797922409363e-1L, 1.361838123766444824837096281396380300349e-34L),
4549 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-112L, -8.813735870195430252326093249797922409363e-1L, 1.361838123766444824837096281396380300349e-34L),
4550 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, 8.813735870195430252326093249797922409363e-1L, -1.361838123766444824837096281396380300349e-34L),
4551 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-112L, -8.813735870195430252326093249797922409363e-1L, -1.361838123766444824837096281396380300349e-34L),
4552 TEST_c_c (casinh, 0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, 5.867357004219059108790368268900490184505e-4916L, 1.570796326794896605353533883825294686803L),
4553 TEST_c_c (casinh, 0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, 5.867357004219059108790368268900490184505e-4916L, -1.570796326794896605353533883825294686803L),
4554 TEST_c_c (casinh, -0x1.fp-16385L, 0x0.ffffffffffffffffffffffffffff8p0L, -5.867357004219059108790368268900490184505e-4916L, 1.570796326794896605353533883825294686803L),
4555 TEST_c_c (casinh, -0x1.fp-16385L, -0x0.ffffffffffffffffffffffffffff8p0L, -5.867357004219059108790368268900490184505e-4916L, -1.570796326794896605353533883825294686803L),
4556 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, 8.813735870195430252326093249797922409363e-1L, 5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4557 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1.fp-16385L, -8.813735870195430252326093249797922409363e-1L, 5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4558 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, 8.813735870195430252326093249797922409363e-1L, -5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4559 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1.fp-16385L, -8.813735870195430252326093249797922409363e-1L, -5.757683115456107044131264955348449231681e-4933L, UNDERFLOW_EXCEPTION),
4560 TEST_c_c (casinh, 0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 1.570796326794896605353533883825294686803L),
4561 TEST_c_c (casinh, 0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -1.570796326794896605353533883825294686803L),
4562 TEST_c_c (casinh, -0.0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 1.570796326794896605353533883825294686803L),
4563 TEST_c_c (casinh, -0.0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -1.570796326794896605353533883825294686803L),
4564 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, 8.813735870195430252326093249797922409363e-1L, 0.0L),
4565 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, 0.0L, -8.813735870195430252326093249797922409363e-1L, 0.0L),
4566 TEST_c_c (casinh, 0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, 8.813735870195430252326093249797922409363e-1L, -0.0L),
4567 TEST_c_c (casinh, -0x0.ffffffffffffffffffffffffffff8p0L, -0.0L, -8.813735870195430252326093249797922409363e-1L, -0.0L),
4568#endif
4569 TEST_c_c (casinh, 0x1p-112L, 0.5L, 2.223872343664663196047610660420739543258e-34L, 5.235987755982988730771072305465838140329e-1L),
4570 TEST_c_c (casinh, 0x1p-112L, -0.5L, 2.223872343664663196047610660420739543258e-34L, -5.235987755982988730771072305465838140329e-1L),
4571 TEST_c_c (casinh, -0x1p-112L, 0.5L, -2.223872343664663196047610660420739543258e-34L, 5.235987755982988730771072305465838140329e-1L),
4572 TEST_c_c (casinh, -0x1p-112L, -0.5L, -2.223872343664663196047610660420739543258e-34L, -5.235987755982988730771072305465838140329e-1L),
4573 TEST_c_c (casinh, 0.5L, 0x1p-112L, 4.812118250596034474977589134243684231352e-1L, 1.722604110220899568310153280070398629037e-34L),
4574 TEST_c_c (casinh, -0.5L, 0x1p-112L, -4.812118250596034474977589134243684231352e-1L, 1.722604110220899568310153280070398629037e-34L),
4575 TEST_c_c (casinh, 0.5L, -0x1p-112L, 4.812118250596034474977589134243684231352e-1L, -1.722604110220899568310153280070398629037e-34L),
4576 TEST_c_c (casinh, -0.5L, -0x1p-112L, -4.812118250596034474977589134243684231352e-1L, -1.722604110220899568310153280070398629037e-34L),
4577 TEST_c_c (casinh, 0x1p-112L, 0x1p-112L, 1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
4578 TEST_c_c (casinh, 0x1p-112L, -0x1p-112L, 1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
4579 TEST_c_c (casinh, -0x1p-112L, 0x1p-112L, -1.925929944387235853055977942584927318538e-34L, 1.925929944387235853055977942584927318538e-34L),
4580 TEST_c_c (casinh, -0x1p-112L, -0x1p-112L, -1.925929944387235853055977942584927318538e-34L, -1.925929944387235853055977942584927318538e-34L),
ccc8cadf 4581#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
4582 TEST_c_c (casinh, 0x1.fp-16385L, 0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4583 TEST_c_c (casinh, 0x1.fp-16385L, -0x1p-112L, 8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4584 TEST_c_c (casinh, -0x1.fp-16385L, 0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, 1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4585 TEST_c_c (casinh, -0x1.fp-16385L, -0x1p-112L, -8.142593549724601460479922838826119584417e-4933L, -1.925929944387235853055977942584927318538e-34L, UNDERFLOW_EXCEPTION),
4586 TEST_c_c (casinh, 0x1p-112L, 0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4587 TEST_c_c (casinh, -0x1p-112L, 0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, 8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4588 TEST_c_c (casinh, 0x1p-112L, -0x1.fp-16385L, 1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4589 TEST_c_c (casinh, -0x1p-112L, -0x1.fp-16385L, -1.925929944387235853055977942584927318538e-34L, -8.142593549724601460479922838826119584417e-4933L, UNDERFLOW_EXCEPTION),
4590#endif
4591 TEST_c_c (casinh, 0.0L, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L),
4592 TEST_c_c (casinh, 0.0L, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L),
4593 TEST_c_c (casinh, -0.0L, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L),
4594 TEST_c_c (casinh, -0.0L, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L),
4595 TEST_c_c (casinh, 0x1p-112L, 0.0L, 1.925929944387235853055977942584927318538e-34L, 0.0L),
4596 TEST_c_c (casinh, -0x1p-112L, 0.0L, -1.925929944387235853055977942584927318538e-34L, 0.0L),
4597 TEST_c_c (casinh, 0x1p-112L, -0.0L, 1.925929944387235853055977942584927318538e-34L, -0.0L),
4598 TEST_c_c (casinh, -0x1p-112L, -0.0L, -1.925929944387235853055977942584927318538e-34L, -0.0L),
4599
4600 TEST_c_c (casinh, 0.75L, 1.25L, 1.03171853444778027336364058631006594L, 0.911738290968487636358489564316731207L),
4601 TEST_c_c (casinh, -2, -3, -1.9686379257930962917886650952454982L, -0.96465850440760279204541105949953237L),
4602 END_DATA (casinh)
4603 };
8847214f
UD
4604
4605static void
08198877 4606casinh_test (void)
8847214f 4607{
aaca11d8 4608 errno = 0;
08198877 4609 FUNC(casinh) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD
4610 if (errno == ENOSYS)
4611 /* Function not implemented. */
4612 return;
4613
08198877
JM
4614 START (casinh);
4615 RUN_TEST_LOOP_c_c (casinh, casinh_test_data, );
4616 END (casinh, complex);
4617}
4618
8847214f 4619
08198877
JM
4620static const struct test_c_c_data catan_test_data[] =
4621 {
4622 START_DATA (catan),
4623 TEST_c_c (catan, 0, 0, 0, 0),
4624 TEST_c_c (catan, minus_zero, 0, minus_zero, 0),
4625 TEST_c_c (catan, 0, minus_zero, 0, minus_zero),
4626 TEST_c_c (catan, minus_zero, minus_zero, minus_zero, minus_zero),
4627
4628 TEST_c_c (catan, 1.0L, plus_zero, M_PI_4l, plus_zero),
4629 TEST_c_c (catan, 1.0L, minus_zero, M_PI_4l, minus_zero),
4630 TEST_c_c (catan, -1.0L, plus_zero, -M_PI_4l, plus_zero),
4631 TEST_c_c (catan, -1.0L, minus_zero, -M_PI_4l, minus_zero),
4632 TEST_c_c (catan, plus_zero, 1.0L, plus_zero, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4633 TEST_c_c (catan, minus_zero, 1.0L, minus_zero, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4634 TEST_c_c (catan, plus_zero, -1.0L, plus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4635 TEST_c_c (catan, minus_zero, -1.0L, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
4636
4637 TEST_c_c (catan, plus_infty, plus_infty, M_PI_2l, 0),
4638 TEST_c_c (catan, plus_infty, minus_infty, M_PI_2l, minus_zero),
4639 TEST_c_c (catan, minus_infty, plus_infty, -M_PI_2l, 0),
4640 TEST_c_c (catan, minus_infty, minus_infty, -M_PI_2l, minus_zero),
4641
4642
4643 TEST_c_c (catan, plus_infty, -10.0, M_PI_2l, minus_zero),
4644 TEST_c_c (catan, minus_infty, -10.0, -M_PI_2l, minus_zero),
4645 TEST_c_c (catan, plus_infty, minus_zero, M_PI_2l, minus_zero),
4646 TEST_c_c (catan, minus_infty, minus_zero, -M_PI_2l, minus_zero),
4647 TEST_c_c (catan, plus_infty, 0.0, M_PI_2l, 0),
4648 TEST_c_c (catan, minus_infty, 0.0, -M_PI_2l, 0),
4649 TEST_c_c (catan, plus_infty, 0.1L, M_PI_2l, 0),
4650 TEST_c_c (catan, minus_infty, 0.1L, -M_PI_2l, 0),
4651
4652 TEST_c_c (catan, 0.0, minus_infty, M_PI_2l, minus_zero),
4653 TEST_c_c (catan, minus_zero, minus_infty, -M_PI_2l, minus_zero),
4654 TEST_c_c (catan, 100.0, minus_infty, M_PI_2l, minus_zero),
4655 TEST_c_c (catan, -100.0, minus_infty, -M_PI_2l, minus_zero),
4656
4657 TEST_c_c (catan, 0.0, plus_infty, M_PI_2l, 0),
4658 TEST_c_c (catan, minus_zero, plus_infty, -M_PI_2l, 0),
4659 TEST_c_c (catan, 0.5, plus_infty, M_PI_2l, 0),
4660 TEST_c_c (catan, -0.5, plus_infty, -M_PI_2l, 0),
4661
4662 TEST_c_c (catan, qnan_value, 0.0, qnan_value, 0),
4663 TEST_c_c (catan, qnan_value, minus_zero, qnan_value, minus_zero),
4664
4665 TEST_c_c (catan, qnan_value, plus_infty, qnan_value, 0),
4666 TEST_c_c (catan, qnan_value, minus_infty, qnan_value, minus_zero),
4667
4668 TEST_c_c (catan, 0.0, qnan_value, qnan_value, qnan_value),
4669 TEST_c_c (catan, minus_zero, qnan_value, qnan_value, qnan_value),
4670
4671 TEST_c_c (catan, plus_infty, qnan_value, M_PI_2l, 0, IGNORE_ZERO_INF_SIGN),
4672 TEST_c_c (catan, minus_infty, qnan_value, -M_PI_2l, 0, IGNORE_ZERO_INF_SIGN),
4673
4674 TEST_c_c (catan, qnan_value, 10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4675 TEST_c_c (catan, qnan_value, -10.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4676
4677 TEST_c_c (catan, 0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4678 TEST_c_c (catan, -0.75, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
4679
4680 TEST_c_c (catan, qnan_value, qnan_value, qnan_value, qnan_value),
4681
4682 TEST_c_c (catan, 0x1p50L, 0.0L, 1.570796326794895731052901991514519103193L, 0.0L),
4683 TEST_c_c (catan, 0x1p50L, -0.0L, 1.570796326794895731052901991514519103193L, -0.0L),
4684 TEST_c_c (catan, -0x1p50L, 0.0L, -1.570796326794895731052901991514519103193L, 0.0L),
4685 TEST_c_c (catan, -0x1p50L, -0.0L, -1.570796326794895731052901991514519103193L, -0.0L),
4686 TEST_c_c (catan, 0.0L, 0x1p50L, 1.570796326794896619231321691639751442099L, 8.881784197001252323389053344728897997441e-16L),
4687 TEST_c_c (catan, -0.0L, 0x1p50L, -1.570796326794896619231321691639751442099L, 8.881784197001252323389053344728897997441e-16L),
4688 TEST_c_c (catan, 0.0L, -0x1p50L, 1.570796326794896619231321691639751442099L, -8.881784197001252323389053344728897997441e-16L),
4689 TEST_c_c (catan, -0.0L, -0x1p50L, -1.570796326794896619231321691639751442099L, -8.881784197001252323389053344728897997441e-16L),
2f38fbfe 4690#ifndef TEST_FLOAT
08198877
JM
4691 TEST_c_c (catan, 0x1p500L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4692 TEST_c_c (catan, 0x1p500L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4693 TEST_c_c (catan, -0x1p500L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4694 TEST_c_c (catan, -0x1p500L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4695 TEST_c_c (catan, 0.0L, 0x1p500L, 1.570796326794896619231321691639751442099L, 3.054936363499604682051979393213617699789e-151L),
4696 TEST_c_c (catan, -0.0L, 0x1p500L, -1.570796326794896619231321691639751442099L, 3.054936363499604682051979393213617699789e-151L),
4697 TEST_c_c (catan, 0.0L, -0x1p500L, 1.570796326794896619231321691639751442099L, -3.054936363499604682051979393213617699789e-151L),
4698 TEST_c_c (catan, -0.0L, -0x1p500L, -1.570796326794896619231321691639751442099L, -3.054936363499604682051979393213617699789e-151L),
2f38fbfe
JM
4699#endif
4700#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
4701 TEST_c_c (catan, 0x1p5000L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4702 TEST_c_c (catan, 0x1p5000L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4703 TEST_c_c (catan, -0x1p5000L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4704 TEST_c_c (catan, -0x1p5000L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4705 TEST_c_c (catan, 0.0L, 0x1p5000L, 1.570796326794896619231321691639751442099L, 7.079811261048172892385615158694057552948e-1506L),
4706 TEST_c_c (catan, -0.0L, 0x1p5000L, -1.570796326794896619231321691639751442099L, 7.079811261048172892385615158694057552948e-1506L),
4707 TEST_c_c (catan, 0.0L, -0x1p5000L, 1.570796326794896619231321691639751442099L, -7.079811261048172892385615158694057552948e-1506L),
4708 TEST_c_c (catan, -0.0L, -0x1p5000L, -1.570796326794896619231321691639751442099L, -7.079811261048172892385615158694057552948e-1506L),
4709#endif
4710 TEST_c_c (catan, 0x1p63L, 0.5L, 1.570796326794896619122901474391200998698L, 5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4711 TEST_c_c (catan, 0x1p63L, -0.5L, 1.570796326794896619122901474391200998698L, -5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4712 TEST_c_c (catan, -0x1p63L, 0.5L, -1.570796326794896619122901474391200998698L, 5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4713 TEST_c_c (catan, -0x1p63L, -0.5L, -1.570796326794896619122901474391200998698L, -5.877471754111437539843682686111228389007e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4714 TEST_c_c (catan, 0.5L, 0x1p63L, 1.570796326794896619231321691639751442093L, 1.084202172485504434007452800869941711427e-19L),
4715 TEST_c_c (catan, -0.5L, 0x1p63L, -1.570796326794896619231321691639751442093L, 1.084202172485504434007452800869941711427e-19L),
4716 TEST_c_c (catan, 0.5L, -0x1p63L, 1.570796326794896619231321691639751442093L, -1.084202172485504434007452800869941711427e-19L),
4717 TEST_c_c (catan, -0.5L, -0x1p63L, -1.570796326794896619231321691639751442093L, -1.084202172485504434007452800869941711427e-19L),
9457fd95 4718#ifndef TEST_FLOAT
08198877
JM
4719 TEST_c_c (catan, 0x1p511L, 0.5L, 1.570796326794896619231321691639751442099L, 1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4720 TEST_c_c (catan, 0x1p511L, -0.5L, 1.570796326794896619231321691639751442099L, -1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4721 TEST_c_c (catan, -0x1p511L, 0.5L, -1.570796326794896619231321691639751442099L, 1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4722 TEST_c_c (catan, -0x1p511L, -0.5L, -1.570796326794896619231321691639751442099L, -1.112536929253600691545116358666202032110e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4723 TEST_c_c (catan, 0.5L, 0x1p511L, 1.570796326794896619231321691639751442099L, 1.491668146240041348658193063092586767475e-154L),
4724 TEST_c_c (catan, -0.5L, 0x1p511L, -1.570796326794896619231321691639751442099L, 1.491668146240041348658193063092586767475e-154L),
4725 TEST_c_c (catan, 0.5L, -0x1p511L, 1.570796326794896619231321691639751442099L, -1.491668146240041348658193063092586767475e-154L),
4726 TEST_c_c (catan, -0.5L, -0x1p511L, -1.570796326794896619231321691639751442099L, -1.491668146240041348658193063092586767475e-154L),
9457fd95
JM
4727#endif
4728#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
4729 TEST_c_c (catan, 0x1p8191L, 0.5L, 1.570796326794896619231321691639751442099L, 1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4730 TEST_c_c (catan, 0x1p8191L, -0.5L, 1.570796326794896619231321691639751442099L, -1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4731 TEST_c_c (catan, -0x1p8191L, 0.5L, -1.570796326794896619231321691639751442099L, 1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4732 TEST_c_c (catan, -0x1p8191L, -0.5L, -1.570796326794896619231321691639751442099L, -1.681051571556046753131338908660876301299e-4932L, UNDERFLOW_EXCEPTION),
4733 TEST_c_c (catan, 0.5L, 0x1p8191L, 1.570796326794896619231321691639751442099L, 1.833603867554847165621412392048483165956e-2466L),
4734 TEST_c_c (catan, -0.5L, 0x1p8191L, -1.570796326794896619231321691639751442099L, 1.833603867554847165621412392048483165956e-2466L),
4735 TEST_c_c (catan, 0.5L, -0x1p8191L, 1.570796326794896619231321691639751442099L, -1.833603867554847165621412392048483165956e-2466L),
4736 TEST_c_c (catan, -0.5L, -0x1p8191L, -1.570796326794896619231321691639751442099L, -1.833603867554847165621412392048483165956e-2466L),
4737#endif
4738 TEST_c_c (catan, 0x1p100L, 0.0L, 1.570796326794896619231321691638962581193L, 0.0L),
4739 TEST_c_c (catan, 0x1p100L, -0.0L, 1.570796326794896619231321691638962581193L, -0.0L),
4740 TEST_c_c (catan, -0x1p100L, 0.0L, -1.570796326794896619231321691638962581193L, 0.0L),
4741 TEST_c_c (catan, -0x1p100L, -0.0L, -1.570796326794896619231321691638962581193L, -0.0L),
4742 TEST_c_c (catan, 0.0L, 0x1p100L, 1.570796326794896619231321691639751442099L, 7.888609052210118054117285652827862296732e-31L),
4743 TEST_c_c (catan, -0.0L, 0x1p100L, -1.570796326794896619231321691639751442099L, 7.888609052210118054117285652827862296732e-31L),
4744 TEST_c_c (catan, 0.0L, -0x1p100L, 1.570796326794896619231321691639751442099L, -7.888609052210118054117285652827862296732e-31L),
4745 TEST_c_c (catan, -0.0L, -0x1p100L, -1.570796326794896619231321691639751442099L, -7.888609052210118054117285652827862296732e-31L),
4746 TEST_c_c (catan, 0x1.fp127L, 0.0L, 1.570796326794896619231321691639751442096L, 0.0L),
4747 TEST_c_c (catan, 0x1.fp127L, -0.0L, 1.570796326794896619231321691639751442096L, -0.0L),
4748 TEST_c_c (catan, -0x1.fp127L, 0.0L, -1.570796326794896619231321691639751442096L, 0.0L),
4749 TEST_c_c (catan, -0x1.fp127L, -0.0L, -1.570796326794896619231321691639751442096L, -0.0L),
4750 TEST_c_c (catan, 0.0L, 0x1.fp127L, 1.570796326794896619231321691639751442099L, 3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4751 TEST_c_c (catan, -0.0L, 0x1.fp127L, -1.570796326794896619231321691639751442099L, 3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4752 TEST_c_c (catan, 0.0L, -0x1.fp127L, 1.570796326794896619231321691639751442099L, -3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4753 TEST_c_c (catan, -0.0L, -0x1.fp127L, -1.570796326794896619231321691639751442099L, -3.033533808573645181854803967025150136306e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4754 TEST_c_c (catan, 0x1.fp127L, 0x1.fp127L, 1.570796326794896619231321691639751442097L, 1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4755 TEST_c_c (catan, 0x1.fp127L, -0x1.fp127L, 1.570796326794896619231321691639751442097L, -1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4756 TEST_c_c (catan, -0x1.fp127L, 0x1.fp127L, -1.570796326794896619231321691639751442097L, 1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4757 TEST_c_c (catan, -0x1.fp127L, -0x1.fp127L, -1.570796326794896619231321691639751442097L, -1.516766904286822590927401983512575068153e-39L, UNDERFLOW_EXCEPTION_FLOAT),
5b4217d7 4758#ifndef TEST_FLOAT
08198877
JM
4759 TEST_c_c (catan, 0x1p900L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4760 TEST_c_c (catan, 0x1p900L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4761 TEST_c_c (catan, -0x1p900L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4762 TEST_c_c (catan, -0x1p900L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4763 TEST_c_c (catan, 0.0L, 0x1p900L, 1.570796326794896619231321691639751442099L, 1.183052186166774710972751597518026531652e-271L),
4764 TEST_c_c (catan, -0.0L, 0x1p900L, -1.570796326794896619231321691639751442099L, 1.183052186166774710972751597518026531652e-271L),
4765 TEST_c_c (catan, 0.0L, -0x1p900L, 1.570796326794896619231321691639751442099L, -1.183052186166774710972751597518026531652e-271L),
4766 TEST_c_c (catan, -0.0L, -0x1p900L, -1.570796326794896619231321691639751442099L, -1.183052186166774710972751597518026531652e-271L),
4767 TEST_c_c (catan, 0x1.fp1023L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4768 TEST_c_c (catan, 0x1.fp1023L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4769 TEST_c_c (catan, -0x1.fp1023L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4770 TEST_c_c (catan, -0x1.fp1023L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4771 TEST_c_c (catan, 0.0L, 0x1.fp1023L, 1.570796326794896619231321691639751442099L, 5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4772 TEST_c_c (catan, -0.0L, 0x1.fp1023L, -1.570796326794896619231321691639751442099L, 5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4773 TEST_c_c (catan, 0.0L, -0x1.fp1023L, 1.570796326794896619231321691639751442099L, -5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4774 TEST_c_c (catan, -0.0L, -0x1.fp1023L, -1.570796326794896619231321691639751442099L, -5.742126086470197117652213464083623391533e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4775 TEST_c_c (catan, 0x1.fp1023L, 0x1.fp1023L, 1.570796326794896619231321691639751442099L, 2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4776 TEST_c_c (catan, 0x1.fp1023L, -0x1.fp1023L, 1.570796326794896619231321691639751442099L, -2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4777 TEST_c_c (catan, -0x1.fp1023L, 0x1.fp1023L, -1.570796326794896619231321691639751442099L, 2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
4778 TEST_c_c (catan, -0x1.fp1023L, -0x1.fp1023L, -1.570796326794896619231321691639751442099L, -2.871063043235098558826106732041811695767e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
5b4217d7
JM
4779#endif
4780#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
4781 TEST_c_c (catan, 0x1p10000L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4782 TEST_c_c (catan, 0x1p10000L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4783 TEST_c_c (catan, -0x1p10000L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4784 TEST_c_c (catan, -0x1p10000L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4785 TEST_c_c (catan, 0.0L, 0x1p10000L, 1.570796326794896619231321691639751442099L, 5.012372749206452009297555933742977749322e-3011L),
4786 TEST_c_c (catan, -0.0L, 0x1p10000L, -1.570796326794896619231321691639751442099L, 5.012372749206452009297555933742977749322e-3011L),
4787 TEST_c_c (catan, 0.0L, -0x1p10000L, 1.570796326794896619231321691639751442099L, -5.012372749206452009297555933742977749322e-3011L),
4788 TEST_c_c (catan, -0.0L, -0x1p10000L, -1.570796326794896619231321691639751442099L, -5.012372749206452009297555933742977749322e-3011L),
4789 TEST_c_c (catan, 0x1.fp16383L, 0.0L, 1.570796326794896619231321691639751442099L, 0.0L),
4790 TEST_c_c (catan, 0x1.fp16383L, -0.0L, 1.570796326794896619231321691639751442099L, -0.0L),
4791 TEST_c_c (catan, -0x1.fp16383L, 0.0L, -1.570796326794896619231321691639751442099L, 0.0L),
4792 TEST_c_c (catan, -0x1.fp16383L, -0.0L, -1.570796326794896619231321691639751442099L, -0.0L),
4793 TEST_c_c (catan, 0.0L, 0x1.fp16383L, 1.570796326794896619231321691639751442099L, 8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4794 TEST_c_c (catan, -0.0L, 0x1.fp16383L, -1.570796326794896619231321691639751442099L, 8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4795 TEST_c_c (catan, 0.0L, -0x1.fp16383L, 1.570796326794896619231321691639751442099L, -8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4796 TEST_c_c (catan, -0.0L, -0x1.fp16383L, -1.570796326794896619231321691639751442099L, -8.676395208031209048419813722120651877672e-4933L, UNDERFLOW_EXCEPTION),
4797 TEST_c_c (catan, 0x1.fp16383L, 0x1.fp16383L, 1.570796326794896619231321691639751442099L, 4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4798 TEST_c_c (catan, 0x1.fp16383L, -0x1.fp16383L, 1.570796326794896619231321691639751442099L, -4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4799 TEST_c_c (catan, -0x1.fp16383L, 0x1.fp16383L, -1.570796326794896619231321691639751442099L, 4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4800 TEST_c_c (catan, -0x1.fp16383L, -0x1.fp16383L, -1.570796326794896619231321691639751442099L, -4.338197604015604524209906861060325938836e-4933L, UNDERFLOW_EXCEPTION),
4801#endif
4802 TEST_c_c (catan, 0x1p-13L, 1.0L, 7.854286809755354140031716771044626356262e-1L, 4.852030264850939738801379894163661227127L),
4803 TEST_c_c (catan, 0x1p-13L, -1.0L, 7.854286809755354140031716771044626356262e-1L, -4.852030264850939738801379894163661227127L),
4804 TEST_c_c (catan, -0x1p-13L, 1.0L, -7.854286809755354140031716771044626356262e-1L, 4.852030264850939738801379894163661227127L),
4805 TEST_c_c (catan, -0x1p-13L, -1.0L, -7.854286809755354140031716771044626356262e-1L, -4.852030264850939738801379894163661227127L),
4806 TEST_c_c (catan, 1.0L, 0x1p-13L, 7.853981671227386080775748393881580082970e-1L, 6.103515609841754902688560615027452023669e-5L),
4807 TEST_c_c (catan, -1.0L, 0x1p-13L, -7.853981671227386080775748393881580082970e-1L, 6.103515609841754902688560615027452023669e-5L),
4808 TEST_c_c (catan, 1.0L, -0x1p-13L, 7.853981671227386080775748393881580082970e-1L, -6.103515609841754902688560615027452023669e-5L),
4809 TEST_c_c (catan, -1.0L, -0x1p-13L, -7.853981671227386080775748393881580082970e-1L, -6.103515609841754902688560615027452023669e-5L),
4810 TEST_c_c (catan, 0x1p-27L, 1.0L, 7.853981652600934588466178684534110069553e-1L, 9.704060527839234335310696652368086117807L),
4811 TEST_c_c (catan, 0x1p-27L, -1.0L, 7.853981652600934588466178684534110069553e-1L, -9.704060527839234335310696652368086117807L),
4812 TEST_c_c (catan, -0x1p-27L, 1.0L, -7.853981652600934588466178684534110069553e-1L, 9.704060527839234335310696652368086117807L),
4813 TEST_c_c (catan, -0x1p-27L, -1.0L, -7.853981652600934588466178684534110069553e-1L, -9.704060527839234335310696652368086117807L),
4814 TEST_c_c (catan, 1.0L, 0x1p-27L, 7.853981633974483234934486536343324763447e-1L, 3.725290298461914028034141143623846306386e-9L),
4815 TEST_c_c (catan, -1.0L, 0x1p-27L, -7.853981633974483234934486536343324763447e-1L, 3.725290298461914028034141143623846306386e-9L),
4816 TEST_c_c (catan, 1.0L, -0x1p-27L, 7.853981633974483234934486536343324763447e-1L, -3.725290298461914028034141143623846306386e-9L),
4817 TEST_c_c (catan, -1.0L, -0x1p-27L, -7.853981633974483234934486536343324763447e-1L, -3.725290298461914028034141143623846306386e-9L),
4818 TEST_c_c (catan, 0x1p-33L, 1.0L, 7.853981634265521400723945494331241018449e-1L, 1.178350206951907026009379309773625595762e1L),
4819 TEST_c_c (catan, 0x1p-33L, -1.0L, 7.853981634265521400723945494331241018449e-1L, -1.178350206951907026009379309773625595762e1L),
4820 TEST_c_c (catan, -0x1p-33L, 1.0L, -7.853981634265521400723945494331241018449e-1L, 1.178350206951907026009379309773625595762e1L),
4821 TEST_c_c (catan, -0x1p-33L, -1.0L, -7.853981634265521400723945494331241018449e-1L, -1.178350206951907026009379309773625595762e1L),
4822 TEST_c_c (catan, 1.0L, 0x1p-33L, 7.853981633974483096190489776088929224056e-1L, 5.820766091346740722643102318246316469910e-11L),
4823 TEST_c_c (catan, -1.0L, 0x1p-33L, -7.853981633974483096190489776088929224056e-1L, 5.820766091346740722643102318246316469910e-11L),
4824 TEST_c_c (catan, 1.0L, -0x1p-33L, 7.853981633974483096190489776088929224056e-1L, -5.820766091346740722643102318246316469910e-11L),
4825 TEST_c_c (catan, -1.0L, -0x1p-33L, -7.853981633974483096190489776088929224056e-1L, -5.820766091346740722643102318246316469910e-11L),
4826 TEST_c_c (catan, 0x1p-54L, 1.0L, 7.853981633974483234934486536343324763447e-1L, 1.906154746539849600897388334009985581467e1L),
4827 TEST_c_c (catan, 0x1p-54L, -1.0L, 7.853981633974483234934486536343324763447e-1L, -1.906154746539849600897388334009985581467e1L),
4828 TEST_c_c (catan, -0x1p-54L, 1.0L, -7.853981633974483234934486536343324763447e-1L, 1.906154746539849600897388334009985581467e1L),
4829 TEST_c_c (catan, -0x1p-54L, -1.0L, -7.853981633974483234934486536343324763447e-1L, -1.906154746539849600897388334009985581467e1L),
4830 TEST_c_c (catan, 1.0L, 0x1p-54L, 7.853981633974483096156608458198764914213e-1L, 2.775557561562891351059079170227049355775e-17L),
4831 TEST_c_c (catan, -1.0L, 0x1p-54L, -7.853981633974483096156608458198764914213e-1L, 2.775557561562891351059079170227049355775e-17L),
4832 TEST_c_c (catan, 1.0L, -0x1p-54L, 7.853981633974483096156608458198764914213e-1L, -2.775557561562891351059079170227049355775e-17L),
4833 TEST_c_c (catan, -1.0L, -0x1p-54L, -7.853981633974483096156608458198764914213e-1L, -2.775557561562891351059079170227049355775e-17L),
4834 TEST_c_c (catan, 0x1p-57L, 1.0L, 7.853981633974483113503843217966828154612e-1L, 2.010126823623841397309973152228712047720e1L),
4835 TEST_c_c (catan, 0x1p-57L, -1.0L, 7.853981633974483113503843217966828154612e-1L, -2.010126823623841397309973152228712047720e1L),
4836 TEST_c_c (catan, -0x1p-57L, 1.0L, -7.853981633974483113503843217966828154612e-1L, 2.010126823623841397309973152228712047720e1L),
4837 TEST_c_c (catan, -0x1p-57L, -1.0L, -7.853981633974483113503843217966828154612e-1L, -2.010126823623841397309973152228712047720e1L),
4838 TEST_c_c (catan, 1.0L, 0x1p-57L, 7.853981633974483096156608458198757330864e-1L, 3.469446951953614188823848962783813448721e-18L),
4839 TEST_c_c (catan, -1.0L, 0x1p-57L, -7.853981633974483096156608458198757330864e-1L, 3.469446951953614188823848962783813448721e-18L),
4840 TEST_c_c (catan, 1.0L, -0x1p-57L, 7.853981633974483096156608458198757330864e-1L, -3.469446951953614188823848962783813448721e-18L),
4841 TEST_c_c (catan, -1.0L, -0x1p-57L, -7.853981633974483096156608458198757330864e-1L, -3.469446951953614188823848962783813448721e-18L),
4842 TEST_c_c (catan, 0x1p-13L, 0x1.000002p0L, 7.859169620684960844300240092596908675974e-1L, 4.852030056234795712498957387213592193975L),
4843 TEST_c_c (catan, 0x1p-13L, -0x1.000002p0L, 7.859169620684960844300240092596908675974e-1L, -4.852030056234795712498957387213592193975L),
4844 TEST_c_c (catan, -0x1p-13L, 0x1.000002p0L, -7.859169620684960844300240092596908675974e-1L, 4.852030056234795712498957387213592193975L),
4845 TEST_c_c (catan, -0x1p-13L, -0x1.000002p0L, -7.859169620684960844300240092596908675974e-1L, -4.852030056234795712498957387213592193975L),
4846 TEST_c_c (catan, 0x1.000002p0L, 0x1p-13L, 7.853982267273793866654490522673596014524e-1L, 6.103514882246036852433556327261700380577e-5L),
4847 TEST_c_c (catan, -0x1.000002p0L, 0x1p-13L, -7.853982267273793866654490522673596014524e-1L, 6.103514882246036852433556327261700380577e-5L),
4848 TEST_c_c (catan, 0x1.000002p0L, -0x1p-13L, 7.853982267273793866654490522673596014524e-1L, -6.103514882246036852433556327261700380577e-5L),
4849 TEST_c_c (catan, -0x1.000002p0L, -0x1p-13L, -7.853982267273793866654490522673596014524e-1L, -6.103514882246036852433556327261700380577e-5L),
4850 TEST_c_c (catan, 0x1p-13L, 0x0.ffffffp0L, 7.851845403708474595909269086711426246675e-1L, 4.852030190345140708455871037447717761868L),
4851 TEST_c_c (catan, 0x1p-13L, -0x0.ffffffp0L, 7.851845403708474595909269086711426246675e-1L, -4.852030190345140708455871037447717761868L),
4852 TEST_c_c (catan, -0x1p-13L, 0x0.ffffffp0L, -7.851845403708474595909269086711426246675e-1L, 4.852030190345140708455871037447717761868L),
4853 TEST_c_c (catan, -0x1p-13L, -0x0.ffffffp0L, -7.851845403708474595909269086711426246675e-1L, -4.852030190345140708455871037447717761868L),
4854 TEST_c_c (catan, 0x0.ffffffp0L, 0x1p-13L, 7.853981373204155542484315721351697277336e-1L, 6.103515973639646453881721999956617260502e-5L),
4855 TEST_c_c (catan, -0x0.ffffffp0L, 0x1p-13L, -7.853981373204155542484315721351697277336e-1L, 6.103515973639646453881721999956617260502e-5L),
4856 TEST_c_c (catan, 0x0.ffffffp0L, -0x1p-13L, 7.853981373204155542484315721351697277336e-1L, -6.103515973639646453881721999956617260502e-5L),
4857 TEST_c_c (catan, -0x0.ffffffp0L, -0x1p-13L, -7.853981373204155542484315721351697277336e-1L, -6.103515973639646453881721999956617260502e-5L),
caf84319 4858#ifndef TEST_FLOAT
08198877
JM
4859 TEST_c_c (catan, 0x1p-27L, 0x1.0000000000001p0L, 7.853981801612546526942695000283242525531e-1L, 9.704060527839234168777242958594699810015L),
4860 TEST_c_c (catan, 0x1p-27L, -0x1.0000000000001p0L, 7.853981801612546526942695000283242525531e-1L, -9.704060527839234168777242958594699810015L),
4861 TEST_c_c (catan, -0x1p-27L, 0x1.0000000000001p0L, -7.853981801612546526942695000283242525531e-1L, 9.704060527839234168777242958594699810015L),
4862 TEST_c_c (catan, -0x1p-27L, -0x1.0000000000001p0L, -7.853981801612546526942695000283242525531e-1L, -9.704060527839234168777242958594699810015L),
4863 TEST_c_c (catan, 0x1.0000000000001p0L, 0x1p-27L, 7.853981633974484345157511161499711112683e-1L, 3.725290298461913200853528590596263270474e-9L),
4864 TEST_c_c (catan, -0x1.0000000000001p0L, 0x1p-27L, -7.853981633974484345157511161499711112683e-1L, 3.725290298461913200853528590596263270474e-9L),
4865 TEST_c_c (catan, 0x1.0000000000001p0L, -0x1p-27L, 7.853981633974484345157511161499711112683e-1L, -3.725290298461913200853528590596263270474e-9L),
4866 TEST_c_c (catan, -0x1.0000000000001p0L, -0x1p-27L, -7.853981633974484345157511161499711112683e-1L, -3.725290298461913200853528590596263270474e-9L),
4867 TEST_c_c (catan, 0x1p-27L, 0x0.fffffffffffff8p0L, 7.853981578095128619227903983047292781021e-1L, 9.704060527839234252043969805481351363824L),
4868 TEST_c_c (catan, 0x1p-27L, -0x0.fffffffffffff8p0L, 7.853981578095128619227903983047292781021e-1L, -9.704060527839234252043969805481351363824L),
4869 TEST_c_c (catan, -0x1p-27L, 0x0.fffffffffffff8p0L, -7.853981578095128619227903983047292781021e-1L, 9.704060527839234252043969805481351363824L),
4870 TEST_c_c (catan, -0x1p-27L, -0x0.fffffffffffff8p0L, -7.853981578095128619227903983047292781021e-1L, -9.704060527839234252043969805481351363824L),
4871 TEST_c_c (catan, 0x0.fffffffffffff8p0L, 0x1p-27L, 7.853981633974482679822974223765039144191e-1L, 3.725290298461914441624447420137706700965e-9L),
4872 TEST_c_c (catan, -0x0.fffffffffffff8p0L, 0x1p-27L, -7.853981633974482679822974223765039144191e-1L, 3.725290298461914441624447420137706700965e-9L),
4873 TEST_c_c (catan, 0x0.fffffffffffff8p0L, -0x1p-27L, 7.853981633974482679822974223765039144191e-1L, -3.725290298461914441624447420137706700965e-9L),
4874 TEST_c_c (catan, -0x0.fffffffffffff8p0L, -0x1p-27L, -7.853981633974482679822974223765039144191e-1L, -3.725290298461914441624447420137706700965e-9L),
caf84319
JM
4875#endif
4876#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM
4877 TEST_c_c (catan, 0x1p-33L, 0x1.0000000000000002p0L, 7.853981638922134273801338071094141188767e-1L, 1.178350206951907025990405771755129268176e1L),
4878 TEST_c_c (catan, 0x1p-33L, -0x1.0000000000000002p0L, 7.853981638922134273801338071094141188767e-1L, -1.178350206951907025990405771755129268176e1L),
4879 TEST_c_c (catan, -0x1p-33L, 0x1.0000000000000002p0L, -7.853981638922134273801338071094141188767e-1L, 1.178350206951907025990405771755129268176e1L),
4880 TEST_c_c (catan, -0x1p-33L, -0x1.0000000000000002p0L, -7.853981638922134273801338071094141188767e-1L, -1.178350206951907025990405771755129268176e1L),
4881 TEST_c_c (catan, 0x1.0000000000000002p0L, 0x1p-33L, 7.853981633974483096732590862331681441026e-1L, 5.820766091346740722012013594069507025615e-11L),
4882 TEST_c_c (catan, -0x1.0000000000000002p0L, 0x1p-33L, -7.853981633974483096732590862331681441026e-1L, 5.820766091346740722012013594069507025615e-11L),
4883 TEST_c_c (catan, 0x1.0000000000000002p0L, -0x1p-33L, 7.853981633974483096732590862331681441026e-1L, -5.820766091346740722012013594069507025615e-11L),
4884 TEST_c_c (catan, -0x1.0000000000000002p0L, -0x1p-33L, -7.853981633974483096732590862331681441026e-1L, -5.820766091346740722012013594069507025615e-11L),
4885 TEST_c_c (catan, 0x1p-33L, 0x0.ffffffffffffffffp0L, 7.853981631937214964185249205444919953948e-1L, 1.178350206951907026002603046195591193050e1L),
4886 TEST_c_c (catan, 0x1p-33L, -0x0.ffffffffffffffffp0L, 7.853981631937214964185249205444919953948e-1L, -1.178350206951907026002603046195591193050e1L),
4887 TEST_c_c (catan, -0x1p-33L, 0x0.ffffffffffffffffp0L, -7.853981631937214964185249205444919953948e-1L, 1.178350206951907026002603046195591193050e1L),
4888 TEST_c_c (catan, -0x1p-33L, -0x0.ffffffffffffffffp0L, -7.853981631937214964185249205444919953948e-1L, -1.178350206951907026002603046195591193050e1L),
4889 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, 0x1p-33L, 7.853981633974483095919439232967553115548e-1L, 5.820766091346740722958646680334721192083e-11L),
4890 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, 0x1p-33L, -7.853981633974483095919439232967553115548e-1L, 5.820766091346740722958646680334721192083e-11L),
4891 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, -0x1p-33L, 7.853981633974483095919439232967553115548e-1L, -5.820766091346740722958646680334721192083e-11L),
4892 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, -0x1p-33L, -7.853981633974483095919439232967553115548e-1L, -5.820766091346740722958646680334721192083e-11L),
caf84319
JM
4893#endif
4894#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM
4895 TEST_c_c (catan, 0x1p-54L, 0x1.000000000000000000000000008p0L, 7.853981633974485455380535786656405610710e-1L, 1.906154746539849600897388334009981267384e1L),
4896 TEST_c_c (catan, 0x1p-54L, -0x1.000000000000000000000000008p0L, 7.853981633974485455380535786656405610710e-1L, -1.906154746539849600897388334009981267384e1L),
4897 TEST_c_c (catan, -0x1p-54L, 0x1.000000000000000000000000008p0L, -7.853981633974485455380535786656405610710e-1L, 1.906154746539849600897388334009981267384e1L),
4898 TEST_c_c (catan, -0x1p-54L, -0x1.000000000000000000000000008p0L, -7.853981633974485455380535786656405610710e-1L, -1.906154746539849600897388334009981267384e1L),
4899 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, 0x1p-54L, 7.853981633974483096156608458198888173729e-1L, 2.775557561562891351059079170226980932999e-17L),
4900 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, 0x1p-54L, -7.853981633974483096156608458198888173729e-1L, 2.775557561562891351059079170226980932999e-17L),
4901 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, -0x1p-54L, 7.853981633974483096156608458198888173729e-1L, -2.775557561562891351059079170226980932999e-17L),
4902 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, -0x1p-54L, -7.853981633974483096156608458198888173729e-1L, -2.775557561562891351059079170226980932999e-17L),
4903 TEST_c_c (catan, 0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, 7.853981633974482124711461911186784339815e-1L, 1.906154746539849600897388334009984040723e1L),
4904 TEST_c_c (catan, 0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, 7.853981633974482124711461911186784339815e-1L, -1.906154746539849600897388334009984040723e1L),
4905 TEST_c_c (catan, -0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, -7.853981633974482124711461911186784339815e-1L, 1.906154746539849600897388334009984040723e1L),
4906 TEST_c_c (catan, -0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, -7.853981633974482124711461911186784339815e-1L, -1.906154746539849600897388334009984040723e1L),
4907 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, 7.853981633974483096156608458198703284454e-1L, 2.775557561562891351059079170227083567164e-17L),
4908 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, -7.853981633974483096156608458198703284454e-1L, 2.775557561562891351059079170227083567164e-17L),
4909 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, 7.853981633974483096156608458198703284454e-1L, -2.775557561562891351059079170227083567164e-17L),
4910 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, -7.853981633974483096156608458198703284454e-1L, -2.775557561562891351059079170227083567164e-17L),
caf84319
JM
4911#endif
4912#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM
4913 TEST_c_c (catan, 0x1p-57L, 0x1.0000000000000000000000000001p0L, 7.853981633974483252281721296111395707566e-1L, 2.010126823623841397309973152228712033275e1L),
4914 TEST_c_c (catan, 0x1p-57L, -0x1.0000000000000000000000000001p0L, 7.853981633974483252281721296111395707566e-1L, -2.010126823623841397309973152228712033275e1L),
4915 TEST_c_c (catan, -0x1p-57L, 0x1.0000000000000000000000000001p0L, -7.853981633974483252281721296111395707566e-1L, 2.010126823623841397309973152228712033275e1L),
4916 TEST_c_c (catan, -0x1p-57L, -0x1.0000000000000000000000000001p0L, -7.853981633974483252281721296111395707566e-1L, -2.010126823623841397309973152228712033275e1L),
4917 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, 0x1p-57L, 7.853981633974483096156608458198758293829e-1L, 3.469446951953614188823848962783812780530e-18L),
4918 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, 0x1p-57L, -7.853981633974483096156608458198758293829e-1L, 3.469446951953614188823848962783812780530e-18L),
4919 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, -0x1p-57L, 7.853981633974483096156608458198758293829e-1L, -3.469446951953614188823848962783812780530e-18L),
4920 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, -0x1p-57L, -7.853981633974483096156608458198758293829e-1L, -3.469446951953614188823848962783812780530e-18L),
4921 TEST_c_c (catan, 0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, 7.853981633974483044114904178894544378135e-1L, 2.010126823623841397309973152228712040498e1L),
4922 TEST_c_c (catan, 0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, 7.853981633974483044114904178894544378135e-1L, -2.010126823623841397309973152228712040498e1L),
4923 TEST_c_c (catan, -0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, -7.853981633974483044114904178894544378135e-1L, 2.010126823623841397309973152228712040498e1L),
4924 TEST_c_c (catan, -0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, -7.853981633974483044114904178894544378135e-1L, -2.010126823623841397309973152228712040498e1L),
4925 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, 7.853981633974483096156608458198756849381e-1L, 3.469446951953614188823848962783813782817e-18L),
4926 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, -7.853981633974483096156608458198756849381e-1L, 3.469446951953614188823848962783813782817e-18L),
4927 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, 7.853981633974483096156608458198756849381e-1L, -3.469446951953614188823848962783813782817e-18L),
4928 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, -7.853981633974483096156608458198756849381e-1L, -3.469446951953614188823848962783813782817e-18L),
4929#endif
4930 TEST_c_c (catan, 1.0L, 0x1p-64L, 7.853981633974483096156608458198757210500e-1L, 2.710505431213761085018632002174854278563e-20L),
4931 TEST_c_c (catan, 1.0L, -0x1p-64L, 7.853981633974483096156608458198757210500e-1L, -2.710505431213761085018632002174854278563e-20L),
4932 TEST_c_c (catan, -1.0L, 0x1p-64L, -7.853981633974483096156608458198757210500e-1L, 2.710505431213761085018632002174854278563e-20L),
4933 TEST_c_c (catan, -1.0L, -0x1p-64L, -7.853981633974483096156608458198757210500e-1L, -2.710505431213761085018632002174854278563e-20L),
4934 TEST_c_c (catan, 0x1p-64L, 1.0L, 7.853981633974483096292133729759445264744e-1L, 2.252728336819822255606004394739073846245e1L),
4935 TEST_c_c (catan, -0x1p-64L, 1.0L, -7.853981633974483096292133729759445264744e-1L, 2.252728336819822255606004394739073846245e1L),
4936 TEST_c_c (catan, 0x1p-64L, -1.0L, 7.853981633974483096292133729759445264744e-1L, -2.252728336819822255606004394739073846245e1L),
4937 TEST_c_c (catan, -0x1p-64L, -1.0L, -7.853981633974483096292133729759445264744e-1L, -2.252728336819822255606004394739073846245e1L),
4938 TEST_c_c (catan, 1.0L, 0x1.3p-73L, 7.853981633974483096156608458198757210493e-1L, 6.286572655403010329022706059731717687100e-23L),
4939 TEST_c_c (catan, 1.0L, -0x1.3p-73L, 7.853981633974483096156608458198757210493e-1L, -6.286572655403010329022706059731717687100e-23L),
4940 TEST_c_c (catan, -1.0L, 0x1.3p-73L, -7.853981633974483096156608458198757210493e-1L, 6.286572655403010329022706059731717687100e-23L),
4941 TEST_c_c (catan, -1.0L, -0x1.3p-73L, -7.853981633974483096156608458198757210493e-1L, -6.286572655403010329022706059731717687100e-23L),
4942 TEST_c_c (catan, 0x1.3p-73L, 1.0L, 7.853981633974483096156922786831527361009e-1L, 2.556052055225464683726753902092495938633e1L),
4943 TEST_c_c (catan, -0x1.3p-73L, 1.0L, -7.853981633974483096156922786831527361009e-1L, 2.556052055225464683726753902092495938633e1L),
4944 TEST_c_c (catan, 0x1.3p-73L, -1.0L, 7.853981633974483096156922786831527361009e-1L, -2.556052055225464683726753902092495938633e1L),
4945 TEST_c_c (catan, -0x1.3p-73L, -1.0L, -7.853981633974483096156922786831527361009e-1L, -2.556052055225464683726753902092495938633e1L),
4946 TEST_c_c (catan, 1.0L, 0x1p-124L, 7.853981633974483096156608458198757210493e-1L, 2.350988701644575015937473074444491355637e-38L),
4947 TEST_c_c (catan, 1.0L, -0x1p-124L, 7.853981633974483096156608458198757210493e-1L, -2.350988701644575015937473074444491355637e-38L),
4948 TEST_c_c (catan, -1.0L, 0x1p-124L, -7.853981633974483096156608458198757210493e-1L, 2.350988701644575015937473074444491355637e-38L),
4949 TEST_c_c (catan, -1.0L, -0x1p-124L, -7.853981633974483096156608458198757210493e-1L, -2.350988701644575015937473074444491355637e-38L),
4950 TEST_c_c (catan, 0x1p-124L, 1.0L, 7.853981633974483096156608458198757210610e-1L, 4.332169878499658183857700759113603550472e1L),
4951 TEST_c_c (catan, -0x1p-124L, 1.0L, -7.853981633974483096156608458198757210610e-1L, 4.332169878499658183857700759113603550472e1L),
4952 TEST_c_c (catan, 0x1p-124L, -1.0L, 7.853981633974483096156608458198757210610e-1L, -4.332169878499658183857700759113603550472e1L),
4953 TEST_c_c (catan, -0x1p-124L, -1.0L, -7.853981633974483096156608458198757210610e-1L, -4.332169878499658183857700759113603550472e1L),
4954 TEST_c_c (catan, 0x1.000002p0L, 0x1p-126L, 7.853982230020895322927482174768220815493e-1L, 5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4955 TEST_c_c (catan, 0x1.000002p0L, -0x1p-126L, 7.853982230020895322927482174768220815493e-1L, -5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4956 TEST_c_c (catan, -0x1.000002p0L, 0x1p-126L, -7.853982230020895322927482174768220815493e-1L, 5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4957 TEST_c_c (catan, -0x1.000002p0L, -0x1p-126L, -7.853982230020895322927482174768220815493e-1L, -5.877471053462247139383742414506671233336e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4958 TEST_c_c (catan, 0x1p-126L, 0x1.000002p0L, 1.570796326794896619231321691639702138295L, 8.317766196521665212523713550410777685446L),
4959 TEST_c_c (catan, -0x1p-126L, 0x1.000002p0L, -1.570796326794896619231321691639702138295L, 8.317766196521665212523713550410777685446L),
4960 TEST_c_c (catan, 0x1p-126L, -0x1.000002p0L, 1.570796326794896619231321691639702138295L, -8.317766196521665212523713550410777685446L),
4961 TEST_c_c (catan, -0x1p-126L, -0x1.000002p0L, -1.570796326794896619231321691639702138295L, -8.317766196521665212523713550410777685446L),
4962 TEST_c_c (catan, 0x0.ffffffp0L, 0x1p-126L, 7.853981335951250337419109991749089175724e-1L, 5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4963 TEST_c_c (catan, 0x0.ffffffp0L, -0x1p-126L, 7.853981335951250337419109991749089175724e-1L, -5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4964 TEST_c_c (catan, -0x0.ffffffp0L, 0x1p-126L, -7.853981335951250337419109991749089175724e-1L, 5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4965 TEST_c_c (catan, -0x0.ffffffp0L, -0x1p-126L, -7.853981335951250337419109991749089175724e-1L, -5.877472104436064061535099214664320916184e-39L, UNDERFLOW_EXCEPTION_FLOAT),
4966 TEST_c_c (catan, 0x1p-126L, 0x0.ffffffp0L, 9.860761609136244031334147100512154160097e-32L, 8.664339742098154951823135931565866792454L),
4967 TEST_c_c (catan, -0x1p-126L, 0x0.ffffffp0L, -9.860761609136244031334147100512154160097e-32L, 8.664339742098154951823135931565866792454L),
4968 TEST_c_c (catan, 0x1p-126L, -0x0.ffffffp0L, 9.860761609136244031334147100512154160097e-32L, -8.664339742098154951823135931565866792454L),
4969 TEST_c_c (catan, -0x1p-126L, -0x0.ffffffp0L, -9.860761609136244031334147100512154160097e-32L, -8.664339742098154951823135931565866792454L),
10de07f5 4970#ifndef TEST_FLOAT
08198877
JM
4971 TEST_c_c (catan, 1.0L, 0x1p-512L, 7.853981633974483096156608458198757210493e-1L, 3.729170365600103371645482657731466918688e-155L),
4972 TEST_c_c (catan, 1.0L, -0x1p-512L, 7.853981633974483096156608458198757210493e-1L, -3.729170365600103371645482657731466918688e-155L),
4973 TEST_c_c (catan, -1.0L, 0x1p-512L, -7.853981633974483096156608458198757210493e-1L, 3.729170365600103371645482657731466918688e-155L),
4974 TEST_c_c (catan, -1.0L, -0x1p-512L, -7.853981633974483096156608458198757210493e-1L, -3.729170365600103371645482657731466918688e-155L),
4975 TEST_c_c (catan, 0x1p-512L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 1.777922518136259718655200391540222897114e2L),
4976 TEST_c_c (catan, -0x1p-512L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 1.777922518136259718655200391540222897114e2L),
4977 TEST_c_c (catan, 0x1p-512L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -1.777922518136259718655200391540222897114e2L),
4978 TEST_c_c (catan, -0x1p-512L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -1.777922518136259718655200391540222897114e2L),
4979 TEST_c_c (catan, 1.0L, 0x1.3p-536L, 7.853981633974483096156608458198757210493e-1L, 2.639526015013529511588222179446290115084e-162L),
4980 TEST_c_c (catan, 1.0L, -0x1.3p-536L, 7.853981633974483096156608458198757210493e-1L, -2.639526015013529511588222179446290115084e-162L),
4981 TEST_c_c (catan, -1.0L, 0x1.3p-536L, -7.853981633974483096156608458198757210493e-1L, 2.639526015013529511588222179446290115084e-162L),
4982 TEST_c_c (catan, -1.0L, -0x1.3p-536L, -7.853981633974483096156608458198757210493e-1L, -2.639526015013529511588222179446290115084e-162L),
4983 TEST_c_c (catan, 0x1.3p-536L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 1.860240928518819859673567751384928348958e2L),
4984 TEST_c_c (catan, -0x1.3p-536L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 1.860240928518819859673567751384928348958e2L),
4985 TEST_c_c (catan, 0x1.3p-536L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -1.860240928518819859673567751384928348958e2L),
4986 TEST_c_c (catan, -0x1.3p-536L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -1.860240928518819859673567751384928348958e2L),
4987 TEST_c_c (catan, 1.0L, 0x1p-1020L, 7.853981633974483096156608458198757210493e-1L, 4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4988 TEST_c_c (catan, 1.0L, -0x1p-1020L, 7.853981633974483096156608458198757210493e-1L, -4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4989 TEST_c_c (catan, -1.0L, 0x1p-1020L, -7.853981633974483096156608458198757210493e-1L, 4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4990 TEST_c_c (catan, -1.0L, -0x1p-1020L, -7.853981633974483096156608458198757210493e-1L, -4.450147717014402766180465434664808128438e-308L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
4991 TEST_c_c (catan, 0x1p-1020L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 3.538516356758520804574969980043991380025e2L),
4992 TEST_c_c (catan, -0x1p-1020L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 3.538516356758520804574969980043991380025e2L),
4993 TEST_c_c (catan, 0x1p-1020L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -3.538516356758520804574969980043991380025e2L),
4994 TEST_c_c (catan, -0x1p-1020L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -3.538516356758520804574969980043991380025e2L),
4995 TEST_c_c (catan, 0x1.0000000000001p0L, 0x1p-1022L, 7.853981633974484206379633083355174374608e-1L, 1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4996 TEST_c_c (catan, 0x1.0000000000001p0L, -0x1p-1022L, 7.853981633974484206379633083355174374608e-1L, -1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4997 TEST_c_c (catan, -0x1.0000000000001p0L, 0x1p-1022L, -7.853981633974484206379633083355174374608e-1L, 1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4998 TEST_c_c (catan, -0x1.0000000000001p0L, -0x1p-1022L, -7.853981633974484206379633083355174374608e-1L, -1.112536929253600444512293438042957369978e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
4999 TEST_c_c (catan, 0x1p-1022L, 0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, 1.836840028483855075506780244989950299369e1L),
5000 TEST_c_c (catan, -0x1p-1022L, 0x1.0000000000001p0L, -1.570796326794896619231321691639751442099L, 1.836840028483855075506780244989950299369e1L),
5001 TEST_c_c (catan, 0x1p-1022L, -0x1.0000000000001p0L, 1.570796326794896619231321691639751442099L, -1.836840028483855075506780244989950299369e1L),
5002 TEST_c_c (catan, -0x1p-1022L, -0x1.0000000000001p0L, -1.570796326794896619231321691639751442099L, -1.836840028483855075506780244989950299369e1L),
5003 TEST_c_c (catan, 0x0.fffffffffffff8p0L, 0x1p-1022L, 7.853981633974482541045096145620456183798e-1L, 1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5004 TEST_c_c (catan, 0x0.fffffffffffff8p0L, -0x1p-1022L, 7.853981633974482541045096145620456183798e-1L, -1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5005 TEST_c_c (catan, -0x0.fffffffffffff8p0L, 0x1p-1022L, -7.853981633974482541045096145620456183798e-1L, 1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5006 TEST_c_c (catan, -0x0.fffffffffffff8p0L, -0x1p-1022L, -7.853981633974482541045096145620456183798e-1L, -1.112536929253600815061527818977844932790e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5007 TEST_c_c (catan, 0x1p-1022L, 0x0.fffffffffffff8p0L, 1.002084180004486444624900488355118689113e-292L, 1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5008 TEST_c_c (catan, -0x1p-1022L, 0x0.fffffffffffff8p0L, -1.002084180004486444624900488355118689113e-292L, 1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5009 TEST_c_c (catan, 0x1p-1022L, -0x0.fffffffffffff8p0L, 1.002084180004486444624900488355118689113e-292L, -1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5010 TEST_c_c (catan, -0x1p-1022L, -0x0.fffffffffffff8p0L, -1.002084180004486444624900488355118689113e-292L, -1.871497387511852332650969166374185305708e1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
10de07f5
JM
5011#endif
5012#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM
5013 TEST_c_c (catan, 0x1.0000000000000002p0L, 0x1p-1022L, 7.853981633974483096698709544441509427467e-1L, 1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5014 TEST_c_c (catan, 0x1.0000000000000002p0L, -0x1p-1022L, 7.853981633974483096698709544441509427467e-1L, -1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5015 TEST_c_c (catan, -0x1.0000000000000002p0L, 0x1p-1022L, -7.853981633974483096698709544441509427467e-1L, 1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5016 TEST_c_c (catan, -0x1.0000000000000002p0L, -0x1p-1022L, -7.853981633974483096698709544441509427467e-1L, -1.112536929253600691424494863099491450042e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5017 TEST_c_c (catan, 0x1p-1022L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
5018 TEST_c_c (catan, -0x1p-1022L, 0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
5019 TEST_c_c (catan, 0x1p-1022L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
5020 TEST_c_c (catan, -0x1p-1022L, -0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
5021 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, 0x1p-1022L, 7.853981633974483095885557915077381101984e-1L, 1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5022 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, -0x1p-1022L, 7.853981633974483095885557915077381101984e-1L, -1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5023 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, 0x1p-1022L, -7.853981633974483095885557915077381101984e-1L, 1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5024 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, -0x1p-1022L, -7.853981633974483095885557915077381101984e-1L, -1.112536929253600691605427106449557323148e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5025 TEST_c_c (catan, 0x1p-1022L, 0x0.ffffffffffffffffp0L, 2.052268400649188124723641491045245971623e-289L, 2.252728336819822255604649142023466965703e1L),
5026 TEST_c_c (catan, -0x1p-1022L, 0x0.ffffffffffffffffp0L, -2.052268400649188124723641491045245971623e-289L, 2.252728336819822255604649142023466965703e1L),
5027 TEST_c_c (catan, 0x1p-1022L, -0x0.ffffffffffffffffp0L, 2.052268400649188124723641491045245971623e-289L, -2.252728336819822255604649142023466965703e1L),
5028 TEST_c_c (catan, -0x1p-1022L, -0x0.ffffffffffffffffp0L, -2.052268400649188124723641491045245971623e-289L, -2.252728336819822255604649142023466965703e1L),
10de07f5
JM
5029#endif
5030#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM
5031 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, 0x1p-1022L, 7.853981633974483096156608458198880470009e-1L, 1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5032 TEST_c_c (catan, 0x1.000000000000000000000000008p0L, -0x1p-1022L, 7.853981633974483096156608458198880470009e-1L, -1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5033 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, 0x1p-1022L, -7.853981633974483096156608458198880470009e-1L, 1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5034 TEST_c_c (catan, -0x1.000000000000000000000000008p0L, -0x1p-1022L, -7.853981633974483096156608458198880470009e-1L, -1.112536929253600691545116358666174605957e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5035 TEST_c_c (catan, 0x1p-1022L, 0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, 3.673680056967710139911330243728336427098e1L),
5036 TEST_c_c (catan, -0x1p-1022L, 0x1.000000000000000000000000008p0L, -1.570796326794896619231321691639751442099L, 3.673680056967710139911330243728336427098e1L),
5037 TEST_c_c (catan, 0x1p-1022L, -0x1.000000000000000000000000008p0L, 1.570796326794896619231321691639751442099L, -3.673680056967710139911330243728336427098e1L),
5038 TEST_c_c (catan, -0x1p-1022L, -0x1.000000000000000000000000008p0L, -1.570796326794896619231321691639751442099L, -3.673680056967710139911330243728336427098e1L),
5039 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, 7.853981633974483096156608458198695580735e-1L, 1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5040 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, 7.853981633974483096156608458198695580735e-1L, -1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5041 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, -7.853981633974483096156608458198695580735e-1L, 1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5042 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, -7.853981633974483096156608458198695580735e-1L, -1.112536929253600691545116358666215745186e-308L, UNDERFLOW_EXCEPTION_DOUBLE),
5043 TEST_c_c (catan, 0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, 9.025971879324147880346310405868788320726e-277L, 3.708337415995707405382191849801244331055e1L),
5044 TEST_c_c (catan, -0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, -9.025971879324147880346310405868788320726e-277L, 3.708337415995707405382191849801244331055e1L),
5045 TEST_c_c (catan, 0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, 9.025971879324147880346310405868788320726e-277L, -3.708337415995707405382191849801244331055e1L),
5046 TEST_c_c (catan, -0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, -9.025971879324147880346310405868788320726e-277L, -3.708337415995707405382191849801244331055e1L),
10de07f5
JM
5047#endif
5048#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
5049 TEST_c_c (catan, 1.0L, 0x1p-8192L, 7.853981633974483096156608458198757210493e-1L, 4.584009668887117914053530980121207914891e-2467L),
5050 TEST_c_c (catan, 1.0L, -0x1p-8192L, 7.853981633974483096156608458198757210493e-1L, -4.584009668887117914053530980121207914891e-2467L),
5051 TEST_c_c (catan, -1.0L, 0x1p-8192L, -7.853981633974483096156608458198757210493e-1L, 4.584009668887117914053530980121207914891e-2467L),
5052 TEST_c_c (catan, -1.0L, -0x1p-8192L, -7.853981633974483096156608458198757210493e-1L, -4.584009668887117914053530980121207914891e-2467L),
5053 TEST_c_c (catan, 0x1p-8192L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 2.839477425163815960027691385553420311121e3L),
5054 TEST_c_c (catan, -0x1p-8192L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 2.839477425163815960027691385553420311121e3L),
5055 TEST_c_c (catan, 0x1p-8192L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -2.839477425163815960027691385553420311121e3L),
5056 TEST_c_c (catan, -0x1p-8192L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -2.839477425163815960027691385553420311121e3L),
5057 TEST_c_c (catan, 1.0L, 0x1.3p-8221L, 7.853981633974483096156608458198757210493e-1L, 1.013933025636421986471594877335044443409e-2475L),
5058 TEST_c_c (catan, 1.0L, -0x1.3p-8221L, 7.853981633974483096156608458198757210493e-1L, -1.013933025636421986471594877335044443409e-2475L),
5059 TEST_c_c (catan, -1.0L, 0x1.3p-8221L, -7.853981633974483096156608458198757210493e-1L, 1.013933025636421986471594877335044443409e-2475L),
5060 TEST_c_c (catan, -1.0L, -0x1.3p-8221L, -7.853981633974483096156608458198757210493e-1L, -1.013933025636421986471594877335044443409e-2475L),
5061 TEST_c_c (catan, 0x1.3p-8221L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 2.849442134153471837403071201841536297726e3L),
5062 TEST_c_c (catan, -0x1.3p-8221L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 2.849442134153471837403071201841536297726e3L),
5063 TEST_c_c (catan, 0x1.3p-8221L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -2.849442134153471837403071201841536297726e3L),
5064 TEST_c_c (catan, -0x1.3p-8221L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -2.849442134153471837403071201841536297726e3L),
5065 TEST_c_c (catan, 1.0L, 0x1.3p-8246L, 7.853981633974483096156608458198757210493e-1L, 3.021755890954798419688924781486524472858e-2483L),
5066 TEST_c_c (catan, 1.0L, -0x1.3p-8246L, 7.853981633974483096156608458198757210493e-1L, -3.021755890954798419688924781486524472858e-2483L),
5067 TEST_c_c (catan, -1.0L, 0x1.3p-8246L, -7.853981633974483096156608458198757210493e-1L, 3.021755890954798419688924781486524472858e-2483L),
5068 TEST_c_c (catan, -1.0L, -0x1.3p-8246L, -7.853981633974483096156608458198757210493e-1L, -3.021755890954798419688924781486524472858e-2483L),
5069 TEST_c_c (catan, 0x1.3p-8246L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 2.858106473910471153770786603359763504827e3L),
5070 TEST_c_c (catan, -0x1.3p-8246L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 2.858106473910471153770786603359763504827e3L),
5071 TEST_c_c (catan, 0x1.3p-8246L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -2.858106473910471153770786603359763504827e3L),
5072 TEST_c_c (catan, -0x1.3p-8246L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -2.858106473910471153770786603359763504827e3L),
5073 TEST_c_c (catan, 1.0L, 0x1p-16380L, 7.853981633974483096156608458198757210493e-1L, 6.724206286224187012525355634643505205196e-4932L),
5074 TEST_c_c (catan, 1.0L, -0x1p-16380L, 7.853981633974483096156608458198757210493e-1L, -6.724206286224187012525355634643505205196e-4932L),
5075 TEST_c_c (catan, -1.0L, 0x1p-16380L, -7.853981633974483096156608458198757210493e-1L, 6.724206286224187012525355634643505205196e-4932L),
5076 TEST_c_c (catan, -1.0L, -0x1p-16380L, -7.853981633974483096156608458198757210493e-1L, -6.724206286224187012525355634643505205196e-4932L),
5077 TEST_c_c (catan, 0x1p-16380L, 1.0L, 7.853981633974483096156608458198757210493e-1L, 5.677221982376232056781839690803195180822e3L),
5078 TEST_c_c (catan, -0x1p-16380L, 1.0L, -7.853981633974483096156608458198757210493e-1L, 5.677221982376232056781839690803195180822e3L),
5079 TEST_c_c (catan, 0x1p-16380L, -1.0L, 7.853981633974483096156608458198757210493e-1L, -5.677221982376232056781839690803195180822e3L),
5080 TEST_c_c (catan, -0x1p-16380L, -1.0L, -7.853981633974483096156608458198757210493e-1L, -5.677221982376232056781839690803195180822e3L),
5081 TEST_c_c (catan, 0x1.0000000000000002p0L, 0x1p-16382L, 7.853981633974483096698709544441509427467e-1L, 1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5082 TEST_c_c (catan, 0x1.0000000000000002p0L, -0x1p-16382L, 7.853981633974483096698709544441509427467e-1L, -1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5083 TEST_c_c (catan, -0x1.0000000000000002p0L, 0x1p-16382L, -7.853981633974483096698709544441509427467e-1L, 1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5084 TEST_c_c (catan, -0x1.0000000000000002p0L, -0x1p-16382L, -7.853981633974483096698709544441509427467e-1L, -1.681051571556046752949078932066752571182e-4932L, UNDERFLOW_EXCEPTION),
5085 TEST_c_c (catan, 0x1p-16382L, 0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
5086 TEST_c_c (catan, -0x1p-16382L, 0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, 2.218070977791824990137853294097378778927e1L),
5087 TEST_c_c (catan, 0x1p-16382L, -0x1.0000000000000002p0L, 1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
5088 TEST_c_c (catan, -0x1p-16382L, -0x1.0000000000000002p0L, -1.570796326794896619231321691639751442099L, -2.218070977791824990137853294097378778927e1L),
5089 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, 0x1p-16382L, 7.853981633974483095885557915077381101984e-1L, 1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5090 TEST_c_c (catan, 0x0.ffffffffffffffffp0L, -0x1p-16382L, 7.853981633974483095885557915077381101984e-1L, -1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5091 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, 0x1p-16382L, -7.853981633974483095885557915077381101984e-1L, 1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5092 TEST_c_c (catan, -0x0.ffffffffffffffffp0L, -0x1p-16382L, -7.853981633974483095885557915077381101984e-1L, -1.681051571556046753222468896957938166365e-4932L, UNDERFLOW_EXCEPTION),
5093 TEST_c_c (catan, 0x1p-16382L, 0x0.ffffffffffffffffp0L, 3.100992811520163369065387859792822623745e-4913L, 2.252728336819822255604649142023466965703e1L),
5094 TEST_c_c (catan, -0x1p-16382L, 0x0.ffffffffffffffffp0L, -3.100992811520163369065387859792822623745e-4913L, 2.252728336819822255604649142023466965703e1L),
5095 TEST_c_c (catan, 0x1p-16382L, -0x0.ffffffffffffffffp0L, 3.100992811520163369065387859792822623745e-4913L, -2.252728336819822255604649142023466965703e1L),
5096 TEST_c_c (catan, -0x1p-16382L, -0x0.ffffffffffffffffp0L, -3.100992811520163369065387859792822623745e-4913L, -2.252728336819822255604649142023466965703e1L),
10de07f5 5097# if LDBL_MANT_DIG >= 113
08198877
JM
5098 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, 0x1p-16382L, 7.853981633974483096156608458198758173458e-1L, 1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5099 TEST_c_c (catan, 0x1.0000000000000000000000000001p0L, -0x1p-16382L, 7.853981633974483096156608458198758173458e-1L, -1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5100 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, 0x1p-16382L, -7.853981633974483096156608458198758173458e-1L, 1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5101 TEST_c_c (catan, -0x1.0000000000000000000000000001p0L, -0x1p-16382L, -7.853981633974483096156608458198758173458e-1L, -1.681051571556046753131338908660875977540e-4932L, UNDERFLOW_EXCEPTION),
5102 TEST_c_c (catan, 0x1p-16382L, 0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, 3.916281570163690998207361486238697614441e1L),
5103 TEST_c_c (catan, -0x1p-16382L, 0x1.0000000000000000000000000001p0L, -1.570796326794896619231321691639751442099L, 3.916281570163690998207361486238697614441e1L),
5104 TEST_c_c (catan, 0x1p-16382L, -0x1.0000000000000000000000000001p0L, 1.570796326794896619231321691639751442099L, -3.916281570163690998207361486238697614441e1L),
5105 TEST_c_c (catan, -0x1p-16382L, -0x1.0000000000000000000000000001p0L, -1.570796326794896619231321691639751442099L, -3.916281570163690998207361486238697614441e1L),
5106 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, 7.853981633974483096156608458198756729010e-1L, 1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5107 TEST_c_c (catan, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, 7.853981633974483096156608458198756729010e-1L, -1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5108 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, -7.853981633974483096156608458198756729010e-1L, 1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5109 TEST_c_c (catan, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, -7.853981633974483096156608458198756729010e-1L, -1.681051571556046753131338908660876463178e-4932L, UNDERFLOW_EXCEPTION),
5110 TEST_c_c (catan, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.745703758805099310527547423749501866998e-4898L, 3.950938929191688263678223092311606435623e1L),
5111 TEST_c_c (catan, -0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.745703758805099310527547423749501866998e-4898L, 3.950938929191688263678223092311606435623e1L),
5112 TEST_c_c (catan, 0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.745703758805099310527547423749501866998e-4898L, -3.950938929191688263678223092311606435623e1L),
5113 TEST_c_c (catan, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.745703758805099310527547423749501866998e-4898L, -3.950938929191688263678223092311606435623e1L),
10de07f5 5114# endif
caf84319 5115#endif
2f38fbfe 5116
08198877
JM
5117 TEST_c_c (catan, 0.75L, 1.25L, 1.10714871779409050301706546017853704L, 0.549306144334054845697622618461262852L),
5118 TEST_c_c (catan, -2, -3, -1.4099210495965755225306193844604208L, -0.22907268296853876629588180294200276L),
5119 END_DATA (catan)
5120 };
8847214f
UD
5121
5122static void
08198877 5123catan_test (void)
8847214f 5124{
aaca11d8 5125 errno = 0;
08198877 5126 FUNC(catan) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD
5127 if (errno == ENOSYS)
5128 /* Function not implemented. */
5129 return;
5130
08198877
JM
5131 START (catan);
5132 RUN_TEST_LOOP_c_c (catan, catan_test_data, );
5133 END (catan, complex);
5134}
8847214f 5135
08198877
JM
5136static const struct test_c_c_data catanh_test_data[] =
5137 {
5138 START_DATA (catanh),
5139 TEST_c_c (catanh, 0, 0, 0.0, 0.0),
5140 TEST_c_c (catanh, minus_zero, 0, minus_zero, 0.0),
5141 TEST_c_c (catanh, 0, minus_zero, 0.0, minus_zero),
5142 TEST_c_c (catanh, minus_zero, minus_zero, minus_zero, minus_zero),
5143
5144 TEST_c_c (catanh, 1.0L, plus_zero, plus_infty, plus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5145 TEST_c_c (catanh, 1.0L, minus_zero, plus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5146 TEST_c_c (catanh, -1.0L, plus_zero, minus_infty, plus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5147 TEST_c_c (catanh, -1.0L, minus_zero, minus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
5148 TEST_c_c (catanh, plus_zero, 1.0L, plus_zero, M_PI_4l),
5149 TEST_c_c (catanh, minus_zero, 1.0L, minus_zero, M_PI_4l),
5150 TEST_c_c (catanh, plus_zero, -1.0L, plus_zero, -M_PI_4l),
5151 TEST_c_c (catanh, minus_zero, -1.0L, minus_zero, -M_PI_4l),
5152
5153 TEST_c_c (catanh, plus_infty, plus_infty, 0.0, M_PI_2l),
5154 TEST_c_c (catanh, plus_infty, minus_infty, 0.0, -M_PI_2l),
5155 TEST_c_c (catanh, minus_infty, plus_infty, minus_zero, M_PI_2l),
5156 TEST_c_c (catanh, minus_infty, minus_infty, minus_zero, -M_PI_2l),
5157
5158 TEST_c_c (catanh, -10.0, plus_infty, minus_zero, M_PI_2l),
5159 TEST_c_c (catanh, -10.0, minus_infty, minus_zero, -M_PI_2l),
5160 TEST_c_c (catanh, minus_zero, plus_infty, minus_zero, M_PI_2l),
5161 TEST_c_c (catanh, minus_zero, minus_infty, minus_zero, -M_PI_2l),
5162 TEST_c_c (catanh, 0, plus_infty, 0.0, M_PI_2l),
5163 TEST_c_c (catanh, 0, minus_infty, 0.0, -M_PI_2l),
5164 TEST_c_c (catanh, 0.1L, plus_infty, 0.0, M_PI_2l),
5165 TEST_c_c (catanh, 0.1L, minus_infty, 0.0, -M_PI_2l),
5166
5167 TEST_c_c (catanh, minus_infty, 0, minus_zero, M_PI_2l),
5168 TEST_c_c (catanh, minus_infty, minus_zero, minus_zero, -M_PI_2l),
5169 TEST_c_c (catanh, minus_infty, 100, minus_zero, M_PI_2l),
5170 TEST_c_c (catanh, minus_infty, -100, minus_zero, -M_PI_2l),
5171
5172 TEST_c_c (catanh, plus_infty, 0, 0.0, M_PI_2l),
5173 TEST_c_c (catanh, plus_infty, minus_zero, 0.0, -M_PI_2l),
5174 TEST_c_c (catanh, plus_infty, 0.5, 0.0, M_PI_2l),
5175 TEST_c_c (catanh, plus_infty, -0.5, 0.0, -M_PI_2l),
5176
5177 TEST_c_c (catanh, 0, qnan_value, 0.0, qnan_value),
5178 TEST_c_c (catanh, minus_zero, qnan_value, minus_zero, qnan_value),
5179
5180 TEST_c_c (catanh, plus_infty, qnan_value, 0.0, qnan_value),
5181 TEST_c_c (catanh, minus_infty, qnan_value, minus_zero, qnan_value),
5182
5183 TEST_c_c (catanh, qnan_value, 0, qnan_value, qnan_value),
5184 TEST_c_c (catanh, qnan_value, minus_zero, qnan_value, qnan_value),
5185
5186 TEST_c_c (catanh, qnan_value, plus_infty, 0.0, M_PI_2l, IGNORE_ZERO_INF_SIGN),
5187 TEST_c_c (catanh, qnan_value, minus_infty, 0.0, -M_PI_2l, IGNORE_ZERO_INF_SIGN),
5188
5189 TEST_c_c (catanh, 10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5190 TEST_c_c (catanh, -10.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5191
5192 TEST_c_c (catanh, qnan_value, 0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5193 TEST_c_c (catanh, qnan_value, -0.75, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5194
5195 TEST_c_c (catanh, qnan_value, qnan_value, qnan_value, qnan_value),
5196
5197 TEST_c_c (catanh, 0x1p50L, 0.0L, 8.881784197001252323389053344728897997441e-16L, 1.570796326794896619231321691639751442099L),
5198 TEST_c_c (catanh, 0x1p50L, -0.0L, 8.881784197001252323389053344728897997441e-16L, -1.570796326794896619231321691639751442099L),
5199 TEST_c_c (catanh, -0x1p50L, 0.0L, -8.881784197001252323389053344728897997441e-16L, 1.570796326794896619231321691639751442099L),
5200 TEST_c_c (catanh, -0x1p50L, -0.0L, -8.881784197001252323389053344728897997441e-16L, -1.570796326794896619231321691639751442099L),
5201 TEST_c_c (catanh, 0.0L, 0x1p50L, 0.0L, 1.570796326794895731052901991514519103193L),
5202 TEST_c_c (catanh, -0.0L, 0x1p50L, -0.0L, 1.570796326794895731052901991514519103193L),
5203 TEST_c_c (catanh, 0.0L, -0x1p50L, 0.0L, -1.570796326794895731052901991514519103193L),
5204 TEST_c_c (catanh, -0.0L, -0x1p50L, -0.0L, -1.570796326794895731052901991514519103193L),
2f38fbfe 5205#ifndef TEST_FLOAT
08198877
JM
5206 TEST_c_c (catanh, 0x1p500L, 0.0L, 3.054936363499604682051979393213617699789e-151L, 1.570796326794896619231321691639751442099L),
5207 TEST_c_c (catanh, 0x1p500L, -0.0L, 3.054936363499604682051979393213617699789e-151L, -1.570796326794896619231321691639751442099L),
5208 TEST_c_c (catanh, -0x1p500L, 0.0L, -3.054936363499604682051979393213617699789e-151L, 1.570796326794896619231321691639751442099L),
5209 TEST_c_c (catanh, -0x1p500L, -0.0L, -3.054936363499604682051979393213617699789e-151L, -1.570796326794896619231321691639751442099L),
5210 TEST_c_c (catanh, 0.0L, 0x1p500L, 0.0L, 1.570796326794896619231321691639751442099L),
5211 TEST_c_c (catanh, -0.0L, 0x1p500L, -0.0L, 1.570796326794896619231321691639751442099L),
5212 TEST_c_c (catanh, 0.0L, -0x1p500L, 0.0L, -1.570796326794896619231321691639751442099L),
5213 TEST_c_c (catanh, -0.0L, -0x1p500L, -0.0L, -1.570796326794896619231321691639751442099L),
2f38fbfe
JM
5214#endif
5215#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
5216 TEST_c_c (catanh, 0x1p5000L, 0.0L, 7.079811261048172892385615158694057552948e-1506L, 1.570796326794896619231321691639751442099L),
5217 TEST_c_c (catanh, 0x1p5000L, -0.0L, 7.079811261048172892385615158694057552948e-1506L, -1.570796326794896619231321691639751442099L),
5218 TEST_c_c (catanh, -0x1p5000L, 0.0L, -7.079811261048172892385615158694057552948e-1506L, 1.570796326794896619231321691639751442099L),
5219 TEST_c_c (catanh, -0x1p5000L, -0.0L, -7.079811261048172892385615158694057552948e-1506L, -1.570796326794896619231321691639751442099L),
5220 TEST_c_c (catanh, 0.0L, 0x1p5000L, 0.0L, 1.570796326794896619231321691639751442099L),
5221 TEST_c_c (catanh, -0.0L, 0x1p5000L, -0.0L, 1.570796326794896619231321691639751442099L),
5222 TEST_c_c (catanh, 0.0L, -0x1p5000L, 0.0L, -1.570796326794896619231321691639751442099L),
5223 TEST_c_c (catanh, -0.0L, -0x1p5000L, -0.0L, -1.570796326794896619231321691639751442099L),
5224#endif
5225 TEST_c_c (catanh, 0x1p63L, 0.5L, 1.084202172485504434007452800869941711427e-19L, 1.570796326794896619231321691639751442093L),
5226 TEST_c_c (catanh, 0x1p63L, -0.5L, 1.084202172485504434007452800869941711427e-19L, -1.570796326794896619231321691639751442093L),
5227 TEST_c_c (catanh, -0x1p63L, 0.5L, -1.084202172485504434007452800869941711427e-19L, 1.570796326794896619231321691639751442093L),
5228 TEST_c_c (catanh, -0x1p63L, -0.5L, -1.084202172485504434007452800869941711427e-19L, -1.570796326794896619231321691639751442093L),
5229 TEST_c_c (catanh, 0.5L, 0x1p63L, 5.877471754111437539843682686111228389007e-39L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5230 TEST_c_c (catanh, -0.5L, 0x1p63L, -5.877471754111437539843682686111228389007e-39L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5231 TEST_c_c (catanh, 0.5L, -0x1p63L, 5.877471754111437539843682686111228389007e-39L, -1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
5232 TEST_c_c (catanh, -0.5L, -0x1p63L, -5.877471754111437539843682686111228389007e-39L, -1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
9457fd95 5233#ifndef TEST_FLOAT
08198877
JM
5234 TEST_c_c (catanh, 0x1p511L, 0.5L, 1.491668146240041348658193063092586767475e-154L, 1.570796326794896619231321691639751442099L),
5235 TEST_c_c (catanh, 0x1p511L, -0.5L, 1.491668146240041348658193063092586767475e-154L, -1.570796326794896619231321691639751442099L),
5236 TEST_c_c (catanh, -0x1p511L, 0.5L, -1.491668146240041348658193063092586767475e-154L, 1.570796326794896619231321691639751442099L),
5237 TEST_c_c (catanh, -0x1p511L, -0.5L, -1.491668146240041348658193063092586767475e-154L, -1.570796326794896619231321691639751442099L),
5238 TEST_c_c (catanh, 0.5L, 0x1p511L, 1.112536929253600691545116358666202032110e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5239 TEST_c_c (catanh, -0.5L, 0x1p511L, -1.112536929253600691545116358666202032110e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5240 TEST_c_c (catanh, 0.5L, -0x1p511L, 1.112536929253600691545116358666202032110e-308L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5241 TEST_c_c (catanh, -0.5L, -0x1p511L, -1.112536929253600691545116358666202032110e-308L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
9457fd95
JM
5242#endif
5243#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
5244 TEST_c_c (catanh, 0x1p8191L, 0.5L, 1.833603867554847165621412392048483165956e-2466L, 1.570796326794896619231321691639751442099L),
5245 TEST_c_c (catanh, 0x1p8191L, -0.5L, 1.833603867554847165621412392048483165956e-2466L, -1.570796326794896619231321691639751442099L),
5246 TEST_c_c (catanh, -0x1p8191L, 0.5L, -1.833603867554847165621412392048483165956e-2466L, 1.570796326794896619231321691639751442099L),
5247 TEST_c_c (catanh, -0x1p8191L, -0.5L, -1.833603867554847165621412392048483165956e-2466L, -1.570796326794896619231321691639751442099L),
5248 TEST_c_c (catanh, 0.5L, 0x1p8191L, 1.681051571556046753131338908660876301299e-4932L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5249 TEST_c_c (catanh, -0.5L, 0x1p8191L, -1.681051571556046753131338908660876301299e-4932L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5250 TEST_c_c (catanh, 0.5L, -0x1p8191L, 1.681051571556046753131338908660876301299e-4932L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5251 TEST_c_c (catanh, -0.5L, -0x1p8191L, -1.681051571556046753131338908660876301299e-4932L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5252#endif
5253 TEST_c_c (catanh, 0x1p100L, 0.0L, 7.888609052210118054117285652827862296732e-31L, 1.570796326794896619231321691639751442099L),
5254 TEST_c_c (catanh, 0x1p100L, -0.0L, 7.888609052210118054117285652827862296732e-31L, -1.570796326794896619231321691639751442099L),
5255 TEST_c_c (catanh, -0x1p100L, 0.0L, -7.888609052210118054117285652827862296732e-31L, 1.570796326794896619231321691639751442099L),
5256 TEST_c_c (catanh, -0x1p100L, -0.0L, -7.888609052210118054117285652827862296732e-31L, -1.570796326794896619231321691639751442099L),
5257 TEST_c_c (catanh, 0.0L, 0x1p100L, 0.0L, 1.570796326794896619231321691638962581193L),
5258 TEST_c_c (catanh, -0.0L, 0x1p100L, -0.0L, 1.570796326794896619231321691638962581193L),
5259 TEST_c_c (catanh, 0.0L, -0x1p100L, 0.0L, -1.570796326794896619231321691638962581193L),
5260 TEST_c_c (catanh, -0.0L, -0x1p100L, -0.0L, -1.570796326794896619231321691638962581193L),
5261 TEST_c_c (catanh, 0x1.fp127L, 0.0L, 3.033533808573645181854803967025150136306e-39L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5262 TEST_c_c (catanh, 0x1.fp127L, -0.0L, 3.033533808573645181854803967025150136306e-39L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5263 TEST_c_c (catanh, -0x1.fp127L, 0.0L, -3.033533808573645181854803967025150136306e-39L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5264 TEST_c_c (catanh, -0x1.fp127L, -0.0L, -3.033533808573645181854803967025150136306e-39L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_FLOAT),
5265 TEST_c_c (catanh, 0.0L, 0x1.fp127L, 0.0L, 1.570796326794896619231321691639751442096L),
5266 TEST_c_c (catanh, -0.0L, 0x1.fp127L, -0.0L, 1.570796326794896619231321691639751442096L),
5267 TEST_c_c (catanh, 0.0L, -0x1.fp127L, 0.0L, -1.570796326794896619231321691639751442096L),
5268 TEST_c_c (catanh, -0.0L, -0x1.fp127L, -0.0L, -1.570796326794896619231321691639751442096L),
5269 TEST_c_c (catanh, 0x1.fp127L, 0x1.fp127L, 1.516766904286822590927401983512575068153e-39L, 1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5270 TEST_c_c (catanh, 0x1.fp127L, -0x1.fp127L, 1.516766904286822590927401983512575068153e-39L, -1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5271 TEST_c_c (catanh, -0x1.fp127L, 0x1.fp127L, -1.516766904286822590927401983512575068153e-39L, 1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5272 TEST_c_c (catanh, -0x1.fp127L, -0x1.fp127L, -1.516766904286822590927401983512575068153e-39L, -1.570796326794896619231321691639751442097L, UNDERFLOW_EXCEPTION_FLOAT),
5b4217d7 5273#ifndef TEST_FLOAT
08198877
JM
5274 TEST_c_c (catanh, 0x1p900L, 0.0L, 1.183052186166774710972751597518026531652e-271L, 1.570796326794896619231321691639751442099L),
5275 TEST_c_c (catanh, 0x1p900L, -0.0L, 1.183052186166774710972751597518026531652e-271L, -1.570796326794896619231321691639751442099L),
5276 TEST_c_c (catanh, -0x1p900L, 0.0L, -1.183052186166774710972751597518026531652e-271L, 1.570796326794896619231321691639751442099L),
5277 TEST_c_c (catanh, -0x1p900L, -0.0L, -1.183052186166774710972751597518026531652e-271L, -1.570796326794896619231321691639751442099L),
5278 TEST_c_c (catanh, 0.0L, 0x1p900L, 0.0L, 1.570796326794896619231321691639751442099L),
5279 TEST_c_c (catanh, -0.0L, 0x1p900L, -0.0L, 1.570796326794896619231321691639751442099L),
5280 TEST_c_c (catanh, 0.0L, -0x1p900L, 0.0L, -1.570796326794896619231321691639751442099L),
5281 TEST_c_c (catanh, -0.0L, -0x1p900L, -0.0L, -1.570796326794896619231321691639751442099L),
5282 TEST_c_c (catanh, 0x1.fp1023L, 0.0L, 5.742126086470197117652213464083623391533e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5283 TEST_c_c (catanh, 0x1.fp1023L, -0.0L, 5.742126086470197117652213464083623391533e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5284 TEST_c_c (catanh, -0x1.fp1023L, 0.0L, -5.742126086470197117652213464083623391533e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5285 TEST_c_c (catanh, -0x1.fp1023L, -0.0L, -5.742126086470197117652213464083623391533e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5286 TEST_c_c (catanh, 0.0L, 0x1.fp1023L, 0.0L, 1.570796326794896619231321691639751442099L),
5287 TEST_c_c (catanh, -0.0L, 0x1.fp1023L, -0.0L, 1.570796326794896619231321691639751442099L),
5288 TEST_c_c (catanh, 0.0L, -0x1.fp1023L, 0.0L, -1.570796326794896619231321691639751442099L),
5289 TEST_c_c (catanh, -0.0L, -0x1.fp1023L, -0.0L, -1.570796326794896619231321691639751442099L),
5290 TEST_c_c (catanh, 0x1.fp1023L, 0x1.fp1023L, 2.871063043235098558826106732041811695767e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5291 TEST_c_c (catanh, 0x1.fp1023L, -0x1.fp1023L, 2.871063043235098558826106732041811695767e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5292 TEST_c_c (catanh, -0x1.fp1023L, 0x1.fp1023L, -2.871063043235098558826106732041811695767e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5293 TEST_c_c (catanh, -0x1.fp1023L, -0x1.fp1023L, -2.871063043235098558826106732041811695767e-309L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
5b4217d7
JM
5294#endif
5295#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
5296 TEST_c_c (catanh, 0x1p10000L, 0.0L, 5.012372749206452009297555933742977749322e-3011L, 1.570796326794896619231321691639751442099L),
5297 TEST_c_c (catanh, 0x1p10000L, -0.0L, 5.012372749206452009297555933742977749322e-3011L, -1.570796326794896619231321691639751442099L),
5298 TEST_c_c (catanh, -0x1p10000L, 0.0L, -5.012372749206452009297555933742977749322e-3011L, 1.570796326794896619231321691639751442099L),
5299 TEST_c_c (catanh, -0x1p10000L, -0.0L, -5.012372749206452009297555933742977749322e-3011L, -1.570796326794896619231321691639751442099L),
5300 TEST_c_c (catanh, 0.0L, 0x1p10000L, 0.0L, 1.570796326794896619231321691639751442099L),
5301 TEST_c_c (catanh, -0.0L, 0x1p10000L, -0.0L, 1.570796326794896619231321691639751442099L),
5302 TEST_c_c (catanh, 0.0L, -0x1p10000L, 0.0L, -1.570796326794896619231321691639751442099L),
5303 TEST_c_c (catanh, -0.0L, -0x1p10000L, -0.0L, -1.570796326794896619231321691639751442099L),
5304 TEST_c_c (catanh, 0x1.fp16383L, 0.0L, 8.676395208031209048419813722120651877672e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5305 TEST_c_c (catanh, 0x1.fp16383L, -0.0L, 8.676395208031209048419813722120651877672e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5306 TEST_c_c (catanh, -0x1.fp16383L, 0.0L, -8.676395208031209048419813722120651877672e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5307 TEST_c_c (catanh, -0x1.fp16383L, -0.0L, -8.676395208031209048419813722120651877672e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5308 TEST_c_c (catanh, 0.0L, 0x1.fp16383L, 0.0L, 1.570796326794896619231321691639751442099L),
5309 TEST_c_c (catanh, -0.0L, 0x1.fp16383L, -0.0L, 1.570796326794896619231321691639751442099L),
5310 TEST_c_c (catanh, 0.0L, -0x1.fp16383L, 0.0L, -1.570796326794896619231321691639751442099L),
5311 TEST_c_c (catanh, -0.0L, -0x1.fp16383L, -0.0L, -1.570796326794896619231321691639751442099L),
5312 TEST_c_c (catanh, 0x1.fp16383L, 0x1.fp16383L, 4.338197604015604524209906861060325938836e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5313 TEST_c_c (catanh, 0x1.fp16383L, -0x1.fp16383L, 4.338197604015604524209906861060325938836e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5314 TEST_c_c (catanh, -0x1.fp16383L, 0x1.fp16383L, -4.338197604015604524209906861060325938836e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5315 TEST_c_c (catanh, -0x1.fp16383L, -0x1.fp16383L, -4.338197604015604524209906861060325938836e-4933L, -1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
5316#endif
5317 TEST_c_c (catanh, 0x1p-13L, 1.0L, 6.103515609841754902688560615027452023669e-5L, 7.853981671227386080775748393881580082970e-1L),
5318 TEST_c_c (catanh, 0x1p-13L, -1.0L, 6.103515609841754902688560615027452023669e-5L, -7.853981671227386080775748393881580082970e-1L),
5319 TEST_c_c (catanh, -0x1p-13L, 1.0L, -6.103515609841754902688560615027452023669e-5L, 7.853981671227386080775748393881580082970e-1L),
5320 TEST_c_c (catanh, -0x1p-13L, -1.0L, -6.103515609841754902688560615027452023669e-5L, -7.853981671227386080775748393881580082970e-1L),
5321 TEST_c_c (catanh, 1.0L, 0x1p-13L, 4.852030264850939738801379894163661227127L, 7.854286809755354140031716771044626356262e-1L),
5322 TEST_c_c (catanh, -1.0L, 0x1p-13L, -4.852030264850939738801379894163661227127L, 7.854286809755354140031716771044626356262e-1L),
5323 TEST_c_c (catanh, 1.0L, -0x1p-13L, 4.852030264850939738801379894163661227127L, -7.854286809755354140031716771044626356262e-1L),
5324 TEST_c_c (catanh, -1.0L, -0x1p-13L, -4.852030264850939738801379894163661227127L, -7.854286809755354140031716771044626356262e-1L),
5325 TEST_c_c (catanh, 0x1p-27L, 1.0L, 3.725290298461914028034141143623846306386e-9L, 7.853981633974483234934486536343324763447e-1L),
5326 TEST_c_c (catanh, 0x1p-27L, -1.0L, 3.725290298461914028034141143623846306386e-9L, -7.853981633974483234934486536343324763447e-1L),
5327 TEST_c_c (catanh, -0x1p-27L, 1.0L, -3.725290298461914028034141143623846306386e-9L, 7.853981633974483234934486536343324763447e-1L),
5328 TEST_c_c (catanh, -0x1p-27L, -1.0L, -3.725290298461914028034141143623846306386e-9L, -7.853981633974483234934486536343324763447e-1L),
5329 TEST_c_c (catanh, 1.0L, 0x1p-27L, 9.704060527839234335310696652368086117807L, 7.853981652600934588466178684534110069553e-1L),
5330 TEST_c_c (catanh, -1.0L, 0x1p-27L, -9.704060527839234335310696652368086117807L, 7.853981652600934588466178684534110069553e-1L),
5331 TEST_c_c (catanh, 1.0L, -0x1p-27L, 9.704060527839234335310696652368086117807L, -7.853981652600934588466178684534110069553e-1L),
5332 TEST_c_c (catanh, -1.0L, -0x1p-27L, -9.704060527839234335310696652368086117807L, -7.853981652600934588466178684534110069553e-1L),
5333 TEST_c_c (catanh, 0x1p-33L, 1.0L, 5.820766091346740722643102318246316469910e-11L, 7.853981633974483096190489776088929224056e-1L),
5334 TEST_c_c (catanh, 0x1p-33L, -1.0L, 5.820766091346740722643102318246316469910e-11L, -7.853981633974483096190489776088929224056e-1L),
5335 TEST_c_c (catanh, -0x1p-33L, 1.0L, -5.820766091346740722643102318246316469910e-11L, 7.853981633974483096190489776088929224056e-1L),
5336 TEST_c_c (catanh, -0x1p-33L, -1.0L, -5.820766091346740722643102318246316469910e-11L, -7.853981633974483096190489776088929224056e-1L),
5337 TEST_c_c (catanh, 1.0L, 0x1p-33L, 1.178350206951907026009379309773625595762e1L, 7.853981634265521400723945494331241018449e-1L),
5338 TEST_c_c (catanh, -1.0L, 0x1p-33L, -1.178350206951907026009379309773625595762e1L, 7.853981634265521400723945494331241018449e-1L),
5339 TEST_c_c (catanh, 1.0L, -0x1p-33L, 1.178350206951907026009379309773625595762e1L, -7.853981634265521400723945494331241018449e-1L),
5340 TEST_c_c (catanh, -1.0L, -0x1p-33L, -1.178350206951907026009379309773625595762e1L, -7.853981634265521400723945494331241018449e-1L),
5341 TEST_c_c (catanh, 0x1p-54L, 1.0L, 2.775557561562891351059079170227049355775e-17L, 7.853981633974483096156608458198764914213e-1L),
5342 TEST_c_c (catanh, 0x1p-54L, -1.0L, 2.775557561562891351059079170227049355775e-17L, -7.853981633974483096156608458198764914213e-1L),
5343 TEST_c_c (catanh, -0x1p-54L, 1.0L, -2.775557561562891351059079170227049355775e-17L, 7.853981633974483096156608458198764914213e-1L),
5344 TEST_c_c (catanh, -0x1p-54L, -1.0L, -2.775557561562891351059079170227049355775e-17L, -7.853981633974483096156608458198764914213e-1L),
5345 TEST_c_c (catanh, 1.0L, 0x1p-54L, 1.906154746539849600897388334009985581467e1L, 7.853981633974483234934486536343324763447e-1L),
5346 TEST_c_c (catanh, -1.0L, 0x1p-54L, -1.906154746539849600897388334009985581467e1L, 7.853981633974483234934486536343324763447e-1L),
5347 TEST_c_c (catanh, 1.0L, -0x1p-54L, 1.906154746539849600897388334009985581467e1L, -7.853981633974483234934486536343324763447e-1L),
5348 TEST_c_c (catanh, -1.0L, -0x1p-54L, -1.906154746539849600897388334009985581467e1L, -7.853981633974483234934486536343324763447e-1L),
5349 TEST_c_c (catanh, 0x1p-57L, 1.0L, 3.469446951953614188823848962783813448721e-18L, 7.853981633974483096156608458198757330864e-1L),
5350 TEST_c_c (catanh, 0x1p-57L, -1.0L, 3.469446951953614188823848962783813448721e-18L, -7.853981633974483096156608458198757330864e-1L),
5351 TEST_c_c (catanh, -0x1p-57L, 1.0L, -3.469446951953614188823848962783813448721e-18L, 7.853981633974483096156608458198757330864e-1L),
5352 TEST_c_c (catanh, -0x1p-57L, -1.0L, -3.469446951953614188823848962783813448721e-18L, -7.853981633974483096156608458198757330864e-1L),
5353 TEST_c_c (catanh, 1.0L, 0x1p-57L, 2.010126823623841397309973152228712047720e1L, 7.853981633974483113503843217966828154612e-1L),
5354 TEST_c_c (catanh, -1.0L, 0x1p-57L, -2.010126823623841397309973152228712047720e1L, 7.853981633974483113503843217966828154612e-1L),
5355 TEST_c_c (catanh, 1.0L, -0x1p-57L, 2.010126823623841397309973152228712047720e1L, -7.853981633974483113503843217966828154612e-1L),
5356 TEST_c_c (catanh, -1.0L, -0x1p-57L, -2.010126823623841397309973152228712047720e1L, -7.853981633974483113503843217966828154612e-1L),
5357 TEST_c_c (catanh, 0x1p-13L, 0x1.000002p0L, 6.103514882246036852433556327261700380577e-5L, 7.853982267273793866654490522673596014524e-1L),
5358 TEST_c_c (catanh, 0x1p-13L, -0x1.000002p0L, 6.103514882246036852433556327261700380577e-5L, -7.853982267273793866654490522673596014524e-1L),
5359 TEST_c_c (catanh, -0x1p-13L, 0x1.000002p0L, -6.103514882246036852433556327261700380577e-5L, 7.853982267273793866654490522673596014524e-1L),
5360 TEST_c_c (catanh, -0x1p-13L, -0x1.000002p0L, -6.103514882246036852433556327261700380577e-5L, -7.853982267273793866654490522673596014524e-1L),
5361 TEST_c_c (catanh, 0x1.000002p0L, 0x1p-13L, 4.852030056234795712498957387213592193975L, 7.859169620684960844300240092596908675974e-1L),
5362 TEST_c_c (catanh, -0x1.000002p0L, 0x1p-13L, -4.852030056234795712498957387213592193975L, 7.859169620684960844300240092596908675974e-1L),
5363 TEST_c_c (catanh, 0x1.000002p0L, -0x1p-13L, 4.852030056234795712498957387213592193975L, -7.859169620684960844300240092596908675974e-1L),
5364 TEST_c_c (catanh, -0x1.000002p0L, -0x1p-13L, -4.852030056234795712498957387213592193975L, -7.859169620684960844300240092596908675974e-1L),
5365 TEST_c_c (catanh, 0x1p-13L, 0x0.ffffffp0L, 6.103515973639646453881721999956617260502e-5L, 7.853981373204155542484315721351697277336e-1L),
5366 TEST_c_c (catanh, 0x1p-13L, -0x0.ffffffp0L, 6.103515973639646453881721999956617260502e-5L, -7.853981373204155542484315721351697277336e-1L),
5367 TEST_c_c (catanh, -0x1p-13L, 0x0.ffffffp0L, -6.103515973639646453881721999956617260502e-5L, 7.853981373204155542484315721351697277336e-1L),
5368 TEST_c_c (catanh, -0x1p-13L, -0x0.ffffffp0L, -6.103515973639646453881721999956617260502e-5L, -7.853981373204155542484315721351697277336e-1L),
5369 TEST_c_c (catanh, 0x0.ffffffp0L, 0x1p-13L, 4.852030190345140708455871037447717761868L, 7.851845403708474595909269086711426246675e-1L),
5370 TEST_c_c (catanh, -0x0.ffffffp0L, 0x1p-13L, -4.852030190345140708455871037447717761868L, 7.851845403708474595909269086711426246675e-1L),
5371 TEST_c_c (catanh, 0x0.ffffffp0L, -0x1p-13L, 4.852030190345140708455871037447717761868L, -7.851845403708474595909269086711426246675e-1L),
5372 TEST_c_c (catanh, -0x0.ffffffp0L, -0x1p-13L, -4.852030190345140708455871037447717761868L, -7.851845403708474595909269086711426246675e-1L),
caf84319 5373#ifndef TEST_FLOAT
08198877
JM
5374 TEST_c_c (catanh, 0x1p-27L, 0x1.0000000000001p0L, 3.725290298461913200853528590596263270474e-9L, 7.853981633974484345157511161499711112683e-1L),
5375 TEST_c_c (catanh, 0x1p-27L, -0x1.0000000000001p0L, 3.725290298461913200853528590596263270474e-9L, -7.853981633974484345157511161499711112683e-1L),
5376 TEST_c_c (catanh, -0x1p-27L, 0x1.0000000000001p0L, -3.725290298461913200853528590596263270474e-9L, 7.853981633974484345157511161499711112683e-1L),
5377 TEST_c_c (catanh, -0x1p-27L, -0x1.0000000000001p0L, -3.725290298461913200853528590596263270474e-9L, -7.853981633974484345157511161499711112683e-1L),
5378 TEST_c_c (catanh, 0x1.0000000000001p0L, 0x1p-27L, 9.704060527839234168777242958594699810015L, 7.853981801612546526942695000283242525531e-1L),
5379 TEST_c_c (catanh, -0x1.0000000000001p0L, 0x1p-27L, -9.704060527839234168777242958594699810015L, 7.853981801612546526942695000283242525531e-1L),
5380 TEST_c_c (catanh, 0x1.0000000000001p0L, -0x1p-27L, 9.704060527839234168777242958594699810015L, -7.853981801612546526942695000283242525531e-1L),
5381 TEST_c_c (catanh, -0x1.0000000000001p0L, -0x1p-27L, -9.704060527839234168777242958594699810015L, -7.853981801612546526942695000283242525531e-1L),
5382 TEST_c_c (catanh, 0x1p-27L, 0x0.fffffffffffff8p0L, 3.725290298461914441624447420137706700965e-9L, 7.853981633974482679822974223765039144191e-1L),
5383 TEST_c_c (catanh, 0x1p-27L, -0x0.fffffffffffff8p0L, 3.725290298461914441624447420137706700965e-9L, -7.853981633974482679822974223765039144191e-1L),
5384 TEST_c_c (catanh, -0x1p-27L, 0x0.fffffffffffff8p0L, -3.725290298461914441624447420137706700965e-9L, 7.853981633974482679822974223765039144191e-1L),
5385 TEST_c_c (catanh, -0x1p-27L, -0x0.fffffffffffff8p0L, -3.725290298461914441624447420137706700965e-9L, -7.853981633974482679822974223765039144191e-1L),
5386 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, 0x1p-27L, 9.704060527839234252043969805481351363824L, 7.853981578095128619227903983047292781021e-1L),
5387 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, 0x1p-27L, -9.704060527839234252043969805481351363824L, 7.853981578095128619227903983047292781021e-1L),
5388 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, -0x1p-27L, 9.704060527839234252043969805481351363824L, -7.853981578095128619227903983047292781021e-1L),
5389 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, -0x1p-27L, -9.704060527839234252043969805481351363824L, -7.853981578095128619227903983047292781021e-1L),
caf84319
JM
5390#endif
5391#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM
5392 TEST_c_c (catanh, 0x1p-33L, 0x1.0000000000000002p0L, 5.820766091346740722012013594069507025615e-11L, 7.853981633974483096732590862331681441026e-1L),
5393 TEST_c_c (catanh, 0x1p-33L, -0x1.0000000000000002p0L, 5.820766091346740722012013594069507025615e-11L, -7.853981633974483096732590862331681441026e-1L),
5394 TEST_c_c (catanh, -0x1p-33L, 0x1.0000000000000002p0L, -5.820766091346740722012013594069507025615e-11L, 7.853981633974483096732590862331681441026e-1L),
5395 TEST_c_c (catanh, -0x1p-33L, -0x1.0000000000000002p0L, -5.820766091346740722012013594069507025615e-11L, -7.853981633974483096732590862331681441026e-1L),
5396 TEST_c_c (catanh, 0x1.0000000000000002p0L, 0x1p-33L, 1.178350206951907025990405771755129268176e1L, 7.853981638922134273801338071094141188767e-1L),
5397 TEST_c_c (catanh, -0x1.0000000000000002p0L, 0x1p-33L, -1.178350206951907025990405771755129268176e1L, 7.853981638922134273801338071094141188767e-1L),
5398 TEST_c_c (catanh, 0x1.0000000000000002p0L, -0x1p-33L, 1.178350206951907025990405771755129268176e1L, -7.853981638922134273801338071094141188767e-1L),
5399 TEST_c_c (catanh, -0x1.0000000000000002p0L, -0x1p-33L, -1.178350206951907025990405771755129268176e1L, -7.853981638922134273801338071094141188767e-1L),
5400 TEST_c_c (catanh, 0x1p-33L, 0x0.ffffffffffffffffp0L, 5.820766091346740722958646680334721192083e-11L, 7.853981633974483095919439232967553115548e-1L),
5401 TEST_c_c (catanh, 0x1p-33L, -0x0.ffffffffffffffffp0L, 5.820766091346740722958646680334721192083e-11L, -7.853981633974483095919439232967553115548e-1L),
5402 TEST_c_c (catanh, -0x1p-33L, 0x0.ffffffffffffffffp0L, -5.820766091346740722958646680334721192083e-11L, 7.853981633974483095919439232967553115548e-1L),
5403 TEST_c_c (catanh, -0x1p-33L, -0x0.ffffffffffffffffp0L, -5.820766091346740722958646680334721192083e-11L, -7.853981633974483095919439232967553115548e-1L),
5404 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, 0x1p-33L, 1.178350206951907026002603046195591193050e1L, 7.853981631937214964185249205444919953948e-1L),
5405 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, 0x1p-33L, -1.178350206951907026002603046195591193050e1L, 7.853981631937214964185249205444919953948e-1L),
5406 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, -0x1p-33L, 1.178350206951907026002603046195591193050e1L, -7.853981631937214964185249205444919953948e-1L),
5407 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, -0x1p-33L, -1.178350206951907026002603046195591193050e1L, -7.853981631937214964185249205444919953948e-1L),
caf84319
JM
5408#endif
5409#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM
5410 TEST_c_c (catanh, 0x1p-54L, 0x1.000000000000000000000000008p0L, 2.775557561562891351059079170226980932999e-17L, 7.853981633974483096156608458198888173729e-1L),
5411 TEST_c_c (catanh, 0x1p-54L, -0x1.000000000000000000000000008p0L, 2.775557561562891351059079170226980932999e-17L, -7.853981633974483096156608458198888173729e-1L),
5412 TEST_c_c (catanh, -0x1p-54L, 0x1.000000000000000000000000008p0L, -2.775557561562891351059079170226980932999e-17L, 7.853981633974483096156608458198888173729e-1L),
5413 TEST_c_c (catanh, -0x1p-54L, -0x1.000000000000000000000000008p0L, -2.775557561562891351059079170226980932999e-17L, -7.853981633974483096156608458198888173729e-1L),
5414 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, 0x1p-54L, 1.906154746539849600897388334009981267384e1L, 7.853981633974485455380535786656405610710e-1L),
5415 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, 0x1p-54L, -1.906154746539849600897388334009981267384e1L, 7.853981633974485455380535786656405610710e-1L),
5416 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, -0x1p-54L, 1.906154746539849600897388334009981267384e1L, -7.853981633974485455380535786656405610710e-1L),
5417 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, -0x1p-54L, -1.906154746539849600897388334009981267384e1L, -7.853981633974485455380535786656405610710e-1L),
5418 TEST_c_c (catanh, 0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, 2.775557561562891351059079170227083567164e-17L, 7.853981633974483096156608458198703284454e-1L),
5419 TEST_c_c (catanh, 0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, 2.775557561562891351059079170227083567164e-17L, -7.853981633974483096156608458198703284454e-1L),
5420 TEST_c_c (catanh, -0x1p-54L, 0x0.ffffffffffffffffffffffffffcp0L, -2.775557561562891351059079170227083567164e-17L, 7.853981633974483096156608458198703284454e-1L),
5421 TEST_c_c (catanh, -0x1p-54L, -0x0.ffffffffffffffffffffffffffcp0L, -2.775557561562891351059079170227083567164e-17L, -7.853981633974483096156608458198703284454e-1L),
5422 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, 1.906154746539849600897388334009984040723e1L, 7.853981633974482124711461911186784339815e-1L),
5423 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-54L, -1.906154746539849600897388334009984040723e1L, 7.853981633974482124711461911186784339815e-1L),
5424 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, 1.906154746539849600897388334009984040723e1L, -7.853981633974482124711461911186784339815e-1L),
5425 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-54L, -1.906154746539849600897388334009984040723e1L, -7.853981633974482124711461911186784339815e-1L),
caf84319
JM
5426#endif
5427#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM
5428 TEST_c_c (catanh, 0x1p-57L, 0x1.0000000000000000000000000001p0L, 3.469446951953614188823848962783812780530e-18L, 7.853981633974483096156608458198758293829e-1L),
5429 TEST_c_c (catanh, 0x1p-57L, -0x1.0000000000000000000000000001p0L, 3.469446951953614188823848962783812780530e-18L, -7.853981633974483096156608458198758293829e-1L),
5430 TEST_c_c (catanh, -0x1p-57L, 0x1.0000000000000000000000000001p0L, -3.469446951953614188823848962783812780530e-18L, 7.853981633974483096156608458198758293829e-1L),
5431 TEST_c_c (catanh, -0x1p-57L, -0x1.0000000000000000000000000001p0L, -3.469446951953614188823848962783812780530e-18L, -7.853981633974483096156608458198758293829e-1L),
5432 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, 0x1p-57L, 2.010126823623841397309973152228712033275e1L, 7.853981633974483252281721296111395707566e-1L),
5433 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, 0x1p-57L, -2.010126823623841397309973152228712033275e1L, 7.853981633974483252281721296111395707566e-1L),
5434 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, -0x1p-57L, 2.010126823623841397309973152228712033275e1L, -7.853981633974483252281721296111395707566e-1L),
5435 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, -0x1p-57L, -2.010126823623841397309973152228712033275e1L, -7.853981633974483252281721296111395707566e-1L),
5436 TEST_c_c (catanh, 0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, 3.469446951953614188823848962783813782817e-18L, 7.853981633974483096156608458198756849381e-1L),
5437 TEST_c_c (catanh, 0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, 3.469446951953614188823848962783813782817e-18L, -7.853981633974483096156608458198756849381e-1L),
5438 TEST_c_c (catanh, -0x1p-57L, 0x0.ffffffffffffffffffffffffffff8p0L, -3.469446951953614188823848962783813782817e-18L, 7.853981633974483096156608458198756849381e-1L),
5439 TEST_c_c (catanh, -0x1p-57L, -0x0.ffffffffffffffffffffffffffff8p0L, -3.469446951953614188823848962783813782817e-18L, -7.853981633974483096156608458198756849381e-1L),
5440 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, 2.010126823623841397309973152228712040498e1L, 7.853981633974483044114904178894544378135e-1L),
5441 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-57L, -2.010126823623841397309973152228712040498e1L, 7.853981633974483044114904178894544378135e-1L),
5442 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, 2.010126823623841397309973152228712040498e1L, -7.853981633974483044114904178894544378135e-1L),
5443 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-57L, -2.010126823623841397309973152228712040498e1L, -7.853981633974483044114904178894544378135e-1L),
5444#endif
5445 TEST_c_c (catanh, 1.0L, 0x1p-64L, 2.252728336819822255606004394739073846245e1L, 7.853981633974483096292133729759445264744e-1L),
5446 TEST_c_c (catanh, 1.0L, -0x1p-64L, 2.252728336819822255606004394739073846245e1L, -7.853981633974483096292133729759445264744e-1L),
5447 TEST_c_c (catanh, -1.0L, 0x1p-64L, -2.252728336819822255606004394739073846245e1L, 7.853981633974483096292133729759445264744e-1L),
5448 TEST_c_c (catanh, -1.0L, -0x1p-64L, -2.252728336819822255606004394739073846245e1L, -7.853981633974483096292133729759445264744e-1L),
5449 TEST_c_c (catanh, 0x1p-64L, 1.0L, 2.710505431213761085018632002174854278563e-20L, 7.853981633974483096156608458198757210500e-1L),
5450 TEST_c_c (catanh, -0x1p-64L, 1.0L, -2.710505431213761085018632002174854278563e-20L, 7.853981633974483096156608458198757210500e-1L),
5451 TEST_c_c (catanh, 0x1p-64L, -1.0L, 2.710505431213761085018632002174854278563e-20L, -7.853981633974483096156608458198757210500e-1L),
5452 TEST_c_c (catanh, -0x1p-64L, -1.0L, -2.710505431213761085018632002174854278563e-20L, -7.853981633974483096156608458198757210500e-1L),
5453 TEST_c_c (catanh, 1.0L, 0x1.3p-73L, 2.556052055225464683726753902092495938633e1L, 7.853981633974483096156922786831527361009e-1L),
5454 TEST_c_c (catanh, 1.0L, -0x1.3p-73L, 2.556052055225464683726753902092495938633e1L, -7.853981633974483096156922786831527361009e-1L),
5455 TEST_c_c (catanh, -1.0L, 0x1.3p-73L, -2.556052055225464683726753902092495938633e1L, 7.853981633974483096156922786831527361009e-1L),
5456 TEST_c_c (catanh, -1.0L, -0x1.3p-73L, -2.556052055225464683726753902092495938633e1L, -7.853981633974483096156922786831527361009e-1L),
5457 TEST_c_c (catanh, 0x1.3p-73L, 1.0L, 6.286572655403010329022706059731717687100e-23L, 7.853981633974483096156608458198757210493e-1L),
5458 TEST_c_c (catanh, -0x1.3p-73L, 1.0L, -6.286572655403010329022706059731717687100e-23L, 7.853981633974483096156608458198757210493e-1L),
5459 TEST_c_c (catanh, 0x1.3p-73L, -1.0L, 6.286572655403010329022706059731717687100e-23L, -7.853981633974483096156608458198757210493e-1L),
5460 TEST_c_c (catanh, -0x1.3p-73L, -1.0L, -6.286572655403010329022706059731717687100e-23L, -7.853981633974483096156608458198757210493e-1L),
5461 TEST_c_c (catanh, 1.0L, 0x1p-124L, 4.332169878499658183857700759113603550472e1L, 7.853981633974483096156608458198757210610e-1L),
5462 TEST_c_c (catanh, 1.0L, -0x1p-124L, 4.332169878499658183857700759113603550472e1L, -7.853981633974483096156608458198757210610e-1L),
5463 TEST_c_c (catanh, -1.0L, 0x1p-124L, -4.332169878499658183857700759113603550472e1L, 7.853981633974483096156608458198757210610e-1L),
5464 TEST_c_c (catanh, -1.0L, -0x1p-124L, -4.332169878499658183857700759113603550472e1L, -7.853981633974483096156608458198757210610e-1L),
5465 TEST_c_c (catanh, 0x1p-124L, 1.0L, 2.350988701644575015937473074444491355637e-38L, 7.853981633974483096156608458198757210493e-1L),
5466 TEST_c_c (catanh, -0x1p-124L, 1.0L, -2.350988701644575015937473074444491355637e-38L, 7.853981633974483096156608458198757210493e-1L),
5467 TEST_c_c (catanh, 0x1p-124L, -1.0L, 2.350988701644575015937473074444491355637e-38L, -7.853981633974483096156608458198757210493e-1L),
5468 TEST_c_c (catanh, -0x1p-124L, -1.0L, -2.350988701644575015937473074444491355637e-38L, -7.853981633974483096156608458198757210493e-1L),
5469 TEST_c_c (catanh, 0x1.000002p0L, 0x1p-126L, 8.317766196521665212523713550410777685446L, 1.570796326794896619231321691639702138295L),
5470 TEST_c_c (catanh, 0x1.000002p0L, -0x1p-126L, 8.317766196521665212523713550410777685446L, -1.570796326794896619231321691639702138295L),
5471 TEST_c_c (catanh, -0x1.000002p0L, 0x1p-126L, -8.317766196521665212523713550410777685446L, 1.570796326794896619231321691639702138295L),
5472 TEST_c_c (catanh, -0x1.000002p0L, -0x1p-126L, -8.317766196521665212523713550410777685446L, -1.570796326794896619231321691639702138295L),
5473 TEST_c_c (catanh, 0x1p-126L, 0x1.000002p0L, 5.877471053462247139383742414506671233336e-39L, 7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5474 TEST_c_c (catanh, -0x1p-126L, 0x1.000002p0L, -5.877471053462247139383742414506671233336e-39L, 7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5475 TEST_c_c (catanh, 0x1p-126L, -0x1.000002p0L, 5.877471053462247139383742414506671233336e-39L, -7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5476 TEST_c_c (catanh, -0x1p-126L, -0x1.000002p0L, -5.877471053462247139383742414506671233336e-39L, -7.853982230020895322927482174768220815493e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5477 TEST_c_c (catanh, 0x0.ffffffp0L, 0x1p-126L, 8.664339742098154951823135931565866792454L, 9.860761609136244031334147100512154160097e-32L),
5478 TEST_c_c (catanh, 0x0.ffffffp0L, -0x1p-126L, 8.664339742098154951823135931565866792454L, -9.860761609136244031334147100512154160097e-32L),
5479 TEST_c_c (catanh, -0x0.ffffffp0L, 0x1p-126L, -8.664339742098154951823135931565866792454L, 9.860761609136244031334147100512154160097e-32L),
5480 TEST_c_c (catanh, -0x0.ffffffp0L, -0x1p-126L, -8.664339742098154951823135931565866792454L, -9.860761609136244031334147100512154160097e-32L),
5481 TEST_c_c (catanh, 0x1p-126L, 0x0.ffffffp0L, 5.877472104436064061535099214664320916184e-39L, 7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5482 TEST_c_c (catanh, -0x1p-126L, 0x0.ffffffp0L, -5.877472104436064061535099214664320916184e-39L, 7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5483 TEST_c_c (catanh, 0x1p-126L, -0x0.ffffffp0L, 5.877472104436064061535099214664320916184e-39L, -7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
5484 TEST_c_c (catanh, -0x1p-126L, -0x0.ffffffp0L, -5.877472104436064061535099214664320916184e-39L, -7.853981335951250337419109991749089175724e-1L, UNDERFLOW_EXCEPTION_FLOAT),
10de07f5 5485#ifndef TEST_FLOAT
08198877
JM
5486 TEST_c_c (catanh, 1.0L, 0x1p-512L, 1.777922518136259718655200391540222897114e2L, 7.853981633974483096156608458198757210493e-1L),
5487 TEST_c_c (catanh, 1.0L, -0x1p-512L, 1.777922518136259718655200391540222897114e2L, -7.853981633974483096156608458198757210493e-1L),
5488 TEST_c_c (catanh, -1.0L, 0x1p-512L, -1.777922518136259718655200391540222897114e2L, 7.853981633974483096156608458198757210493e-1L),
5489 TEST_c_c (catanh, -1.0L, -0x1p-512L, -1.777922518136259718655200391540222897114e2L, -7.853981633974483096156608458198757210493e-1L),
5490 TEST_c_c (catanh, 0x1p-512L, 1.0L, 3.729170365600103371645482657731466918688e-155L, 7.853981633974483096156608458198757210493e-1L),
5491 TEST_c_c (catanh, -0x1p-512L, 1.0L, -3.729170365600103371645482657731466918688e-155L, 7.853981633974483096156608458198757210493e-1L),
5492 TEST_c_c (catanh, 0x1p-512L, -1.0L, 3.729170365600103371645482657731466918688e-155L, -7.853981633974483096156608458198757210493e-1L),
5493 TEST_c_c (catanh, -0x1p-512L, -1.0L, -3.729170365600103371645482657731466918688e-155L, -7.853981633974483096156608458198757210493e-1L),
5494 TEST_c_c (catanh, 1.0L, 0x1.3p-536L, 1.860240928518819859673567751384928348958e2L, 7.853981633974483096156608458198757210493e-1L),
5495 TEST_c_c (catanh, 1.0L, -0x1.3p-536L, 1.860240928518819859673567751384928348958e2L, -7.853981633974483096156608458198757210493e-1L),
5496 TEST_c_c (catanh, -1.0L, 0x1.3p-536L, -1.860240928518819859673567751384928348958e2L, 7.853981633974483096156608458198757210493e-1L),
5497 TEST_c_c (catanh, -1.0L, -0x1.3p-536L, -1.860240928518819859673567751384928348958e2L, -7.853981633974483096156608458198757210493e-1L),
5498 TEST_c_c (catanh, 0x1.3p-536L, 1.0L, 2.639526015013529511588222179446290115084e-162L, 7.853981633974483096156608458198757210493e-1L),
5499 TEST_c_c (catanh, -0x1.3p-536L, 1.0L, -2.639526015013529511588222179446290115084e-162L, 7.853981633974483096156608458198757210493e-1L),
5500 TEST_c_c (catanh, 0x1.3p-536L, -1.0L, 2.639526015013529511588222179446290115084e-162L, -7.853981633974483096156608458198757210493e-1L),
5501 TEST_c_c (catanh, -0x1.3p-536L, -1.0L, -2.639526015013529511588222179446290115084e-162L, -7.853981633974483096156608458198757210493e-1L),
5502 TEST_c_c (catanh, 1.0L, 0x1p-1020L, 3.538516356758520804574969980043991380025e2L, 7.853981633974483096156608458198757210493e-1L),
5503 TEST_c_c (catanh, 1.0L, -0x1p-1020L, 3.538516356758520804574969980043991380025e2L, -7.853981633974483096156608458198757210493e-1L),
5504 TEST_c_c (catanh, -1.0L, 0x1p-1020L, -3.538516356758520804574969980043991380025e2L, 7.853981633974483096156608458198757210493e-1L),
5505 TEST_c_c (catanh, -1.0L, -0x1p-1020L, -3.538516356758520804574969980043991380025e2L, -7.853981633974483096156608458198757210493e-1L),
5506 TEST_c_c (catanh, 0x1p-1020L, 1.0L, 4.450147717014402766180465434664808128438e-308L, 7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5507 TEST_c_c (catanh, -0x1p-1020L, 1.0L, -4.450147717014402766180465434664808128438e-308L, 7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5508 TEST_c_c (catanh, 0x1p-1020L, -1.0L, 4.450147717014402766180465434664808128438e-308L, -7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5509 TEST_c_c (catanh, -0x1p-1020L, -1.0L, -4.450147717014402766180465434664808128438e-308L, -7.853981633974483096156608458198757210493e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5510 TEST_c_c (catanh, 0x1.0000000000001p0L, 0x1p-1022L, 1.836840028483855075506780244989950299369e1L, 1.570796326794896619231321691639751442099L),
5511 TEST_c_c (catanh, 0x1.0000000000001p0L, -0x1p-1022L, 1.836840028483855075506780244989950299369e1L, -1.570796326794896619231321691639751442099L),
5512 TEST_c_c (catanh, -0x1.0000000000001p0L, 0x1p-1022L, -1.836840028483855075506780244989950299369e1L, 1.570796326794896619231321691639751442099L),
5513 TEST_c_c (catanh, -0x1.0000000000001p0L, -0x1p-1022L, -1.836840028483855075506780244989950299369e1L, -1.570796326794896619231321691639751442099L),
5514 TEST_c_c (catanh, 0x1p-1022L, 0x1.0000000000001p0L, 1.112536929253600444512293438042957369978e-308L, 7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5515 TEST_c_c (catanh, -0x1p-1022L, 0x1.0000000000001p0L, -1.112536929253600444512293438042957369978e-308L, 7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5516 TEST_c_c (catanh, 0x1p-1022L, -0x1.0000000000001p0L, 1.112536929253600444512293438042957369978e-308L, -7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5517 TEST_c_c (catanh, -0x1p-1022L, -0x1.0000000000001p0L, -1.112536929253600444512293438042957369978e-308L, -7.853981633974484206379633083355174374608e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5518 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, 0x1p-1022L, 1.871497387511852332650969166374185305708e1L, 1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5519 TEST_c_c (catanh, 0x0.fffffffffffff8p0L, -0x1p-1022L, 1.871497387511852332650969166374185305708e1L, -1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5520 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, 0x1p-1022L, -1.871497387511852332650969166374185305708e1L, 1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5521 TEST_c_c (catanh, -0x0.fffffffffffff8p0L, -0x1p-1022L, -1.871497387511852332650969166374185305708e1L, -1.002084180004486444624900488355118689113e-292L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
5522 TEST_c_c (catanh, 0x1p-1022L, 0x0.fffffffffffff8p0L, 1.112536929253600815061527818977844932790e-308L, 7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5523 TEST_c_c (catanh, -0x1p-1022L, 0x0.fffffffffffff8p0L, -1.112536929253600815061527818977844932790e-308L, 7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5524 TEST_c_c (catanh, 0x1p-1022L, -0x0.fffffffffffff8p0L, 1.112536929253600815061527818977844932790e-308L, -7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5525 TEST_c_c (catanh, -0x1p-1022L, -0x0.fffffffffffff8p0L, -1.112536929253600815061527818977844932790e-308L, -7.853981633974482541045096145620456183798e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
10de07f5
JM
5526#endif
5527#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM
5528 TEST_c_c (catanh, 0x1.0000000000000002p0L, 0x1p-1022L, 2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5529 TEST_c_c (catanh, 0x1.0000000000000002p0L, -0x1p-1022L, 2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5530 TEST_c_c (catanh, -0x1.0000000000000002p0L, 0x1p-1022L, -2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5531 TEST_c_c (catanh, -0x1.0000000000000002p0L, -0x1p-1022L, -2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5532 TEST_c_c (catanh, 0x1p-1022L, 0x1.0000000000000002p0L, 1.112536929253600691424494863099491450042e-308L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5533 TEST_c_c (catanh, -0x1p-1022L, 0x1.0000000000000002p0L, -1.112536929253600691424494863099491450042e-308L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5534 TEST_c_c (catanh, 0x1p-1022L, -0x1.0000000000000002p0L, 1.112536929253600691424494863099491450042e-308L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5535 TEST_c_c (catanh, -0x1p-1022L, -0x1.0000000000000002p0L, -1.112536929253600691424494863099491450042e-308L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5536 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, 0x1p-1022L, 2.252728336819822255604649142023466965703e1L, 2.052268400649188124723641491045245971623e-289L),
5537 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, -0x1p-1022L, 2.252728336819822255604649142023466965703e1L, -2.052268400649188124723641491045245971623e-289L),
5538 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, 0x1p-1022L, -2.252728336819822255604649142023466965703e1L, 2.052268400649188124723641491045245971623e-289L),
5539 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, -0x1p-1022L, -2.252728336819822255604649142023466965703e1L, -2.052268400649188124723641491045245971623e-289L),
5540 TEST_c_c (catanh, 0x1p-1022L, 0x0.ffffffffffffffffp0L, 1.112536929253600691605427106449557323148e-308L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5541 TEST_c_c (catanh, -0x1p-1022L, 0x0.ffffffffffffffffp0L, -1.112536929253600691605427106449557323148e-308L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5542 TEST_c_c (catanh, 0x1p-1022L, -0x0.ffffffffffffffffp0L, 1.112536929253600691605427106449557323148e-308L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5543 TEST_c_c (catanh, -0x1p-1022L, -0x0.ffffffffffffffffp0L, -1.112536929253600691605427106449557323148e-308L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
10de07f5
JM
5544#endif
5545#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM
5546 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, 0x1p-1022L, 3.673680056967710139911330243728336427098e1L, 1.570796326794896619231321691639751442099L),
5547 TEST_c_c (catanh, 0x1.000000000000000000000000008p0L, -0x1p-1022L, 3.673680056967710139911330243728336427098e1L, -1.570796326794896619231321691639751442099L),
5548 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, 0x1p-1022L, -3.673680056967710139911330243728336427098e1L, 1.570796326794896619231321691639751442099L),
5549 TEST_c_c (catanh, -0x1.000000000000000000000000008p0L, -0x1p-1022L, -3.673680056967710139911330243728336427098e1L, -1.570796326794896619231321691639751442099L),
5550 TEST_c_c (catanh, 0x1p-1022L, 0x1.000000000000000000000000008p0L, 1.112536929253600691545116358666174605957e-308L, 7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5551 TEST_c_c (catanh, -0x1p-1022L, 0x1.000000000000000000000000008p0L, -1.112536929253600691545116358666174605957e-308L, 7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5552 TEST_c_c (catanh, 0x1p-1022L, -0x1.000000000000000000000000008p0L, 1.112536929253600691545116358666174605957e-308L, -7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5553 TEST_c_c (catanh, -0x1p-1022L, -0x1.000000000000000000000000008p0L, -1.112536929253600691545116358666174605957e-308L, -7.853981633974483096156608458198880470009e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5554 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, 3.708337415995707405382191849801244331055e1L, 9.025971879324147880346310405868788320726e-277L),
5555 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, 3.708337415995707405382191849801244331055e1L, -9.025971879324147880346310405868788320726e-277L),
5556 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, 0x1p-1022L, -3.708337415995707405382191849801244331055e1L, 9.025971879324147880346310405868788320726e-277L),
5557 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffcp0L, -0x1p-1022L, -3.708337415995707405382191849801244331055e1L, -9.025971879324147880346310405868788320726e-277L),
5558 TEST_c_c (catanh, 0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, 1.112536929253600691545116358666215745186e-308L, 7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5559 TEST_c_c (catanh, -0x1p-1022L, 0x0.ffffffffffffffffffffffffffcp0L, -1.112536929253600691545116358666215745186e-308L, 7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5560 TEST_c_c (catanh, 0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, 1.112536929253600691545116358666215745186e-308L, -7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
5561 TEST_c_c (catanh, -0x1p-1022L, -0x0.ffffffffffffffffffffffffffcp0L, -1.112536929253600691545116358666215745186e-308L, -7.853981633974483096156608458198695580735e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
10de07f5
JM
5562#endif
5563#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
5564 TEST_c_c (catanh, 1.0L, 0x1p-8192L, 2.839477425163815960027691385553420311121e3L, 7.853981633974483096156608458198757210493e-1L),
5565 TEST_c_c (catanh, 1.0L, -0x1p-8192L, 2.839477425163815960027691385553420311121e3L, -7.853981633974483096156608458198757210493e-1L),
5566 TEST_c_c (catanh, -1.0L, 0x1p-8192L, -2.839477425163815960027691385553420311121e3L, 7.853981633974483096156608458198757210493e-1L),
5567 TEST_c_c (catanh, -1.0L, -0x1p-8192L, -2.839477425163815960027691385553420311121e3L, -7.853981633974483096156608458198757210493e-1L),
5568 TEST_c_c (catanh, 0x1p-8192L, 1.0L, 4.584009668887117914053530980121207914891e-2467L, 7.853981633974483096156608458198757210493e-1L),
5569 TEST_c_c (catanh, -0x1p-8192L, 1.0L, -4.584009668887117914053530980121207914891e-2467L, 7.853981633974483096156608458198757210493e-1L),
5570 TEST_c_c (catanh, 0x1p-8192L, -1.0L, 4.584009668887117914053530980121207914891e-2467L, -7.853981633974483096156608458198757210493e-1L),
5571 TEST_c_c (catanh, -0x1p-8192L, -1.0L, -4.584009668887117914053530980121207914891e-2467L, -7.853981633974483096156608458198757210493e-1L),
5572 TEST_c_c (catanh, 1.0L, 0x1.3p-8221L, 2.849442134153471837403071201841536297726e3L, 7.853981633974483096156608458198757210493e-1L),
5573 TEST_c_c (catanh, 1.0L, -0x1.3p-8221L, 2.849442134153471837403071201841536297726e3L, -7.853981633974483096156608458198757210493e-1L),
5574 TEST_c_c (catanh, -1.0L, 0x1.3p-8221L, -2.849442134153471837403071201841536297726e3L, 7.853981633974483096156608458198757210493e-1L),
5575 TEST_c_c (catanh, -1.0L, -0x1.3p-8221L, -2.849442134153471837403071201841536297726e3L, -7.853981633974483096156608458198757210493e-1L),
5576 TEST_c_c (catanh, 0x1.3p-8221L, 1.0L, 1.013933025636421986471594877335044443409e-2475L, 7.853981633974483096156608458198757210493e-1L),
5577 TEST_c_c (catanh, -0x1.3p-8221L, 1.0L, -1.013933025636421986471594877335044443409e-2475L, 7.853981633974483096156608458198757210493e-1L),
5578 TEST_c_c (catanh, 0x1.3p-8221L, -1.0L, 1.013933025636421986471594877335044443409e-2475L, -7.853981633974483096156608458198757210493e-1L),
5579 TEST_c_c (catanh, -0x1.3p-8221L, -1.0L, -1.013933025636421986471594877335044443409e-2475L, -7.853981633974483096156608458198757210493e-1L),
5580 TEST_c_c (catanh, 1.0L, 0x1.3p-8246L, 2.858106473910471153770786603359763504827e3L, 7.853981633974483096156608458198757210493e-1L),
5581 TEST_c_c (catanh, 1.0L, -0x1.3p-8246L, 2.858106473910471153770786603359763504827e3L, -7.853981633974483096156608458198757210493e-1L),
5582 TEST_c_c (catanh, -1.0L, 0x1.3p-8246L, -2.858106473910471153770786603359763504827e3L, 7.853981633974483096156608458198757210493e-1L),
5583 TEST_c_c (catanh, -1.0L, -0x1.3p-8246L, -2.858106473910471153770786603359763504827e3L, -7.853981633974483096156608458198757210493e-1L),
5584 TEST_c_c (catanh, 0x1.3p-8246L, 1.0L, 3.021755890954798419688924781486524472858e-2483L, 7.853981633974483096156608458198757210493e-1L),
5585 TEST_c_c (catanh, -0x1.3p-8246L, 1.0L, -3.021755890954798419688924781486524472858e-2483L, 7.853981633974483096156608458198757210493e-1L),
5586 TEST_c_c (catanh, 0x1.3p-8246L, -1.0L, 3.021755890954798419688924781486524472858e-2483L, -7.853981633974483096156608458198757210493e-1L),
5587 TEST_c_c (catanh, -0x1.3p-8246L, -1.0L, -3.021755890954798419688924781486524472858e-2483L, -7.853981633974483096156608458198757210493e-1L),
5588 TEST_c_c (catanh, 1.0L, 0x1p-16380L, 5.677221982376232056781839690803195180822e3L, 7.853981633974483096156608458198757210493e-1L),
5589 TEST_c_c (catanh, 1.0L, -0x1p-16380L, 5.677221982376232056781839690803195180822e3L, -7.853981633974483096156608458198757210493e-1L),
5590 TEST_c_c (catanh, -1.0L, 0x1p-16380L, -5.677221982376232056781839690803195180822e3L, 7.853981633974483096156608458198757210493e-1L),
5591 TEST_c_c (catanh, -1.0L, -0x1p-16380L, -5.677221982376232056781839690803195180822e3L, -7.853981633974483096156608458198757210493e-1L),
5592 TEST_c_c (catanh, 0x1p-16380L, 1.0L, 6.724206286224187012525355634643505205196e-4932L, 7.853981633974483096156608458198757210493e-1L),
5593 TEST_c_c (catanh, -0x1p-16380L, 1.0L, -6.724206286224187012525355634643505205196e-4932L, 7.853981633974483096156608458198757210493e-1L),
5594 TEST_c_c (catanh, 0x1p-16380L, -1.0L, 6.724206286224187012525355634643505205196e-4932L, -7.853981633974483096156608458198757210493e-1L),
5595 TEST_c_c (catanh, -0x1p-16380L, -1.0L, -6.724206286224187012525355634643505205196e-4932L, -7.853981633974483096156608458198757210493e-1L),
5596 TEST_c_c (catanh, 0x1.0000000000000002p0L, 0x1p-16382L, 2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5597 TEST_c_c (catanh, 0x1.0000000000000002p0L, -0x1p-16382L, 2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5598 TEST_c_c (catanh, -0x1.0000000000000002p0L, 0x1p-16382L, -2.218070977791824990137853294097378778927e1L, 1.570796326794896619231321691639751442099L),
5599 TEST_c_c (catanh, -0x1.0000000000000002p0L, -0x1p-16382L, -2.218070977791824990137853294097378778927e1L, -1.570796326794896619231321691639751442099L),
5600 TEST_c_c (catanh, 0x1p-16382L, 0x1.0000000000000002p0L, 1.681051571556046752949078932066752571182e-4932L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5601 TEST_c_c (catanh, -0x1p-16382L, 0x1.0000000000000002p0L, -1.681051571556046752949078932066752571182e-4932L, 7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5602 TEST_c_c (catanh, 0x1p-16382L, -0x1.0000000000000002p0L, 1.681051571556046752949078932066752571182e-4932L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5603 TEST_c_c (catanh, -0x1p-16382L, -0x1.0000000000000002p0L, -1.681051571556046752949078932066752571182e-4932L, -7.853981633974483096698709544441509427467e-1L, UNDERFLOW_EXCEPTION),
5604 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, 0x1p-16382L, 2.252728336819822255604649142023466965703e1L, 3.100992811520163369065387859792822623745e-4913L),
5605 TEST_c_c (catanh, 0x0.ffffffffffffffffp0L, -0x1p-16382L, 2.252728336819822255604649142023466965703e1L, -3.100992811520163369065387859792822623745e-4913L),
5606 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, 0x1p-16382L, -2.252728336819822255604649142023466965703e1L, 3.100992811520163369065387859792822623745e-4913L),
5607 TEST_c_c (catanh, -0x0.ffffffffffffffffp0L, -0x1p-16382L, -2.252728336819822255604649142023466965703e1L, -3.100992811520163369065387859792822623745e-4913L),
5608 TEST_c_c (catanh, 0x1p-16382L, 0x0.ffffffffffffffffp0L, 1.681051571556046753222468896957938166365e-4932L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5609 TEST_c_c (catanh, -0x1p-16382L, 0x0.ffffffffffffffffp0L, -1.681051571556046753222468896957938166365e-4932L, 7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5610 TEST_c_c (catanh, 0x1p-16382L, -0x0.ffffffffffffffffp0L, 1.681051571556046753222468896957938166365e-4932L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
5611 TEST_c_c (catanh, -0x1p-16382L, -0x0.ffffffffffffffffp0L, -1.681051571556046753222468896957938166365e-4932L, -7.853981633974483095885557915077381101984e-1L, UNDERFLOW_EXCEPTION),
10de07f5 5612# if LDBL_MANT_DIG >= 113
08198877
JM
5613 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, 0x1p-16382L, 3.916281570163690998207361486238697614441e1L, 1.570796326794896619231321691639751442099L),
5614 TEST_c_c (catanh, 0x1.0000000000000000000000000001p0L, -0x1p-16382L, 3.916281570163690998207361486238697614441e1L, -1.570796326794896619231321691639751442099L),
5615 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, 0x1p-16382L, -3.916281570163690998207361486238697614441e1L, 1.570796326794896619231321691639751442099L),
5616 TEST_c_c (catanh, -0x1.0000000000000000000000000001p0L, -0x1p-16382L, -3.916281570163690998207361486238697614441e1L, -1.570796326794896619231321691639751442099L),
5617 TEST_c_c (catanh, 0x1p-16382L, 0x1.0000000000000000000000000001p0L, 1.681051571556046753131338908660875977540e-4932L, 7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5618 TEST_c_c (catanh, -0x1p-16382L, 0x1.0000000000000000000000000001p0L, -1.681051571556046753131338908660875977540e-4932L, 7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5619 TEST_c_c (catanh, 0x1p-16382L, -0x1.0000000000000000000000000001p0L, 1.681051571556046753131338908660875977540e-4932L, -7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5620 TEST_c_c (catanh, -0x1p-16382L, -0x1.0000000000000000000000000001p0L, -1.681051571556046753131338908660875977540e-4932L, -7.853981633974483096156608458198758173458e-1L, UNDERFLOW_EXCEPTION),
5621 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, 3.950938929191688263678223092311606435623e1L, 1.745703758805099310527547423749501866998e-4898L),
5622 TEST_c_c (catanh, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, 3.950938929191688263678223092311606435623e1L, -1.745703758805099310527547423749501866998e-4898L),
5623 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, 0x1p-16382L, -3.950938929191688263678223092311606435623e1L, 1.745703758805099310527547423749501866998e-4898L),
5624 TEST_c_c (catanh, -0x0.ffffffffffffffffffffffffffff8p0L, -0x1p-16382L, -3.950938929191688263678223092311606435623e1L, -1.745703758805099310527547423749501866998e-4898L),
5625 TEST_c_c (catanh, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, 1.681051571556046753131338908660876463178e-4932L, 7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5626 TEST_c_c (catanh, -0x1p-16382L, 0x0.ffffffffffffffffffffffffffff8p0L, -1.681051571556046753131338908660876463178e-4932L, 7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5627 TEST_c_c (catanh, 0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, 1.681051571556046753131338908660876463178e-4932L, -7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
5628 TEST_c_c (catanh, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffff8p0L, -1.681051571556046753131338908660876463178e-4932L, -7.853981633974483096156608458198756729010e-1L, UNDERFLOW_EXCEPTION),
10de07f5 5629# endif
caf84319 5630#endif
2f38fbfe 5631
08198877
JM
5632 TEST_c_c (catanh, 0.75L, 1.25L, 0.261492138795671927078652057366532140L, 0.996825126463918666098902241310446708L),
5633 TEST_c_c (catanh, -2, -3, -0.14694666622552975204743278515471595L, -1.3389725222944935611241935759091443L),
5634 END_DATA (catanh)
5635 };
8847214f 5636
08198877
JM
5637static void
5638catanh_test (void)
5639{
5640 errno = 0;
5641 FUNC(catanh) (BUILD_COMPLEX (0.7L, 1.2L));
5642 if (errno == ENOSYS)
5643 /* Function not implemented. */
5644 return;
5645
5646 START (catanh);
5647 RUN_TEST_LOOP_c_c (catanh, catanh_test_data, );
6815fabc 5648 END (catanh, complex);
8847214f
UD
5649}
5650
74c57478
JM
5651static const struct test_f_f_data cbrt_test_data[] =
5652 {
5653 START_DATA (cbrt),
5654 TEST_f_f (cbrt, 0.0, 0.0),
5655 TEST_f_f (cbrt, minus_zero, minus_zero),
5656
5657 TEST_f_f (cbrt, plus_infty, plus_infty),
5658 TEST_f_f (cbrt, minus_infty, minus_infty),
5659 TEST_f_f (cbrt, qnan_value, qnan_value),
5660
5661 TEST_f_f (cbrt, -0.001L, -0.1L),
5662 TEST_f_f (cbrt, 8, 2),
5663 TEST_f_f (cbrt, -27.0, -3.0),
5664 TEST_f_f (cbrt, 0.9921875L, 0.997389022060725270579075195353955217L),
5665 TEST_f_f (cbrt, 0.75L, 0.908560296416069829445605878163630251L),
5666 END_DATA (cbrt)
5667 };
5668
8847214f
UD
5669static void
5670cbrt_test (void)
5671{
42be70d4
UD
5672 errno = 0;
5673 FUNC(cbrt) (8);
5674 if (errno == ENOSYS)
5675 /* Function not implemented. */
5676 return;
5677
8847214f 5678 START (cbrt);
74c57478 5679 RUN_TEST_LOOP_f_f (cbrt, cbrt_test_data, );
8847214f
UD
5680 END (cbrt);
5681}
5682
2550dfe9 5683
08198877
JM
5684static const struct test_c_c_data ccos_test_data[] =
5685 {
5686 START_DATA (ccos),
5687 TEST_c_c (ccos, 0.0, 0.0, 1.0, minus_zero),
5688 TEST_c_c (ccos, minus_zero, 0.0, 1.0, 0.0),
5689 TEST_c_c (ccos, 0.0, minus_zero, 1.0, 0.0),
5690 TEST_c_c (ccos, minus_zero, minus_zero, 1.0, minus_zero),
8847214f 5691
08198877
JM
5692 TEST_c_c (ccos, plus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5693 TEST_c_c (ccos, plus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5694 TEST_c_c (ccos, minus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5695 TEST_c_c (ccos, minus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 5696
08198877
JM
5697 TEST_c_c (ccos, 0.0, plus_infty, plus_infty, minus_zero),
5698 TEST_c_c (ccos, 0.0, minus_infty, plus_infty, 0.0),
5699 TEST_c_c (ccos, minus_zero, plus_infty, plus_infty, 0.0),
5700 TEST_c_c (ccos, minus_zero, minus_infty, plus_infty, minus_zero),
8847214f 5701
08198877
JM
5702 TEST_c_c (ccos, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5703 TEST_c_c (ccos, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5704 TEST_c_c (ccos, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5705 TEST_c_c (ccos, minus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 5706
08198877
JM
5707 TEST_c_c (ccos, 4.625, plus_infty, minus_infty, plus_infty),
5708 TEST_c_c (ccos, 4.625, minus_infty, minus_infty, minus_infty),
5709 TEST_c_c (ccos, -4.625, plus_infty, minus_infty, minus_infty),
5710 TEST_c_c (ccos, -4.625, minus_infty, minus_infty, plus_infty),
8847214f 5711
08198877
JM
5712 TEST_c_c (ccos, plus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5713 TEST_c_c (ccos, plus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5714 TEST_c_c (ccos, minus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
5715 TEST_c_c (ccos, minus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 5716
08198877
JM
5717 TEST_c_c (ccos, qnan_value, 0.0, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5718 TEST_c_c (ccos, qnan_value, minus_zero, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 5719
08198877
JM
5720 TEST_c_c (ccos, qnan_value, plus_infty, plus_infty, qnan_value),
5721 TEST_c_c (ccos, qnan_value, minus_infty, plus_infty, qnan_value),
8847214f 5722
08198877
JM
5723 TEST_c_c (ccos, qnan_value, 9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5724 TEST_c_c (ccos, qnan_value, -9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5725
08198877
JM
5726 TEST_c_c (ccos, 0.0, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5727 TEST_c_c (ccos, minus_zero, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 5728
08198877
JM
5729 TEST_c_c (ccos, 10.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5730 TEST_c_c (ccos, -10.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5731
08198877
JM
5732 TEST_c_c (ccos, plus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5733 TEST_c_c (ccos, minus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5734
08198877 5735 TEST_c_c (ccos, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 5736
08198877
JM
5737 TEST_c_c (ccos, 0.75L, 1.25L, 1.38173873063425888530729933139078645L, -1.09193013555397466170919531722024128L),
5738 TEST_c_c (ccos, -2, -3, -4.18962569096880723013255501961597373L, -9.10922789375533659797919726277886212L),
8847214f 5739
08198877
JM
5740 TEST_c_c (ccos, 0.75, 89.5, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
5741 TEST_c_c (ccos, 0.75, -89.5, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
5742 TEST_c_c (ccos, -0.75, 89.5, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
5743 TEST_c_c (ccos, -0.75, -89.5, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
e0b16cc2
JM
5744
5745#ifndef TEST_FLOAT
08198877
JM
5746 TEST_c_c (ccos, 0.75, 710.5, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
5747 TEST_c_c (ccos, 0.75, -710.5, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
5748 TEST_c_c (ccos, -0.75, 710.5, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
5749 TEST_c_c (ccos, -0.75, -710.5, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
e0b16cc2
JM
5750#endif
5751
5752#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
5753 TEST_c_c (ccos, 0.75, 11357.25, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
5754 TEST_c_c (ccos, 0.75, -11357.25, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
5755 TEST_c_c (ccos, -0.75, 11357.25, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
5756 TEST_c_c (ccos, -0.75, -11357.25, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
e0b16cc2
JM
5757#endif
5758
5759#ifdef TEST_FLOAT
08198877 5760 TEST_c_c (ccos, 0x1p-149, 180, plus_infty, -1.043535896672617552965983803453927655332e33L, OVERFLOW_EXCEPTION),
e0b16cc2
JM
5761#endif
5762
5763#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 5764 TEST_c_c (ccos, 0x1p-1074, 1440, plus_infty, -5.981479269486130556466515778180916082415e301L, OVERFLOW_EXCEPTION),
e0b16cc2
JM
5765#endif
5766
5767#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 5768 TEST_c_c (ccos, 0x1p-16434L, 22730, plus_infty, -1.217853148905605987081057582351152052687e4924L, OVERFLOW_EXCEPTION),
e0b16cc2
JM
5769#endif
5770
08198877
JM
5771 TEST_c_c (ccos, min_subnorm_value * 0x1p120, 0x1p-120, 1.0, -min_subnorm_value, UNDERFLOW_EXCEPTION),
5772 TEST_c_c (ccos, 0x1p-120, min_subnorm_value * 0x1p120, 1.0, -min_subnorm_value, UNDERFLOW_EXCEPTION),
5773 END_DATA (ccos)
5774 };
8847214f
UD
5775
5776static void
08198877 5777ccos_test (void)
8847214f 5778{
aaca11d8 5779 errno = 0;
08198877 5780 FUNC(ccos) (BUILD_COMPLEX (0, 0));
aaca11d8
UD
5781 if (errno == ENOSYS)
5782 /* Function not implemented. */
5783 return;
8847214f 5784
08198877
JM
5785 START (ccos);
5786 RUN_TEST_LOOP_c_c (ccos, ccos_test_data, );
5787 END (ccos, complex);
5788}
8847214f 5789
8847214f 5790
08198877
JM
5791static const struct test_c_c_data ccosh_test_data[] =
5792 {
5793 START_DATA (ccosh),
5794 TEST_c_c (ccosh, 0.0, 0.0, 1.0, 0.0),
5795 TEST_c_c (ccosh, minus_zero, 0.0, 1.0, minus_zero),
5796 TEST_c_c (ccosh, 0.0, minus_zero, 1.0, minus_zero),
5797 TEST_c_c (ccosh, minus_zero, minus_zero, 1.0, 0.0),
5798
5799 TEST_c_c (ccosh, 0.0, plus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5800 TEST_c_c (ccosh, minus_zero, plus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5801 TEST_c_c (ccosh, 0.0, minus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
5802 TEST_c_c (ccosh, minus_zero, minus_infty, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 5803
08198877
JM
5804 TEST_c_c (ccosh, plus_infty, 0.0, plus_infty, 0.0),
5805 TEST_c_c (ccosh, minus_infty, 0.0, plus_infty, minus_zero),
5806 TEST_c_c (ccosh, plus_infty, minus_zero, plus_infty, minus_zero),
5807 TEST_c_c (ccosh, minus_infty, minus_zero, plus_infty, 0.0),
8847214f 5808
08198877
JM
5809 TEST_c_c (ccosh, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5810 TEST_c_c (ccosh, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5811 TEST_c_c (ccosh, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
5812 TEST_c_c (ccosh, minus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 5813
08198877
JM
5814 TEST_c_c (ccosh, plus_infty, 4.625, minus_infty, minus_infty),
5815 TEST_c_c (ccosh, minus_infty, 4.625, minus_infty, plus_infty),
5816 TEST_c_c (ccosh, plus_infty, -4.625, minus_infty, plus_infty),
5817 TEST_c_c (ccosh, minus_infty, -4.625, minus_infty, minus_infty),
8847214f 5818
08198877
JM
5819 TEST_c_c (ccosh, 6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5820 TEST_c_c (ccosh, -6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5821 TEST_c_c (ccosh, 6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
5822 TEST_c_c (ccosh, -6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 5823
08198877
JM
5824 TEST_c_c (ccosh, 0.0, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5825 TEST_c_c (ccosh, minus_zero, qnan_value, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 5826
08198877
JM
5827 TEST_c_c (ccosh, plus_infty, qnan_value, plus_infty, qnan_value),
5828 TEST_c_c (ccosh, minus_infty, qnan_value, plus_infty, qnan_value),
8847214f 5829
08198877
JM
5830 TEST_c_c (ccosh, 9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5831 TEST_c_c (ccosh, -9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5832
08198877
JM
5833 TEST_c_c (ccosh, qnan_value, 0.0, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
5834 TEST_c_c (ccosh, qnan_value, minus_zero, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 5835
08198877
JM
5836 TEST_c_c (ccosh, qnan_value, 10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5837 TEST_c_c (ccosh, qnan_value, -10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5838
08198877
JM
5839 TEST_c_c (ccosh, qnan_value, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
5840 TEST_c_c (ccosh, qnan_value, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 5841
08198877 5842 TEST_c_c (ccosh, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 5843
08198877 5844 TEST_c_c (ccosh, 0.75L, 1.25L, 0.408242591877968807788852146397499084L, 0.780365930845853240391326216300863152L),
8847214f 5845
08198877 5846 TEST_c_c (ccosh, -2, -3, -3.72454550491532256547397070325597253L, 0.511822569987384608834463849801875634L),
8847214f 5847
08198877
JM
5848 TEST_c_c (ccosh, 89.5, 0.75, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
5849 TEST_c_c (ccosh, -89.5, 0.75, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
5850 TEST_c_c (ccosh, 89.5, -0.75, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
5851 TEST_c_c (ccosh, -89.5, -0.75, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
e0b16cc2
JM
5852
5853#ifndef TEST_FLOAT
08198877
JM
5854 TEST_c_c (ccosh, 710.5, 0.75, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
5855 TEST_c_c (ccosh, -710.5, 0.75, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
5856 TEST_c_c (ccosh, 710.5, -0.75, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
5857 TEST_c_c (ccosh, -710.5, -0.75, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
e0b16cc2
JM
5858#endif
5859
5860#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
5861 TEST_c_c (ccosh, 11357.25, 0.75, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
5862 TEST_c_c (ccosh, -11357.25, 0.75, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
5863 TEST_c_c (ccosh, 11357.25, -0.75, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
5864 TEST_c_c (ccosh, -11357.25, -0.75, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
e0b16cc2
JM
5865#endif
5866
5867#ifdef TEST_FLOAT
08198877 5868 TEST_c_c (ccosh, 180, 0x1p-149, plus_infty, 1.043535896672617552965983803453927655332e33L, OVERFLOW_EXCEPTION),
e0b16cc2
JM
5869#endif
5870
5871#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 5872 TEST_c_c (ccosh, 1440, 0x1p-1074, plus_infty, 5.981479269486130556466515778180916082415e301L, OVERFLOW_EXCEPTION),
e0b16cc2
JM
5873#endif
5874
5875#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 5876 TEST_c_c (ccosh, 22730, 0x1p-16434L, plus_infty, 1.217853148905605987081057582351152052687e4924L, OVERFLOW_EXCEPTION),
e0b16cc2
JM
5877#endif
5878
08198877
JM
5879 TEST_c_c (ccosh, min_subnorm_value * 0x1p120, 0x1p-120, 1.0, min_subnorm_value, UNDERFLOW_EXCEPTION),
5880 TEST_c_c (ccosh, 0x1p-120, min_subnorm_value * 0x1p120, 1.0, min_subnorm_value, UNDERFLOW_EXCEPTION),
5881 END_DATA (ccosh)
5882 };
5883
5884static void
5885ccosh_test (void)
5886{
5887 errno = 0;
5888 FUNC(ccosh) (BUILD_COMPLEX (0.7L, 1.2L));
5889 if (errno == ENOSYS)
5890 /* Function not implemented. */
5891 return;
f0302940 5892
08198877
JM
5893 START (ccosh);
5894 RUN_TEST_LOOP_c_c (ccosh, ccosh_test_data, );
6815fabc 5895 END (ccosh, complex);
8847214f
UD
5896}
5897
5898
74c57478
JM
5899static const struct test_f_f_data ceil_test_data[] =
5900 {
5901 START_DATA (ceil),
5902 TEST_f_f (ceil, 0.0, 0.0),
5903 TEST_f_f (ceil, minus_zero, minus_zero),
5904 TEST_f_f (ceil, plus_infty, plus_infty),
5905 TEST_f_f (ceil, minus_infty, minus_infty),
5906 TEST_f_f (ceil, qnan_value, qnan_value),
5907
5908 TEST_f_f (ceil, M_PIl, 4.0),
5909 TEST_f_f (ceil, -M_PIl, -3.0),
5910 TEST_f_f (ceil, 0.1, 1.0),
5911 TEST_f_f (ceil, 0.25, 1.0),
5912 TEST_f_f (ceil, 0.625, 1.0),
5913 TEST_f_f (ceil, -0.1, minus_zero),
5914 TEST_f_f (ceil, -0.25, minus_zero),
5915 TEST_f_f (ceil, -0.625, minus_zero),
8847214f 5916
f964490f 5917#ifdef TEST_LDOUBLE
74c57478
JM
5918 /* The result can only be represented in long double. */
5919 TEST_f_f (ceil, 4503599627370495.5L, 4503599627370496.0L),
5920 TEST_f_f (ceil, 4503599627370496.25L, 4503599627370497.0L),
5921 TEST_f_f (ceil, 4503599627370496.5L, 4503599627370497.0L),
5922 TEST_f_f (ceil, 4503599627370496.75L, 4503599627370497.0L),
5923 TEST_f_f (ceil, 4503599627370497.5L, 4503599627370498.0L),
5924
5925 TEST_f_f (ceil, -4503599627370495.5L, -4503599627370495.0L),
5926 TEST_f_f (ceil, -4503599627370496.25L, -4503599627370496.0L),
5927 TEST_f_f (ceil, -4503599627370496.5L, -4503599627370496.0L),
5928 TEST_f_f (ceil, -4503599627370496.75L, -4503599627370496.0L),
5929 TEST_f_f (ceil, -4503599627370497.5L, -4503599627370497.0L),
f964490f 5930
5c68d401 5931# if LDBL_MANT_DIG > 100
74c57478
JM
5932 TEST_f_f (ceil, 4503599627370494.5000000000001L, 4503599627370495.0L),
5933 TEST_f_f (ceil, 4503599627370495.5000000000001L, 4503599627370496.0L),
5934 TEST_f_f (ceil, 4503599627370496.5000000000001L, 4503599627370497.0L),
5935 TEST_f_f (ceil, -4503599627370494.5000000000001L, -4503599627370494.0L),
5936 TEST_f_f (ceil, -4503599627370495.5000000000001L, -4503599627370495.0L),
5937 TEST_f_f (ceil, -4503599627370496.5000000000001L, -4503599627370496.0L),
5c68d401
RM
5938# endif
5939
74c57478
JM
5940 TEST_f_f (ceil, 9007199254740991.5L, 9007199254740992.0L),
5941 TEST_f_f (ceil, 9007199254740992.25L, 9007199254740993.0L),
5942 TEST_f_f (ceil, 9007199254740992.5L, 9007199254740993.0L),
5943 TEST_f_f (ceil, 9007199254740992.75L, 9007199254740993.0L),
5944 TEST_f_f (ceil, 9007199254740993.5L, 9007199254740994.0L),
f964490f 5945
74c57478
JM
5946 TEST_f_f (ceil, -9007199254740991.5L, -9007199254740991.0L),
5947 TEST_f_f (ceil, -9007199254740992.25L, -9007199254740992.0L),
5948 TEST_f_f (ceil, -9007199254740992.5L, -9007199254740992.0L),
5949 TEST_f_f (ceil, -9007199254740992.75L, -9007199254740992.0L),
5950 TEST_f_f (ceil, -9007199254740993.5L, -9007199254740993.0L),
f964490f 5951
5c68d401 5952# if LDBL_MANT_DIG > 100
74c57478
JM
5953 TEST_f_f (ceil, 9007199254740991.0000000000001L, 9007199254740992.0L),
5954 TEST_f_f (ceil, 9007199254740992.0000000000001L, 9007199254740993.0L),
5955 TEST_f_f (ceil, 9007199254740993.0000000000001L, 9007199254740994.0L),
5956 TEST_f_f (ceil, 9007199254740991.5000000000001L, 9007199254740992.0L),
5957 TEST_f_f (ceil, 9007199254740992.5000000000001L, 9007199254740993.0L),
5958 TEST_f_f (ceil, 9007199254740993.5000000000001L, 9007199254740994.0L),
5959
5960 TEST_f_f (ceil, -9007199254740991.0000000000001L, -9007199254740991.0L),
5961 TEST_f_f (ceil, -9007199254740992.0000000000001L, -9007199254740992.0L),
5962 TEST_f_f (ceil, -9007199254740993.0000000000001L, -9007199254740993.0L),
5963 TEST_f_f (ceil, -9007199254740991.5000000000001L, -9007199254740991.0L),
5964 TEST_f_f (ceil, -9007199254740992.5000000000001L, -9007199254740992.0L),
5965 TEST_f_f (ceil, -9007199254740993.5000000000001L, -9007199254740993.0L),
5c68d401
RM
5966# endif
5967
74c57478
JM
5968 TEST_f_f (ceil, 72057594037927935.5L, 72057594037927936.0L),
5969 TEST_f_f (ceil, 72057594037927936.25L, 72057594037927937.0L),
5970 TEST_f_f (ceil, 72057594037927936.5L, 72057594037927937.0L),
5971 TEST_f_f (ceil, 72057594037927936.75L, 72057594037927937.0L),
5972 TEST_f_f (ceil, 72057594037927937.5L, 72057594037927938.0L),
5973
5974 TEST_f_f (ceil, -72057594037927935.5L, -72057594037927935.0L),
5975 TEST_f_f (ceil, -72057594037927936.25L, -72057594037927936.0L),
5976 TEST_f_f (ceil, -72057594037927936.5L, -72057594037927936.0L),
5977 TEST_f_f (ceil, -72057594037927936.75L, -72057594037927936.0L),
5978 TEST_f_f (ceil, -72057594037927937.5L, -72057594037927937.0L),
5979
5980 TEST_f_f (ceil, 10141204801825835211973625643007.5L, 10141204801825835211973625643008.0L),
5981 TEST_f_f (ceil, 10141204801825835211973625643008.25L, 10141204801825835211973625643009.0L),
5982 TEST_f_f (ceil, 10141204801825835211973625643008.5L, 10141204801825835211973625643009.0L),
5983 TEST_f_f (ceil, 10141204801825835211973625643008.75L, 10141204801825835211973625643009.0L),
5984 TEST_f_f (ceil, 10141204801825835211973625643009.5L, 10141204801825835211973625643010.0L),
5985#endif
5986 END_DATA (ceil)
5987 };
f964490f 5988
74c57478
JM
5989static void
5990ceil_test (void)
5991{
5992 START (ceil);
5993 RUN_TEST_LOOP_f_f (ceil, ceil_test_data, );
8847214f
UD
5994 END (ceil);
5995}
5996
5997
08198877
JM
5998static const struct test_c_c_data cexp_test_data[] =
5999 {
6000 START_DATA (cexp),
6001 TEST_c_c (cexp, plus_zero, plus_zero, 1, 0.0),
6002 TEST_c_c (cexp, minus_zero, plus_zero, 1, 0.0),
6003 TEST_c_c (cexp, plus_zero, minus_zero, 1, minus_zero),
6004 TEST_c_c (cexp, minus_zero, minus_zero, 1, minus_zero),
8847214f 6005
08198877
JM
6006 TEST_c_c (cexp, plus_infty, plus_zero, plus_infty, 0.0),
6007 TEST_c_c (cexp, plus_infty, minus_zero, plus_infty, minus_zero),
8847214f 6008
08198877
JM
6009 TEST_c_c (cexp, minus_infty, plus_zero, 0.0, 0.0),
6010 TEST_c_c (cexp, minus_infty, minus_zero, 0.0, minus_zero),
8847214f 6011
08198877
JM
6012 TEST_c_c (cexp, 0.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
6013 TEST_c_c (cexp, minus_zero, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 6014
08198877
JM
6015 TEST_c_c (cexp, 0.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
6016 TEST_c_c (cexp, minus_zero, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 6017
08198877
JM
6018 TEST_c_c (cexp, 100.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
6019 TEST_c_c (cexp, -100.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 6020
08198877
JM
6021 TEST_c_c (cexp, 100.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
6022 TEST_c_c (cexp, -100.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 6023
08198877
JM
6024 TEST_c_c (cexp, minus_infty, 2.0, minus_zero, 0.0),
6025 TEST_c_c (cexp, minus_infty, 4.0, minus_zero, minus_zero),
6026 TEST_c_c (cexp, plus_infty, 2.0, minus_infty, plus_infty),
6027 TEST_c_c (cexp, plus_infty, 4.0, minus_infty, minus_infty),
8847214f 6028
08198877
JM
6029 TEST_c_c (cexp, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
6030 TEST_c_c (cexp, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 6031
08198877
JM
6032 TEST_c_c (cexp, minus_infty, plus_infty, 0.0, 0.0, IGNORE_ZERO_INF_SIGN),
6033 TEST_c_c (cexp, minus_infty, minus_infty, 0.0, minus_zero, IGNORE_ZERO_INF_SIGN),
8847214f 6034
08198877 6035 TEST_c_c (cexp, minus_infty, qnan_value, 0, 0, IGNORE_ZERO_INF_SIGN),
8847214f 6036
08198877 6037 TEST_c_c (cexp, plus_infty, qnan_value, plus_infty, qnan_value),
8847214f 6038
08198877
JM
6039 TEST_c_c (cexp, qnan_value, 0.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6040 TEST_c_c (cexp, qnan_value, 1.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6041
08198877
JM
6042 TEST_c_c (cexp, qnan_value, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6043 TEST_c_c (cexp, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6044 TEST_c_c (cexp, 1, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6045 TEST_c_c (cexp, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 6046
08198877
JM
6047 TEST_c_c (cexp, 0.75L, 1.25L, 0.667537446429131586942201977015932112L, 2.00900045494094876258347228145863909L),
6048 TEST_c_c (cexp, -2.0, -3.0, -0.13398091492954261346140525546115575L, -0.019098516261135196432576240858800925L),
8847214f 6049
08198877
JM
6050 TEST_c_c (cexp, 0, 0x1p65, 0.99888622066058013610642172179340364209972L, -0.047183876212354673805106149805700013943218L),
6051 TEST_c_c (cexp, 0, -0x1p65, 0.99888622066058013610642172179340364209972L, 0.047183876212354673805106149805700013943218L),
6052 TEST_c_c (cexp, 50, 0x1p127, 4.053997150228616856622417636046265337193e21L, 3.232070315463388524466674772633810238819e21L),
1a4ac776
JM
6053
6054#ifndef TEST_FLOAT
08198877
JM
6055 TEST_c_c (cexp, 0, 1e22, 0.5232147853951389454975944733847094921409L, -0.8522008497671888017727058937530293682618L),
6056 TEST_c_c (cexp, 0, 0x1p1023, -0.826369834614147994500785680811743734805L, 0.5631277798508840134529434079444683477104L),
6057 TEST_c_c (cexp, 500, 0x1p1023, -1.159886268932754433233243794561351783426e217L, 7.904017694554466595359379965081774849708e216L),
1a4ac776
JM
6058#endif
6059
6060#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
6061 TEST_c_c (cexp, 0, 0x1p16383L, 0.9210843909921906206874509522505756251609L, 0.3893629985894208126948115852610595405563L),
6062 TEST_c_c (cexp, -10000, 0x1p16383L, 1.045876464564882298442774542991176546722e-4343L, 4.421154026488516836023811173959413420548e-4344L),
1a4ac776
JM
6063#endif
6064
08198877
JM
6065 TEST_c_c (cexp, 88.75, 0.75, 2.558360358486542817001900410314204322891e38L, 2.383359453227311447654736314679677655100e38L),
6066 TEST_c_c (cexp, -95, 0.75, 4.039714446238306526889476684000081624047e-42L, 3.763383677300535390271646960780570275931e-42L, UNDERFLOW_EXCEPTION_FLOAT),
7c69cd14
JM
6067
6068#ifndef TEST_FLOAT
08198877
JM
6069 TEST_c_c (cexp, 709.8125, 0.75, 1.355121963080879535248452862759108365762e308L, 1.262426823598609432507811340856186873507e308L),
6070 TEST_c_c (cexp, -720, 0.75, 1.486960657116368433685753325516638551722e-313L, 1.385247284245720590980701226843815229385e-313L, UNDERFLOW_EXCEPTION_DOUBLE),
7c69cd14
JM
6071#endif
6072
6073#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
6074 TEST_c_c (cexp, 11356.5625, 0.75, 9.052188470850960144814815984311663764287e4931L, 8.432986734191301036267148978260970230200e4931L),
6075 TEST_c_c (cexp, -11370, 0.75, 8.631121063182211587489310508568170739592e-4939L, 8.040721827809267291427062346918413482824e-4939L, UNDERFLOW_EXCEPTION),
7c69cd14
JM
6076#endif
6077
6078#ifdef TEST_FLOAT
08198877 6079 TEST_c_c (cexp, 180, 0x1p-149, plus_infty, 2.087071793345235105931967606907855310664e33L, OVERFLOW_EXCEPTION),
7c69cd14
JM
6080#endif
6081
6082#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 6083 TEST_c_c (cexp, 1440, 0x1p-1074, plus_infty, 1.196295853897226111293303155636183216483e302L, OVERFLOW_EXCEPTION),
7c69cd14
JM
6084#endif
6085
6086#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 6087 TEST_c_c (cexp, 22730, 0x1p-16434L, plus_infty, 2.435706297811211974162115164702304105374e4924L, OVERFLOW_EXCEPTION),
7c69cd14
JM
6088#endif
6089
08198877
JM
6090 TEST_c_c (cexp, 1e6, 0, plus_infty, 0, OVERFLOW_EXCEPTION),
6091 TEST_c_c (cexp, 1e6, min_value, plus_infty, plus_infty, OVERFLOW_EXCEPTION),
6092 TEST_c_c (cexp, 1e6, -min_value, plus_infty, minus_infty, OVERFLOW_EXCEPTION),
7c69cd14 6093
08198877
JM
6094 TEST_c_c (cexp, min_value, min_subnorm_value, 1.0, min_subnorm_value, UNDERFLOW_EXCEPTION),
6095 TEST_c_c (cexp, min_value, -min_subnorm_value, 1.0, -min_subnorm_value, UNDERFLOW_EXCEPTION),
6096 END_DATA (cexp)
6097 };
6098
6099static void
6100cexp_test (void)
6101{
6102 errno = 0;
6103 FUNC(cexp) (BUILD_COMPLEX (0, 0));
6104 if (errno == ENOSYS)
6105 /* Function not implemented. */
6106 return;
05e166c8 6107
08198877
JM
6108 START (cexp);
6109 RUN_TEST_LOOP_c_c (cexp, cexp_test_data, );
6815fabc 6110 END (cexp, complex);
8847214f
UD
6111}
6112
2550dfe9 6113
6a1992e2
JM
6114static const struct test_c_f_data cimag_test_data[] =
6115 {
6116 START_DATA (cimag);
6117 TEST_c_f (cimag, 1.0, 0.0, 0.0),
6118 TEST_c_f (cimag, 1.0, minus_zero, minus_zero),
6119 TEST_c_f (cimag, 1.0, qnan_value, qnan_value),
6120 TEST_c_f (cimag, qnan_value, qnan_value, qnan_value),
6121 TEST_c_f (cimag, 1.0, plus_infty, plus_infty),
6122 TEST_c_f (cimag, 1.0, minus_infty, minus_infty),
6123 TEST_c_f (cimag, 2.0, 3.0, 3.0),
6124 END_DATA (cimag);
6125 };
6126
0cdc8e6f
UD
6127static void
6128cimag_test (void)
6129{
6130 START (cimag);
6a1992e2 6131 RUN_TEST_LOOP_c_f (cimag, cimag_test_data, );
0cdc8e6f
UD
6132 END (cimag);
6133}
6134
08198877
JM
6135static const struct test_c_c_data clog_test_data[] =
6136 {
6137 START_DATA (clog),
6138 TEST_c_c (clog, minus_zero, 0, minus_infty, M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
6139 TEST_c_c (clog, minus_zero, minus_zero, minus_infty, -M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6140
08198877
JM
6141 TEST_c_c (clog, 0, 0, minus_infty, 0.0, DIVIDE_BY_ZERO_EXCEPTION),
6142 TEST_c_c (clog, 0, minus_zero, minus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6143
08198877
JM
6144 TEST_c_c (clog, minus_infty, plus_infty, plus_infty, M_PI_34l),
6145 TEST_c_c (clog, minus_infty, minus_infty, plus_infty, -M_PI_34l),
8847214f 6146
08198877
JM
6147 TEST_c_c (clog, plus_infty, plus_infty, plus_infty, M_PI_4l),
6148 TEST_c_c (clog, plus_infty, minus_infty, plus_infty, -M_PI_4l),
8847214f 6149
08198877
JM
6150 TEST_c_c (clog, 0, plus_infty, plus_infty, M_PI_2l),
6151 TEST_c_c (clog, 3, plus_infty, plus_infty, M_PI_2l),
6152 TEST_c_c (clog, minus_zero, plus_infty, plus_infty, M_PI_2l),
6153 TEST_c_c (clog, -3, plus_infty, plus_infty, M_PI_2l),
6154 TEST_c_c (clog, 0, minus_infty, plus_infty, -M_PI_2l),
6155 TEST_c_c (clog, 3, minus_infty, plus_infty, -M_PI_2l),
6156 TEST_c_c (clog, minus_zero, minus_infty, plus_infty, -M_PI_2l),
6157 TEST_c_c (clog, -3, minus_infty, plus_infty, -M_PI_2l),
8847214f 6158
08198877
JM
6159 TEST_c_c (clog, minus_infty, 0, plus_infty, M_PIl),
6160 TEST_c_c (clog, minus_infty, 1, plus_infty, M_PIl),
6161 TEST_c_c (clog, minus_infty, minus_zero, plus_infty, -M_PIl),
6162 TEST_c_c (clog, minus_infty, -1, plus_infty, -M_PIl),
8847214f 6163
08198877
JM
6164 TEST_c_c (clog, plus_infty, 0, plus_infty, 0.0),
6165 TEST_c_c (clog, plus_infty, 1, plus_infty, 0.0),
6166 TEST_c_c (clog, plus_infty, minus_zero, plus_infty, minus_zero),
6167 TEST_c_c (clog, plus_infty, -1, plus_infty, minus_zero),
8847214f 6168
08198877
JM
6169 TEST_c_c (clog, plus_infty, qnan_value, plus_infty, qnan_value),
6170 TEST_c_c (clog, minus_infty, qnan_value, plus_infty, qnan_value),
8847214f 6171
08198877
JM
6172 TEST_c_c (clog, qnan_value, plus_infty, plus_infty, qnan_value),
6173 TEST_c_c (clog, qnan_value, minus_infty, plus_infty, qnan_value),
8847214f 6174
08198877
JM
6175 TEST_c_c (clog, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6176 TEST_c_c (clog, 3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6177 TEST_c_c (clog, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6178 TEST_c_c (clog, -3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6179
08198877
JM
6180 TEST_c_c (clog, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6181 TEST_c_c (clog, qnan_value, 5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6182 TEST_c_c (clog, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6183 TEST_c_c (clog, qnan_value, -5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6184
08198877 6185 TEST_c_c (clog, qnan_value, qnan_value, qnan_value, qnan_value),
2550dfe9 6186
08198877
JM
6187 TEST_c_c (clog, 0.75L, 1.25L, 0.376885901188190075998919126749298416L, 1.03037682652431246378774332703115153L),
6188 TEST_c_c (clog, -2, -3, 1.2824746787307683680267437207826593L, -2.1587989303424641704769327722648368L),
8847214f 6189
08198877
JM
6190 TEST_c_c (clog, 0x1.fffffep+127L, 0x1.fffffep+127L, 89.06941264234832570836679262104313101776L, M_PI_4l),
6191 TEST_c_c (clog, 0x1.fffffep+127L, 1.0L, 88.72283905206835305365817656031404273372L, 2.938736052218037251011746307725933020145e-39L, UNDERFLOW_EXCEPTION_FLOAT),
6192 TEST_c_c (clog, 0x1p-149L, 0x1p-149L, -102.9323563131518784484589700365392203592L, M_PI_4l),
6193 TEST_c_c (clog, 0x1p-147L, 0x1p-147L, -101.5460619520319878296245057936228672231L, M_PI_4l),
1897ad44
JM
6194
6195#ifndef TEST_FLOAT
08198877
JM
6196 TEST_c_c (clog, 0x1.fffffffffffffp+1023L, 0x1.fffffffffffffp+1023L, 710.1292864836639693869320059713862337880L, M_PI_4l),
6197 TEST_c_c (clog, 0x1.fffffffffffffp+1023L, 0x1p+1023L, 709.8942846690411016323109979483151967689L, 0.4636476090008061606231772164674799632783L),
6198 TEST_c_c (clog, 0x1p-1074L, 0x1p-1074L, -744.0934983311012896593986823853525458290L, M_PI_4l),
6199 TEST_c_c (clog, 0x1p-1073L, 0x1p-1073L, -743.4003511505413443499814502638943692610L, M_PI_4l),
1897ad44
JM
6200#endif
6201
6202#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
6203 TEST_c_c (clog, 0x1.fp+16383L, 0x1.fp+16383L, 11356.83823118610934184548269774874545400L, M_PI_4l),
6204 TEST_c_c (clog, 0x1.fp+16383L, 0x1p+16383L, 11356.60974243783798653123798337822335902L, 0.4764674194737066993385333770295162295856L),
6205 TEST_c_c (clog, 0x1p-16440L, 0x1p-16441L, -11395.22807662984378194141292922726786191L, 0.4636476090008061162142562314612144020285L),
1897ad44
JM
6206#endif
6207
08198877
JM
6208 TEST_c_c (clog, 0x1p-149L, 0x1.fp+127L, 88.69109041335841930424871526389807508374L, M_PI_2l),
6209 TEST_c_c (clog, -0x1p-149L, 0x1.fp+127L, 88.69109041335841930424871526389807508374L, M_PI_2l),
6210 TEST_c_c (clog, 0x1p-149L, -0x1.fp+127L, 88.69109041335841930424871526389807508374L, -M_PI_2l),
6211 TEST_c_c (clog, -0x1p-149L, -0x1.fp+127L, 88.69109041335841930424871526389807508374L, -M_PI_2l),
6212 TEST_c_c (clog, -0x1.fp+127L, 0x1p-149L, 88.69109041335841930424871526389807508374L, M_PIl),
6213 TEST_c_c (clog, -0x1.fp+127L, -0x1p-149L, 88.69109041335841930424871526389807508374L, -M_PIl),
638a572e 6214#ifdef TEST_FLOAT
08198877
JM
6215 TEST_c_c (clog, 0x1.fp+127L, 0x1p-149L, 88.69109041335841930424871526389807508374L, plus_zero, UNDERFLOW_EXCEPTION),
6216 TEST_c_c (clog, 0x1.fp+127L, -0x1p-149L, 88.69109041335841930424871526389807508374L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM
6217#endif
6218
6219#ifndef TEST_FLOAT
08198877
JM
6220 TEST_c_c (clog, 0x1p-1074L, 0x1.fp+1023L, 709.7509641950694165420886960904242800794L, M_PI_2l),
6221 TEST_c_c (clog, -0x1p-1074L, 0x1.fp+1023L, 709.7509641950694165420886960904242800794L, M_PI_2l),
6222 TEST_c_c (clog, 0x1p-1074L, -0x1.fp+1023L, 709.7509641950694165420886960904242800794L, -M_PI_2l),
6223 TEST_c_c (clog, -0x1p-1074L, -0x1.fp+1023L, 709.7509641950694165420886960904242800794L, -M_PI_2l),
6224 TEST_c_c (clog, -0x1.fp+1023L, 0x1p-1074L, 709.7509641950694165420886960904242800794L, M_PIl),
6225 TEST_c_c (clog, -0x1.fp+1023L, -0x1p-1074L, 709.7509641950694165420886960904242800794L, -M_PIl),
638a572e
JM
6226#endif
6227#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877
JM
6228 TEST_c_c (clog, 0x1.fp+1023L, 0x1p-1074L, 709.7509641950694165420886960904242800794L, plus_zero, UNDERFLOW_EXCEPTION),
6229 TEST_c_c (clog, 0x1.fp+1023L, -0x1p-1074L, 709.7509641950694165420886960904242800794L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM
6230#endif
6231
6232#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
6233 TEST_c_c (clog, 0x1p-16445L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6234 TEST_c_c (clog, -0x1p-16445L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6235 TEST_c_c (clog, 0x1p-16445L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6236 TEST_c_c (clog, -0x1p-16445L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6237 TEST_c_c (clog, -0x1.fp+16383L, 0x1p-16445L, 11356.49165759582936919077408168801636572L, M_PIl),
6238 TEST_c_c (clog, -0x1.fp+16383L, -0x1p-16445L, 11356.49165759582936919077408168801636572L, -M_PIl),
6239 TEST_c_c (clog, 0x1.fp+16383L, 0x1p-16445L, 11356.49165759582936919077408168801636572L, plus_zero, UNDERFLOW_EXCEPTION),
6240 TEST_c_c (clog, 0x1.fp+16383L, -0x1p-16445L, 11356.49165759582936919077408168801636572L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e 6241# if LDBL_MANT_DIG >= 113
08198877
JM
6242 TEST_c_c (clog, 0x1p-16494L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6243 TEST_c_c (clog, -0x1p-16494L, 0x1.fp+16383L, 11356.49165759582936919077408168801636572L, M_PI_2l),
6244 TEST_c_c (clog, 0x1p-16494L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6245 TEST_c_c (clog, -0x1p-16494L, -0x1.fp+16383L, 11356.49165759582936919077408168801636572L, -M_PI_2l),
6246 TEST_c_c (clog, -0x1.fp+16383L, 0x1p-16494L, 11356.49165759582936919077408168801636572L, M_PIl),
6247 TEST_c_c (clog, -0x1.fp+16383L, -0x1p-16494L, 11356.49165759582936919077408168801636572L, -M_PIl),
6248 TEST_c_c (clog, 0x1.fp+16383L, 0x1p-16494L, 11356.49165759582936919077408168801636572L, plus_zero, UNDERFLOW_EXCEPTION),
6249 TEST_c_c (clog, 0x1.fp+16383L, -0x1p-16494L, 11356.49165759582936919077408168801636572L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM
6250# endif
6251#endif
6252
08198877
JM
6253 TEST_c_c (clog, 1.0L, 0x1.234566p-10L, 6.172834701221959432440126967147726538097e-7L, 1.111110564353742042376451655136933182201e-3L),
6254 TEST_c_c (clog, -1.0L, 0x1.234566p-20L, 5.886877547844618300918562490463748605537e-13L, 3.141591568520436206990380699322226378452L),
6255 TEST_c_c (clog, 0x1.234566p-30L, 1.0L, 5.614163921211322622623353961365728040115e-19L, 1.570796325735258575254858696548386439740L),
6256 TEST_c_c (clog, -0x1.234566p-40L, -1.0L, 5.354083939753840089583620652120903838944e-25L, -1.570796326795931422008642456283782656359L),
6257 TEST_c_c (clog, 0x1.234566p-50L, 1.0L, 5.106052341226425256332038420428899201070e-31L, 1.570796326794895608681734464330528755366L),
6258 TEST_c_c (clog, 0x1.234566p-60L, 1.0L, 4.869510976053643471080816669875627875933e-37L, 1.570796326794896618244456860363082279319L),
6259 TEST_c_c (clog, 0x1p-62L, 1.0L, 2.350988701644575015937473074444491355582e-38L, 1.570796326794896619014481257142650555297L),
6260 TEST_c_c (clog, 0x1p-63L, 1.0L, 5.877471754111437539843682686111228389059e-39L, 1.570796326794896619122901474391200998698L, UNDERFLOW_EXCEPTION_FLOAT),
6261 TEST_c_c (clog, 0x1p-64L, 1.0L, 1.469367938527859384960920671527807097271e-39L, 1.570796326794896619177111583015476220398L, UNDERFLOW_EXCEPTION_FLOAT),
da865e95 6262#ifndef TEST_FLOAT
08198877
JM
6263 TEST_c_c (clog, 0x1p-510L, 1.0L, 4.450147717014402766180465434664808128438e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
6264 TEST_c_c (clog, 0x1p-511L, 1.0L, 1.112536929253600691545116358666202032110e-308L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
6265 TEST_c_c (clog, 0x1p-512L, 1.0L, 2.781342323134001728862790896665505080274e-309L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION_DOUBLE),
da865e95
JM
6266#endif
6267#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
6268 TEST_c_c (clog, 0x1p-8190L, 1.0L, 6.724206286224187012525355634643505205196e-4932L, 1.570796326794896619231321691639751442099L),
6269 TEST_c_c (clog, 0x1p-8191L, 1.0L, 1.681051571556046753131338908660876301299e-4932L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
6270 TEST_c_c (clog, 0x1p-8192L, 1.0L, 4.202628928890116882828347271652190753248e-4933L, 1.570796326794896619231321691639751442099L, UNDERFLOW_EXCEPTION),
da865e95
JM
6271#endif
6272
08198877
JM
6273 TEST_c_c (clog, 0x1.000566p0L, 0x1.234p-10L, 8.298731898331237038231468223024422855654e-5L, 1.110938609507128729312743251313024793990e-3L),
6274 TEST_c_c (clog, 0x1.000566p0L, 0x1.234p-100L, 8.237022655933121125560939513260027133767e-5L, 8.974094312218060110948251664314290484113e-31L),
d0419dbf 6275#ifndef TEST_FLOAT
08198877
JM
6276 TEST_c_c (clog, -0x1.0000000123456p0L, 0x1.2345678p-30L, 2.649094282537168795982991778475646793277e-10L, 3.141592652530155111500161671113150737892L),
6277 TEST_c_c (clog, -0x1.0000000123456p0L, 0x1.2345678p-1000L, 2.649094276923003995420209214900915462737e-10L, 3.141592653589793238462643383279502884197L),
d0419dbf
JM
6278#endif
6279#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM
6280 TEST_c_c (clog, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-60L, 9.868649107778739757272772275265050767867e-19L, 9.868649106423871142816660980898339912137e-19L),
6281 TEST_c_c (clog, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-1000L, 9.868649107778739752403260515979017248596e-19L, 1.061846605795612822522063052130030717368e-301L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d0419dbf
JM
6282#endif
6283
08198877 6284 TEST_c_c (clog, 0x0.ffffffp0L, 0x0.ffffffp-100L, -5.960464655174753498633255797994360530379e-8L, 7.888609052210118054117285652827862296732e-31L),
d032e0d2 6285#ifndef TEST_FLOAT
08198877 6286 TEST_c_c (clog, 0x0.fffffffffffff8p0L, 0x0.fffffffffffff8p-1000L, -1.110223024625156602053389888482372171810e-16L, 9.332636185032188789900895447238171696171e-302L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d032e0d2
JM
6287#endif
6288#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
6289 TEST_c_c (clog, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp-15000L, -5.421010862427522170184200798202494495630e-20L, 3.548665303440282824232502561095699343814e-4516L),
6290#endif
6291
6292 TEST_c_c (clog, 0x1a6p-10L, 0x3a5p-10L, -1.4305135209763571252847059962654228661815e-06L, 1.1460277178115757370775644871674016684074L),
6293 TEST_c_c (clog, 0xf2p-10L, 0x3e3p-10L, 6.1988446308070710970664736815277450078106e-06L, 1.3322126499153926210226335249558203898460L),
6294 TEST_c_c (clog, 0x4d4ep-15L, 0x6605p-15L, -1.6298145321400412054744424587143483169412e-08L, 0.9223574537155056772124552172295398141249L),
6295 TEST_c_c (clog, 0x2818p-15L, 0x798fp-15L, 1.5366822245016167178749091974664853785194e-08L, 1.2522014929038946066987318471922169174157L),
6296 TEST_c_c (clog, 0x9b57bp-20L, 0xcb7b4p-20L, -3.9563019528687610863490232935890272740908e-11L, 0.9187593477446338910857133065497364950682L),
6297 TEST_c_c (clog, 0x2731p-20L, 0xfffd0p-20L, 4.4110493034041283943115971658295280288115e-11L, 1.5612279663766352262688735061954290528838L),
6298 TEST_c_c (clog, 0x2ede88p-23L, 0x771c3fp-23L, -4.4764192352906350039050902870893173560494e-13L, 1.1959106857549200806818600493552847793381L),
6299 TEST_c_c (clog, 0x11682p-23L, 0x7ffed1p-23L, 1.1723955140027907954461000991619077811832e-12L, 1.5622968405332756349813737986164832897108L),
6300 TEST_c_c (clog, 0xa1f2c1p-24L, 0xc643aep-24L, -1.0480505352462576151523512837107080269981e-13L, 0.8858771987699967480545613322309315260313L),
6301 TEST_c_c (clog, 0x659feap-24L, 0xeaf6f9p-24L, 3.7303493627403868207597214252239749960738e-14L, 1.1625816408046866464773042283673653469061L),
d032e0d2 6302#ifndef TEST_FLOAT
08198877
JM
6303 TEST_c_c (clog, 0x4447d7175p-35L, 0x6c445e00ap-35L, -1.4823076576950255933915367361099865652625e-20L, 1.0081311552703893116404606212158840190615L),
6304 TEST_c_c (clog, 0x2dd46725bp-35L, 0x7783a1284p-35L, 4.4469229730850767799109418892826021157328e-20L, 1.2046235979300843056806465045930070146351L),
6305 TEST_c_c (clog, 0x164c74eea876p-45L, 0x16f393482f77p-45L, -3.0292258760486853327810377824479932031744e-26L, 0.7998237934177411746093524982030330293980L),
6306 TEST_c_c (clog, 0xfe961079616p-45L, 0x1bc37e09e6d1p-45L, 5.3718272201930019901317065495843842735179e-26L, 1.0503831592447830576186444373011142397404L),
6307 TEST_c_c (clog, 0xa4722f19346cp-51L, 0x7f9631c5e7f07p-51L, -6.2122796286154679676173624516405339768606e-30L, 1.4904138780720095276446375492434049214172L),
6308 TEST_c_c (clog, 0x10673dd0f2481p-51L, 0x7ef1d17cefbd2p-51L, 3.2047474274603604594851472963586149973093e-29L, 1.4422922682185099608731642353544207976604L),
6309 TEST_c_c (clog, 0x8ecbf810c4ae6p-52L, 0xd479468b09a37p-52L, -9.7375017988218644730510244778042114638107e-30L, 0.9790637929494922564724108399524154766631L),
6310 TEST_c_c (clog, 0x5b06b680ea2ccp-52L, 0xef452b965da9fp-52L, 8.3076914081087805757422664530653247447136e-30L, 1.2072712126771536614482822173033535043206L),
6311 TEST_c_c (clog, 0x659b70ab7971bp-53L, 0x1f5d111e08abecp-53L, -2.5083311595699359750201056724289010648701e-30L, 1.3710185432462268491534742969536240564640L),
6312 TEST_c_c (clog, 0x15cfbd1990d1ffp-53L, 0x176a3973e09a9ap-53L, 1.0168910106364605304135563536838075568606e-30L, 0.8208373755522359859870890246475340086663L),
6313 TEST_c_c (clog, 0x1367a310575591p-54L, 0x3cfcc0a0541f60p-54L, 5.0844550531823026520677817684239496041087e-32L, 1.2627468605458094918919206628466016525397L),
6314 TEST_c_c (clog, 0x55cb6d0c83af5p-55L, 0x7fe33c0c7c4e90p-55L, -5.2000108498455368032511404449795741611813e-32L, 1.5288921536982513453421343495466824420259L),
d032e0d2
JM
6315#endif
6316#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM
6317 TEST_c_c (clog, 0x298c62cb546588a7p-63L, 0x7911b1dfcc4ecdaep-63L, -1.1931267660846218205882675852805793644095e-36L, 1.2402109774337032400594953899784058127412L),
6318 TEST_c_c (clog, 0x4d9c37e2b5cb4533p-63L, 0x65c98be2385a042ep-63L, 6.4064442119814669184296141278612389400075e-37L, 0.9193591364645830864185131402313014890145L),
6319 TEST_c_c (clog, 0x602fd5037c4792efp-64L, 0xed3e2086dcca80b8p-64L, -2.3362950222592964220878638677292132852104e-37L, 1.1856121127236268105413184264288408265852L),
6320 TEST_c_c (clog, 0x6b10b4f3520217b6p-64L, 0xe8893cbb449253a1p-64L, 2.4244570985709679851855191080208817099132e-37L, 1.1393074519572050614551047548718495655972L),
6321 TEST_c_c (clog, 0x81b7efa81fc35ad1p-65L, 0x1ef4b835f1c79d812p-65L, -9.9182335850630508484862145328126979066934e-39L, 1.3146479888794807046338799047003947008804L),
d032e0d2
JM
6322#endif
6323#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM
6324 TEST_c_c (clog, 0x3f96469050f650869c2p-75L, 0x6f16b2c9c8b05988335p-75L, -1.0509738482436128031927971874674370984602e-45L, 1.0509191467640012308402149909370784281448L),
6325 TEST_c_c (clog, 0x3157fc1d73233e580c8p-75L, 0x761b52ccd435d7c7f5fp-75L, 1.3487497719126364307640897239165442763573e-43L, 1.1750493008528425228929764149024375035382L),
6326 TEST_c_c (clog, 0x155f8afc4c48685bf63610p-85L, 0x17d0cf2652cdbeb1294e19p-85L, -4.7775669192897997174762089350332738583822e-50L, 0.8393953487996880419413728440067635213372L),
6327 TEST_c_c (clog, 0x13836d58a13448d750b4b9p-85L, 0x195ca7bc3ab4f9161edbe6p-85L, 2.8398125044729578740243199963484494962411e-50L, 0.9149964976334130461795060758257083099706L),
6328 TEST_c_c (clog, 0x1df515eb171a808b9e400266p-95L, 0x7c71eb0cd4688dfe98581c77p-95L, -3.5048022044913950094635368750889659723004e-57L, 1.3345633256521815205858155673950177421079L),
6329 TEST_c_c (clog, 0xe33f66c9542ca25cc43c867p-95L, 0x7f35a68ebd3704a43c465864p-95L, 4.1101771307217268747345114262406964584250e-56L, 1.4596065864518742494094402406719567059585L),
6330 TEST_c_c (clog, 0x6771f22c64ed551b857c128b4cp-105L, 0x1f570e7a13cc3cf2f44fd793ea1p-105L, -1.4281333889622737316199756373421183559948e-62L, 1.3673546561165378090903506783353927980633L),
6331 TEST_c_c (clog, 0x15d8ab6ed05ca514086ac3a1e84p-105L, 0x1761e480aa094c0b10b34b09ce9p-105L, 1.0027319539522347477331743836657426754857e-62L, 0.8193464073721167323313606647411269414759L),
6332 TEST_c_c (clog, 0x187190c1a334497bdbde5a95f48p-106L, 0x3b25f08062d0a095c4cfbbc338dp-106L, -1.7471844652198029695350765775994001163767e-63L, 1.1789110097072986038243729592318526094314L),
6333 TEST_c_c (clog, 0x6241ef0da53f539f02fad67dabp-106L, 0x3fb46641182f7efd9caa769dac0p-106L, 4.3299788920664682288477984749202524623248e-63L, 1.4746938237585656250866370987773473745867L),
d032e0d2
JM
6334#endif
6335#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM
6336 TEST_c_c (clog, 0x3e1d0a105ac4ebeacd9c6952d34cp-112L, 0xf859b3d1b06d005dcbb5516d5479p-112L, -1.1683999374665377365054966073875064467108e-66L, 1.3257197596350832748781065387304444940172L),
6337 TEST_c_c (clog, 0x47017a2e36807acb1e5214b209dep-112L, 0xf5f4a550c9d75e3bb1839d865f0dp-112L, 1.5077923002544367932999503838191154621839e-65L, 1.2897445708311412721399861948957141824914L),
6338 TEST_c_c (clog, 0x148f818cb7a9258fca942ade2a0cap-113L, 0x18854a34780b8333ec53310ad7001p-113L, -7.1865869169568789348552370692485515571497e-67L, 0.8730167479365994646287897223471819363668L),
6339 TEST_c_c (clog, 0xfd95243681c055c2632286921092p-113L, 0x1bccabcd29ca2152860ec29e34ef7p-113L, 6.6255694866654064502633121109394710807528e-66L, 1.0526409614996288387567810726095850312049L),
6340 TEST_c_c (clog, 0xdb85c467ee2aadd5f425fe0f4b8dp-114L, 0x3e83162a0f95f1dcbf97dddf410eap-114L, 4.6017338806965821566734340588575402712716e-67L, 1.3547418904611758959096647942223384691728L),
6341 TEST_c_c (clog, 0x1415bcaf2105940d49a636e98ae59p-115L, 0x7e6a150adfcd1b0921d44b31f40f4p-115L, 2.5993421227864195179698176012564317527271e-67L, 1.4132318089683022770487383611430906982461L),
6342#endif
6343 END_DATA (clog)
6344 };
8847214f
UD
6345
6346static void
08198877 6347clog_test (void)
8847214f 6348{
aaca11d8 6349 errno = 0;
08198877 6350 FUNC(clog) (BUILD_COMPLEX (-2, -3));
aaca11d8
UD
6351 if (errno == ENOSYS)
6352 /* Function not implemented. */
6353 return;
6354
08198877
JM
6355 START (clog);
6356 RUN_TEST_LOOP_c_c (clog, clog_test_data, );
6357 END (clog, complex);
6358}
6359
8847214f 6360
08198877
JM
6361static const struct test_c_c_data clog10_test_data[] =
6362 {
6363 START_DATA (clog10),
6364 TEST_c_c (clog10, minus_zero, 0, minus_infty, M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
6365 TEST_c_c (clog10, minus_zero, minus_zero, minus_infty, -M_PIl, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6366
08198877
JM
6367 TEST_c_c (clog10, 0, 0, minus_infty, 0.0, DIVIDE_BY_ZERO_EXCEPTION),
6368 TEST_c_c (clog10, 0, minus_zero, minus_infty, minus_zero, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 6369
08198877 6370 TEST_c_c (clog10, minus_infty, plus_infty, plus_infty, M_PI_34_LOG10El),
8847214f 6371
08198877
JM
6372 TEST_c_c (clog10, plus_infty, plus_infty, plus_infty, M_PI4_LOG10El),
6373 TEST_c_c (clog10, plus_infty, minus_infty, plus_infty, -M_PI4_LOG10El),
8847214f 6374
08198877
JM
6375 TEST_c_c (clog10, 0, plus_infty, plus_infty, M_PI2_LOG10El),
6376 TEST_c_c (clog10, 3, plus_infty, plus_infty, M_PI2_LOG10El),
6377 TEST_c_c (clog10, minus_zero, plus_infty, plus_infty, M_PI2_LOG10El),
6378 TEST_c_c (clog10, -3, plus_infty, plus_infty, M_PI2_LOG10El),
6379 TEST_c_c (clog10, 0, minus_infty, plus_infty, -M_PI2_LOG10El),
6380 TEST_c_c (clog10, 3, minus_infty, plus_infty, -M_PI2_LOG10El),
6381 TEST_c_c (clog10, minus_zero, minus_infty, plus_infty, -M_PI2_LOG10El),
6382 TEST_c_c (clog10, -3, minus_infty, plus_infty, -M_PI2_LOG10El),
8847214f 6383
08198877
JM
6384 TEST_c_c (clog10, minus_infty, 0, plus_infty, M_PI_LOG10El),
6385 TEST_c_c (clog10, minus_infty, 1, plus_infty, M_PI_LOG10El),
6386 TEST_c_c (clog10, minus_infty, minus_zero, plus_infty, -M_PI_LOG10El),
6387 TEST_c_c (clog10, minus_infty, -1, plus_infty, -M_PI_LOG10El),
8847214f 6388
08198877
JM
6389 TEST_c_c (clog10, plus_infty, 0, plus_infty, 0.0),
6390 TEST_c_c (clog10, plus_infty, 1, plus_infty, 0.0),
6391 TEST_c_c (clog10, plus_infty, minus_zero, plus_infty, minus_zero),
6392 TEST_c_c (clog10, plus_infty, -1, plus_infty, minus_zero),
8847214f 6393
08198877
JM
6394 TEST_c_c (clog10, plus_infty, qnan_value, plus_infty, qnan_value),
6395 TEST_c_c (clog10, minus_infty, qnan_value, plus_infty, qnan_value),
8847214f 6396
08198877
JM
6397 TEST_c_c (clog10, qnan_value, plus_infty, plus_infty, qnan_value),
6398 TEST_c_c (clog10, qnan_value, minus_infty, plus_infty, qnan_value),
8847214f 6399
08198877
JM
6400 TEST_c_c (clog10, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6401 TEST_c_c (clog10, 3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6402 TEST_c_c (clog10, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6403 TEST_c_c (clog10, -3, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6404
08198877
JM
6405 TEST_c_c (clog10, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6406 TEST_c_c (clog10, qnan_value, 5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6407 TEST_c_c (clog10, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
6408 TEST_c_c (clog10, qnan_value, -5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 6409
08198877 6410 TEST_c_c (clog10, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 6411
08198877
JM
6412 TEST_c_c (clog10, 0.75L, 1.25L, 0.163679467193165171449476605077428975L, 0.447486970040493067069984724340855636L),
6413 TEST_c_c (clog10, -2, -3, 0.556971676153418384603252578971164214L, -0.937554462986374708541507952140189646L),
8847214f 6414
08198877
JM
6415 TEST_c_c (clog10, 0x1.fffffep+127L, 0x1.fffffep+127L, 38.68235441693561449174780668781319348761L, M_PI4_LOG10El),
6416 TEST_c_c (clog10, 0x1.fffffep+127L, 1.0L, 38.53183941910362389414093724045094697423L, 1.276276851248440096917018665609900318458e-39L, UNDERFLOW_EXCEPTION_FLOAT),
6417 TEST_c_c (clog10, 0x1p-149L, 0x1p-149L, -44.70295435610120748924022586658721447508L, M_PI4_LOG10El),
6418 TEST_c_c (clog10, 0x1p-147L, 0x1p-147L, -44.10089436477324509881274807713822842154L, M_PI4_LOG10El),
1897ad44
JM
6419
6420#ifndef TEST_FLOAT
08198877
JM
6421 TEST_c_c (clog10, 0x1.fffffffffffffp+1023L, 0x1.fffffffffffffp+1023L, 308.4052305577487344482591243175787477115L, M_PI4_LOG10El),
6422 TEST_c_c (clog10, 0x1.fffffffffffffp+1023L, 0x1p+1023L, 308.3031705664207720674749211936626341569L, 0.2013595981366865903254995612594728746470L),
6423 TEST_c_c (clog10, 0x1p-1074L, 0x1p-1074L, -323.1557003452838130619487034867432642357L, M_PI4_LOG10El),
6424 TEST_c_c (clog10, 0x1p-1073L, 0x1p-1073L, -322.8546703496198318667349645920187712089L, M_PI4_LOG10El),
1897ad44
JM
6425#endif
6426
6427#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
6428 TEST_c_c (clog10, 0x1.fp+16383L, 0x1.fp+16383L, 4932.212175672014259683102930239951947672L, M_PI4_LOG10El),
6429 TEST_c_c (clog10, 0x1.fp+16383L, 0x1p+16383L, 4932.112944269463028900262609694408579449L, 0.2069271710841128115912940666587802677383L),
6430 TEST_c_c (clog10, 0x1p-16440L, 0x1p-16441L, -4948.884673709346821106688037612752099609L, 0.2013595981366865710389502301937289472543L),
1897ad44
JM
6431#endif
6432
08198877
JM
6433 TEST_c_c (clog10, 0x1p-149L, 0x1.fp+127L, 38.51805116050395969095658815123105801479L, 0.6821881769209206737428918127156778851051L),
6434 TEST_c_c (clog10, -0x1p-149L, 0x1.fp+127L, 38.51805116050395969095658815123105801479L, 0.6821881769209206737428918127156778851051L),
6435 TEST_c_c (clog10, 0x1p-149L, -0x1.fp+127L, 38.51805116050395969095658815123105801479L, -0.6821881769209206737428918127156778851051L),
6436 TEST_c_c (clog10, -0x1p-149L, -0x1.fp+127L, 38.51805116050395969095658815123105801479L, -0.6821881769209206737428918127156778851051L),
6437 TEST_c_c (clog10, -0x1.fp+127L, 0x1p-149L, 38.51805116050395969095658815123105801479L, 1.364376353841841347485783625431355770210L),
6438 TEST_c_c (clog10, -0x1.fp+127L, -0x1p-149L, 38.51805116050395969095658815123105801479L, -1.364376353841841347485783625431355770210L),
638a572e 6439#ifdef TEST_FLOAT
08198877
JM
6440 TEST_c_c (clog10, 0x1.fp+127L, 0x1p-149L, 38.51805116050395969095658815123105801479L, plus_zero, UNDERFLOW_EXCEPTION),
6441 TEST_c_c (clog10, 0x1.fp+127L, -0x1p-149L, 38.51805116050395969095658815123105801479L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM
6442#endif
6443
6444#ifndef TEST_FLOAT
08198877
JM
6445 TEST_c_c (clog10, 0x1p-1074L, 0x1.fp+1023L, 308.2409272754311106024666378243768099991L, 0.6821881769209206737428918127156778851051L),
6446 TEST_c_c (clog10, -0x1p-1074L, 0x1.fp+1023L, 308.2409272754311106024666378243768099991L, 0.6821881769209206737428918127156778851051L),
6447 TEST_c_c (clog10, 0x1p-1074L, -0x1.fp+1023L, 308.2409272754311106024666378243768099991L, -0.6821881769209206737428918127156778851051L),
6448 TEST_c_c (clog10, -0x1p-1074L, -0x1.fp+1023L, 308.2409272754311106024666378243768099991L, -0.6821881769209206737428918127156778851051L),
6449 TEST_c_c (clog10, -0x1.fp+1023L, 0x1p-1074L, 308.2409272754311106024666378243768099991L, 1.364376353841841347485783625431355770210L),
6450 TEST_c_c (clog10, -0x1.fp+1023L, -0x1p-1074L, 308.2409272754311106024666378243768099991L, -1.364376353841841347485783625431355770210L),
638a572e
JM
6451#endif
6452#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877
JM
6453 TEST_c_c (clog10, 0x1.fp+1023L, 0x1p-1074L, 308.2409272754311106024666378243768099991L, plus_zero, UNDERFLOW_EXCEPTION),
6454 TEST_c_c (clog10, 0x1.fp+1023L, -0x1p-1074L, 308.2409272754311106024666378243768099991L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM
6455#endif
6456
6457#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
6458 TEST_c_c (clog10, 0x1p-16445L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6459 TEST_c_c (clog10, -0x1p-16445L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6460 TEST_c_c (clog10, 0x1p-16445L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6461 TEST_c_c (clog10, -0x1p-16445L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6462 TEST_c_c (clog10, -0x1.fp+16383L, 0x1p-16445L, 4932.061660674182269085496060792589701158L, 1.364376353841841347485783625431355770210L),
6463 TEST_c_c (clog10, -0x1.fp+16383L, -0x1p-16445L, 4932.061660674182269085496060792589701158L, -1.364376353841841347485783625431355770210L),
6464 TEST_c_c (clog10, 0x1.fp+16383L, 0x1p-16445L, 4932.061660674182269085496060792589701158L, plus_zero, UNDERFLOW_EXCEPTION),
6465 TEST_c_c (clog10, 0x1.fp+16383L, -0x1p-16445L, 4932.061660674182269085496060792589701158L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e 6466# if LDBL_MANT_DIG >= 113
08198877
JM
6467 TEST_c_c (clog10, 0x1p-16494L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6468 TEST_c_c (clog10, -0x1p-16494L, 0x1.fp+16383L, 4932.061660674182269085496060792589701158L, 0.6821881769209206737428918127156778851051L),
6469 TEST_c_c (clog10, 0x1p-16494L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6470 TEST_c_c (clog10, -0x1p-16494L, -0x1.fp+16383L, 4932.061660674182269085496060792589701158L, -0.6821881769209206737428918127156778851051L),
6471 TEST_c_c (clog10, -0x1.fp+16383L, 0x1p-16494L, 4932.061660674182269085496060792589701158L, 1.364376353841841347485783625431355770210L),
6472 TEST_c_c (clog10, -0x1.fp+16383L, -0x1p-16494L, 4932.061660674182269085496060792589701158L, -1.364376353841841347485783625431355770210L),
6473 TEST_c_c (clog10, 0x1.fp+16383L, 0x1p-16494L, 4932.061660674182269085496060792589701158L, plus_zero, UNDERFLOW_EXCEPTION),
6474 TEST_c_c (clog10, 0x1.fp+16383L, -0x1p-16494L, 4932.061660674182269085496060792589701158L, minus_zero, UNDERFLOW_EXCEPTION),
638a572e
JM
6475# endif
6476#endif
6477
08198877
JM
6478 TEST_c_c (clog10, 1.0L, 0x1.234566p-10L, 2.680828048441605163181684680300513080769e-7L, 4.825491868832381486767558728169977751564e-4L),
6479 TEST_c_c (clog10, -1.0L, 0x1.234566p-20L, 2.556638434669064077889576526006849923281e-13L, 1.364375882602207106407956770293808181427L),
6480 TEST_c_c (clog10, 0x1.234566p-30L, 1.0L, 2.438200411482400072282924063740535840474e-19L, 6.821881764607257184291586401763604544928e-1L),
6481 TEST_c_c (clog10, -0x1.234566p-40L, -1.0L, 2.325249110681915353442924915876654139373e-25L, -6.821881769213700828789403802671540158935e-1L),
6482 TEST_c_c (clog10, 0x1.234566p-50L, 1.0L, 2.217530356103816369479108963807448194409e-31L, 6.821881769209202348667823902864283966959e-1L),
6483 TEST_c_c (clog10, 0x1.234566p-60L, 1.0L, 2.114801746467415208319767917450504756866e-37L, 6.821881769209206733143018621078368211515e-1L),
6484 TEST_c_c (clog10, 0x1p-61L, 1.0L, 4.084085680564517578238994467153626207224e-38L, 6.821881769209206735545466044044889962925e-1L),
6485 TEST_c_c (clog10, 0x1p-62L, 1.0L, 1.021021420141129394559748616788406551878e-38L, 6.821881769209206736487192085600834406988e-1L, UNDERFLOW_EXCEPTION_FLOAT),
6486 TEST_c_c (clog10, 0x1p-63L, 1.0L, 2.552553550352823486399371541971016379740e-39L, 6.821881769209206736958055106378806629019e-1L, UNDERFLOW_EXCEPTION_FLOAT),
da865e95 6487#ifndef TEST_FLOAT
08198877
JM
6488 TEST_c_c (clog10, 0x1p-509L, 1.0L, 7.730698388614835910296270976605350994446e-308L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
6489 TEST_c_c (clog10, 0x1p-510L, 1.0L, 1.932674597153708977574067744151337748612e-308L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
6490 TEST_c_c (clog10, 0x1p-511L, 1.0L, 4.831686492884272443935169360378344371529e-309L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION_DOUBLE),
da865e95
JM
6491#endif
6492#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
6493 TEST_c_c (clog10, 0x1p-8189L, 1.0L, 1.168114274114528946314738738025008370069e-4931L, 6.821881769209206737428918127156778851051e-1L),
6494 TEST_c_c (clog10, 0x1p-8190L, 1.0L, 2.920285685286322365786846845062520925172e-4932L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION),
6495 TEST_c_c (clog10, 0x1p-8191L, 1.0L, 7.300714213215805914467117112656302312931e-4933L, 6.821881769209206737428918127156778851051e-1L, UNDERFLOW_EXCEPTION),
da865e95
JM
6496#endif
6497
08198877
JM
6498 TEST_c_c (clog10, 0x1.000566p0L, 0x1.234p-10L, 3.604093470239754109961125085078190708674e-5L, 4.824745078422174667425851670822596859720e-4L),
6499 TEST_c_c (clog10, 0x1.000566p0L, 0x1.234p-100L, 3.577293486783822178310971763308187385546e-5L, 3.897399639875661463735636919790792140598e-31L),
d0419dbf 6500#ifndef TEST_FLOAT
08198877
JM
6501 TEST_c_c (clog10, -0x1.0000000123456p0L, 0x1.2345678p-30L, 1.150487028947346337782682105935961875822e-10L, 1.364376353381646356131680448946397884147L),
6502 TEST_c_c (clog10, -0x1.0000000123456p0L, 0x1.2345678p-1000L, 1.150487026509145544402795327729455391948e-10L, 1.364376353841841347485783625431355770210L),
d0419dbf
JM
6503#endif
6504#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM
6505 TEST_c_c (clog10, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-60L, 4.285899851347756188767674032946882584784e-19L, 4.285899850759344225805480528847018395861e-19L),
6506 TEST_c_c (clog10, 0x1.00000000000000123456789abcp0L, 0x1.23456789p-1000L, 4.285899851347756186652871946325962330640e-19L, 4.611541215247321502041995872887317363241e-302L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d0419dbf
JM
6507#endif
6508
08198877 6509 TEST_c_c (clog10, 0x0.ffffffp0L, 0x0.ffffffp-100L, -2.588596909321764128428416045209904492216e-8L, 3.425979381266895667295625489912064603415e-31L),
d032e0d2 6510#ifndef TEST_FLOAT
08198877 6511 TEST_c_c (clog10, 0x0.fffffffffffff8p0L, 0x0.fffffffffffff8p-1000L, -4.821637332766435821255375046554377090472e-17L, 4.053112396770095089737411317782466262176e-302L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d032e0d2
JM
6512#endif
6513#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877
JM
6514 TEST_c_c (clog10, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp-15000L, -2.354315103889861110220423157644627849164e-20L, 1.541165759405643564697852372112893034397e-4516L),
6515#endif
6516
6517 TEST_c_c (clog10, 0x1a6p-10L, 0x3a5p-10L, -6.2126412844802358329771948751248003038444e-07L, 0.4977135139537443711784513409096950995985L),
6518 TEST_c_c (clog10, 0xf2p-10L, 0x3e3p-10L, 2.6921240173351112953324592659528481616879e-06L, 0.5785726025799636431142862788413361783862L),
6519 TEST_c_c (clog10, 0x4d4ep-15L, 0x6605p-15L, -7.0781945783414996953799915941870192015212e-09L, 0.4005747524909781155537088181659175147564L),
6520 TEST_c_c (clog10, 0x2818p-15L, 0x798fp-15L, 6.6737261053986614395049481326819059203910e-09L, 0.5438241985991753781478398141908629586460L),
6521 TEST_c_c (clog10, 0x9b57bp-20L, 0xcb7b4p-20L, -1.7182001068739620267773842120965071561416e-11L, 0.3990121149225253562859800593935899629087L),
6522 TEST_c_c (clog10, 0x2731p-20L, 0xfffd0p-20L, 1.9156943718715958194239364991329064049438e-11L, 0.6780326907904082601285090019969008967595L),
6523 TEST_c_c (clog10, 0x2ede88p-23L, 0x771c3fp-23L, -1.9440841725722970687903291200493082253766e-13L, 0.5193774116724956222518530053006822210323L),
6524 TEST_c_c (clog10, 0x11682p-23L, 0x7ffed1p-23L, 5.0916490233953865181284669870035717560498e-13L, 0.6784968969384861816694467029319146542069L),
6525 TEST_c_c (clog10, 0xa1f2c1p-24L, 0xc643aep-24L, -4.5516256421319921959681423447271490869664e-14L, 0.3847315790697197749315054516562206543710L),
6526 TEST_c_c (clog10, 0x659feap-24L, 0xeaf6f9p-24L, 1.6200701438094619117335617123525612051457e-14L, 0.5049027913635038013499728086604870749732L),
d032e0d2 6527#ifndef TEST_FLOAT
08198877
JM
6528 TEST_c_c (clog10, 0x4447d7175p-35L, 0x6c445e00ap-35L, -6.4375803621988389731799033530075237868110e-21L, 0.4378257977686804492768642780897650927167L),
6529 TEST_c_c (clog10, 0x2dd46725bp-35L, 0x7783a1284p-35L, 1.9312741086596516918394613098872836703188e-20L, 0.5231613813514771042838490538484014771862L),
6530 TEST_c_c (clog10, 0x164c74eea876p-45L, 0x16f393482f77p-45L, -1.3155760824064879362415202279780039150764e-26L, 0.3473590599762514228227328130640352044313L),
6531 TEST_c_c (clog10, 0xfe961079616p-45L, 0x1bc37e09e6d1p-45L, 2.3329549194675052736016290082882121135546e-26L, 0.4561756099441139182878993697611751382976L),
6532 TEST_c_c (clog10, 0xa4722f19346cp-51L, 0x7f9631c5e7f07p-51L, -2.6979587627476803379953050733225113494503e-30L, 0.6472785229986997177606324374555347813105L),
6533 TEST_c_c (clog10, 0x10673dd0f2481p-51L, 0x7ef1d17cefbd2p-51L, 1.3918041236396763648388478552321724382899e-29L, 0.6263795733790237053262025311642907438291L),
6534 TEST_c_c (clog10, 0x8ecbf810c4ae6p-52L, 0xd479468b09a37p-52L, -4.2289432987513243393180377141513840878196e-30L, 0.4252020027092323591068799049905597805296L),
6535 TEST_c_c (clog10, 0x5b06b680ea2ccp-52L, 0xef452b965da9fp-52L, 3.6079845358966994996207055940336690133424e-30L, 0.5243112258263349992771652393178033846555L),
6536 TEST_c_c (clog10, 0x659b70ab7971bp-53L, 0x1f5d111e08abecp-53L, -1.0893543813872082317104059174982092534059e-30L, 0.5954257879188711495921161433751775633232L),
6537 TEST_c_c (clog10, 0x15cfbd1990d1ffp-53L, 0x176a3973e09a9ap-53L, 4.4163015461643576961232672330852798804976e-31L, 0.3564851427422832755956993418877523303529L),
6538 TEST_c_c (clog10, 0x1367a310575591p-54L, 0x3cfcc0a0541f60p-54L, 2.2081507730821788480616336165447731164865e-32L, 0.5484039935757001196548030312819898864760L),
6539 TEST_c_c (clog10, 0x55cb6d0c83af5p-55L, 0x7fe33c0c7c4e90p-55L, -2.2583360179249556400630343805573865814771e-32L, 0.6639894257763289307423302343317622430835L),
d032e0d2
JM
6540#endif
6541#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64
08198877
JM
6542 TEST_c_c (clog10, 0x298c62cb546588a7p-63L, 0x7911b1dfcc4ecdaep-63L, -5.1816837072162316773907242302011632570857e-37L, 0.5386167838952956925896424154370364458140L),
6543 TEST_c_c (clog10, 0x4d9c37e2b5cb4533p-63L, 0x65c98be2385a042ep-63L, 2.7822833698845776001753149807484078521508e-37L, 0.3992725998539071066769046272515417679815L),
6544 TEST_c_c (clog10, 0x602fd5037c4792efp-64L, 0xed3e2086dcca80b8p-64L, -1.0146400362652473358437501879334790111898e-37L, 0.5149047982335273098246594109614460842099L),
6545 TEST_c_c (clog10, 0x6b10b4f3520217b6p-64L, 0xe8893cbb449253a1p-64L, 1.0529283395205396881397407610630442563938e-37L, 0.4947949395762683446121140513971996916447L),
6546 TEST_c_c (clog10, 0x81b7efa81fc35ad1p-65L, 0x1ef4b835f1c79d812p-65L, -4.3074341162203896332989394770760901408798e-39L, 0.5709443672155660428417571212549720987784L),
d032e0d2
JM
6547#endif
6548#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
08198877
JM
6549 TEST_c_c (clog10, 0x3f96469050f650869c2p-75L, 0x6f16b2c9c8b05988335p-75L, -4.5643214291682663316715446865040356750881e-46L, 0.4564083863660793840592614609053162690362L),
6550 TEST_c_c (clog10, 0x3157fc1d73233e580c8p-75L, 0x761b52ccd435d7c7f5fp-75L, 5.8575458340992751256451490143468457830297e-44L, 0.5103174273246635294300470585396890237265L),
6551 TEST_c_c (clog10, 0x155f8afc4c48685bf63610p-85L, 0x17d0cf2652cdbeb1294e19p-85L, -2.0748709499710785084693619097712106753591e-50L, 0.3645447681189598740620098186365764884771L),
6552 TEST_c_c (clog10, 0x13836d58a13448d750b4b9p-85L, 0x195ca7bc3ab4f9161edbe6p-85L, 1.2333149003324592532859843519619084433953e-50L, 0.3973779298829931059309198145608711073016L),
6553 TEST_c_c (clog10, 0x1df515eb171a808b9e400266p-95L, 0x7c71eb0cd4688dfe98581c77p-95L, -1.5221162575729652613635150540947625639689e-57L, 0.5795934880811949230121092882659698986043L),
6554 TEST_c_c (clog10, 0xe33f66c9542ca25cc43c867p-95L, 0x7f35a68ebd3704a43c465864p-95L, 1.7850272475173865337808494725293124613817e-56L, 0.6338990862456906754888183278564382516852L),
6555 TEST_c_c (clog10, 0x6771f22c64ed551b857c128b4cp-105L, 0x1f570e7a13cc3cf2f44fd793ea1p-105L, -6.2023045024810589256360494043570293518879e-63L, 0.5938345819561308555003145899438513900776L),
6556 TEST_c_c (clog10, 0x15d8ab6ed05ca514086ac3a1e84p-105L, 0x1761e480aa094c0b10b34b09ce9p-105L, 4.3548095442952115860848857519953610343042e-63L, 0.3558376234889641500775150477035448866763L),
6557 TEST_c_c (clog10, 0x187190c1a334497bdbde5a95f48p-106L, 0x3b25f08062d0a095c4cfbbc338dp-106L, -7.5879257211204444302994221436282805900756e-64L, 0.5119945461708707332160859198685423099187L),
6558 TEST_c_c (clog10, 0x6241ef0da53f539f02fad67dabp-106L, 0x3fb46641182f7efd9caa769dac0p-106L, 1.8804859395820231849002915747252695375405e-63L, 0.6404513901551516189871978418046651877394L),
d032e0d2
JM
6559#endif
6560#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
08198877
JM
6561 TEST_c_c (clog10, 0x3e1d0a105ac4ebeacd9c6952d34cp-112L, 0xf859b3d1b06d005dcbb5516d5479p-112L, -5.0742964549782184008668435276046798273476e-67L, 0.5757527761596220360985719127090110408283L),
6562 TEST_c_c (clog10, 0x47017a2e36807acb1e5214b209dep-112L, 0xf5f4a550c9d75e3bb1839d865f0dp-112L, 6.5482587585671294601662599808612773010057e-66L, 0.5601289501766423782280643144987875760229L),
6563 TEST_c_c (clog10, 0x148f818cb7a9258fca942ade2a0cap-113L, 0x18854a34780b8333ec53310ad7001p-113L, -3.1210950417524756037077807411854181477733e-67L, 0.3791463562379872585396164879981280044658L),
6564 TEST_c_c (clog10, 0xfd95243681c055c2632286921092p-113L, 0x1bccabcd29ca2152860ec29e34ef7p-113L, 2.8774482675253468630312378575186855052697e-66L, 0.4571561610046221605554903008571429975493L),
6565 TEST_c_c (clog10, 0xdb85c467ee2aadd5f425fe0f4b8dp-114L, 0x3e83162a0f95f1dcbf97dddf410eap-114L, 1.9985076315737626043096596036300177494613e-67L, 0.5883569274304683249184005177865521205198L),
6566 TEST_c_c (clog10, 0x1415bcaf2105940d49a636e98ae59p-115L, 0x7e6a150adfcd1b0921d44b31f40f4p-115L, 1.1288799405048268615023706955013387413519e-67L, 0.6137587762850841972073301550420510507903L),
6567#endif
6568 END_DATA (clog10)
6569 };
d032e0d2 6570
08198877
JM
6571static void
6572clog10_test (void)
6573{
6574 errno = 0;
6575 FUNC(clog10) (BUILD_COMPLEX (0.7L, 1.2L));
6576 if (errno == ENOSYS)
6577 /* Function not implemented. */
6578 return;
6579
6580 START (clog10);
6581 RUN_TEST_LOOP_c_c (clog10, clog10_test_data, );
6815fabc 6582 END (clog10, complex);
8847214f
UD
6583}
6584
2550dfe9 6585
08198877
JM
6586static const struct test_c_c_data conj_test_data[] =
6587 {
6588 START_DATA (conj),
6589 TEST_c_c (conj, 0.0, 0.0, 0.0, minus_zero),
6590 TEST_c_c (conj, 0.0, minus_zero, 0.0, 0.0),
6591 TEST_c_c (conj, qnan_value, qnan_value, qnan_value, qnan_value),
6592 TEST_c_c (conj, plus_infty, minus_infty, plus_infty, plus_infty),
6593 TEST_c_c (conj, plus_infty, plus_infty, plus_infty, minus_infty),
6594 TEST_c_c (conj, 1.0, 2.0, 1.0, -2.0),
6595 TEST_c_c (conj, 3.0, -4.0, 3.0, 4.0),
6596 END_DATA (conj)
6597 };
6598
0cdc8e6f
UD
6599static void
6600conj_test (void)
6601{
6602 START (conj);
08198877 6603 RUN_TEST_LOOP_c_c (conj, conj_test_data, );
0cdc8e6f
UD
6604 END (conj, complex);
6605}
6606
6607
601a3a5f
JM
6608static const struct test_ff_f_data copysign_test_data[] =
6609 {
6610 START_DATA (copysign),
6611 TEST_ff_f (copysign, 0, 4, 0),
6612 TEST_ff_f (copysign, 0, -4, minus_zero),
6613 TEST_ff_f (copysign, minus_zero, 4, 0),
6614 TEST_ff_f (copysign, minus_zero, -4, minus_zero),
6615
6616 TEST_ff_f (copysign, plus_infty, 0, plus_infty),
6617 TEST_ff_f (copysign, plus_infty, minus_zero, minus_infty),
6618 TEST_ff_f (copysign, minus_infty, 0, plus_infty),
6619 TEST_ff_f (copysign, minus_infty, minus_zero, minus_infty),
6620
6621 TEST_ff_f (copysign, 0, plus_infty, 0),
6622 TEST_ff_f (copysign, 0, minus_zero, minus_zero),
6623 TEST_ff_f (copysign, minus_zero, plus_infty, 0),
6624 TEST_ff_f (copysign, minus_zero, minus_zero, minus_zero),
6625
6626 /* XXX More correctly we would have to check the sign of the NaN. */
6627 TEST_ff_f (copysign, qnan_value, 0, qnan_value),
6628 TEST_ff_f (copysign, qnan_value, minus_zero, qnan_value),
6629 TEST_ff_f (copysign, -qnan_value, 0, qnan_value),
6630 TEST_ff_f (copysign, -qnan_value, minus_zero, qnan_value),
6631 END_DATA (copysign)
6632 };
6633
8847214f
UD
6634static void
6635copysign_test (void)
6636{
6637 START (copysign);
601a3a5f 6638 RUN_TEST_LOOP_ff_f (copysign, copysign_test_data, );
8847214f
UD
6639 END (copysign);
6640}
6641
2550dfe9 6642
74c57478
JM
6643static const struct test_f_f_data cos_test_data[] =
6644 {
6645 START_DATA (cos),
6646 TEST_f_f (cos, 0, 1),
6647 TEST_f_f (cos, minus_zero, 1),
6648 TEST_f_f (cos, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
6649 TEST_f_f (cos, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
6650 TEST_f_f (cos, qnan_value, qnan_value, ERRNO_UNCHANGED),
6651
6652 TEST_f_f (cos, M_PI_6l * 2.0, 0.5),
6653 TEST_f_f (cos, M_PI_6l * 4.0, -0.5),
6654
6655 /* The value of M_PI_2l is never exactly PI/2, and therefore the
6656 answer is never exactly zero. The answer is equal to the error
6657 in rounding PI/2 for the type used. Thus the answer is unique
6658 to each type. */
aba5e333 6659#ifdef TEST_FLOAT
74c57478
JM
6660 /* 32-bit float. */
6661 TEST_f_f (cos, M_PI_2l, -0x1.777a5cp-25L),
aba5e333
CD
6662#endif
6663#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MANT_DIG == 53)
74c57478
JM
6664 /* 64-bit double or 64-bit long double. */
6665 TEST_f_f (cos, M_PI_2l, 0x1.1a62633145c07p-54L),
aba5e333
CD
6666#endif
6667#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 64
74c57478
JM
6668 /* 96-bit long double. */
6669 TEST_f_f (cos, M_PI_2l, -0xe.ce675d1fc8f8cbbp-69L),
aba5e333
CD
6670#endif
6671#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 106
74c57478
JM
6672 /* 128-bit IBM long double. */
6673 TEST_f_f (cos, M_PI_2l, 0x1.c1cd129024e088a67cc74020bcp-107L),
aba5e333
CD
6674#endif
6675#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 113
74c57478
JM
6676 /* 128-bit long double. */
6677 TEST_f_f (cos, M_PI_2l, 0x1.cd129024e088a67cc74020bbea64p-115L),
aba5e333 6678#endif
8847214f 6679
74c57478 6680 TEST_f_f (cos, 0.75L, 0.731688868873820886311838753000084544L),
8847214f 6681
74c57478
JM
6682 TEST_f_f (cos, 0x1p65, 0.99888622066058013610642172179340364209972L),
6683 TEST_f_f (cos, -0x1p65, 0.99888622066058013610642172179340364209972L),
8c0247db 6684
d32e4346 6685#ifdef TEST_DOUBLE
74c57478 6686 TEST_f_f (cos, 0.80190127184058835, 0.69534156199418473),
8848d99d
JM
6687#endif
6688
74c57478 6689 TEST_f_f (cos, 0x1.442f74p+15, 2.4407839902314016628485779006274989801517e-06L),
7a845b2c 6690
8848d99d 6691#ifndef TEST_FLOAT
74c57478
JM
6692 TEST_f_f (cos, 1e22, 0.5232147853951389454975944733847094921409L),
6693 TEST_f_f (cos, 0x1p1023, -0.826369834614147994500785680811743734805L),
8848d99d
JM
6694#endif
6695
6696#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478 6697 TEST_f_f (cos, 0x1p16383L, 0.9210843909921906206874509522505756251609L),
d32e4346
RM
6698#endif
6699
74c57478
JM
6700 TEST_f_f (cos, 0x1p+120, -9.25879022854837867303861764107414946730833e-01L),
6701 TEST_f_f (cos, 0x1p+127, 7.81914638714960072263910298466369236613162e-01L),
6702 TEST_f_f (cos, 0x1.fffff8p+127, 9.98819362551949040703862043664101081064641e-01L),
6703 TEST_f_f (cos, 0x1.fffffep+127, 8.53021039830304158051791467692161107353094e-01L),
6704 TEST_f_f (cos, 0x1p+50, 8.68095904660550604334592502063501320395739e-01L),
6705 TEST_f_f (cos, 0x1p+28, -1.65568979490578758865468278195361551113358e-01L),
6706 END_DATA (cos)
6707 };
6708
6709static void
6710cos_test (void)
6711{
6712 errno = 0;
6713 FUNC(cos) (0);
6714 if (errno == ENOSYS)
6715 /* Function not implemented. */
6716 return;
4ffffbd2 6717
74c57478
JM
6718 START (cos);
6719 RUN_TEST_LOOP_f_f (cos, cos_test_data, );
8847214f
UD
6720 END (cos);
6721}
6722
2550dfe9 6723
74c57478
JM
6724static const struct test_f_f_data cos_tonearest_test_data[] =
6725 {
6726 START_DATA (cos_tonearest),
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_tonearest)
6738 };
6739
804360ed
JM
6740static void
6741cos_test_tonearest (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_tonearest);
74c57478 6750 RUN_TEST_LOOP_f_f (cos, cos_tonearest_test_data, FE_TONEAREST);
804360ed
JM
6751 END (cos_tonearest);
6752}
6753
6754
74c57478
JM
6755static const struct test_f_f_data cos_towardzero_test_data[] =
6756 {
6757 START_DATA (cos_towardzero),
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_towardzero)
6769 };
6770
804360ed
JM
6771static void
6772cos_test_towardzero (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_towardzero);
74c57478 6781 RUN_TEST_LOOP_f_f (cos, cos_towardzero_test_data, FE_TOWARDZERO);
804360ed
JM
6782 END (cos_towardzero);
6783}
6784
6785
74c57478
JM
6786static const struct test_f_f_data cos_downward_test_data[] =
6787 {
6788 START_DATA (cos_downward),
6789 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6790 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6791 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6792 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6793 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6794 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6795 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6796 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6797 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6798 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6799 END_DATA (cos_downward)
6800 };
6801
804360ed
JM
6802static void
6803cos_test_downward (void)
6804{
804360ed
JM
6805 errno = 0;
6806 FUNC(cos) (0);
6807 if (errno == ENOSYS)
6808 /* Function not implemented. */
6809 return;
6810
6811 START (cos_downward);
74c57478
JM
6812 RUN_TEST_LOOP_f_f (cos, cos_downward_test_data, FE_DOWNWARD);
6813 END (cos_downward);
6814}
804360ed 6815
804360ed 6816
74c57478
JM
6817static const struct test_f_f_data cos_upward_test_data[] =
6818 {
6819 START_DATA (cos_upward),
6820 TEST_f_f (cos, 1, 0.5403023058681397174009366074429766037323L),
6821 TEST_f_f (cos, 2, -0.4161468365471423869975682295007621897660L),
6822 TEST_f_f (cos, 3, -0.9899924966004454572715727947312613023937L),
6823 TEST_f_f (cos, 4, -0.6536436208636119146391681830977503814241L),
6824 TEST_f_f (cos, 5, 0.2836621854632262644666391715135573083344L),
6825 TEST_f_f (cos, 6, 0.9601702866503660205456522979229244054519L),
6826 TEST_f_f (cos, 7, 0.7539022543433046381411975217191820122183L),
6827 TEST_f_f (cos, 8, -0.1455000338086135258688413818311946826093L),
6828 TEST_f_f (cos, 9, -0.9111302618846769883682947111811653112463L),
6829 TEST_f_f (cos, 10, -0.8390715290764524522588639478240648345199L),
6830 END_DATA (cos_upward)
6831 };
804360ed
JM
6832
6833static void
6834cos_test_upward (void)
6835{
804360ed
JM
6836 errno = 0;
6837 FUNC(cos) (0);
6838 if (errno == ENOSYS)
6839 /* Function not implemented. */
6840 return;
6841
6842 START (cos_upward);
74c57478
JM
6843 RUN_TEST_LOOP_f_f (cos, cos_upward_test_data, FE_UPWARD);
6844 END (cos_upward);
6845}
804360ed 6846
804360ed 6847
74c57478
JM
6848static const struct test_f_f_data cosh_test_data[] =
6849 {
6850 START_DATA (cosh),
6851 TEST_f_f (cosh, 0, 1),
6852 TEST_f_f (cosh, minus_zero, 1),
804360ed 6853
74c57478
JM
6854#ifndef TEST_INLINE
6855 TEST_f_f (cosh, plus_infty, plus_infty),
6856 TEST_f_f (cosh, minus_infty, plus_infty),
6857#endif
6858 TEST_f_f (cosh, qnan_value, qnan_value),
804360ed 6859
74c57478 6860 TEST_f_f (cosh, 0.75L, 1.29468328467684468784170818539018176L),
804360ed 6861
74c57478
JM
6862#ifndef TEST_FLOAT
6863 TEST_f_f (cosh, 709.8893558127259666434838436543941497802734375L, 9.9999998999995070652573675944761818416035e+307L),
6864 TEST_f_f (cosh, -709.8893558127259666434838436543941497802734375L, 9.9999998999995070652573675944761818416035e+307L),
6865#endif
6866 END_DATA (cosh)
6867 };
804360ed 6868
8847214f
UD
6869static void
6870cosh_test (void)
6871{
aaca11d8 6872 errno = 0;
3c6cad26 6873 FUNC(cosh) (0.7L);
aaca11d8
UD
6874 if (errno == ENOSYS)
6875 /* Function not implemented. */
6876 return;
6877
8847214f 6878 START (cosh);
74c57478 6879 RUN_TEST_LOOP_f_f (cosh, cosh_test_data, );
8847214f
UD
6880 END (cosh);
6881}
6882
6883
74c57478
JM
6884static const struct test_f_f_data cosh_tonearest_test_data[] =
6885 {
6886 START_DATA (cosh_tonearest),
6887 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6888 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6889 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6890 END_DATA (cosh_tonearest)
6891 };
6892
ca811b22
JM
6893static void
6894cosh_test_tonearest (void)
6895{
ca811b22
JM
6896 errno = 0;
6897 FUNC(cosh) (0);
6898 if (errno == ENOSYS)
6899 /* Function not implemented. */
6900 return;
6901
6902 START (cosh_tonearest);
74c57478 6903 RUN_TEST_LOOP_f_f (cosh, cosh_tonearest_test_data, FE_TONEAREST);
ca811b22
JM
6904 END (cosh_tonearest);
6905}
6906
6907
74c57478
JM
6908static const struct test_f_f_data cosh_towardzero_test_data[] =
6909 {
6910 START_DATA (cosh_towardzero),
6911 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6912 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6913 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6914 END_DATA (cosh_towardzero)
6915 };
6916
ca811b22
JM
6917static void
6918cosh_test_towardzero (void)
6919{
ca811b22
JM
6920 errno = 0;
6921 FUNC(cosh) (0);
6922 if (errno == ENOSYS)
6923 /* Function not implemented. */
6924 return;
6925
6926 START (cosh_towardzero);
74c57478 6927 RUN_TEST_LOOP_f_f (cosh, cosh_towardzero_test_data, FE_TOWARDZERO);
ca811b22
JM
6928 END (cosh_towardzero);
6929}
6930
6931
74c57478
JM
6932static const struct test_f_f_data cosh_downward_test_data[] =
6933 {
6934 START_DATA (cosh_downward),
6935 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6936 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6937 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6938 END_DATA (cosh_downward)
6939 };
6940
ca811b22
JM
6941static void
6942cosh_test_downward (void)
6943{
ca811b22
JM
6944 errno = 0;
6945 FUNC(cosh) (0);
6946 if (errno == ENOSYS)
6947 /* Function not implemented. */
6948 return;
6949
6950 START (cosh_downward);
74c57478 6951 RUN_TEST_LOOP_f_f (cosh, cosh_downward_test_data, FE_DOWNWARD);
ca811b22
JM
6952 END (cosh_downward);
6953}
6954
6955
74c57478
JM
6956static const struct test_f_f_data cosh_upward_test_data[] =
6957 {
6958 START_DATA (cosh_upward),
6959 TEST_f_f (cosh, 22, 1792456423.065795780980053377632656584997L),
6960 TEST_f_f (cosh, 23, 4872401723.124451300068625740569997090344L),
6961 TEST_f_f (cosh, 24, 13244561064.92173614708845674912733665919L),
6962 END_DATA (cosh_upward)
6963 };
6964
ca811b22
JM
6965static void
6966cosh_test_upward (void)
6967{
ca811b22
JM
6968 errno = 0;
6969 FUNC(cosh) (0);
6970 if (errno == ENOSYS)
6971 /* Function not implemented. */
6972 return;
6973
6974 START (cosh_upward);
74c57478 6975 RUN_TEST_LOOP_f_f (cosh, cosh_upward_test_data, FE_UPWARD);
ca811b22
JM
6976 END (cosh_upward);
6977}
6978
6979
8847214f
UD
6980static void
6981cpow_test (void)
6982{
aaca11d8
UD
6983 errno = 0;
6984 FUNC(cpow) (BUILD_COMPLEX (1, 0), BUILD_COMPLEX (0, 0));
6985 if (errno == ENOSYS)
6986 /* Function not implemented. */
6987 return;
6988
8847214f
UD
6989 START (cpow);
6990
6991 TEST_cc_c (cpow, 1, 0, 0, 0, 1.0, 0.0);
6992 TEST_cc_c (cpow, 2, 0, 10, 0, 1024.0, 0.0);
6993
6994 TEST_cc_c (cpow, M_El, 0, 0, 2 * M_PIl, 1.0, 0.0);
6995 TEST_cc_c (cpow, 2, 3, 4, 0, -119.0, -120.0);
6996
67e971f1 6997 TEST_cc_c (cpow, qnan_value, qnan_value, qnan_value, qnan_value, qnan_value, qnan_value);
15daa639 6998
96d10bdf
AJ
6999 TEST_cc_c (cpow, 0.75L, 1.25L, 0.75L, 1.25L, 0.117506293914473555420279832210420483L, 0.346552747708338676483025352060418001L);
7000 TEST_cc_c (cpow, 0.75L, 1.25L, 1.0L, 1.0L, 0.0846958290317209430433805274189191353L, 0.513285749182902449043287190519090481L);
2550dfe9 7001 TEST_cc_c (cpow, 0.75L, 1.25L, 1.0L, 0.0L, 0.75L, 1.25L);
96d10bdf 7002 TEST_cc_c (cpow, 0.75L, 1.25L, 0.0L, 1.0L, 0.331825439177608832276067945276730566L, 0.131338600281188544930936345230903032L);
2550dfe9 7003
6815fabc 7004 END (cpow, complex);
8847214f
UD
7005}
7006
2550dfe9 7007
08198877
JM
7008static const struct test_c_c_data cproj_test_data[] =
7009 {
7010 START_DATA (cproj),
7011 TEST_c_c (cproj, 0.0, 0.0, 0.0, 0.0),
7012 TEST_c_c (cproj, minus_zero, minus_zero, minus_zero, minus_zero),
7013 TEST_c_c (cproj, 0.0, minus_zero, 0.0, minus_zero),
7014 TEST_c_c (cproj, minus_zero, 0.0, minus_zero, 0.0),
7015
7016 TEST_c_c (cproj, qnan_value, qnan_value, qnan_value, qnan_value),
7017
7018 TEST_c_c (cproj, plus_infty, plus_infty, plus_infty, 0.0),
7019 TEST_c_c (cproj, plus_infty, minus_infty, plus_infty, minus_zero),
7020 TEST_c_c (cproj, minus_infty, plus_infty, plus_infty, 0.0),
7021 TEST_c_c (cproj, minus_infty, minus_infty, plus_infty, minus_zero),
7022
7023 TEST_c_c (cproj, 1.0, 0.0, 1.0, 0.0),
7024 TEST_c_c (cproj, 2.0, 3.0, 2.0, 3.0),
7025 END_DATA (cproj)
7026 };
7027
8847214f
UD
7028static void
7029cproj_test (void)
7030{
7031 START (cproj);
08198877 7032 RUN_TEST_LOOP_c_c (cproj, cproj_test_data, );
6815fabc 7033 END (cproj, complex);
8847214f
UD
7034}
7035
2550dfe9 7036
6a1992e2
JM
7037static const struct test_c_f_data creal_test_data[] =
7038 {
7039 START_DATA (creal);
7040 TEST_c_f (creal, 0.0, 1.0, 0.0),
7041 TEST_c_f (creal, minus_zero, 1.0, minus_zero),
7042 TEST_c_f (creal, qnan_value, 1.0, qnan_value),
7043 TEST_c_f (creal, qnan_value, qnan_value, qnan_value),
7044 TEST_c_f (creal, plus_infty, 1.0, plus_infty),
7045 TEST_c_f (creal, minus_infty, 1.0, minus_infty),
7046 TEST_c_f (creal, 2.0, 3.0, 2.0),
7047 END_DATA (creal);
7048 };
7049
0cdc8e6f
UD
7050static void
7051creal_test (void)
7052{
7053 START (creal);
6a1992e2 7054 RUN_TEST_LOOP_c_f (creal, creal_test_data, );
0cdc8e6f
UD
7055 END (creal);
7056}
8847214f 7057
08198877
JM
7058static const struct test_c_c_data csin_test_data[] =
7059 {
7060 START_DATA (csin),
7061 TEST_c_c (csin, 0.0, 0.0, 0.0, 0.0),
7062 TEST_c_c (csin, minus_zero, 0.0, minus_zero, 0.0),
7063 TEST_c_c (csin, 0.0, minus_zero, 0, minus_zero),
7064 TEST_c_c (csin, minus_zero, minus_zero, minus_zero, minus_zero),
8847214f 7065
08198877
JM
7066 TEST_c_c (csin, 0.0, plus_infty, 0.0, plus_infty),
7067 TEST_c_c (csin, minus_zero, plus_infty, minus_zero, plus_infty),
7068 TEST_c_c (csin, 0.0, minus_infty, 0.0, minus_infty),
7069 TEST_c_c (csin, minus_zero, minus_infty, minus_zero, minus_infty),
8847214f 7070
08198877
JM
7071 TEST_c_c (csin, plus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7072 TEST_c_c (csin, minus_infty, 0.0, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7073 TEST_c_c (csin, plus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7074 TEST_c_c (csin, minus_infty, minus_zero, qnan_value, 0.0, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7075
08198877
JM
7076 TEST_c_c (csin, plus_infty, plus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7077 TEST_c_c (csin, minus_infty, plus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7078 TEST_c_c (csin, plus_infty, minus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7079 TEST_c_c (csin, minus_infty, minus_infty, qnan_value, plus_infty, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7080
08198877
JM
7081 TEST_c_c (csin, plus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7082 TEST_c_c (csin, plus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7083 TEST_c_c (csin, minus_infty, 6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
7084 TEST_c_c (csin, minus_infty, -6.75, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 7085
08198877
JM
7086 TEST_c_c (csin, 4.625, plus_infty, minus_infty, minus_infty),
7087 TEST_c_c (csin, 4.625, minus_infty, minus_infty, plus_infty),
7088 TEST_c_c (csin, -4.625, plus_infty, plus_infty, minus_infty),
7089 TEST_c_c (csin, -4.625, minus_infty, plus_infty, plus_infty),
8847214f 7090
08198877
JM
7091 TEST_c_c (csin, qnan_value, 0.0, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
7092 TEST_c_c (csin, qnan_value, minus_zero, qnan_value, 0.0, IGNORE_ZERO_INF_SIGN),
8847214f 7093
08198877
JM
7094 TEST_c_c (csin, qnan_value, plus_infty, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
7095 TEST_c_c (csin, qnan_value, minus_infty, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
8847214f 7096
08198877
JM
7097 TEST_c_c (csin, qnan_value, 9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7098 TEST_c_c (csin, qnan_value, -9.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7099
08198877
JM
7100 TEST_c_c (csin, 0.0, qnan_value, 0.0, qnan_value),
7101 TEST_c_c (csin, minus_zero, qnan_value, minus_zero, qnan_value),
8847214f 7102
08198877
JM
7103 TEST_c_c (csin, 10.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7104 TEST_c_c (csin, qnan_value, -10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7105
08198877
JM
7106 TEST_c_c (csin, plus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7107 TEST_c_c (csin, minus_infty, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7108
08198877 7109 TEST_c_c (csin, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 7110
08198877
JM
7111 TEST_c_c (csin, 0.75L, 1.25L, 1.28722291002649188575873510790565441L, 1.17210635989270256101081285116138863L),
7112 TEST_c_c (csin, -2, -3, -9.15449914691142957346729954460983256L, 4.16890695996656435075481305885375484L),
8847214f 7113
08198877
JM
7114 TEST_c_c (csin, 0.75, 89.5, 2.522786001038096774676288412995370563339e38L, 2.708024460708609732016532185663087200560e38L),
7115 TEST_c_c (csin, 0.75, -89.5, 2.522786001038096774676288412995370563339e38L, -2.708024460708609732016532185663087200560e38L),
7116 TEST_c_c (csin, -0.75, 89.5, -2.522786001038096774676288412995370563339e38L, 2.708024460708609732016532185663087200560e38L),
7117 TEST_c_c (csin, -0.75, -89.5, -2.522786001038096774676288412995370563339e38L, -2.708024460708609732016532185663087200560e38L),
e0b16cc2
JM
7118
7119#ifndef TEST_FLOAT
08198877
JM
7120 TEST_c_c (csin, 0.75, 710.5, 1.255317763348154410745082950806112487736e308L, 1.347490911916428129246890157395342279438e308L),
7121 TEST_c_c (csin, 0.75, -710.5, 1.255317763348154410745082950806112487736e308L, -1.347490911916428129246890157395342279438e308L),
7122 TEST_c_c (csin, -0.75, 710.5, -1.255317763348154410745082950806112487736e308L, 1.347490911916428129246890157395342279438e308L),
7123 TEST_c_c (csin, -0.75, -710.5, -1.255317763348154410745082950806112487736e308L, -1.347490911916428129246890157395342279438e308L),
e0b16cc2
JM
7124#endif
7125
7126#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
7127 TEST_c_c (csin, 0.75, 11357.25, 8.385498349388321535962327491346664141020e4931L, 9.001213196851067077465606717616495588201e4931L),
7128 TEST_c_c (csin, 0.75, -11357.25, 8.385498349388321535962327491346664141020e4931L, -9.001213196851067077465606717616495588201e4931L),
7129 TEST_c_c (csin, -0.75, 11357.25, -8.385498349388321535962327491346664141020e4931L, 9.001213196851067077465606717616495588201e4931L),
7130 TEST_c_c (csin, -0.75, -11357.25, -8.385498349388321535962327491346664141020e4931L, -9.001213196851067077465606717616495588201e4931L),
e0b16cc2
JM
7131#endif
7132
7133#ifdef TEST_FLOAT
08198877 7134 TEST_c_c (csin, 0x1p-149, 180, 1.043535896672617552965983803453927655332e33L, plus_infty, OVERFLOW_EXCEPTION),
e0b16cc2
JM
7135#endif
7136
7137#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 7138 TEST_c_c (csin, 0x1p-1074, 1440, 5.981479269486130556466515778180916082415e301L, plus_infty, OVERFLOW_EXCEPTION),
e0b16cc2
JM
7139#endif
7140
7141#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 7142 TEST_c_c (csin, 0x1p-16434L, 22730, 1.217853148905605987081057582351152052687e4924L, plus_infty, OVERFLOW_EXCEPTION),
e0b16cc2
JM
7143#endif
7144
08198877
JM
7145 TEST_c_c (csin, min_subnorm_value, min_value, min_subnorm_value, min_value, UNDERFLOW_EXCEPTION),
7146 TEST_c_c (csin, min_value, min_subnorm_value, min_value, min_subnorm_value, UNDERFLOW_EXCEPTION),
7147 END_DATA (csin)
7148 };
8847214f
UD
7149
7150static void
08198877 7151csin_test (void)
8847214f 7152{
aaca11d8 7153 errno = 0;
08198877 7154 FUNC(csin) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD
7155 if (errno == ENOSYS)
7156 /* Function not implemented. */
7157 return;
8847214f 7158
08198877
JM
7159 START (csin);
7160 RUN_TEST_LOOP_c_c (csin, csin_test_data, );
7161 END (csin, complex);
7162}
7163
8847214f 7164
08198877
JM
7165static const struct test_c_c_data csinh_test_data[] =
7166 {
7167 START_DATA (csinh),
7168 TEST_c_c (csinh, 0.0, 0.0, 0.0, 0.0),
7169 TEST_c_c (csinh, minus_zero, 0.0, minus_zero, 0.0),
7170 TEST_c_c (csinh, 0.0, minus_zero, 0.0, minus_zero),
7171 TEST_c_c (csinh, minus_zero, minus_zero, minus_zero, minus_zero),
8847214f 7172
08198877
JM
7173 TEST_c_c (csinh, 0.0, plus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7174 TEST_c_c (csinh, minus_zero, plus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7175 TEST_c_c (csinh, 0.0, minus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7176 TEST_c_c (csinh, minus_zero, minus_infty, 0.0, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7177
08198877
JM
7178 TEST_c_c (csinh, plus_infty, 0.0, plus_infty, 0.0),
7179 TEST_c_c (csinh, minus_infty, 0.0, minus_infty, 0.0),
7180 TEST_c_c (csinh, plus_infty, minus_zero, plus_infty, minus_zero),
7181 TEST_c_c (csinh, minus_infty, minus_zero, minus_infty, minus_zero),
8847214f 7182
08198877
JM
7183 TEST_c_c (csinh, plus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7184 TEST_c_c (csinh, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7185 TEST_c_c (csinh, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
7186 TEST_c_c (csinh, minus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION|IGNORE_ZERO_INF_SIGN),
8847214f 7187
08198877
JM
7188 TEST_c_c (csinh, plus_infty, 4.625, minus_infty, minus_infty),
7189 TEST_c_c (csinh, minus_infty, 4.625, plus_infty, minus_infty),
7190 TEST_c_c (csinh, plus_infty, -4.625, minus_infty, plus_infty),
7191 TEST_c_c (csinh, minus_infty, -4.625, plus_infty, plus_infty),
8847214f 7192
08198877
JM
7193 TEST_c_c (csinh, 6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7194 TEST_c_c (csinh, -6.75, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7195 TEST_c_c (csinh, 6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7196 TEST_c_c (csinh, -6.75, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 7197
08198877
JM
7198 TEST_c_c (csinh, 0.0, qnan_value, 0.0, qnan_value, IGNORE_ZERO_INF_SIGN),
7199 TEST_c_c (csinh, minus_zero, qnan_value, 0.0, qnan_value, IGNORE_ZERO_INF_SIGN),
8847214f 7200
08198877
JM
7201 TEST_c_c (csinh, plus_infty, qnan_value, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
7202 TEST_c_c (csinh, minus_infty, qnan_value, plus_infty, qnan_value, IGNORE_ZERO_INF_SIGN),
8847214f 7203
08198877
JM
7204 TEST_c_c (csinh, 9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7205 TEST_c_c (csinh, -9.0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7206
08198877
JM
7207 TEST_c_c (csinh, qnan_value, 0.0, qnan_value, 0.0),
7208 TEST_c_c (csinh, qnan_value, minus_zero, qnan_value, minus_zero),
8847214f 7209
08198877
JM
7210 TEST_c_c (csinh, qnan_value, 10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7211 TEST_c_c (csinh, qnan_value, -10.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7212
08198877
JM
7213 TEST_c_c (csinh, qnan_value, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7214 TEST_c_c (csinh, qnan_value, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7215
08198877 7216 TEST_c_c (csinh, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 7217
08198877
JM
7218 TEST_c_c (csinh, 0.75L, 1.25L, 0.259294854551162779153349830618433028L, 1.22863452409509552219214606515777594L),
7219 TEST_c_c (csinh, -2, -3, 3.59056458998577995201256544779481679L, -0.530921086248519805267040090660676560L),
8847214f 7220
08198877
JM
7221 TEST_c_c (csinh, 89.5, 0.75, 2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
7222 TEST_c_c (csinh, -89.5, 0.75, -2.708024460708609732016532185663087200560e38L, 2.522786001038096774676288412995370563339e38L),
7223 TEST_c_c (csinh, 89.5, -0.75, 2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
7224 TEST_c_c (csinh, -89.5, -0.75, -2.708024460708609732016532185663087200560e38L, -2.522786001038096774676288412995370563339e38L),
e0b16cc2
JM
7225
7226#ifndef TEST_FLOAT
08198877
JM
7227 TEST_c_c (csinh, 710.5, 0.75, 1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
7228 TEST_c_c (csinh, -710.5, 0.75, -1.347490911916428129246890157395342279438e308L, 1.255317763348154410745082950806112487736e308L),
7229 TEST_c_c (csinh, 710.5, -0.75, 1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
7230 TEST_c_c (csinh, -710.5, -0.75, -1.347490911916428129246890157395342279438e308L, -1.255317763348154410745082950806112487736e308L),
e0b16cc2
JM
7231#endif
7232
7233#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
7234 TEST_c_c (csinh, 11357.25, 0.75, 9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
7235 TEST_c_c (csinh, -11357.25, 0.75, -9.001213196851067077465606717616495588201e4931L, 8.385498349388321535962327491346664141020e4931L),
7236 TEST_c_c (csinh, 11357.25, -0.75, 9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
7237 TEST_c_c (csinh, -11357.25, -0.75, -9.001213196851067077465606717616495588201e4931L, -8.385498349388321535962327491346664141020e4931L),
e0b16cc2
JM
7238#endif
7239
7240#ifdef TEST_FLOAT
08198877 7241 TEST_c_c (csinh, 180, 0x1p-149, plus_infty, 1.043535896672617552965983803453927655332e33L, OVERFLOW_EXCEPTION),
e0b16cc2
JM
7242#endif
7243
7244#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 7245 TEST_c_c (csinh, 1440, 0x1p-1074, plus_infty, 5.981479269486130556466515778180916082415e301L, OVERFLOW_EXCEPTION),
e0b16cc2
JM
7246#endif
7247
7248#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 7249 TEST_c_c (csinh, 22730, 0x1p-16434L, plus_infty, 1.217853148905605987081057582351152052687e4924L, OVERFLOW_EXCEPTION),
e0b16cc2
JM
7250#endif
7251
08198877
JM
7252 TEST_c_c (csinh, min_subnorm_value, min_value, min_subnorm_value, min_value, UNDERFLOW_EXCEPTION),
7253 TEST_c_c (csinh, min_value, min_subnorm_value, min_value, min_subnorm_value, UNDERFLOW_EXCEPTION),
7254 END_DATA (csinh)
7255 };
2550dfe9 7256
8847214f 7257static void
08198877 7258csinh_test (void)
8847214f 7259{
aaca11d8 7260 errno = 0;
08198877 7261 FUNC(csinh) (BUILD_COMPLEX (0.7L, 1.2L));
aaca11d8
UD
7262 if (errno == ENOSYS)
7263 /* Function not implemented. */
7264 return;
7265
08198877
JM
7266 START (csinh);
7267 RUN_TEST_LOOP_c_c (csinh, csinh_test_data, );
7268 END (csinh, complex);
7269}
8847214f 7270
08198877
JM
7271
7272static const struct test_c_c_data csqrt_test_data[] =
7273 {
7274 START_DATA (csqrt),
7275 TEST_c_c (csqrt, 0, 0, 0.0, 0.0),
7276 TEST_c_c (csqrt, 0, minus_zero, 0, minus_zero),
7277 TEST_c_c (csqrt, minus_zero, 0, 0.0, 0.0),
7278 TEST_c_c (csqrt, minus_zero, minus_zero, 0.0, minus_zero),
7279
7280 TEST_c_c (csqrt, minus_infty, 0, 0.0, plus_infty),
7281 TEST_c_c (csqrt, minus_infty, 6, 0.0, plus_infty),
7282 TEST_c_c (csqrt, minus_infty, minus_zero, 0.0, minus_infty),
7283 TEST_c_c (csqrt, minus_infty, -6, 0.0, minus_infty),
7284
7285 TEST_c_c (csqrt, plus_infty, 0, plus_infty, 0.0),
7286 TEST_c_c (csqrt, plus_infty, 6, plus_infty, 0.0),
7287 TEST_c_c (csqrt, plus_infty, minus_zero, plus_infty, minus_zero),
7288 TEST_c_c (csqrt, plus_infty, -6, plus_infty, minus_zero),
7289
7290 TEST_c_c (csqrt, 0, plus_infty, plus_infty, plus_infty),
7291 TEST_c_c (csqrt, 4, plus_infty, plus_infty, plus_infty),
7292 TEST_c_c (csqrt, plus_infty, plus_infty, plus_infty, plus_infty),
7293 TEST_c_c (csqrt, minus_zero, plus_infty, plus_infty, plus_infty),
7294 TEST_c_c (csqrt, -4, plus_infty, plus_infty, plus_infty),
7295 TEST_c_c (csqrt, minus_infty, plus_infty, plus_infty, plus_infty),
7296 TEST_c_c (csqrt, 0, minus_infty, plus_infty, minus_infty),
7297 TEST_c_c (csqrt, 4, minus_infty, plus_infty, minus_infty),
7298 TEST_c_c (csqrt, plus_infty, minus_infty, plus_infty, minus_infty),
7299 TEST_c_c (csqrt, minus_zero, minus_infty, plus_infty, minus_infty),
7300 TEST_c_c (csqrt, -4, minus_infty, plus_infty, minus_infty),
7301 TEST_c_c (csqrt, minus_infty, minus_infty, plus_infty, minus_infty),
7302
7303 TEST_c_c (csqrt, minus_infty, qnan_value, qnan_value, plus_infty, IGNORE_ZERO_INF_SIGN),
7304
7305 TEST_c_c (csqrt, plus_infty, qnan_value, plus_infty, qnan_value),
7306
7307 TEST_c_c (csqrt, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7308 TEST_c_c (csqrt, 1, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7309 TEST_c_c (csqrt, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7310 TEST_c_c (csqrt, -1, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7311
7312 TEST_c_c (csqrt, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7313 TEST_c_c (csqrt, qnan_value, 8, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7314 TEST_c_c (csqrt, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7315 TEST_c_c (csqrt, qnan_value, -8, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7316
7317 TEST_c_c (csqrt, qnan_value, qnan_value, qnan_value, qnan_value),
7318
7319 TEST_c_c (csqrt, 16.0, -30.0, 5.0, -3.0),
7320 TEST_c_c (csqrt, -1, 0, 0.0, 1.0),
7321 TEST_c_c (csqrt, 0, 2, 1.0, 1.0),
7322 TEST_c_c (csqrt, 119, 120, 12.0, 5.0),
7323 TEST_c_c (csqrt, 0.75L, 1.25L, 1.05065169626078392338656675760808326L, 0.594868882070379067881984030639932657L),
7324 TEST_c_c (csqrt, -2, -3, 0.89597747612983812471573375529004348L, -1.6741492280355400404480393008490519L),
7325 TEST_c_c (csqrt, -2, 3, 0.89597747612983812471573375529004348L, 1.6741492280355400404480393008490519L),
7326 /* Principal square root should be returned (i.e., non-negative real
7327 part). */
7328 TEST_c_c (csqrt, 0, -1, M_SQRT1_2l, -M_SQRT1_2l),
7329
7330 TEST_c_c (csqrt, 0x1.fffffep+127L, 0x1.fffffep+127L, 2.026714405498316804978751017492482558075e+19L, 8.394925938143272988211878516208015586281e+18L),
7331 TEST_c_c (csqrt, 0x1.fffffep+127L, 1.0L, 1.844674352395372953599975585936590505260e+19L, 2.710505511993121390769065968615872097053e-20L),
7332 TEST_c_c (csqrt, 0x1p-149L, 0x1p-149L, 4.112805464342778798097003462770175200803e-23L, 1.703579802732953750368659735601389709551e-23L),
7333 TEST_c_c (csqrt, 0x1p-147L, 0x1p-147L, 8.225610928685557596194006925540350401606e-23L, 3.407159605465907500737319471202779419102e-23L),
7334
7335 TEST_c_c (csqrt, plus_zero, 0x1p-149L, 2.646977960169688559588507814623881131411e-23L, 2.646977960169688559588507814623881131411e-23L),
7336 TEST_c_c (csqrt, 0x1p-50L, 0x1p-149L, 2.980232238769531250000000000000000000000e-8L, 2.350988701644575015937473074444491355637e-38L),
cdfe2c5e 7337#ifdef TEST_FLOAT
08198877 7338 TEST_c_c (csqrt, 0x1p+127L, 0x1p-149L, 1.304381782533278221234957180625250836888e19L, plus_zero, UNDERFLOW_EXCEPTION),
cdfe2c5e 7339#endif
08198877
JM
7340 TEST_c_c (csqrt, 0x1p-149L, 0x1p+127L, 9.223372036854775808000000000000000000000e18L, 9.223372036854775808000000000000000000000e18L),
7341 TEST_c_c (csqrt, 0x1.000002p-126L, 0x1.000002p-126L, 1.191195773697904627170323731331667740087e-19L, 4.934094449071842328766868579214125217132e-20L),
7342 TEST_c_c (csqrt, -0x1.000002p-126L, -0x1.000002p-126L, 4.934094449071842328766868579214125217132e-20L, -1.191195773697904627170323731331667740087e-19L),
cdfe2c5e 7343
e456826d 7344#ifndef TEST_FLOAT
08198877
JM
7345 TEST_c_c (csqrt, 0x1.fffffffffffffp+1023L, 0x1.fffffffffffffp+1023L, 1.473094556905565378990473658199034571917e+154L, 6.101757441282702188537080005372547713595e+153L),
7346 TEST_c_c (csqrt, 0x1.fffffffffffffp+1023L, 0x1p+1023L, 1.379778091031440685006200821918878702861e+154L, 3.257214233483129514781233066898042490248e+153L),
7347 TEST_c_c (csqrt, 0x1p-1074L, 0x1p-1074L, 2.442109726130830256743814843868934877597e-162L, 1.011554969366634726113090867589031782487e-162L),
7348 TEST_c_c (csqrt, 0x1p-1073L, 0x1p-1073L, 3.453664695497464982856905711457966660085e-162L, 1.430554756764195530630723976279903095110e-162L),
cdfe2c5e 7349
08198877
JM
7350 TEST_c_c (csqrt, plus_zero, 0x1p-1074L, 1.571727784702628688909515672805082228285e-162L, 1.571727784702628688909515672805082228285e-162L),
7351 TEST_c_c (csqrt, 0x1p-500L, 0x1p-1074L, 5.527147875260444560247265192192255725514e-76L, 4.469444793151709302716387622440056066334e-249L),
cdfe2c5e 7352#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MAX_EXP == 1024)
08198877 7353 TEST_c_c (csqrt, 0x1p+1023L, 0x1p-1074L, 9.480751908109176726832526455652159260085e153L, plus_zero, UNDERFLOW_EXCEPTION),
cdfe2c5e 7354#endif
08198877
JM
7355 TEST_c_c (csqrt, 0x1p-1074L, 0x1p+1023L, 6.703903964971298549787012499102923063740e153L, 6.703903964971298549787012499102923063740e153L),
7356 TEST_c_c (csqrt, 0x1.0000000000001p-1022L, 0x1.0000000000001p-1022L, 1.638872094839911521020410942677082920935e-154L, 6.788430486774966350907249113759995429568e-155L),
7357 TEST_c_c (csqrt, -0x1.0000000000001p-1022L, -0x1.0000000000001p-1022L, 6.788430486774966350907249113759995429568e-155L, -1.638872094839911521020410942677082920935e-154L),
e456826d
JM
7358#endif
7359
7360#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
7361 TEST_c_c (csqrt, 0x1.fp+16383L, 0x1.fp+16383L, 1.179514222452201722651836720466795901016e+2466L, 4.885707879516577666702435054303191575148e+2465L),
7362 TEST_c_c (csqrt, 0x1.fp+16383L, 0x1p+16383L, 1.106698967236475180613254276996359485630e+2466L, 2.687568007603946993388538156299100955642e+2465L),
7363 TEST_c_c (csqrt, 0x1p-16440L, 0x1p-16441L, 3.514690655930285351254618340783294558136e-2475L, 8.297059146828716918029689466551384219370e-2476L),
cdfe2c5e 7364
08198877
JM
7365 TEST_c_c (csqrt, plus_zero, 0x1p-16445L, 4.269191686890197837775136325621239761720e-2476L, 4.269191686890197837775136325621239761720e-2476L),
7366 TEST_c_c (csqrt, 0x1p-5000L, 0x1p-16445L, 2.660791472672778409283210520357607795518e-753L, 6.849840675828785164910701384823702064234e-4199L),
7367 TEST_c_c (csqrt, 0x1p+16383L, 0x1p-16445L, 7.712754032630730034273323365543179095045e2465L, plus_zero, UNDERFLOW_EXCEPTION),
7368 TEST_c_c (csqrt, 0x1p-16445L, 0x1p+16383L, 5.453740678097079647314921223668914312241e2465L, 5.453740678097079647314921223668914312241e2465L),
7369 TEST_c_c (csqrt, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-16382L, 2.014551439675644900131815801350165472778e-2466L, 8.344545284118961664300307045791497724440e-2467L),
7370 TEST_c_c (csqrt, -0x1.0000000000000002p-16382L, -0x1.0000000000000002p-16382L, 8.344545284118961664300307045791497724440e-2467L, -2.014551439675644900131815801350165472778e-2466L),
cdfe2c5e
JM
7371
7372# if LDBL_MANT_DIG >= 113
08198877
JM
7373 TEST_c_c (csqrt, plus_zero, 0x1p-16494L, 1.799329752913293143453817328207572571442e-2483L, 1.799329752913293143453817328207572571442e-2483L),
7374 TEST_c_c (csqrt, 0x1p-5000L, 0x1p-16494L, 2.660791472672778409283210520357607795518e-753L, 1.216776133331049643422030716668249905907e-4213L),
7375 TEST_c_c (csqrt, 0x1p+16383L, 0x1p-16494L, 7.712754032630730034273323365543179095045e2465L, plus_zero, UNDERFLOW_EXCEPTION),
7376 TEST_c_c (csqrt, 0x1p-16494L, 0x1p+16383L, 5.453740678097079647314921223668914312241e2465L, 5.453740678097079647314921223668914312241e2465L),
7377 TEST_c_c (csqrt, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-16382L, 2.014551439675644900022606748976158925145e-2466L, 8.344545284118961663847948339519226074126e-2467L),
7378 TEST_c_c (csqrt, -0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-16382L, 8.344545284118961663847948339519226074126e-2467L, -2.014551439675644900022606748976158925145e-2466L),
cdfe2c5e 7379# endif
e456826d 7380#endif
08198877
JM
7381 END_DATA (csqrt)
7382 };
8847214f
UD
7383
7384static void
08198877 7385csqrt_test (void)
8847214f 7386{
aaca11d8 7387 errno = 0;
08198877 7388 FUNC(csqrt) (BUILD_COMPLEX (-1, 0));
aaca11d8
UD
7389 if (errno == ENOSYS)
7390 /* Function not implemented. */
7391 return;
7392
08198877
JM
7393 START (csqrt);
7394 RUN_TEST_LOOP_c_c (csqrt, csqrt_test_data, );
7395 END (csqrt, complex);
7396}
8847214f 7397
08198877
JM
7398static const struct test_c_c_data ctan_test_data[] =
7399 {
7400 START_DATA (ctan),
7401 TEST_c_c (ctan, 0, 0, 0.0, 0.0),
7402 TEST_c_c (ctan, 0, minus_zero, 0.0, minus_zero),
7403 TEST_c_c (ctan, minus_zero, 0, minus_zero, 0.0),
7404 TEST_c_c (ctan, minus_zero, minus_zero, minus_zero, minus_zero),
8847214f 7405
08198877
JM
7406 TEST_c_c (ctan, 0, plus_infty, 0.0, 1.0),
7407 TEST_c_c (ctan, 1, plus_infty, 0.0, 1.0),
7408 TEST_c_c (ctan, minus_zero, plus_infty, minus_zero, 1.0),
7409 TEST_c_c (ctan, -1, plus_infty, minus_zero, 1.0),
8847214f 7410
08198877
JM
7411 TEST_c_c (ctan, 0, minus_infty, 0.0, -1.0),
7412 TEST_c_c (ctan, 1, minus_infty, 0.0, -1.0),
7413 TEST_c_c (ctan, minus_zero, minus_infty, minus_zero, -1.0),
7414 TEST_c_c (ctan, -1, minus_infty, minus_zero, -1.0),
8847214f 7415
08198877
JM
7416 TEST_c_c (ctan, plus_infty, 0, qnan_value, qnan_value, INVALID_EXCEPTION),
7417 TEST_c_c (ctan, plus_infty, 2, qnan_value, qnan_value, INVALID_EXCEPTION),
7418 TEST_c_c (ctan, minus_infty, 0, qnan_value, qnan_value, INVALID_EXCEPTION),
7419 TEST_c_c (ctan, minus_infty, 2, qnan_value, qnan_value, INVALID_EXCEPTION),
7420 TEST_c_c (ctan, plus_infty, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION),
7421 TEST_c_c (ctan, plus_infty, -2, qnan_value, qnan_value, INVALID_EXCEPTION),
7422 TEST_c_c (ctan, minus_infty, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION),
7423 TEST_c_c (ctan, minus_infty, -2, qnan_value, qnan_value, INVALID_EXCEPTION),
8847214f 7424
08198877
JM
7425 TEST_c_c (ctan, qnan_value, plus_infty, 0.0, 1.0, IGNORE_ZERO_INF_SIGN),
7426 TEST_c_c (ctan, qnan_value, minus_infty, 0.0, -1.0, IGNORE_ZERO_INF_SIGN),
8847214f 7427
08198877
JM
7428 TEST_c_c (ctan, 0, qnan_value, 0.0, qnan_value),
7429 TEST_c_c (ctan, minus_zero, qnan_value, minus_zero, qnan_value),
8847214f 7430
08198877
JM
7431 TEST_c_c (ctan, 0.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7432 TEST_c_c (ctan, -4.5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7433
08198877
JM
7434 TEST_c_c (ctan, qnan_value, 0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7435 TEST_c_c (ctan, qnan_value, 5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7436 TEST_c_c (ctan, qnan_value, minus_zero, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7437 TEST_c_c (ctan, qnan_value, -0.25, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8847214f 7438
08198877 7439 TEST_c_c (ctan, qnan_value, qnan_value, qnan_value, qnan_value),
8847214f 7440
08198877
JM
7441 TEST_c_c (ctan, 0.75L, 1.25L, 0.160807785916206426725166058173438663L, 0.975363285031235646193581759755216379L),
7442 TEST_c_c (ctan, -2, -3, 0.376402564150424829275122113032269084e-2L, -1.00323862735360980144635859782192726L),
8847214f 7443
08198877
JM
7444 TEST_c_c (ctan, 1, 45, 1.490158918874345552942703234806348520895e-39L, 1.000000000000000000000000000000000000001L, UNDERFLOW_EXCEPTION_FLOAT),
7445 TEST_c_c (ctan, 1, 47, 2.729321264492904590777293425576722354636e-41L, 1.0, UNDERFLOW_EXCEPTION_FLOAT),
bcc8d661
JM
7446
7447#ifndef TEST_FLOAT
08198877
JM
7448 TEST_c_c (ctan, 1, 355, 8.140551093483276762350406321792653551513e-309L, 1.0, UNDERFLOW_EXCEPTION_DOUBLE),
7449 TEST_c_c (ctan, 1, 365, 1.677892637497921890115075995898773550884e-317L, 1.0, UNDERFLOW_EXCEPTION_DOUBLE),
bcc8d661
JM
7450#endif
7451
7452#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877
JM
7453 TEST_c_c (ctan, 1, 5680, 4.725214596136812019616700920476949798307e-4934L, 1.0, UNDERFLOW_EXCEPTION),
7454 TEST_c_c (ctan, 1, 5690, 9.739393181626937151720816611272607059057e-4943L, 1.0, UNDERFLOW_EXCEPTION),
bcc8d661
JM
7455#endif
7456
08198877 7457 TEST_c_c (ctan, 0x3.243f6cp-1, 0, -2.287733242885645987394874673945769518150e7L, 0.0),
bcc8d661 7458
08198877 7459 TEST_c_c (ctan, 0x1p127, 1, 0.2446359391192790896381501310437708987204L, 0.9101334047676183761532873794426475906201L),
bcc8d661
JM
7460
7461#ifndef TEST_FLOAT
08198877 7462 TEST_c_c (ctan, 0x1p1023, 1, -0.2254627924997545057926782581695274244229L, 0.8786063118883068695462540226219865087189L),
bcc8d661
JM
7463#endif
7464
7465#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
08198877 7466 TEST_c_c (ctan, 0x1p16383L, 1, 0.1608598776370396607204448234354670036772L, 0.8133818522051542536316746743877629761488L),
bcc8d661
JM
7467#endif
7468
08198877
JM
7469 TEST_c_c (ctan, 50000, 50000, plus_zero, 1.0, UNDERFLOW_EXCEPTION),
7470 TEST_c_c (ctan, 50000, -50000, plus_zero, -1.0, UNDERFLOW_EXCEPTION),
7471 TEST_c_c (ctan, -50000, 50000, minus_zero, 1.0, UNDERFLOW_EXCEPTION),
7472 TEST_c_c (ctan, -50000, -50000, minus_zero, -1.0, UNDERFLOW_EXCEPTION),
7473 END_DATA (ctan)
7474 };
bcc8d661 7475
08198877
JM
7476static void
7477ctan_test (void)
7478{
7479 errno = 0;
7480 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7481 if (errno == ENOSYS)
7482 /* Function not implemented. */
7483 return;
7484
7485 START (ctan);
7486 RUN_TEST_LOOP_c_c (ctan, ctan_test_data, );
6815fabc 7487 END (ctan, complex);
8847214f
UD
7488}
7489
7490
08198877
JM
7491static const struct test_c_c_data ctan_tonearest_test_data[] =
7492 {
7493 START_DATA (ctan_tonearest),
7494 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
7495
7496#ifndef TEST_FLOAT
7497 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
7498#endif
7499
7500#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
7501 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
7502#endif
7503 END_DATA (ctan_tonearest)
7504 };
7505
ca61cf32
JM
7506static void
7507ctan_test_tonearest (void)
7508{
ca61cf32
JM
7509 errno = 0;
7510 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7511 if (errno == ENOSYS)
7512 /* Function not implemented. */
7513 return;
7514
7515 START (ctan_tonearest);
08198877
JM
7516 RUN_TEST_LOOP_c_c (ctan, ctan_tonearest_test_data, FE_TONEAREST);
7517 END (ctan_tonearest, complex);
7518}
ca61cf32 7519
ca61cf32 7520
08198877
JM
7521static const struct test_c_c_data ctan_towardzero_test_data[] =
7522 {
7523 START_DATA (ctan_towardzero),
7524 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
ca61cf32
JM
7525
7526#ifndef TEST_FLOAT
08198877 7527 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
ca61cf32
JM
7528#endif
7529
7530#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7531 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
ca61cf32 7532#endif
08198877
JM
7533 END_DATA (ctan_towardzero)
7534 };
ca61cf32
JM
7535
7536static void
7537ctan_test_towardzero (void)
7538{
ca61cf32
JM
7539 errno = 0;
7540 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7541 if (errno == ENOSYS)
7542 /* Function not implemented. */
7543 return;
7544
7545 START (ctan_towardzero);
08198877
JM
7546 RUN_TEST_LOOP_c_c (ctan, ctan_towardzero_test_data, FE_TOWARDZERO);
7547 END (ctan_towardzero, complex);
7548}
ca61cf32 7549
ca61cf32 7550
08198877
JM
7551static const struct test_c_c_data ctan_downward_test_data[] =
7552 {
7553 START_DATA (ctan_downward),
7554 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
ca61cf32
JM
7555
7556#ifndef TEST_FLOAT
08198877 7557 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
ca61cf32
JM
7558#endif
7559
7560#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7561 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
ca61cf32 7562#endif
08198877
JM
7563 END_DATA (ctan_downward)
7564 };
ca61cf32
JM
7565
7566static void
7567ctan_test_downward (void)
7568{
ca61cf32
JM
7569 errno = 0;
7570 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7571 if (errno == ENOSYS)
7572 /* Function not implemented. */
7573 return;
7574
7575 START (ctan_downward);
08198877
JM
7576 RUN_TEST_LOOP_c_c (ctan, ctan_downward_test_data, FE_DOWNWARD);
7577 END (ctan_downward, complex);
7578}
ca61cf32 7579
ca61cf32 7580
08198877
JM
7581static const struct test_c_c_data ctan_upward_test_data[] =
7582 {
7583 START_DATA (ctan_upward),
7584 TEST_c_c (ctan, 0x1.921fb6p+0, 0x1p-149, -2.287733242885645987394874673945769518150e7L, 7.334008549954377778731880988481078535821e-31L),
ca61cf32
JM
7585
7586#ifndef TEST_FLOAT
08198877 7587 TEST_c_c (ctan, 0x1.921fb54442d18p+0, 0x1p-1074, 1.633123935319536975596773704152891653086e16L, 1.317719414943508315995636961402669067843e-291L),
ca61cf32
JM
7588#endif
7589
7590#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7591 TEST_c_c (ctan, 0x1.921fb54442d1846ap+0L, 0x1p-16445L, -3.986797629811710706723242948653362815645e19L, 5.793882568875674066286163141055208625180e-4912L),
ca61cf32 7592#endif
08198877
JM
7593 END_DATA (ctan_upward)
7594 };
ca61cf32
JM
7595
7596static void
7597ctan_test_upward (void)
7598{
ca61cf32
JM
7599 errno = 0;
7600 FUNC(ctan) (BUILD_COMPLEX (0.7L, 1.2L));
7601 if (errno == ENOSYS)
7602 /* Function not implemented. */
7603 return;
7604
7605 START (ctan_upward);
08198877
JM
7606 RUN_TEST_LOOP_c_c (ctan, ctan_upward_test_data, FE_UPWARD);
7607 END (ctan_upward, complex);
7608}
ca61cf32 7609
ca61cf32 7610
08198877
JM
7611static const struct test_c_c_data ctanh_test_data[] =
7612 {
7613 START_DATA (ctanh),
7614 TEST_c_c (ctanh, 0, 0, 0.0, 0.0),
7615 TEST_c_c (ctanh, 0, minus_zero, 0.0, minus_zero),
7616 TEST_c_c (ctanh, minus_zero, 0, minus_zero, 0.0),
7617 TEST_c_c (ctanh, minus_zero, minus_zero, minus_zero, minus_zero),
7618
7619 TEST_c_c (ctanh, plus_infty, 0, 1.0, 0.0),
7620 TEST_c_c (ctanh, plus_infty, 1, 1.0, 0.0),
7621 TEST_c_c (ctanh, plus_infty, minus_zero, 1.0, minus_zero),
7622 TEST_c_c (ctanh, plus_infty, -1, 1.0, minus_zero),
7623 TEST_c_c (ctanh, minus_infty, 0, -1.0, 0.0),
7624 TEST_c_c (ctanh, minus_infty, 1, -1.0, 0.0),
7625 TEST_c_c (ctanh, minus_infty, minus_zero, -1.0, minus_zero),
7626 TEST_c_c (ctanh, minus_infty, -1, -1.0, minus_zero),
7627
7628 TEST_c_c (ctanh, 0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7629 TEST_c_c (ctanh, 2, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7630 TEST_c_c (ctanh, 0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7631 TEST_c_c (ctanh, 2, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7632 TEST_c_c (ctanh, minus_zero, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7633 TEST_c_c (ctanh, -2, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7634 TEST_c_c (ctanh, minus_zero, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7635 TEST_c_c (ctanh, -2, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
7636
7637 TEST_c_c (ctanh, plus_infty, qnan_value, 1.0, 0.0, IGNORE_ZERO_INF_SIGN),
7638 TEST_c_c (ctanh, minus_infty, qnan_value, -1.0, 0.0, IGNORE_ZERO_INF_SIGN),
7639
7640 TEST_c_c (ctanh, qnan_value, 0, qnan_value, 0.0),
7641 TEST_c_c (ctanh, qnan_value, minus_zero, qnan_value, minus_zero),
7642
7643 TEST_c_c (ctanh, qnan_value, 0.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7644 TEST_c_c (ctanh, qnan_value, -4.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7645
7646 TEST_c_c (ctanh, 0, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7647 TEST_c_c (ctanh, 5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7648 TEST_c_c (ctanh, minus_zero, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7649 TEST_c_c (ctanh, -0.25, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
7650
7651 TEST_c_c (ctanh, qnan_value, qnan_value, qnan_value, qnan_value),
7652
7653 TEST_c_c (ctanh, 0, M_PI_4l, 0.0, 1.0),
7654
7655 TEST_c_c (ctanh, 0.75L, 1.25L, 1.37260757053378320258048606571226857L, 0.385795952609750664177596760720790220L),
7656 TEST_c_c (ctanh, -2, -3, -0.965385879022133124278480269394560686L, 0.988437503832249372031403430350121098e-2L),
7657
7658 TEST_c_c (ctanh, 45, 1, 1.000000000000000000000000000000000000001L, 1.490158918874345552942703234806348520895e-39L, UNDERFLOW_EXCEPTION_FLOAT),
7659 TEST_c_c (ctanh, 47, 1, 1.0, 2.729321264492904590777293425576722354636e-41L, UNDERFLOW_EXCEPTION_FLOAT),
ca61cf32
JM
7660
7661#ifndef TEST_FLOAT
08198877
JM
7662 TEST_c_c (ctanh, 355, 1, 1.0, 8.140551093483276762350406321792653551513e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
7663 TEST_c_c (ctanh, 365, 1, 1.0, 1.677892637497921890115075995898773550884e-317L, UNDERFLOW_EXCEPTION_DOUBLE),
ca61cf32
JM
7664#endif
7665
08198877
JM
7666#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7667 TEST_c_c (ctanh, 5680, 1, 1.0, 4.725214596136812019616700920476949798307e-4934L, UNDERFLOW_EXCEPTION),
7668 TEST_c_c (ctanh, 5690, 1, 1.0, 9.739393181626937151720816611272607059057e-4943L, UNDERFLOW_EXCEPTION),
ca61cf32 7669#endif
ca61cf32 7670
08198877 7671 TEST_c_c (ctanh, 0, 0x3.243f6cp-1, 0.0, -2.287733242885645987394874673945769518150e7L),
ca61cf32 7672
08198877 7673 TEST_c_c (ctanh, 1, 0x1p127, 0.9101334047676183761532873794426475906201L, 0.2446359391192790896381501310437708987204L),
ca61cf32 7674
08198877
JM
7675#ifndef TEST_FLOAT
7676 TEST_c_c (ctanh, 1, 0x1p1023, 0.8786063118883068695462540226219865087189L, -0.2254627924997545057926782581695274244229L),
7677#endif
7678
7679#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
7680 TEST_c_c (ctanh, 1, 0x1p16383L, 0.8133818522051542536316746743877629761488L, 0.1608598776370396607204448234354670036772L),
7681#endif
7682
7683 TEST_c_c (ctanh, 50000, 50000, 1.0, plus_zero, UNDERFLOW_EXCEPTION),
7684 TEST_c_c (ctanh, 50000, -50000, 1.0, minus_zero, UNDERFLOW_EXCEPTION),
7685 TEST_c_c (ctanh, -50000, 50000, -1.0, plus_zero, UNDERFLOW_EXCEPTION),
7686 TEST_c_c (ctanh, -50000, -50000, -1.0, minus_zero, UNDERFLOW_EXCEPTION),
7687 END_DATA (ctanh)
7688 };
ca61cf32 7689
8847214f
UD
7690static void
7691ctanh_test (void)
7692{
aaca11d8
UD
7693 errno = 0;
7694 FUNC(ctanh) (BUILD_COMPLEX (0, 0));
7695 if (errno == ENOSYS)
7696 /* Function not implemented. */
7697 return;
7698
8847214f 7699 START (ctanh);
08198877
JM
7700 RUN_TEST_LOOP_c_c (ctanh, ctanh_test_data, );
7701 END (ctanh, complex);
7702}
8847214f 7703
bcc8d661 7704
08198877
JM
7705static const struct test_c_c_data ctanh_tonearest_test_data[] =
7706 {
7707 START_DATA (ctanh_tonearest),
7708 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
bcc8d661
JM
7709
7710#ifndef TEST_FLOAT
08198877 7711 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
bcc8d661
JM
7712#endif
7713
08198877
JM
7714#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
7715 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
bcc8d661 7716#endif
08198877
JM
7717 END_DATA (ctanh_tonearest)
7718 };
2550dfe9 7719
ca61cf32
JM
7720static void
7721ctanh_test_tonearest (void)
7722{
ca61cf32
JM
7723 errno = 0;
7724 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7725 if (errno == ENOSYS)
7726 /* Function not implemented. */
7727 return;
7728
7729 START (ctanh_tonearest);
08198877
JM
7730 RUN_TEST_LOOP_c_c (ctanh, ctanh_tonearest_test_data, FE_TONEAREST);
7731 END (ctanh_tonearest, complex);
7732}
ca61cf32 7733
ca61cf32 7734
08198877
JM
7735static const struct test_c_c_data ctanh_towardzero_test_data[] =
7736 {
7737 START_DATA (ctanh_towardzero),
7738 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
ca61cf32
JM
7739
7740#ifndef TEST_FLOAT
08198877 7741 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
ca61cf32
JM
7742#endif
7743
7744#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7745 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
ca61cf32 7746#endif
08198877
JM
7747 END_DATA (ctanh_towardzero)
7748 };
ca61cf32
JM
7749
7750static void
7751ctanh_test_towardzero (void)
7752{
ca61cf32
JM
7753 errno = 0;
7754 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7755 if (errno == ENOSYS)
7756 /* Function not implemented. */
7757 return;
7758
7759 START (ctanh_towardzero);
08198877
JM
7760 RUN_TEST_LOOP_c_c (ctanh, ctanh_towardzero_test_data, FE_TOWARDZERO);
7761 END (ctanh_towardzero, complex);
7762}
ca61cf32 7763
ca61cf32 7764
08198877
JM
7765static const struct test_c_c_data ctanh_downward_test_data[] =
7766 {
7767 START_DATA (ctanh_downward),
7768 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
ca61cf32
JM
7769
7770#ifndef TEST_FLOAT
08198877 7771 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
ca61cf32
JM
7772#endif
7773
7774#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7775 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
ca61cf32 7776#endif
08198877
JM
7777 END_DATA (ctanh_downward)
7778 };
ca61cf32
JM
7779
7780static void
7781ctanh_test_downward (void)
7782{
ca61cf32
JM
7783 errno = 0;
7784 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7785 if (errno == ENOSYS)
7786 /* Function not implemented. */
7787 return;
7788
7789 START (ctanh_downward);
08198877
JM
7790 RUN_TEST_LOOP_c_c (ctanh, ctanh_downward_test_data, FE_DOWNWARD);
7791 END (ctanh_downward, complex);
7792}
ca61cf32 7793
ca61cf32 7794
08198877
JM
7795static const struct test_c_c_data ctanh_upward_test_data[] =
7796 {
7797 START_DATA (ctanh_upward),
7798 TEST_c_c (ctanh, 0x1p-149, 0x1.921fb6p+0, 7.334008549954377778731880988481078535821e-31L, -2.287733242885645987394874673945769518150e7L),
ca61cf32
JM
7799
7800#ifndef TEST_FLOAT
08198877 7801 TEST_c_c (ctanh, 0x1p-1074, 0x1.921fb54442d18p+0, 1.317719414943508315995636961402669067843e-291L, 1.633123935319536975596773704152891653086e16L),
ca61cf32
JM
7802#endif
7803
7804#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
08198877 7805 TEST_c_c (ctanh, 0x1p-16445L, 0x1.921fb54442d1846ap+0L, 5.793882568875674066286163141055208625180e-4912L, -3.986797629811710706723242948653362815645e19L),
ca61cf32 7806#endif
08198877
JM
7807 END_DATA (ctanh_upward)
7808 };
ca61cf32
JM
7809
7810static void
7811ctanh_test_upward (void)
7812{
ca61cf32
JM
7813 errno = 0;
7814 FUNC(ctanh) (BUILD_COMPLEX (0.7L, 1.2L));
7815 if (errno == ENOSYS)
7816 /* Function not implemented. */
7817 return;
7818
7819 START (ctanh_upward);
08198877 7820 RUN_TEST_LOOP_c_c (ctanh, ctanh_upward_test_data, FE_UPWARD);
ca61cf32
JM
7821 END (ctanh_upward, complex);
7822}
7823
7824
74c57478
JM
7825static const struct test_f_f_data erf_test_data[] =
7826 {
7827 START_DATA (erf),
7828 TEST_f_f (erf, 0, 0),
7829 TEST_f_f (erf, minus_zero, minus_zero),
7830 TEST_f_f (erf, plus_infty, 1),
7831 TEST_f_f (erf, minus_infty, -1),
7832 TEST_f_f (erf, qnan_value, qnan_value),
7833
7834 TEST_f_f (erf, 0.125L, 0.140316204801333817393029446521623398L),
7835 TEST_f_f (erf, 0.75L, 0.711155633653515131598937834591410777L),
7836 TEST_f_f (erf, 1.25L, 0.922900128256458230136523481197281140L),
7837 TEST_f_f (erf, 2.0L, 0.995322265018952734162069256367252929L),
7838 TEST_f_f (erf, 4.125L, 0.999999994576599200434933994687765914L),
7839 TEST_f_f (erf, 27.0L, 1.0L),
7840 END_DATA (erf)
7841 };
7842
8847214f
UD
7843static void
7844erf_test (void)
7845{
7846 errno = 0;
7847 FUNC(erf) (0);
7848 if (errno == ENOSYS)
7849 /* Function not implemented. */
7850 return;
7851
7852 START (erf);
74c57478 7853 RUN_TEST_LOOP_f_f (erf, erf_test_data, );
8847214f
UD
7854 END (erf);
7855}
7856
7857
74c57478
JM
7858static const struct test_f_f_data erfc_test_data[] =
7859 {
7860 START_DATA (erfc),
7861 TEST_f_f (erfc, plus_infty, 0.0),
7862 TEST_f_f (erfc, minus_infty, 2.0),
7863 TEST_f_f (erfc, 0.0, 1.0),
7864 TEST_f_f (erfc, minus_zero, 1.0),
7865 TEST_f_f (erfc, qnan_value, qnan_value),
7866
7867 TEST_f_f (erfc, 0.125L, 0.859683795198666182606970553478376602L),
7868 TEST_f_f (erfc, 0.75L, 0.288844366346484868401062165408589223L),
7869 TEST_f_f (erfc, 1.25L, 0.0770998717435417698634765188027188596L),
7870 TEST_f_f (erfc, 2.0L, 0.00467773498104726583793074363274707139L),
7871 TEST_f_f (erfc, 0x1.f7303cp+1L, 2.705500297238986897105236321218861842255e-8L),
7872 TEST_f_f (erfc, 4.125L, 0.542340079956506600531223408575531062e-8L),
7873 TEST_f_f (erfc, 0x1.ffa002p+2L, 1.233585992097580296336099501489175967033e-29L),
7874 TEST_f_f (erfc, 0x1.ffffc8p+2L, 1.122671365033056305522366683719541099329e-29L),
2550dfe9 7875#ifdef TEST_LDOUBLE
74c57478 7876 /* The result can only be represented in long double. */
f964490f 7877# if LDBL_MIN_10_EXP < -319
74c57478 7878 TEST_f_f (erfc, 27.0L, 0.523704892378925568501606768284954709e-318L),
f964490f 7879# endif
7b1902cb 7880# if LDBL_MANT_DIG >= 106
74c57478 7881 TEST_f_f (erfc, 0x1.ffff56789abcdef0123456789a8p+2L, 1.123161416304655390092138725253789378459e-29L),
7b1902cb 7882# endif
2550dfe9 7883#endif
74c57478
JM
7884 END_DATA (erfc)
7885 };
2550dfe9 7886
8847214f 7887static void
74c57478 7888erfc_test (void)
8847214f 7889{
e6d3c4a7 7890 errno = 0;
74c57478 7891 FUNC(erfc) (0);
e6d3c4a7
AJ
7892 if (errno == ENOSYS)
7893 /* Function not implemented. */
7894 return;
7895
74c57478
JM
7896 START (erfc);
7897 RUN_TEST_LOOP_f_f (erfc, erfc_test_data, );
7898 END (erfc);
7899}
8847214f 7900
74c57478
JM
7901
7902static const struct test_f_f_data exp_test_data[] =
7903 {
7904 START_DATA (exp),
7905 TEST_f_f (exp, 0, 1),
7906 TEST_f_f (exp, minus_zero, 1),
8847214f 7907
15daa639 7908#ifndef TEST_INLINE
74c57478
JM
7909 TEST_f_f (exp, plus_infty, plus_infty),
7910 TEST_f_f (exp, minus_infty, 0),
15daa639 7911#endif
74c57478
JM
7912 TEST_f_f (exp, qnan_value, qnan_value),
7913 TEST_f_f (exp, 1, M_El),
8847214f 7914
74c57478
JM
7915 TEST_f_f (exp, 2, M_E2l),
7916 TEST_f_f (exp, 3, M_E3l),
7917 TEST_f_f (exp, 0.75L, 2.11700001661267466854536981983709561L),
7918 TEST_f_f (exp, 50.0L, 5184705528587072464087.45332293348538L),
7919 TEST_f_f (exp, 88.72269439697265625L, 3.40233126623160774937554134772290447915e38L),
e42a38dd 7920#ifndef TEST_FLOAT
74c57478 7921 TEST_f_f (exp, 709.75L, 1.739836873264160557698252711673830393864768e+308L),
e42a38dd 7922#endif
8fb0af98 7923#if defined TEST_LDOUBLE && __LDBL_MAX_EXP__ > 1024
74c57478
JM
7924 /* The result can only be represented in sane long double. */
7925 TEST_f_f (exp, 1000.0L, 0.197007111401704699388887935224332313e435L),
4c95adde 7926#endif
2550dfe9 7927
41498f4d 7928#if !(defined TEST_LDOUBLE && LDBL_MAX_EXP > 1024)
74c57478
JM
7929 TEST_f_f (exp, 710, plus_infty, OVERFLOW_EXCEPTION),
7930 TEST_f_f (exp, -1234, plus_zero, UNDERFLOW_EXCEPTION),
41498f4d 7931#endif
74c57478
JM
7932 TEST_f_f (exp, 1e5, plus_infty, OVERFLOW_EXCEPTION),
7933 TEST_f_f (exp, max_value, plus_infty, OVERFLOW_EXCEPTION),
7934 TEST_f_f (exp, -max_value, 0, UNDERFLOW_EXCEPTION),
7935 END_DATA (exp)
7936 };
7937
7938static void
7939exp_test (void)
7940{
7941 errno = 0;
7942 FUNC(exp) (0);
7943 if (errno == ENOSYS)
7944 /* Function not implemented. */
7945 return;
41bf21a1 7946
74c57478
JM
7947 START (exp);
7948 RUN_TEST_LOOP_f_f (exp, exp_test_data, );
8847214f
UD
7949 END (exp);
7950}
7951
7952
74c57478
JM
7953static const struct test_f_f_data exp_tonearest_test_data[] =
7954 {
7955 START_DATA (exp_tonearest),
7956 TEST_f_f (exp, 1, M_El),
7957 TEST_f_f (exp, 2, M_E2l),
7958 TEST_f_f (exp, 3, M_E3l),
7959 END_DATA (exp_tonearest)
7960 };
7961
28afd92d
JM
7962static void
7963exp_test_tonearest (void)
7964{
28afd92d
JM
7965 errno = 0;
7966 FUNC(exp) (0);
7967 if (errno == ENOSYS)
7968 /* Function not implemented. */
7969 return;
7970
7971 START (exp_tonearest);
74c57478 7972 RUN_TEST_LOOP_f_f (exp, exp_tonearest_test_data, FE_TONEAREST);
28afd92d
JM
7973 END (exp_tonearest);
7974}
7975
7976
74c57478
JM
7977static const struct test_f_f_data exp_towardzero_test_data[] =
7978 {
7979 START_DATA (exp_towardzero),
7980 TEST_f_f (exp, 1, M_El),
7981 TEST_f_f (exp, 2, M_E2l),
7982 TEST_f_f (exp, 3, M_E3l),
7983 END_DATA (exp_towardzero)
7984 };
7985
28afd92d
JM
7986static void
7987exp_test_towardzero (void)
7988{
28afd92d
JM
7989 errno = 0;
7990 FUNC(exp) (0);
7991 if (errno == ENOSYS)
7992 /* Function not implemented. */
7993 return;
7994
7995 START (exp_towardzero);
74c57478 7996 RUN_TEST_LOOP_f_f (exp, exp_towardzero_test_data, FE_TOWARDZERO);
28afd92d
JM
7997 END (exp_towardzero);
7998}
7999
8000
74c57478
JM
8001static const struct test_f_f_data exp_downward_test_data[] =
8002 {
8003 START_DATA (exp_downward),
8004 TEST_f_f (exp, 1, M_El),
8005 TEST_f_f (exp, 2, M_E2l),
8006 TEST_f_f (exp, 3, M_E3l),
8007 END_DATA (exp_downward)
8008 };
8009
28afd92d
JM
8010static void
8011exp_test_downward (void)
8012{
28afd92d
JM
8013 errno = 0;
8014 FUNC(exp) (0);
8015 if (errno == ENOSYS)
8016 /* Function not implemented. */
8017 return;
8018
8019 START (exp_downward);
74c57478 8020 RUN_TEST_LOOP_f_f (exp, exp_downward_test_data, FE_DOWNWARD);
28afd92d
JM
8021 END (exp_downward);
8022}
8023
8024
74c57478
JM
8025static const struct test_f_f_data exp_upward_test_data[] =
8026 {
8027 START_DATA (exp_upward),
8028 TEST_f_f (exp, 1, M_El),
8029 TEST_f_f (exp, 2, M_E2l),
8030 TEST_f_f (exp, 3, M_E3l),
8031 END_DATA (exp_upward)
8032 };
8033
28afd92d
JM
8034static void
8035exp_test_upward (void)
8036{
28afd92d
JM
8037 errno = 0;
8038 FUNC(exp) (0);
8039 if (errno == ENOSYS)
8040 /* Function not implemented. */
8041 return;
8042
8043 START (exp_upward);
74c57478 8044 RUN_TEST_LOOP_f_f (exp, exp_upward_test_data, FE_UPWARD);
28afd92d
JM
8045 END (exp_upward);
8046}
8047
8048
74c57478
JM
8049static const struct test_f_f_data exp10_test_data[] =
8050 {
8051 START_DATA (exp10),
8052 TEST_f_f (exp10, 0, 1),
8053 TEST_f_f (exp10, minus_zero, 1),
8054
8055 TEST_f_f (exp10, plus_infty, plus_infty),
8056 TEST_f_f (exp10, minus_infty, 0),
8057 TEST_f_f (exp10, qnan_value, qnan_value),
8058 TEST_f_f (exp10, 3, 1000),
8059 TEST_f_f (exp10, -1, 0.1L),
8060 TEST_f_f (exp10, 36, 1.0e36L),
8061 TEST_f_f (exp10, -36, 1.0e-36L),
8062#ifndef TEST_FLOAT
8063 TEST_f_f (exp10, 305, 1.0e305L),
8064 TEST_f_f (exp10, -305, 1.0e-305L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
8065#endif
8066#if defined TEST_LDOUBLE && LDBL_MAX_10_EXP >= 4932
8067 TEST_f_f (exp10, 4932, 1.0e4932L),
8068 TEST_f_f (exp10, -4932, 1.0e-4932L, UNDERFLOW_EXCEPTION),
8069#endif
8070 TEST_f_f (exp10, 1e6, plus_infty, OVERFLOW_EXCEPTION),
8071 TEST_f_f (exp10, -1e6, 0, UNDERFLOW_EXCEPTION),
8072 TEST_f_f (exp10, max_value, plus_infty, OVERFLOW_EXCEPTION),
8073 TEST_f_f (exp10, -max_value, 0, UNDERFLOW_EXCEPTION),
8074 TEST_f_f (exp10, 0.75L, 5.62341325190349080394951039776481231L),
8075 END_DATA (exp10)
8076 };
8077
8847214f
UD
8078static void
8079exp10_test (void)
8080{
8081 errno = 0;
8082 FUNC(exp10) (0);
8083 if (errno == ENOSYS)
8084 /* Function not implemented. */
8085 return;
8086
8087 START (exp10);
74c57478
JM
8088 RUN_TEST_LOOP_f_f (exp10, exp10_test_data, );
8089 END (exp10);
8090}
8091
8092
8093static const struct test_f_f_data exp2_test_data[] =
8094 {
8095 START_DATA (exp2),
8096 TEST_f_f (exp2, 0, 1),
8097 TEST_f_f (exp2, minus_zero, 1),
8098 TEST_f_f (exp2, plus_infty, plus_infty),
8099 TEST_f_f (exp2, minus_infty, 0),
8100 TEST_f_f (exp2, qnan_value, qnan_value),
8101
8102 TEST_f_f (exp2, 10, 1024),
8103 TEST_f_f (exp2, -1, 0.5),
8104 TEST_f_f (exp2, 1e6, plus_infty, OVERFLOW_EXCEPTION),
8105 TEST_f_f (exp2, -1e6, 0, UNDERFLOW_EXCEPTION),
8106 TEST_f_f (exp2, max_value, plus_infty, OVERFLOW_EXCEPTION),
8107 TEST_f_f (exp2, -max_value, 0, UNDERFLOW_EXCEPTION),
8108 TEST_f_f (exp2, 0.75L, 1.68179283050742908606225095246642979L),
8847214f 8109
74c57478
JM
8110 TEST_f_f (exp2, 100.5, 1.792728671193156477399422023278661496394e+30L),
8111 TEST_f_f (exp2, 127, 0x1p127),
8112 TEST_f_f (exp2, -149, 0x1p-149),
8847214f 8113
d8b82cad 8114#ifndef TEST_FLOAT
74c57478
JM
8115 TEST_f_f (exp2, 1000.25, 1.274245659452564874772384918171765416737e+301L),
8116 TEST_f_f (exp2, 1023, 0x1p1023),
8117 TEST_f_f (exp2, -1074, 0x1p-1074),
9568c0c2 8118#endif
8847214f 8119
74c57478
JM
8120#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
8121 TEST_f_f (exp2, 16383, 0x1p16383L),
8122 TEST_f_f (exp2, -16400, 0x1p-16400L),
8123#endif
8124 END_DATA (exp2)
8125 };
2550dfe9 8126
8847214f
UD
8127static void
8128exp2_test (void)
8129{
8130 errno = 0;
8131 FUNC(exp2) (0);
8132 if (errno == ENOSYS)
8133 /* Function not implemented. */
8134 return;
8135
8136 START (exp2);
74c57478
JM
8137 RUN_TEST_LOOP_f_f (exp2, exp2_test_data, );
8138 END (exp2);
8139}
8847214f 8140
15daa639 8141
74c57478
JM
8142static const struct test_f_f_data expm1_test_data[] =
8143 {
8144 START_DATA (expm1),
8145 TEST_f_f (expm1, 0, 0),
8146 TEST_f_f (expm1, minus_zero, minus_zero),
8147
8148#ifndef TEST_INLINE
8149 TEST_f_f (expm1, plus_infty, plus_infty),
8150 TEST_f_f (expm1, minus_infty, -1),
8151#endif
8152 TEST_f_f (expm1, qnan_value, qnan_value),
8153
8154 TEST_f_f (expm1, 1, M_El - 1.0),
8155 TEST_f_f (expm1, 0.75L, 1.11700001661267466854536981983709561L),
8847214f 8156
74c57478 8157 TEST_f_f (expm1, 50.0L, 5.1847055285870724640864533229334853848275e+21L),
48e44791
JM
8158
8159#ifndef TEST_FLOAT
74c57478
JM
8160 TEST_f_f (expm1, 127.0L, 1.4302079958348104463583671072905261080748e+55L),
8161 TEST_f_f (expm1, 500.0L, 1.4035922178528374107397703328409120821806e+217L),
48e44791
JM
8162#endif
8163
8164#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM
8165 TEST_f_f (expm1, 11356.25L, 9.05128237311923300051376115753226014206e+4931L),
8166#endif
8167
8168 TEST_f_f (expm1, -10.0, -0.9999546000702375151484644084844394493898L),
8169 TEST_f_f (expm1, -16.0, -0.9999998874648252807408854862248209398728L),
8170 TEST_f_f (expm1, -17.0, -0.9999999586006228121483334034897228104472L),
8171 TEST_f_f (expm1, -18.0, -0.9999999847700202552873715638633707664826L),
8172 TEST_f_f (expm1, -36.0, -0.9999999999999997680477169756430611687736L),
8173 TEST_f_f (expm1, -37.0, -0.9999999999999999146695237425593420572195L),
8174 TEST_f_f (expm1, -38.0, -0.9999999999999999686086720795197037129104L),
8175 TEST_f_f (expm1, -44.0, -0.9999999999999999999221886775886620348429L),
8176 TEST_f_f (expm1, -45.0, -0.9999999999999999999713748141945060635553L),
8177 TEST_f_f (expm1, -46.0, -0.9999999999999999999894693826424461876212L),
8178 TEST_f_f (expm1, -73.0, -0.9999999999999999999999999999999802074012L),
8179 TEST_f_f (expm1, -74.0, -0.9999999999999999999999999999999927187098L),
8180 TEST_f_f (expm1, -75.0, -0.9999999999999999999999999999999973213630L),
8181 TEST_f_f (expm1, -78.0, -0.9999999999999999999999999999999998666385L),
8182 TEST_f_f (expm1, -79.0, -0.9999999999999999999999999999999999509391L),
8183 TEST_f_f (expm1, -80.0, -0.9999999999999999999999999999999999819515L),
8184 TEST_f_f (expm1, -100.0, -1.0),
8185 TEST_f_f (expm1, -1000.0, -1.0),
8186 TEST_f_f (expm1, -10000.0, -1.0),
8187 TEST_f_f (expm1, -100000.0, -1.0),
8188
8189 TEST_f_f (expm1, 100000.0, plus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
8190 TEST_f_f (expm1, max_value, plus_infty, OVERFLOW_EXCEPTION),
8191 TEST_f_f (expm1, -max_value, -1),
8192 END_DATA (expm1)
8193 };
2550dfe9 8194
8847214f
UD
8195static void
8196expm1_test (void)
8197{
e6d3c4a7
AJ
8198 errno = 0;
8199 FUNC(expm1) (0);
8200 if (errno == ENOSYS)
8201 /* Function not implemented. */
8202 return;
8203
8847214f 8204 START (expm1);
74c57478
JM
8205 RUN_TEST_LOOP_f_f (expm1, expm1_test_data, );
8206 END (expm1);
8207}
8847214f 8208
495fd99f 8209
74c57478
JM
8210static const struct test_f_f_data fabs_test_data[] =
8211 {
8212 START_DATA (fabs),
8213 TEST_f_f (fabs, 0, 0),
8214 TEST_f_f (fabs, minus_zero, 0),
bbc5d74d 8215
74c57478
JM
8216 TEST_f_f (fabs, plus_infty, plus_infty),
8217 TEST_f_f (fabs, minus_infty, plus_infty),
8218 TEST_f_f (fabs, qnan_value, qnan_value),
8847214f 8219
74c57478
JM
8220 TEST_f_f (fabs, 38.0, 38.0),
8221 TEST_f_f (fabs, -M_El, M_El),
8222 END_DATA (fabs)
8223 };
2550dfe9 8224
8847214f
UD
8225static void
8226fabs_test (void)
8227{
8228 START (fabs);
74c57478 8229 RUN_TEST_LOOP_f_f (fabs, fabs_test_data, );
8847214f
UD
8230 END (fabs);
8231}
8232
2550dfe9 8233
601a3a5f
JM
8234static const struct test_ff_f_data fdim_test_data[] =
8235 {
8236 START_DATA (fdim),
8237 TEST_ff_f (fdim, 0, 0, 0),
8238 TEST_ff_f (fdim, 9, 0, 9),
8239 TEST_ff_f (fdim, 0, 9, 0),
8240 TEST_ff_f (fdim, -9, 0, 0),
8241 TEST_ff_f (fdim, 0, -9, 9),
8242
8243 TEST_ff_f (fdim, plus_infty, 9, plus_infty),
8244 TEST_ff_f (fdim, plus_infty, -9, plus_infty),
8245 TEST_ff_f (fdim, minus_infty, 9, 0),
8246 TEST_ff_f (fdim, minus_infty, -9, 0),
8247 TEST_ff_f (fdim, 9, minus_infty, plus_infty),
8248 TEST_ff_f (fdim, -9, minus_infty, plus_infty),
8249 TEST_ff_f (fdim, 9, plus_infty, 0),
8250 TEST_ff_f (fdim, -9, plus_infty, 0),
8251
8252 TEST_ff_f (fdim, 0, qnan_value, qnan_value),
8253 TEST_ff_f (fdim, 9, qnan_value, qnan_value),
8254 TEST_ff_f (fdim, -9, qnan_value, qnan_value),
8255 TEST_ff_f (fdim, qnan_value, 9, qnan_value),
8256 TEST_ff_f (fdim, qnan_value, -9, qnan_value),
8257 TEST_ff_f (fdim, plus_infty, qnan_value, qnan_value),
8258 TEST_ff_f (fdim, minus_infty, qnan_value, qnan_value),
8259 TEST_ff_f (fdim, qnan_value, plus_infty, qnan_value),
8260 TEST_ff_f (fdim, qnan_value, minus_infty, qnan_value),
8261 TEST_ff_f (fdim, qnan_value, qnan_value, qnan_value),
8262
8263 TEST_ff_f (fdim, plus_infty, plus_infty, 0),
8264 END_DATA (fdim)
8265 };
8266
8847214f
UD
8267static void
8268fdim_test (void)
8269{
8270 START (fdim);
601a3a5f 8271 RUN_TEST_LOOP_ff_f (fdim, fdim_test_data, );
8847214f
UD
8272 END (fdim);
8273}
8274
2550dfe9 8275
ef1bb361
JM
8276static void
8277finite_test (void)
8278{
8279 START (finite);
8280
8281 TEST_f_b (finite, 0, 1);
8282 TEST_f_b (finite, minus_zero, 1);
8283 TEST_f_b (finite, 10, 1);
8284 TEST_f_b (finite, min_subnorm_value, 1);
8285 TEST_f_b (finite, plus_infty, 0);
8286 TEST_f_b (finite, minus_infty, 0);
67e971f1 8287 TEST_f_b (finite, qnan_value, 0);
ef1bb361
JM
8288
8289 END (finite);
8290}
8291
8292
74c57478
JM
8293static const struct test_f_f_data floor_test_data[] =
8294 {
8295 START_DATA (floor),
8296 TEST_f_f (floor, 0.0, 0.0),
8297 TEST_f_f (floor, minus_zero, minus_zero),
8298 TEST_f_f (floor, plus_infty, plus_infty),
8299 TEST_f_f (floor, minus_infty, minus_infty),
8300 TEST_f_f (floor, qnan_value, qnan_value),
8301
8302 TEST_f_f (floor, M_PIl, 3.0),
8303 TEST_f_f (floor, -M_PIl, -4.0),
8304
8305 TEST_f_f (floor, 0.1, 0.0),
8306 TEST_f_f (floor, 0.25, 0.0),
8307 TEST_f_f (floor, 0.625, 0.0),
8308 TEST_f_f (floor, -0.1, -1.0),
8309 TEST_f_f (floor, -0.25, -1.0),
8310 TEST_f_f (floor, -0.625, -1.0),
f964490f
RM
8311
8312#ifdef TEST_LDOUBLE
74c57478
JM
8313 /* The result can only be represented in long double. */
8314 TEST_f_f (floor, 4503599627370495.5L, 4503599627370495.0L),
8315 TEST_f_f (floor, 4503599627370496.25L, 4503599627370496.0L),
8316 TEST_f_f (floor, 4503599627370496.5L, 4503599627370496.0L),
8317 TEST_f_f (floor, 4503599627370496.75L, 4503599627370496.0L),
8318 TEST_f_f (floor, 4503599627370497.5L, 4503599627370497.0L),
5c68d401 8319# if LDBL_MANT_DIG > 100
74c57478
JM
8320 TEST_f_f (floor, 4503599627370494.5000000000001L, 4503599627370494.0L),
8321 TEST_f_f (floor, 4503599627370495.5000000000001L, 4503599627370495.0L),
8322 TEST_f_f (floor, 4503599627370496.5000000000001L, 4503599627370496.0L),
5c68d401 8323# endif
f964490f 8324
74c57478
JM
8325 TEST_f_f (floor, -4503599627370495.5L, -4503599627370496.0L),
8326 TEST_f_f (floor, -4503599627370496.25L, -4503599627370497.0L),
8327 TEST_f_f (floor, -4503599627370496.5L, -4503599627370497.0L),
8328 TEST_f_f (floor, -4503599627370496.75L, -4503599627370497.0L),
8329 TEST_f_f (floor, -4503599627370497.5L, -4503599627370498.0L),
5c68d401 8330# if LDBL_MANT_DIG > 100
74c57478
JM
8331 TEST_f_f (floor, -4503599627370494.5000000000001L, -4503599627370495.0L),
8332 TEST_f_f (floor, -4503599627370495.5000000000001L, -4503599627370496.0L),
8333 TEST_f_f (floor, -4503599627370496.5000000000001L, -4503599627370497.0L),
5c68d401 8334# endif
f964490f 8335
74c57478
JM
8336 TEST_f_f (floor, 9007199254740991.5L, 9007199254740991.0L),
8337 TEST_f_f (floor, 9007199254740992.25L, 9007199254740992.0L),
8338 TEST_f_f (floor, 9007199254740992.5L, 9007199254740992.0L),
8339 TEST_f_f (floor, 9007199254740992.75L, 9007199254740992.0L),
8340 TEST_f_f (floor, 9007199254740993.5L, 9007199254740993.0L),
f964490f 8341
5c68d401 8342# if LDBL_MANT_DIG > 100
74c57478
JM
8343 TEST_f_f (floor, 9007199254740991.0000000000001L, 9007199254740991.0L),
8344 TEST_f_f (floor, 9007199254740992.0000000000001L, 9007199254740992.0L),
8345 TEST_f_f (floor, 9007199254740993.0000000000001L, 9007199254740993.0L),
8346 TEST_f_f (floor, 9007199254740991.5000000000001L, 9007199254740991.0L),
8347 TEST_f_f (floor, 9007199254740992.5000000000001L, 9007199254740992.0L),
8348 TEST_f_f (floor, 9007199254740993.5000000000001L, 9007199254740993.0L),
5c68d401
RM
8349# endif
8350
74c57478
JM
8351 TEST_f_f (floor, -9007199254740991.5L, -9007199254740992.0L),
8352 TEST_f_f (floor, -9007199254740992.25L, -9007199254740993.0L),
8353 TEST_f_f (floor, -9007199254740992.5L, -9007199254740993.0L),
8354 TEST_f_f (floor, -9007199254740992.75L, -9007199254740993.0L),
8355 TEST_f_f (floor, -9007199254740993.5L, -9007199254740994.0L),
f964490f 8356
5c68d401 8357# if LDBL_MANT_DIG > 100
74c57478
JM
8358 TEST_f_f (floor, -9007199254740991.0000000000001L, -9007199254740992.0L),
8359 TEST_f_f (floor, -9007199254740992.0000000000001L, -9007199254740993.0L),
8360 TEST_f_f (floor, -9007199254740993.0000000000001L, -9007199254740994.0L),
8361 TEST_f_f (floor, -9007199254740991.5000000000001L, -9007199254740992.0L),
8362 TEST_f_f (floor, -9007199254740992.5000000000001L, -9007199254740993.0L),
8363 TEST_f_f (floor, -9007199254740993.5000000000001L, -9007199254740994.0L),
5c68d401
RM
8364# endif
8365
74c57478
JM
8366 TEST_f_f (floor, 72057594037927935.5L, 72057594037927935.0L),
8367 TEST_f_f (floor, 72057594037927936.25L, 72057594037927936.0L),
8368 TEST_f_f (floor, 72057594037927936.5L, 72057594037927936.0L),
8369 TEST_f_f (floor, 72057594037927936.75L, 72057594037927936.0L),
8370 TEST_f_f (floor, 72057594037927937.5L, 72057594037927937.0L),
f964490f 8371
74c57478
JM
8372 TEST_f_f (floor, -72057594037927935.5L, -72057594037927936.0L),
8373 TEST_f_f (floor, -72057594037927936.25L, -72057594037927937.0L),
8374 TEST_f_f (floor, -72057594037927936.5L, -72057594037927937.0L),
8375 TEST_f_f (floor, -72057594037927936.75L, -72057594037927937.0L),
8376 TEST_f_f (floor, -72057594037927937.5L, -72057594037927938.0L),
f964490f 8377
74c57478
JM
8378 TEST_f_f (floor, 10141204801825835211973625643007.5L, 10141204801825835211973625643007.0L),
8379 TEST_f_f (floor, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
8380 TEST_f_f (floor, 10141204801825835211973625643008.5L, 10141204801825835211973625643008.0L),
8381 TEST_f_f (floor, 10141204801825835211973625643008.75L, 10141204801825835211973625643008.0L),
8382 TEST_f_f (floor, 10141204801825835211973625643009.5L, 10141204801825835211973625643009.0L),
94e02fc4 8383
74c57478
JM
8384 TEST_f_f (floor, 0xf.ffffffffffffff8p+47L, 0xf.fffffffffffep+47L),
8385 TEST_f_f (floor, -0x8.000000000000004p+48L, -0x8.000000000001p+48L),
f964490f 8386#endif
74c57478
JM
8387 END_DATA (floor)
8388 };
f964490f 8389
74c57478
JM
8390static void
8391floor_test (void)
8392{
8393 START (floor);
8394 RUN_TEST_LOOP_f_f (floor, floor_test_data, );
8847214f
UD
8395 END (floor);
8396}
8397
2550dfe9 8398
4f184d30
JM
8399static const struct test_fff_f_data fma_test_data[] =
8400 {
8401 START_DATA (fma),
8402 TEST_fff_f (fma, 1.0, 2.0, 3.0, 5.0),
8403 TEST_fff_f (fma, qnan_value, 2.0, 3.0, qnan_value),
8404 TEST_fff_f (fma, 1.0, qnan_value, 3.0, qnan_value),
8405 TEST_fff_f (fma, 1.0, 2.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8406 TEST_fff_f (fma, plus_infty, 0.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8407 TEST_fff_f (fma, minus_infty, 0.0, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8408 TEST_fff_f (fma, 0.0, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8409 TEST_fff_f (fma, 0.0, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
8410 TEST_fff_f (fma, plus_infty, 0.0, 1.0, qnan_value, INVALID_EXCEPTION),
8411 TEST_fff_f (fma, minus_infty, 0.0, 1.0, qnan_value, INVALID_EXCEPTION),
8412 TEST_fff_f (fma, 0.0, plus_infty, 1.0, qnan_value, INVALID_EXCEPTION),
8413 TEST_fff_f (fma, 0.0, minus_infty, 1.0, qnan_value, INVALID_EXCEPTION),
8414
8415 TEST_fff_f (fma, plus_infty, plus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
8416 TEST_fff_f (fma, minus_infty, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8417 TEST_fff_f (fma, plus_infty, minus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8418 TEST_fff_f (fma, minus_infty, minus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
8419 TEST_fff_f (fma, plus_infty, 3.5L, minus_infty, qnan_value, INVALID_EXCEPTION),
8420 TEST_fff_f (fma, minus_infty, -7.5L, minus_infty, qnan_value, INVALID_EXCEPTION),
8421 TEST_fff_f (fma, -13.5L, plus_infty, plus_infty, qnan_value, INVALID_EXCEPTION),
8422 TEST_fff_f (fma, minus_infty, 7.5L, plus_infty, qnan_value, INVALID_EXCEPTION),
8423
8424 TEST_fff_f (fma, 1.25L, 0.75L, 0.0625L, 1.0L),
8425
8426 TEST_fff_f (fma, -max_value, -max_value, minus_infty, minus_infty),
8427 TEST_fff_f (fma, max_value / 2, max_value / 2, minus_infty, minus_infty),
8428 TEST_fff_f (fma, -max_value, max_value, plus_infty, plus_infty),
8429 TEST_fff_f (fma, max_value / 2, -max_value / 4, plus_infty, plus_infty),
8430 TEST_fff_f (fma, plus_infty, 4, plus_infty, plus_infty),
8431 TEST_fff_f (fma, 2, minus_infty, minus_infty, minus_infty),
8432 TEST_fff_f (fma, minus_infty, minus_infty, plus_infty, plus_infty),
8433 TEST_fff_f (fma, plus_infty, minus_infty, minus_infty, minus_infty),
8434
8435 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
8436 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, plus_zero),
8437 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, plus_zero),
8438 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
8439 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, plus_zero),
8440 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
8441 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
8442 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, plus_zero),
8443 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
8444 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, plus_zero),
8445 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, plus_zero),
8446 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
8447 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, plus_zero),
8448 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
8449 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
8450 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, plus_zero),
8451 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
8452 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, plus_zero),
8453 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, plus_zero),
8454 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
8455 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, plus_zero),
8456 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
8457 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
8458 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, plus_zero),
8459
8460 TEST_fff_f (fma, 1.0, 1.0, -1.0, plus_zero),
8461 TEST_fff_f (fma, 1.0, -1.0, 1.0, plus_zero),
8462 TEST_fff_f (fma, -1.0, 1.0, 1.0, plus_zero),
8463 TEST_fff_f (fma, -1.0, -1.0, -1.0, plus_zero),
8464
8465 TEST_fff_f (fma, min_value, min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8466 TEST_fff_f (fma, min_value, min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8467 TEST_fff_f (fma, min_value, -min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8468 TEST_fff_f (fma, min_value, -min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8469 TEST_fff_f (fma, -min_value, min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8470 TEST_fff_f (fma, -min_value, min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8471 TEST_fff_f (fma, -min_value, -min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8472 TEST_fff_f (fma, -min_value, -min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8473
8474 TEST_fff_f (fma, max_value, max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
8475 TEST_fff_f (fma, max_value, max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
8476 TEST_fff_f (fma, max_value, -max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8477 TEST_fff_f (fma, max_value, -max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8478 TEST_fff_f (fma, -max_value, max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8479 TEST_fff_f (fma, -max_value, max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8480 TEST_fff_f (fma, -max_value, -max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
8481 TEST_fff_f (fma, -max_value, -max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
a0c2940d 8482
5e908464 8483#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM
8484 TEST_fff_f (fma, 0x1.7ff8p+13, 0x1.000002p+0, 0x1.ffffp-24, 0x1.7ff802p+13),
8485 TEST_fff_f (fma, 0x1.fffp+0, 0x1.00001p+0, -0x1.fffp+0, 0x1.fffp-20),
8486 TEST_fff_f (fma, 0x1.9abcdep+127, 0x0.9abcdep-126, -0x1.f08948p+0, 0x1.bb421p-25),
8487 TEST_fff_f (fma, 0x1.9abcdep+100, 0x0.9abcdep-126, -0x1.f08948p-27, 0x1.bb421p-52),
8488 TEST_fff_f (fma, 0x1.fffffep+127, 0x1.001p+0, -0x1.fffffep+127, 0x1.fffffep+115),
8489 TEST_fff_f (fma, -0x1.fffffep+127, 0x1.fffffep+0, 0x1.fffffep+127, -0x1.fffffap+127),
8490 TEST_fff_f (fma, 0x1.fffffep+127, 2.0, -0x1.fffffep+127, 0x1.fffffep+127),
8491 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8492 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8493 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8494 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8495 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
8496 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8497 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
8498 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8499 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1p127),
8500 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x1p127),
8501 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x1p127),
8502 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1p127),
8503 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1p-126),
8504 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8505 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8506 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1p-126),
8507 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8508 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8509 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8510 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8511 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8512 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8513 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8514 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8515 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
8516 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
8517 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
8518 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
8519 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1p127),
8520 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x1p127),
8521 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x1p127),
8522 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1p127),
8523 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1p103),
8524 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x1p103),
8525 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x1p103),
8526 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1p103),
5e908464
JJ
8527#endif
8528#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM
8529 TEST_fff_f (fma, 0x1.7fp+13, 0x1.0000000000001p+0, 0x1.ffep-48, 0x1.7f00000000001p+13),
8530 TEST_fff_f (fma, 0x1.fffp+0, 0x1.0000000000001p+0, -0x1.fffp+0, 0x1.fffp-52),
8531 TEST_fff_f (fma, 0x1.0000002p+0, 0x1.ffffffcp-1, 0x1p-300, 1.0),
8532 TEST_fff_f (fma, 0x1.0000002p+0, 0x1.ffffffcp-1, -0x1p-300, 0x1.fffffffffffffp-1),
8533 TEST_fff_f (fma, 0x1.deadbeef2feedp+1023, 0x0.deadbeef2feedp-1022, -0x1.a05f8c01a4bfbp+1, 0x1.0989687bc9da4p-53),
8534 TEST_fff_f (fma, 0x1.deadbeef2feedp+900, 0x0.deadbeef2feedp-1022, -0x1.a05f8c01a4bfbp-122, 0x1.0989687bc9da4p-176),
8535 TEST_fff_f (fma, 0x1.fffffffffffffp+1023, 0x1.001p+0, -0x1.fffffffffffffp+1023, 0x1.fffffffffffffp+1011),
8536 TEST_fff_f (fma, -0x1.fffffffffffffp+1023, 0x1.fffffffffffffp+0, 0x1.fffffffffffffp+1023, -0x1.ffffffffffffdp+1023),
8537 TEST_fff_f (fma, 0x1.fffffffffffffp+1023, 2.0, -0x1.fffffffffffffp+1023, 0x1.fffffffffffffp+1023),
8538 TEST_fff_f (fma, 0x1.6a09e667f3bccp-538, 0x1.6a09e667f3bccp-538, 0.0, 0.0, UNDERFLOW_EXCEPTION),
8539 TEST_fff_f (fma, 0x1.deadbeef2feedp-495, 0x1.deadbeef2feedp-495, -0x1.bf86a5786a574p-989, 0x0.0000042625a1fp-1022, UNDERFLOW_EXCEPTION),
8540 TEST_fff_f (fma, 0x1.deadbeef2feedp-503, 0x1.deadbeef2feedp-503, -0x1.bf86a5786a574p-1005, 0x0.0000000004262p-1022, UNDERFLOW_EXCEPTION),
8541 TEST_fff_f (fma, 0x1p-537, 0x1p-538, 0x1p-1074, 0x0.0000000000002p-1022, UNDERFLOW_EXCEPTION),
8542 TEST_fff_f (fma, 0x1.7fffff8p-968, 0x1p-106, 0x0.000001p-1022, 0x0.0000010000001p-1022, UNDERFLOW_EXCEPTION),
8543 TEST_fff_f (fma, 0x1.4000004p-967, 0x1p-106, 0x0.000001p-1022, 0x0.0000010000003p-1022, UNDERFLOW_EXCEPTION),
8544 TEST_fff_f (fma, 0x1.4p-967, -0x1p-106, -0x0.000001p-1022, -0x0.0000010000002p-1022, UNDERFLOW_EXCEPTION),
8545 TEST_fff_f (fma, -0x1.19cab66d73e17p-959, 0x1.c7108a8c5ff51p-107, -0x0.80b0ad65d9b64p-1022, -0x0.80b0ad65d9d59p-1022, UNDERFLOW_EXCEPTION),
8546 TEST_fff_f (fma, -0x1.d2eaed6e8e9d3p-979, -0x1.4e066c62ac9ddp-63, -0x0.9245e6b003454p-1022, -0x0.9245c09c5fb5dp-1022, UNDERFLOW_EXCEPTION),
8547 TEST_fff_f (fma, 0x1.153d650bb9f06p-907, 0x1.2d01230d48407p-125, -0x0.b278d5acfc3cp-1022, -0x0.b22757123bbe9p-1022, UNDERFLOW_EXCEPTION),
8548 TEST_fff_f (fma, -0x1.fffffffffffffp-711, 0x1.fffffffffffffp-275, 0x1.fffffe00007ffp-983, 0x1.7ffffe00007ffp-983),
8549 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8550 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8551 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8552 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8553 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
8554 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
8555 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
8556 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
8557 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1p1023),
8558 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x1p1023),
8559 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x1p1023),
8560 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1p1023),
8561 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1p-1022),
8562 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8563 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8564 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1p-1022),
8565 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8566 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8567 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8568 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8569 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8570 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8571 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8572 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8573 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8574 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8575 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8576 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8577 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8578 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8579 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8580 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8581 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1p970),
8582 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x1p970),
8583 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x1p970),
8584 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1p970),
3e692e05
JJ
8585#endif
8586#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM
8587 TEST_fff_f (fma, -0x8.03fcp+3696L, 0xf.fffffffffffffffp-6140L, 0x8.3ffffffffffffffp-2450L, -0x8.01ecp-2440L),
8588 TEST_fff_f (fma, 0x9.fcp+2033L, -0x8.000e1f000ff800fp-3613L, -0xf.fffffffffffc0ffp-1579L, -0xd.fc119fb093ed092p-1577L),
8589 TEST_fff_f (fma, 0xc.7fc000003ffffffp-1194L, 0x8.1e0003fffffffffp+15327L, -0x8.fffep+14072L, 0xc.ae9f164020effffp+14136L),
8590 TEST_fff_f (fma, -0x8.0001fc000000003p+1798L, 0xcp-2230L, 0x8.f7e000000000007p-468L, -0xc.0002f9ffee10404p-429L),
8591 TEST_fff_f (fma, 0xc.0000000000007ffp+10130L, -0x8.000000000000001p+4430L, 0xc.07000000001ffffp+14513L, -0xb.fffffffffffd7e4p+14563L),
8592 TEST_fff_f (fma, 0xb.ffffp-4777L, 0x8.000000fffffffffp-11612L, -0x0.3800fff8p-16385L, 0x5.c7fe80c7ffeffffp-16385L, UNDERFLOW_EXCEPTION),
8593 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8594 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8595 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8596 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8597 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8598 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8599 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8600 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8601 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1p16383L),
8602 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x1p16383L),
8603 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x1p16383L),
8604 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1p16383L),
8605 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1p-16382L),
8606 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8607 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8608 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1p-16382L),
8609 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8610 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8611 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8612 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8613 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
8614 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
8615 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
8616 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
8617 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8618 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8619 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8620 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8621 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
8622 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
8623 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
8624 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
8625 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
8626 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
8627 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
8628 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
9ff8d36f 8629#endif
7c08a05c 8630#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM
8631 TEST_fff_f (fma, 0x1.bb2de33e02ccbbfa6e245a7c1f71p-2584L, -0x1.6b500daf0580d987f1bc0cadfcddp-13777L, 0x1.613cd91d9fed34b33820e5ab9d8dp-16378L, -0x1.3a79fb50eb9ce887cffa0f09bd9fp-16360L),
8632 TEST_fff_f (fma, -0x1.f949b880cacb0f0c61540105321dp-5954L, -0x1.3876cec84b4140f3bd6198731b7ep-10525L, -0x0.a5dc1c6cfbc498c54fb0b504bf19p-16382L, -0x0.a5dc1c6cfbc498c54fb0b5038abbp-16382L, UNDERFLOW_EXCEPTION),
8633 TEST_fff_f (fma, -0x1.0000fffffffffp-16221L, 0x1.0000001fffff8007fep-239L, 0x0.ff87ffffffffffffe000003fffffp-16382L, 0x0.ff87ffffffffffffdffc003bff7fp-16382L, UNDERFLOW_EXCEPTION),
8634 TEST_fff_f (fma, -0x1.ac79c9376ef447f3827c9e9de008p-2228L, -0x1.5ba830022b6139e21fbe7270cad8p-6314L, 0x1.e8282b6a26bb6a9daf5c8e73e9f9p-8616L, 0x1.22f14a0253878a730cd1aee373adp-8541L),
8635 TEST_fff_f (fma, -0x1.c69749ec574caaa2ab8e97ddb9f3p+2652L, 0x1.f34235ff9d095449c29b4831b62dp+3311L, 0x1.fbe4302df23354dbd0c4d3cfe606p+5879L, -0x1.bb473bfdfb7a6e18886ce6e57eafp+5964L),
8636 TEST_fff_f (fma, -0x1.ca8835fc6ecfb5398625fc891be5p-1686L, 0x1.621e1972bbe2180e5be9dd7d8df5p-7671L, -0x1.7d2d21b73b52cf20dec2a83902a4p-9395L, -0x1.3d2322191c9c88bc68a62ab8042cp-9356L),
8637 TEST_fff_f (fma, -0x1.55cff679ec49c2541fab41fc843ep-11819L, 0x1.e60e9f464f9e8df0509647c7c971p+12325L, 0x1.eaa2a7649d765c2f564f7a5beca7p+454L, -0x1.447e29fa7e406a285f4e350fcf86p+507L),
8638 TEST_fff_f (fma, 0x1.f0e7b1454908576f2537d863cf9bp+11432L, 0x1.cdce52f09d4ca76e68706f34b5d5p-1417L, -0x1.2e986187c70f146235ea2066e486p+9979L, 0x1.c030dad3cc5643f3dd0f5619f661p+10016L),
8639 TEST_fff_f (fma, 0x1.f102f7da4a57a3a4aab620e29452p-3098L, -0x1.cc06a4ff40248f9e2dcc4b6afd84p-11727L, 0x1.d512a11126b5ac8ed8973b8580c8p-14849L, -0x1.be8f1cf737ab4d1c31c54f5ec23bp-14824L),
8640 TEST_fff_f (fma, -0x1.fc47ac7434b993cd8dcb2b431f25p-3816L, 0x1.fbc9750da8468852d84558e1db6dp-5773L, -0x1.00a98abf783f75c40fe5b7a37d86p-9607L, -0x1.f81917b166f45e763cfcc057e2adp-9588L),
8641 TEST_fff_f (fma, 0x1.00000000000007ffffffffffffffp-9045L, -0x1.ffffffffffff80000001ffffffffp+4773L, -0x1.f8p-4316L, -0x1.00000000000f88000000fffffdffp-4271L),
8642 TEST_fff_f (fma, 0x1.4e922764c90701d4a2f21d01893dp-8683L, -0x1.955a12e2d7c9447c27fa022fc865p+212L, -0x1.e9634462eaef96528b90b6944578p-8521L, -0x1.08e1783184a371943d3598e10865p-8470L),
8643 TEST_fff_f (fma, 0x1.801181509c03bdbef10d6165588cp-15131L, 0x1.ad86f8e57d3d40bfa8007780af63p-368L, -0x1.6e9df0dab1c9f1d7a6043c390741p-15507L, 0x1.417c9b2b15e2ad57dc9e0e920844p-15498L),
8644 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8645 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8646 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8647 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8648 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8649 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8650 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
8651 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
8652 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1p16383L),
8653 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x1p16383L),
8654 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x1p16383L),
8655 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1p16383L),
8656 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1p-16382L),
8657 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8658 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8659 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1p-16382L),
8660 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8661 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8662 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8663 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8664 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
8665 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
8666 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
8667 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
8668 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8669 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8670 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8671 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8672 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
8673 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
8674 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
8675 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
8676 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
8677 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
8678 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
8679 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
8680#endif
8681 END_DATA (fma)
8682 };
8847214f 8683
8ec5b013 8684static void
4f184d30 8685fma_test (void)
8ec5b013 8686{
4f184d30
JM
8687 START (fma);
8688 RUN_TEST_LOOP_fff_f (fma, fma_test_data, );
8689 END (fma);
8690}
8ec5b013 8691
8ec5b013 8692
4f184d30
JM
8693static const struct test_fff_f_data fma_towardzero_test_data[] =
8694 {
8695 START_DATA (fma_towardzero),
8696 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
8697 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, plus_zero),
8698 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, plus_zero),
8699 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
8700 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, plus_zero),
8701 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
8702 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
8703 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, plus_zero),
8704 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
8705 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, plus_zero),
8706 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, plus_zero),
8707 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
8708 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, plus_zero),
8709 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
8710 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
8711 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, plus_zero),
8712 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
8713 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, plus_zero),
8714 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, plus_zero),
8715 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
8716 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, plus_zero),
8717 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
8718 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
8719 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, plus_zero),
8720
8721 TEST_fff_f (fma, 1.0, 1.0, -1.0, plus_zero),
8722 TEST_fff_f (fma, 1.0, -1.0, 1.0, plus_zero),
8723 TEST_fff_f (fma, -1.0, 1.0, 1.0, plus_zero),
8724 TEST_fff_f (fma, -1.0, -1.0, -1.0, plus_zero),
8725
8726 TEST_fff_f (fma, min_value, min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8727 TEST_fff_f (fma, min_value, min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8728 TEST_fff_f (fma, min_value, -min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8729 TEST_fff_f (fma, min_value, -min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8730 TEST_fff_f (fma, -min_value, min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8731 TEST_fff_f (fma, -min_value, min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
8732 TEST_fff_f (fma, -min_value, -min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8733 TEST_fff_f (fma, -min_value, -min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8627a232 8734
7184dcdf 8735#if !(defined TEST_LDOUBLE && LDBL_MANT_DIG == 106) /* Bug 13304. */
4f184d30
JM
8736 TEST_fff_f (fma, max_value, max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8737 TEST_fff_f (fma, max_value, max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
8738 TEST_fff_f (fma, max_value, -max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
8739 TEST_fff_f (fma, max_value, -max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
8740 TEST_fff_f (fma, -max_value, max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
8741 TEST_fff_f (fma, -max_value, max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
8742 TEST_fff_f (fma, -max_value, -max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8743 TEST_fff_f (fma, -max_value, -max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
7184dcdf 8744#endif
a0c2940d 8745
8627a232 8746#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM
8747 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8748 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8749 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8750 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8751 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8752 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8753 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8754 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8755 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1p127),
8756 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x0.ffffffp127),
8757 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x0.ffffffp127),
8758 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1p127),
8759 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1p-126),
8760 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8761 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8762 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1p-126),
8763 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8764 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
8765 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
8766 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8767 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8768 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, plus_zero, UNDERFLOW_EXCEPTION),
8769 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, minus_zero, UNDERFLOW_EXCEPTION),
8770 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8771 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
8772 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
8773 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
8774 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
8775 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1p127),
8776 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x0.ffffffp127),
8777 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x0.ffffffp127),
8778 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1p127),
8779 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1p103),
8780 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x0.ffffffp103),
8781 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x0.ffffffp103),
8782 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1p103),
8627a232
JM
8783#endif
8784#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM
8785 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8786 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
8787 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8788 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8789 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8790 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8791 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8792 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8793 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1p1023),
8794 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x0.fffffffffffff8p1023),
8795 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x0.fffffffffffff8p1023),
8796 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1p1023),
8797 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1p-1022),
8798 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8799 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8800 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1p-1022),
8801 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8802 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
8803 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
8804 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
8805 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
8806 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, plus_zero, UNDERFLOW_EXCEPTION),
8807 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, minus_zero, UNDERFLOW_EXCEPTION),
8808 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
8809 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8810 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8811 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
8812 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
8813 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
8814 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x0.fffffffffffff8p1023),
8815 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x0.fffffffffffff8p1023),
8816 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
8817 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1p970),
8818 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x0.fffffffffffff8p970),
8819 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x0.fffffffffffff8p970),
8820 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1p970),
8627a232
JM
8821#endif
8822#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM
8823 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8824 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
8825 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8826 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8827 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8828 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8829 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8830 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8831 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1p16383L),
8832 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
8833 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
8834 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1p16383L),
8835 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1p-16382L),
8836 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8837 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8838 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1p-16382L),
8839 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8840 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
8841 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
8842 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8843 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
8844 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, plus_zero, UNDERFLOW_EXCEPTION),
8845 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, minus_zero, UNDERFLOW_EXCEPTION),
8846 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
8847 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8848 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8849 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
8850 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
8851 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
8852 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
8853 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
8854 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
8855 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
8856 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x0.ffffffffffffffffp16319L),
8857 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x0.ffffffffffffffffp16319L),
8858 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
8627a232
JM
8859#endif
8860#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM
8861 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8862 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
8863 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8864 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8865 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8866 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8867 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8868 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8869 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1p16383L),
8870 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
8871 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
8872 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1p16383L),
8873 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1p-16382L),
8874 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8875 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8876 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1p-16382L),
8877 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8878 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8879 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
8880 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
8881 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
8882 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, plus_zero, UNDERFLOW_EXCEPTION),
8883 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, minus_zero, UNDERFLOW_EXCEPTION),
8884 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
8885 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8886 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8887 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
8888 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
8889 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
8890 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
8891 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
8892 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
8893 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
8894 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x0.ffffffffffffffffffffffffffff8p16319L),
8895 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x0.ffffffffffffffffffffffffffff8p16319L),
8896 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
8897#endif
8898 END_DATA (fma_towardzero)
8899 };
8ec5b013
JM
8900
8901static void
4f184d30 8902fma_test_towardzero (void)
8ec5b013 8903{
4f184d30
JM
8904 START (fma_towardzero);
8905 RUN_TEST_LOOP_fff_f (fma, fma_towardzero_test_data, FE_TOWARDZERO);
8906 END (fma_towardzero);
8907}
8ec5b013 8908
8ec5b013 8909
4f184d30
JM
8910static const struct test_fff_f_data fma_downward_test_data[] =
8911 {
8912 START_DATA (fma_downward),
8913 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
8914 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, minus_zero),
8915 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, minus_zero),
8916 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
8917 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, minus_zero),
8918 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
8919 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
8920 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, minus_zero),
8921 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
8922 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, minus_zero),
8923 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, minus_zero),
8924 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
8925 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, minus_zero),
8926 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
8927 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
8928 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, minus_zero),
8929 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
8930 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, minus_zero),
8931 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, minus_zero),
8932 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
8933 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, minus_zero),
8934 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
8935 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
8936 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, minus_zero),
8937
8938 TEST_fff_f (fma, 1.0, 1.0, -1.0, minus_zero),
8939 TEST_fff_f (fma, 1.0, -1.0, 1.0, minus_zero),
8940 TEST_fff_f (fma, -1.0, 1.0, 1.0, minus_zero),
8941 TEST_fff_f (fma, -1.0, -1.0, -1.0, minus_zero),
8942
8943 TEST_fff_f (fma, min_value, min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8944 TEST_fff_f (fma, min_value, min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8945 TEST_fff_f (fma, min_value, -min_value, plus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8946 TEST_fff_f (fma, min_value, -min_value, minus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8947 TEST_fff_f (fma, -min_value, min_value, plus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8948 TEST_fff_f (fma, -min_value, min_value, minus_zero, -min_subnorm_value, UNDERFLOW_EXCEPTION),
8949 TEST_fff_f (fma, -min_value, -min_value, plus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8950 TEST_fff_f (fma, -min_value, -min_value, minus_zero, plus_zero, UNDERFLOW_EXCEPTION),
8627a232 8951
7184dcdf 8952#if !(defined TEST_LDOUBLE && LDBL_MANT_DIG == 106) /* Bug 13304. */
4f184d30
JM
8953 TEST_fff_f (fma, max_value, max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8954 TEST_fff_f (fma, max_value, max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
8955 TEST_fff_f (fma, max_value, -max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8956 TEST_fff_f (fma, max_value, -max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8957 TEST_fff_f (fma, -max_value, max_value, min_value, minus_infty, OVERFLOW_EXCEPTION),
8958 TEST_fff_f (fma, -max_value, max_value, -min_value, minus_infty, OVERFLOW_EXCEPTION),
8959 TEST_fff_f (fma, -max_value, -max_value, min_value, max_value, OVERFLOW_EXCEPTION),
8960 TEST_fff_f (fma, -max_value, -max_value, -min_value, max_value, OVERFLOW_EXCEPTION),
7184dcdf 8961#endif
a0c2940d 8962
8627a232 8963#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM
8964 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00004p-127, UNDERFLOW_EXCEPTION),
8965 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00008p-127, UNDERFLOW_EXCEPTION),
8966 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8967 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8968 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8969 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8970 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8971 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8972 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1p127),
8973 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x0.ffffffp127),
8974 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x1p127),
8975 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1.000002p127),
8976 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1p-126),
8977 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8978 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
8979 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1.000002p-126),
8980 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8981 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
8982 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
8983 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x1p-126, UNDERFLOW_EXCEPTION),
8984 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
8985 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, plus_zero, UNDERFLOW_EXCEPTION),
8986 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
8987 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-148, UNDERFLOW_EXCEPTION),
8988 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
8989 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
8990 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
8991 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
8992 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1p127),
8993 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x0.ffffffp127),
8994 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x1p127),
8995 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1.000002p127),
8996 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1p103),
8997 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x0.ffffffp103),
8998 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x1p103),
8999 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1.000002p103),
8627a232
JM
9000#endif
9001#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM
9002 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
9003 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000004p-1023, UNDERFLOW_EXCEPTION),
9004 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9005 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9006 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9007 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
9008 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9009 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9010 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1p1023),
9011 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x0.fffffffffffff8p1023),
9012 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x1p1023),
9013 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1.0000000000001p1023),
9014 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1p-1022),
9015 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9016 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9017 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1.0000000000001p-1022),
9018 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9019 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
9020 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9021 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x1p-1022, UNDERFLOW_EXCEPTION),
9022 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
9023 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, plus_zero, UNDERFLOW_EXCEPTION),
9024 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
9025 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1073, UNDERFLOW_EXCEPTION),
9026 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9027 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9028 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9029 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9030 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
9031 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x0.fffffffffffff8p1023),
9032 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
9033 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1.0000000000001p1023),
9034 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1p970),
9035 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x0.fffffffffffff8p970),
9036 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x1p970),
9037 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1.0000000000001p970),
8627a232
JM
9038#endif
9039#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM
9040 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9041 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000008p-16383L, UNDERFLOW_EXCEPTION),
9042 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9043 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9044 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9045 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9046 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9047 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9048 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1p16383L),
9049 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
9050 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x1p16383L),
9051 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1.0000000000000002p16383L),
9052 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1p-16382L),
9053 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9054 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9055 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1.0000000000000002p-16382L),
9056 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9057 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
9058 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9059 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9060 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
9061 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, plus_zero, UNDERFLOW_EXCEPTION),
9062 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
9063 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16444L, UNDERFLOW_EXCEPTION),
9064 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9065 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9066 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9067 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9068 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
9069 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x0.ffffffffffffffffp16383L),
9070 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
9071 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1.0000000000000002p16383L),
9072 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
9073 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x0.ffffffffffffffffp16319L),
9074 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
9075 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1.0000000000000002p16319L),
8627a232
JM
9076#endif
9077#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM
9078 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
9079 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9080 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9081 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9082 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9083 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9084 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9085 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9086 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1p16383L),
9087 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
9088 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x1p16383L),
9089 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1.0000000000000000000000000001p16383L),
9090 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1p-16382L),
9091 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9092 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9093 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1.0000000000000000000000000001p-16382L),
9094 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9095 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9096 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9097 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x1p-16382L, UNDERFLOW_EXCEPTION),
9098 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
9099 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, plus_zero, UNDERFLOW_EXCEPTION),
9100 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
9101 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16493L, UNDERFLOW_EXCEPTION),
9102 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9103 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9104 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9105 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9106 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
9107 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x0.ffffffffffffffffffffffffffff8p16383L),
9108 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
9109 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1.0000000000000000000000000001p16383L),
9110 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
9111 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x0.ffffffffffffffffffffffffffff8p16319L),
9112 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
9113 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1.0000000000000000000000000001p16319L),
9114#endif
9115 END_DATA (fma_downward)
9116 };
8ec5b013
JM
9117
9118static void
4f184d30 9119fma_test_downward (void)
8ec5b013 9120{
4f184d30
JM
9121 START (fma_downward);
9122 RUN_TEST_LOOP_fff_f (fma, fma_downward_test_data, FE_DOWNWARD);
9123 END (fma_downward);
9124}
8ec5b013 9125
8ec5b013 9126
4f184d30
JM
9127static const struct test_fff_f_data fma_upward_test_data[] =
9128 {
9129 START_DATA (fma_upward),
9130 TEST_fff_f (fma, plus_zero, plus_zero, plus_zero, plus_zero),
9131 TEST_fff_f (fma, plus_zero, plus_zero, minus_zero, plus_zero),
9132 TEST_fff_f (fma, plus_zero, minus_zero, plus_zero, plus_zero),
9133 TEST_fff_f (fma, plus_zero, minus_zero, minus_zero, minus_zero),
9134 TEST_fff_f (fma, minus_zero, plus_zero, plus_zero, plus_zero),
9135 TEST_fff_f (fma, minus_zero, plus_zero, minus_zero, minus_zero),
9136 TEST_fff_f (fma, minus_zero, minus_zero, plus_zero, plus_zero),
9137 TEST_fff_f (fma, minus_zero, minus_zero, minus_zero, plus_zero),
9138 TEST_fff_f (fma, 1.0, plus_zero, plus_zero, plus_zero),
9139 TEST_fff_f (fma, 1.0, plus_zero, minus_zero, plus_zero),
9140 TEST_fff_f (fma, 1.0, minus_zero, plus_zero, plus_zero),
9141 TEST_fff_f (fma, 1.0, minus_zero, minus_zero, minus_zero),
9142 TEST_fff_f (fma, -1.0, plus_zero, plus_zero, plus_zero),
9143 TEST_fff_f (fma, -1.0, plus_zero, minus_zero, minus_zero),
9144 TEST_fff_f (fma, -1.0, minus_zero, plus_zero, plus_zero),
9145 TEST_fff_f (fma, -1.0, minus_zero, minus_zero, plus_zero),
9146 TEST_fff_f (fma, plus_zero, 1.0, plus_zero, plus_zero),
9147 TEST_fff_f (fma, plus_zero, 1.0, minus_zero, plus_zero),
9148 TEST_fff_f (fma, plus_zero, -1.0, plus_zero, plus_zero),
9149 TEST_fff_f (fma, plus_zero, -1.0, minus_zero, minus_zero),
9150 TEST_fff_f (fma, minus_zero, 1.0, plus_zero, plus_zero),
9151 TEST_fff_f (fma, minus_zero, 1.0, minus_zero, minus_zero),
9152 TEST_fff_f (fma, minus_zero, -1.0, plus_zero, plus_zero),
9153 TEST_fff_f (fma, minus_zero, -1.0, minus_zero, plus_zero),
9154
9155 TEST_fff_f (fma, 1.0, 1.0, -1.0, plus_zero),
9156 TEST_fff_f (fma, 1.0, -1.0, 1.0, plus_zero),
9157 TEST_fff_f (fma, -1.0, 1.0, 1.0, plus_zero),
9158 TEST_fff_f (fma, -1.0, -1.0, -1.0, plus_zero),
9159
9160 TEST_fff_f (fma, min_value, min_value, plus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9161 TEST_fff_f (fma, min_value, min_value, minus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9162 TEST_fff_f (fma, min_value, -min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9163 TEST_fff_f (fma, min_value, -min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9164 TEST_fff_f (fma, -min_value, min_value, plus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9165 TEST_fff_f (fma, -min_value, min_value, minus_zero, minus_zero, UNDERFLOW_EXCEPTION),
9166 TEST_fff_f (fma, -min_value, -min_value, plus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
9167 TEST_fff_f (fma, -min_value, -min_value, minus_zero, min_subnorm_value, UNDERFLOW_EXCEPTION),
8627a232 9168
7184dcdf 9169#if !(defined TEST_LDOUBLE && LDBL_MANT_DIG == 106) /* Bug 13304. */
4f184d30
JM
9170 TEST_fff_f (fma, max_value, max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
9171 TEST_fff_f (fma, max_value, max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
9172 TEST_fff_f (fma, max_value, -max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
9173 TEST_fff_f (fma, max_value, -max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
9174 TEST_fff_f (fma, -max_value, max_value, min_value, -max_value, OVERFLOW_EXCEPTION),
9175 TEST_fff_f (fma, -max_value, max_value, -min_value, -max_value, OVERFLOW_EXCEPTION),
9176 TEST_fff_f (fma, -max_value, -max_value, min_value, plus_infty, OVERFLOW_EXCEPTION),
9177 TEST_fff_f (fma, -max_value, -max_value, -min_value, plus_infty, OVERFLOW_EXCEPTION),
7184dcdf 9178#endif
a0c2940d 9179
8627a232 9180#if defined (TEST_FLOAT) && FLT_MANT_DIG == 24
4f184d30
JM
9181 TEST_fff_f (fma, 0x1.4p-126, 0x1.000004p-1, 0x1p-128, 0x1.c00008p-127, UNDERFLOW_EXCEPTION),
9182 TEST_fff_f (fma, -0x1.4p-126, 0x1.000004p-1, -0x1p-128, -0x1.c00004p-127, UNDERFLOW_EXCEPTION),
9183 TEST_fff_f (fma, 0x1.fffff8p-126, 0x1.000002p-1, 0x1p-149, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9184 TEST_fff_f (fma, -0x1.fffff8p-126, 0x1.000002p-1, -0x1p-149, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9185 TEST_fff_f (fma, 0x1p-149, 0x1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
9186 TEST_fff_f (fma, -0x1p-149, 0x1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9187 TEST_fff_f (fma, 0x1p-149, 0x1.1p-1, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9188 TEST_fff_f (fma, -0x1p-149, 0x1.1p-1, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9189 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p127, 0x1.000002p127),
9190 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p127, 0x1p127),
9191 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p127, -0x0.ffffffp127),
9192 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p127, -0x1p127),
9193 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-126, 0x1.000002p-126),
9194 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-126, 0x1p-126, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9195 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9196 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-126, -0x1p-126),
9197 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x0.fffffep-126, 0x1p-126, UNDERFLOW_EXCEPTION),
9198 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x0.fffffep-126, 0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9199 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x0.fffffep-126, -0x0.fffffcp-126, UNDERFLOW_EXCEPTION),
9200 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x0.fffffep-126, -0x0.fffffep-126, UNDERFLOW_EXCEPTION),
9201 TEST_fff_f (fma, 0x1p-149, 0x1p-149, 0x1p-149, 0x1p-148, UNDERFLOW_EXCEPTION),
9202 TEST_fff_f (fma, 0x1p-149, -0x1p-149, 0x1p-149, 0x1p-149, UNDERFLOW_EXCEPTION),
9203 TEST_fff_f (fma, 0x1p-149, 0x1p-149, -0x1p-149, minus_zero, UNDERFLOW_EXCEPTION),
9204 TEST_fff_f (fma, 0x1p-149, -0x1p-149, -0x1p-149, -0x1p-149, UNDERFLOW_EXCEPTION),
9205 TEST_fff_f (fma, 0x0.fffp0, 0x0.fffp0, -0x0.ffep0, 0x1p-24),
9206 TEST_fff_f (fma, 0x0.fffp0, -0x0.fffp0, 0x0.ffep0, -0x1p-24),
9207 TEST_fff_f (fma, -0x0.fffp0, 0x0.fffp0, 0x0.ffep0, -0x1p-24),
9208 TEST_fff_f (fma, -0x0.fffp0, -0x0.fffp0, -0x0.ffep0, 0x1p-24),
9209 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p127, 0x1.000002p127),
9210 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p127, 0x1p127),
9211 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p127, -0x0.ffffffp127),
9212 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p127, -0x1p127),
9213 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, 0x1p103, 0x1.000002p103),
9214 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, 0x1p103, 0x1p103),
9215 TEST_fff_f (fma, 0x1.000002p-126, 0x1.000002p-26, -0x1p103, -0x0.ffffffp103),
9216 TEST_fff_f (fma, 0x1.000002p-126, -0x1.000002p-26, -0x1p103, -0x1p103),
8627a232
JM
9217#endif
9218#if defined (TEST_DOUBLE) && DBL_MANT_DIG == 53
4f184d30
JM
9219 TEST_fff_f (fma, 0x1.4p-1022, 0x1.0000000000002p-1, 0x1p-1024, 0x1.c000000000004p-1023, UNDERFLOW_EXCEPTION),
9220 TEST_fff_f (fma, -0x1.4p-1022, 0x1.0000000000002p-1, -0x1p-1024, -0x1.c000000000002p-1023, UNDERFLOW_EXCEPTION),
9221 TEST_fff_f (fma, 0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, 0x1p-1074, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9222 TEST_fff_f (fma, -0x1.ffffffffffffcp-1022, 0x1.0000000000001p-1, -0x1p-1074, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9223 TEST_fff_f (fma, 0x1p-1074, 0x1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
9224 TEST_fff_f (fma, -0x1p-1074, 0x1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9225 TEST_fff_f (fma, 0x1p-1074, 0x1.1p-1, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9226 TEST_fff_f (fma, -0x1p-1074, 0x1.1p-1, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9227 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p1023, 0x1.0000000000001p1023),
9228 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p1023, 0x1p1023),
9229 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p1023, -0x0.fffffffffffff8p1023),
9230 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p1023, -0x1p1023),
9231 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1022, 0x1.0000000000001p-1022),
9232 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1022, 0x1p-1022, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9233 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9234 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1022, -0x1p-1022),
9235 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x0.fffffffffffffp-1022, 0x1p-1022, UNDERFLOW_EXCEPTION),
9236 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x0.fffffffffffffp-1022, 0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9237 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.ffffffffffffep-1022, UNDERFLOW_EXCEPTION),
9238 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x0.fffffffffffffp-1022, -0x0.fffffffffffffp-1022, UNDERFLOW_EXCEPTION),
9239 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, 0x1p-1074, 0x1p-1073, UNDERFLOW_EXCEPTION),
9240 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, 0x1p-1074, 0x1p-1074, UNDERFLOW_EXCEPTION),
9241 TEST_fff_f (fma, 0x1p-1074, 0x1p-1074, -0x1p-1074, minus_zero, UNDERFLOW_EXCEPTION),
9242 TEST_fff_f (fma, 0x1p-1074, -0x1p-1074, -0x1p-1074, -0x1p-1074, UNDERFLOW_EXCEPTION),
9243 TEST_fff_f (fma, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9244 TEST_fff_f (fma, 0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9245 TEST_fff_f (fma, -0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0, 0x0.fffffffffffffp0, -0x1p-106),
9246 TEST_fff_f (fma, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0, -0x0.fffffffffffffp0, 0x1p-106),
9247 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p1023, 0x1.0000000000001p1023),
9248 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p1023, 0x1p1023),
9249 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p1023, -0x0.fffffffffffff8p1023),
9250 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p1023, -0x1p1023),
9251 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, 0x1p970, 0x1.0000000000001p970),
9252 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, 0x1p970, 0x1p970),
9253 TEST_fff_f (fma, 0x1.0000000000001p-1022, 0x1.0000000000001p-55, -0x1p970, -0x0.fffffffffffff8p970),
9254 TEST_fff_f (fma, 0x1.0000000000001p-1022, -0x1.0000000000001p-55, -0x1p970, -0x1p970),
8627a232
JM
9255#endif
9256#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 64
4f184d30
JM
9257 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000004p-1L, 0x1p-16384L, 0x1.c000000000000008p-16383L, UNDERFLOW_EXCEPTION),
9258 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000004p-1L, -0x1p-16384L, -0x1.c000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9259 TEST_fff_f (fma, 0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, 0x1p-16445L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9260 TEST_fff_f (fma, -0x1.fffffffffffffff8p-16382L, 0x1.0000000000000002p-1L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9261 TEST_fff_f (fma, 0x1p-16445L, 0x1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9262 TEST_fff_f (fma, -0x1p-16445L, 0x1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9263 TEST_fff_f (fma, 0x1p-16445L, 0x1.1p-1L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9264 TEST_fff_f (fma, -0x1p-16445L, 0x1.1p-1L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9265 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p16383L, 0x1.0000000000000002p16383L),
9266 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p16383L, 0x1p16383L),
9267 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
9268 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p16383L, -0x1p16383L),
9269 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16382L, 0x1.0000000000000002p-16382L),
9270 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9271 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9272 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16382L, -0x1p-16382L),
9273 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9274 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x0.fffffffffffffffep-16382L, 0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9275 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffcp-16382L, UNDERFLOW_EXCEPTION),
9276 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x0.fffffffffffffffep-16382L, -0x0.fffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9277 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, 0x1p-16445L, 0x1p-16444L, UNDERFLOW_EXCEPTION),
9278 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, 0x1p-16445L, 0x1p-16445L, UNDERFLOW_EXCEPTION),
9279 TEST_fff_f (fma, 0x1p-16445L, 0x1p-16445L, -0x1p-16445L, minus_zero, UNDERFLOW_EXCEPTION),
9280 TEST_fff_f (fma, 0x1p-16445L, -0x1p-16445L, -0x1p-16445L, -0x1p-16445L, UNDERFLOW_EXCEPTION),
9281 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9282 TEST_fff_f (fma, 0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9283 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffffffep0L, -0x1p-128L),
9284 TEST_fff_f (fma, -0x0.ffffffffffffffffp0L, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffffffep0L, 0x1p-128L),
9285 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16383L, 0x1.0000000000000002p16383L),
9286 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16383L, 0x1p16383L),
9287 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16383L, -0x0.ffffffffffffffffp16383L),
9288 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16383L, -0x1p16383L),
9289 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, 0x1p16319L, 0x1.0000000000000002p16319L),
9290 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, 0x1p16319L, 0x1p16319L),
9291 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, 0x1.0000000000000002p-66L, -0x1p16319L, -0x0.ffffffffffffffffp16319L),
9292 TEST_fff_f (fma, 0x1.0000000000000002p-16382L, -0x1.0000000000000002p-66L, -0x1p16319L, -0x1p16319L),
8627a232
JM
9293#endif
9294#if defined (TEST_LDOUBLE) && LDBL_MANT_DIG == 113
4f184d30
JM
9295 TEST_fff_f (fma, 0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, 0x1p-16384L, 0x1.c000000000000000000000000004p-16383L, UNDERFLOW_EXCEPTION),
9296 TEST_fff_f (fma, -0x1.4p-16382L, 0x1.0000000000000000000000000002p-1L, -0x1p-16384L, -0x1.c000000000000000000000000002p-16383L, UNDERFLOW_EXCEPTION),
9297 TEST_fff_f (fma, 0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, 0x1p-16494L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9298 TEST_fff_f (fma, -0x1.fffffffffffffffffffffffffffcp-16382L, 0x1.0000000000000000000000000001p-1L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9299 TEST_fff_f (fma, 0x1p-16494L, 0x1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9300 TEST_fff_f (fma, -0x1p-16494L, 0x1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9301 TEST_fff_f (fma, 0x1p-16494L, 0x1.1p-1L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9302 TEST_fff_f (fma, -0x1p-16494L, 0x1.1p-1L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9303 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p16383L, 0x1.0000000000000000000000000001p16383L),
9304 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p16383L, 0x1p16383L),
9305 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
9306 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p16383L, -0x1p16383L),
9307 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16382L, 0x1.0000000000000000000000000001p-16382L),
9308 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION_BEFORE_ROUNDING),
9309 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9310 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16382L, -0x1p-16382L),
9311 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x1p-16382L, UNDERFLOW_EXCEPTION),
9312 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x0.ffffffffffffffffffffffffffffp-16382L, 0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9313 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.fffffffffffffffffffffffffffep-16382L, UNDERFLOW_EXCEPTION),
9314 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x0.ffffffffffffffffffffffffffffp-16382L, -0x0.ffffffffffffffffffffffffffffp-16382L, UNDERFLOW_EXCEPTION),
9315 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, 0x1p-16494L, 0x1p-16493L, UNDERFLOW_EXCEPTION),
9316 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, 0x1p-16494L, 0x1p-16494L, UNDERFLOW_EXCEPTION),
9317 TEST_fff_f (fma, 0x1p-16494L, 0x1p-16494L, -0x1p-16494L, minus_zero, UNDERFLOW_EXCEPTION),
9318 TEST_fff_f (fma, 0x1p-16494L, -0x1p-16494L, -0x1p-16494L, -0x1p-16494L, UNDERFLOW_EXCEPTION),
9319 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9320 TEST_fff_f (fma, 0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9321 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffffffffffffffffffffffffp0L, -0x1p-226L),
9322 TEST_fff_f (fma, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffffffffffffffffffffffffp0L, 0x1p-226L),
9323 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1.0000000000000000000000000001p16383L),
9324 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16383L, 0x1p16383L),
9325 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x0.ffffffffffffffffffffffffffff8p16383L),
9326 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16383L, -0x1p16383L),
9327 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1.0000000000000000000000000001p16319L),
9328 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, 0x1p16319L, 0x1p16319L),
9329 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, 0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x0.ffffffffffffffffffffffffffff8p16319L),
9330 TEST_fff_f (fma, 0x1.0000000000000000000000000001p-16382L, -0x1.0000000000000000000000000001p-66L, -0x1p16319L, -0x1p16319L),
9331#endif
9332 END_DATA (fma_upward)
9333 };
8ec5b013 9334
4f184d30
JM
9335static void
9336fma_test_upward (void)
9337{
9338 START (fma_upward);
9339 RUN_TEST_LOOP_fff_f (fma, fma_upward_test_data, FE_UPWARD);
8ec5b013
JM
9340 END (fma_upward);
9341}
9342
9343
601a3a5f
JM
9344static const struct test_ff_f_data fmax_test_data[] =
9345 {
9346 START_DATA (fmax),
9347 TEST_ff_f (fmax, 0, 0, 0),
9348 TEST_ff_f (fmax, minus_zero, minus_zero, minus_zero),
9349 TEST_ff_f (fmax, 9, 0, 9),
9350 TEST_ff_f (fmax, 0, 9, 9),
9351 TEST_ff_f (fmax, -9, 0, 0),
9352 TEST_ff_f (fmax, 0, -9, 0),
9353
9354 TEST_ff_f (fmax, plus_infty, 9, plus_infty),
9355 TEST_ff_f (fmax, 0, plus_infty, plus_infty),
9356 TEST_ff_f (fmax, -9, plus_infty, plus_infty),
9357 TEST_ff_f (fmax, plus_infty, -9, plus_infty),
9358
9359 TEST_ff_f (fmax, minus_infty, 9, 9),
9360 TEST_ff_f (fmax, minus_infty, -9, -9),
9361 TEST_ff_f (fmax, 9, minus_infty, 9),
9362 TEST_ff_f (fmax, -9, minus_infty, -9),
9363
9364 TEST_ff_f (fmax, 0, qnan_value, 0),
9365 TEST_ff_f (fmax, 9, qnan_value, 9),
9366 TEST_ff_f (fmax, -9, qnan_value, -9),
9367 TEST_ff_f (fmax, qnan_value, 0, 0),
9368 TEST_ff_f (fmax, qnan_value, 9, 9),
9369 TEST_ff_f (fmax, qnan_value, -9, -9),
9370 TEST_ff_f (fmax, plus_infty, qnan_value, plus_infty),
9371 TEST_ff_f (fmax, minus_infty, qnan_value, minus_infty),
9372 TEST_ff_f (fmax, qnan_value, plus_infty, plus_infty),
9373 TEST_ff_f (fmax, qnan_value, minus_infty, minus_infty),
9374 TEST_ff_f (fmax, qnan_value, qnan_value, qnan_value),
9375 END_DATA (fmax)
9376 };
9377
8847214f
UD
9378static void
9379fmax_test (void)
9380{
9381 START (fmax);
601a3a5f 9382 RUN_TEST_LOOP_ff_f (fmax, fmax_test_data, );
8847214f
UD
9383 END (fmax);
9384}
9385
9386
601a3a5f
JM
9387static const struct test_ff_f_data fmin_test_data[] =
9388 {
9389 START_DATA (fmin),
9390 TEST_ff_f (fmin, 0, 0, 0),
9391 TEST_ff_f (fmin, minus_zero, minus_zero, minus_zero),
9392 TEST_ff_f (fmin, 9, 0, 0),
9393 TEST_ff_f (fmin, 0, 9, 0),
9394 TEST_ff_f (fmin, -9, 0, -9),
9395 TEST_ff_f (fmin, 0, -9, -9),
9396
9397 TEST_ff_f (fmin, plus_infty, 9, 9),
9398 TEST_ff_f (fmin, 9, plus_infty, 9),
9399 TEST_ff_f (fmin, plus_infty, -9, -9),
9400 TEST_ff_f (fmin, -9, plus_infty, -9),
9401 TEST_ff_f (fmin, minus_infty, 9, minus_infty),
9402 TEST_ff_f (fmin, minus_infty, -9, minus_infty),
9403 TEST_ff_f (fmin, 9, minus_infty, minus_infty),
9404 TEST_ff_f (fmin, -9, minus_infty, minus_infty),
9405
9406 TEST_ff_f (fmin, 0, qnan_value, 0),
9407 TEST_ff_f (fmin, 9, qnan_value, 9),
9408 TEST_ff_f (fmin, -9, qnan_value, -9),
9409 TEST_ff_f (fmin, qnan_value, 0, 0),
9410 TEST_ff_f (fmin, qnan_value, 9, 9),
9411 TEST_ff_f (fmin, qnan_value, -9, -9),
9412 TEST_ff_f (fmin, plus_infty, qnan_value, plus_infty),
9413 TEST_ff_f (fmin, minus_infty, qnan_value, minus_infty),
9414 TEST_ff_f (fmin, qnan_value, plus_infty, plus_infty),
9415 TEST_ff_f (fmin, qnan_value, minus_infty, minus_infty),
9416 TEST_ff_f (fmin, qnan_value, qnan_value, qnan_value),
9417 END_DATA (fmin)
9418 };
9419
8847214f
UD
9420static void
9421fmin_test (void)
9422{
9423 START (fmin);
601a3a5f 9424 RUN_TEST_LOOP_ff_f (fmin, fmin_test_data, );
8847214f
UD
9425 END (fmin);
9426}
9427
9428
601a3a5f
JM
9429static const struct test_ff_f_data fmod_test_data[] =
9430 {
9431 START_DATA (fmod),
9432 /* fmod (+0, y) == +0 for y != 0. */
9433 TEST_ff_f (fmod, 0, 3, 0),
9434
9435 /* fmod (-0, y) == -0 for y != 0. */
9436 TEST_ff_f (fmod, minus_zero, 3, minus_zero),
9437
9438 /* fmod (+inf, y) == qNaN plus invalid exception. */
9439 TEST_ff_f (fmod, plus_infty, 3, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
9440 /* fmod (-inf, y) == qNaN plus invalid exception. */
9441 TEST_ff_f (fmod, minus_infty, 3, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
9442 /* fmod (x, +0) == qNaN plus invalid exception. */
9443 TEST_ff_f (fmod, 3, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
9444 /* fmod (x, -0) == qNaN plus invalid exception. */
9445 TEST_ff_f (fmod, 3, minus_zero, qnan_value, INVALID_EXCEPTION),
9446
9447 /* fmod (x, +inf) == x for x not infinite. */
9448 TEST_ff_f (fmod, 3.0, plus_infty, 3.0),
9449 /* fmod (x, -inf) == x for x not infinite. */
9450 TEST_ff_f (fmod, 3.0, minus_infty, 3.0),
9451
9452 TEST_ff_f (fmod, qnan_value, qnan_value, qnan_value),
9453
9454 TEST_ff_f (fmod, 6.5, 2.25L, 2.0L),
9455 TEST_ff_f (fmod, -6.5, 2.25L, -2.0L),
9456 TEST_ff_f (fmod, 6.5, -2.25L, 2.0L),
9457 TEST_ff_f (fmod, -6.5, -2.25L, -2.0L),
9458
9459 TEST_ff_f (fmod, 0x0.fffffep-126L, 0x1p-149L, plus_zero),
9460#ifndef TEST_FLOAT
9461 TEST_ff_f (fmod, 0x0.fffffffffffffp-1022L, 0x1p-1074L, plus_zero),
9462#endif
9463#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
9464 TEST_ff_f (fmod, 0x0.fffffffffffffffep-16382L, 0x1p-16445L, plus_zero),
9465#endif
9466 END_DATA (fmod)
9467 };
9468
8847214f
UD
9469static void
9470fmod_test (void)
9471{
aaca11d8 9472 errno = 0;
3c6cad26 9473 FUNC(fmod) (6.5, 2.3L);
aaca11d8
UD
9474 if (errno == ENOSYS)
9475 /* Function not implemented. */
9476 return;
9477
8847214f 9478 START (fmod);
601a3a5f 9479 RUN_TEST_LOOP_ff_f (fmod, fmod_test_data, );
8847214f
UD
9480 END (fmod);
9481}
9482
2550dfe9 9483
8847214f
UD
9484static void
9485fpclassify_test (void)
9486{
9487 START (fpclassify);
9488
67e971f1 9489 TEST_f_i (fpclassify, qnan_value, FP_NAN);
8847214f
UD
9490 TEST_f_i (fpclassify, plus_infty, FP_INFINITE);
9491 TEST_f_i (fpclassify, minus_infty, FP_INFINITE);
9492 TEST_f_i (fpclassify, plus_zero, FP_ZERO);
9493 TEST_f_i (fpclassify, minus_zero, FP_ZERO);
9494 TEST_f_i (fpclassify, 1000, FP_NORMAL);
ef1bb361 9495 TEST_f_i (fpclassify, min_subnorm_value, FP_SUBNORMAL);
8847214f
UD
9496
9497 END (fpclassify);
9498}
9499
9500
9501static void
9502frexp_test (void)
9503{
9504 int x;
9505
9506 START (frexp);
9507
9508 TEST_fI_f1 (frexp, plus_infty, plus_infty, IGNORE);
9509 TEST_fI_f1 (frexp, minus_infty, minus_infty, IGNORE);
67e971f1 9510 TEST_fI_f1 (frexp, qnan_value, qnan_value, IGNORE);
8847214f
UD
9511
9512 TEST_fI_f1 (frexp, 0.0, 0.0, 0.0);
9513 TEST_fI_f1 (frexp, minus_zero, minus_zero, 0.0);
9514
b15cb495
UD
9515 TEST_fI_f1 (frexp, 12.8L, 0.8L, 4);
9516 TEST_fI_f1 (frexp, -27.34L, -0.854375L, 5);
8847214f
UD
9517
9518 END (frexp);
9519}
9520
9521
9522static void
9523gamma_test (void)
9524{
9525 errno = 0;
9526 FUNC(gamma) (1);
9527
9528 if (errno == ENOSYS)
9529 /* Function not implemented. */
9530 return;
8847214f
UD
9531
9532 START (gamma);
9533
5bf96de5
JM
9534 TEST_f_f1 (gamma, plus_infty, plus_infty, 1);
9535 TEST_f_f1 (gamma, 0, plus_infty, 1, DIVIDE_BY_ZERO_EXCEPTION);
9536 TEST_f_f1 (gamma, -3, plus_infty, IGNORE, DIVIDE_BY_ZERO_EXCEPTION);
9537 TEST_f_f1 (gamma, minus_infty, plus_infty, IGNORE);
9538 TEST_f_f1 (gamma, qnan_value, qnan_value, IGNORE);
8847214f
UD
9539
9540 TEST_f_f1 (gamma, 1, 0, 1);
9541 TEST_f_f1 (gamma, 3, M_LN2l, 1);
9542
9543 TEST_f_f1 (gamma, 0.5, M_LOG_SQRT_PIl, 1);
f30e0cd3 9544 TEST_f_f1 (gamma, -0.5, M_LOG_2_SQRT_PIl, -1);
8847214f
UD
9545
9546 END (gamma);
9547}
9548
601a3a5f
JM
9549static const struct test_ff_f_data hypot_test_data[] =
9550 {
9551 START_DATA (hypot),
9552 TEST_ff_f (hypot, plus_infty, 1, plus_infty),
9553 TEST_ff_f (hypot, minus_infty, 1, plus_infty),
8847214f 9554
15daa639 9555#ifndef TEST_INLINE
601a3a5f
JM
9556 TEST_ff_f (hypot, plus_infty, qnan_value, plus_infty),
9557 TEST_ff_f (hypot, minus_infty, qnan_value, plus_infty),
9558 TEST_ff_f (hypot, qnan_value, plus_infty, plus_infty),
9559 TEST_ff_f (hypot, qnan_value, minus_infty, plus_infty),
15daa639 9560#endif
8847214f 9561
601a3a5f 9562 TEST_ff_f (hypot, qnan_value, qnan_value, qnan_value),
8847214f 9563
601a3a5f
JM
9564 /* hypot (x,y) == hypot (+-x, +-y) */
9565 TEST_ff_f (hypot, 0.7L, 12.4L, 12.419742348374220601176836866763271L),
9566 TEST_ff_f (hypot, -0.7L, 12.4L, 12.419742348374220601176836866763271L),
9567 TEST_ff_f (hypot, 0.7L, -12.4L, 12.419742348374220601176836866763271L),
9568 TEST_ff_f (hypot, -0.7L, -12.4L, 12.419742348374220601176836866763271L),
9569 TEST_ff_f (hypot, 12.4L, 0.7L, 12.419742348374220601176836866763271L),
9570 TEST_ff_f (hypot, -12.4L, 0.7L, 12.419742348374220601176836866763271L),
9571 TEST_ff_f (hypot, 12.4L, -0.7L, 12.419742348374220601176836866763271L),
9572 TEST_ff_f (hypot, -12.4L, -0.7L, 12.419742348374220601176836866763271L),
8847214f 9573
601a3a5f
JM
9574 /* hypot (x,0) == fabs (x) */
9575 TEST_ff_f (hypot, 0.75L, 0, 0.75L),
9576 TEST_ff_f (hypot, -0.75L, 0, 0.75L),
9577 TEST_ff_f (hypot, -5.7e7, 0, 5.7e7L),
8847214f 9578
601a3a5f 9579 TEST_ff_f (hypot, 0.75L, 1.25L, 1.45773797371132511771853821938639577L),
8847214f 9580
601a3a5f
JM
9581 TEST_ff_f (hypot, 1.0L, 0x1p-61L, 1.0L),
9582 TEST_ff_f (hypot, 0x1p+0L, 0x1.fp-129L, 0x1p+0L),
1468ded3 9583#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
601a3a5f 9584 TEST_ff_f (hypot, 0x1.23456789abcdef0123456789ab8p-500L, 0x1.23456789abcdef0123456789ab8p-500L, 4.9155782399407039128612180934736799735113e-151L),
1468ded3 9585#endif
8e27e3cc 9586
aa4a2ae1 9587#if !(defined TEST_FLOAT && defined TEST_INLINE)
601a3a5f
JM
9588 TEST_ff_f (hypot, 0x3p125L, 0x4p125L, 0x5p125L),
9589 TEST_ff_f (hypot, 0x1.234566p-126L, 0x1.234566p-126L, 1.891441686191081936598531534017449451173e-38L),
aa4a2ae1
JM
9590#endif
9591
5779f134 9592#if !defined TEST_FLOAT && !(defined TEST_DOUBLE && defined TEST_INLINE)
601a3a5f
JM
9593 TEST_ff_f (hypot, 0x3p1021L, 0x4p1021L, 0x5p1021L),
9594 TEST_ff_f (hypot, 0x1p+0L, 0x0.3ep-1022L, 0x1p+0L),
aa4a2ae1
JM
9595#endif
9596
9597#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384 && !defined TEST_INLINE
601a3a5f 9598 TEST_ff_f (hypot, 0x3p16381L, 0x4p16381L, 0x5p16381L),
aa4a2ae1 9599#endif
601a3a5f
JM
9600 END_DATA (hypot)
9601 };
9602
9603static void
9604hypot_test (void)
9605{
9606 errno = 0;
9607 FUNC(hypot) (0.7L, 12.4L);
9608 if (errno == ENOSYS)
9609 /* Function not implemented. */
9610 return;
aa4a2ae1 9611
601a3a5f
JM
9612 START (hypot);
9613 RUN_TEST_LOOP_ff_f (hypot, hypot_test_data, );
8847214f
UD
9614 END (hypot);
9615}
9616
9617
9618static void
9619ilogb_test (void)
9620{
9621 START (ilogb);
9622
9623 TEST_f_i (ilogb, 1, 0);
9624 TEST_f_i (ilogb, M_El, 1);
9625 TEST_f_i (ilogb, 1024, 10);
9626 TEST_f_i (ilogb, -2000, 10);
9627
76da7265 9628 /* ilogb (0.0) == FP_ILOGB0 plus invalid exception */
f2da7793 9629 TEST_f_i (ilogb, 0.0, FP_ILOGB0, INVALID_EXCEPTION|ERRNO_EDOM);
67e971f1 9630 /* ilogb (qNaN) == FP_ILOGBNAN plus invalid exception */
f2da7793 9631 TEST_f_i (ilogb, qnan_value, FP_ILOGBNAN, INVALID_EXCEPTION|ERRNO_EDOM);
76da7265 9632 /* ilogb (inf) == INT_MAX plus invalid exception */
f2da7793 9633 TEST_f_i (ilogb, plus_infty, INT_MAX, INVALID_EXCEPTION|ERRNO_EDOM);
76da7265 9634 /* ilogb (-inf) == INT_MAX plus invalid exception */
f2da7793 9635 TEST_f_i (ilogb, minus_infty, INT_MAX, INVALID_EXCEPTION|ERRNO_EDOM);
8847214f
UD
9636
9637 END (ilogb);
9638}
9639
9640static void
9641isfinite_test (void)
9642{
9643 START (isfinite);
9644
9645 TEST_f_b (isfinite, 0, 1);
9646 TEST_f_b (isfinite, minus_zero, 1);
9647 TEST_f_b (isfinite, 10, 1);
ef1bb361 9648 TEST_f_b (isfinite, min_subnorm_value, 1);
8847214f
UD
9649 TEST_f_b (isfinite, plus_infty, 0);
9650 TEST_f_b (isfinite, minus_infty, 0);
67e971f1 9651 TEST_f_b (isfinite, qnan_value, 0);
8847214f
UD
9652
9653 END (isfinite);
9654}
9655
0e8e0c1c
JM
9656static void
9657isgreater_test (void)
9658{
9659 START (isgreater);
9660
9661 TEST_ff_i (isgreater, minus_zero, minus_zero, 0);
9662 TEST_ff_i (isgreater, minus_zero, plus_zero, 0);
9663 TEST_ff_i (isgreater, minus_zero, (FLOAT) 1, 0);
67e971f1 9664 TEST_ff_i (isgreater, minus_zero, qnan_value, 0);
0e8e0c1c
JM
9665 TEST_ff_i (isgreater, plus_zero, minus_zero, 0);
9666 TEST_ff_i (isgreater, plus_zero, plus_zero, 0);
9667 TEST_ff_i (isgreater, plus_zero, (FLOAT) 1, 0);
67e971f1 9668 TEST_ff_i (isgreater, plus_zero, qnan_value, 0);
0e8e0c1c
JM
9669 TEST_ff_i (isgreater, (FLOAT) 1, minus_zero, 1);
9670 TEST_ff_i (isgreater, (FLOAT) 1, plus_zero, 1);
9671 TEST_ff_i (isgreater, (FLOAT) 1, (FLOAT) 1, 0);
67e971f1
TS
9672 TEST_ff_i (isgreater, (FLOAT) 1, qnan_value, 0);
9673 TEST_ff_i (isgreater, qnan_value, minus_zero, 0);
9674 TEST_ff_i (isgreater, qnan_value, plus_zero, 0);
9675 TEST_ff_i (isgreater, qnan_value, (FLOAT) 1, 0);
9676 TEST_ff_i (isgreater, qnan_value, qnan_value, 0);
0e8e0c1c
JM
9677
9678 END (isgreater);
9679}
9680
9681static void
9682isgreaterequal_test (void)
9683{
9684 START (isgreaterequal);
9685
9686 TEST_ff_i (isgreaterequal, minus_zero, minus_zero, 1);
9687 TEST_ff_i (isgreaterequal, minus_zero, plus_zero, 1);
9688 TEST_ff_i (isgreaterequal, minus_zero, (FLOAT) 1, 0);
67e971f1 9689 TEST_ff_i (isgreaterequal, minus_zero, qnan_value, 0);
0e8e0c1c
JM
9690 TEST_ff_i (isgreaterequal, plus_zero, minus_zero, 1);
9691 TEST_ff_i (isgreaterequal, plus_zero, plus_zero, 1);
9692 TEST_ff_i (isgreaterequal, plus_zero, (FLOAT) 1, 0);
67e971f1 9693 TEST_ff_i (isgreaterequal, plus_zero, qnan_value, 0);
0e8e0c1c
JM
9694 TEST_ff_i (isgreaterequal, (FLOAT) 1, minus_zero, 1);
9695 TEST_ff_i (isgreaterequal, (FLOAT) 1, plus_zero, 1);
9696 TEST_ff_i (isgreaterequal, (FLOAT) 1, (FLOAT) 1, 1);
67e971f1
TS
9697 TEST_ff_i (isgreaterequal, (FLOAT) 1, qnan_value, 0);
9698 TEST_ff_i (isgreaterequal, qnan_value, minus_zero, 0);
9699 TEST_ff_i (isgreaterequal, qnan_value, plus_zero, 0);
9700 TEST_ff_i (isgreaterequal, qnan_value, (FLOAT) 1, 0);
9701 TEST_ff_i (isgreaterequal, qnan_value, qnan_value, 0);
0e8e0c1c
JM
9702
9703 END (isgreaterequal);
9704}
9705
ef1bb361
JM
9706static void
9707isinf_test (void)
9708{
9709 START (isinf);
9710
9711 TEST_f_b (isinf, 0, 0);
9712 TEST_f_b (isinf, minus_zero, 0);
9713 TEST_f_b (isinf, 10, 0);
9714 TEST_f_b (isinf, min_subnorm_value, 0);
9715 TEST_f_b (isinf, plus_infty, 1);
9716 TEST_f_b (isinf, minus_infty, 1);
67e971f1 9717 TEST_f_b (isinf, qnan_value, 0);
ef1bb361
JM
9718
9719 END (isinf);
9720}
9721
0e8e0c1c
JM
9722static void
9723isless_test (void)
9724{
9725 START (isless);
9726
9727 TEST_ff_i (isless, minus_zero, minus_zero, 0);
9728 TEST_ff_i (isless, minus_zero, plus_zero, 0);
9729 TEST_ff_i (isless, minus_zero, (FLOAT) 1, 1);
67e971f1 9730 TEST_ff_i (isless, minus_zero, qnan_value, 0);
0e8e0c1c
JM
9731 TEST_ff_i (isless, plus_zero, minus_zero, 0);
9732 TEST_ff_i (isless, plus_zero, plus_zero, 0);
9733 TEST_ff_i (isless, plus_zero, (FLOAT) 1, 1);
67e971f1 9734 TEST_ff_i (isless, plus_zero, qnan_value, 0);
0e8e0c1c
JM
9735 TEST_ff_i (isless, (FLOAT) 1, minus_zero, 0);
9736 TEST_ff_i (isless, (FLOAT) 1, plus_zero, 0);
9737 TEST_ff_i (isless, (FLOAT) 1, (FLOAT) 1, 0);
67e971f1
TS
9738 TEST_ff_i (isless, (FLOAT) 1, qnan_value, 0);
9739 TEST_ff_i (isless, qnan_value, minus_zero, 0);
9740 TEST_ff_i (isless, qnan_value, plus_zero, 0);
9741 TEST_ff_i (isless, qnan_value, (FLOAT) 1, 0);
9742 TEST_ff_i (isless, qnan_value, qnan_value, 0);
0e8e0c1c
JM
9743
9744 END (isless);
9745}
9746
9747static void
9748islessequal_test (void)
9749{
9750 START (islessequal);
9751
9752 TEST_ff_i (islessequal, minus_zero, minus_zero, 1);
9753 TEST_ff_i (islessequal, minus_zero, plus_zero, 1);
9754 TEST_ff_i (islessequal, minus_zero, (FLOAT) 1, 1);
67e971f1 9755 TEST_ff_i (islessequal, minus_zero, qnan_value, 0);
0e8e0c1c
JM
9756 TEST_ff_i (islessequal, plus_zero, minus_zero, 1);
9757 TEST_ff_i (islessequal, plus_zero, plus_zero, 1);
9758 TEST_ff_i (islessequal, plus_zero, (FLOAT) 1, 1);
67e971f1 9759 TEST_ff_i (islessequal, plus_zero, qnan_value, 0);
0e8e0c1c
JM
9760 TEST_ff_i (islessequal, (FLOAT) 1, minus_zero, 0);
9761 TEST_ff_i (islessequal, (FLOAT) 1, plus_zero, 0);
9762 TEST_ff_i (islessequal, (FLOAT) 1, (FLOAT) 1, 1);
67e971f1
TS
9763 TEST_ff_i (islessequal, (FLOAT) 1, qnan_value, 0);
9764 TEST_ff_i (islessequal, qnan_value, minus_zero, 0);
9765 TEST_ff_i (islessequal, qnan_value, plus_zero, 0);
9766 TEST_ff_i (islessequal, qnan_value, (FLOAT) 1, 0);
9767 TEST_ff_i (islessequal, qnan_value, qnan_value, 0);
0e8e0c1c
JM
9768
9769 END (islessequal);
9770}
9771
9772static void
9773islessgreater_test (void)
9774{
9775 START (islessgreater);
9776
9777 TEST_ff_i (islessgreater, minus_zero, minus_zero, 0);
9778 TEST_ff_i (islessgreater, minus_zero, plus_zero, 0);
9779 TEST_ff_i (islessgreater, minus_zero, (FLOAT) 1, 1);
67e971f1 9780 TEST_ff_i (islessgreater, minus_zero, qnan_value, 0);
0e8e0c1c
JM
9781 TEST_ff_i (islessgreater, plus_zero, minus_zero, 0);
9782 TEST_ff_i (islessgreater, plus_zero, plus_zero, 0);
9783 TEST_ff_i (islessgreater, plus_zero, (FLOAT) 1, 1);
67e971f1 9784 TEST_ff_i (islessgreater, plus_zero, qnan_value, 0);
0e8e0c1c
JM
9785 TEST_ff_i (islessgreater, (FLOAT) 1, minus_zero, 1);
9786 TEST_ff_i (islessgreater, (FLOAT) 1, plus_zero, 1);
9787 TEST_ff_i (islessgreater, (FLOAT) 1, (FLOAT) 1, 0);
67e971f1
TS
9788 TEST_ff_i (islessgreater, (FLOAT) 1, qnan_value, 0);
9789 TEST_ff_i (islessgreater, qnan_value, minus_zero, 0);
9790 TEST_ff_i (islessgreater, qnan_value, plus_zero, 0);
9791 TEST_ff_i (islessgreater, qnan_value, (FLOAT) 1, 0);
9792 TEST_ff_i (islessgreater, qnan_value, qnan_value, 0);
0e8e0c1c
JM
9793
9794 END (islessgreater);
9795}
9796
ef1bb361
JM
9797static void
9798isnan_test (void)
9799{
9800 START (isnan);
9801
9802 TEST_f_b (isnan, 0, 0);
9803 TEST_f_b (isnan, minus_zero, 0);
9804 TEST_f_b (isnan, 10, 0);
9805 TEST_f_b (isnan, min_subnorm_value, 0);
9806 TEST_f_b (isnan, plus_infty, 0);
9807 TEST_f_b (isnan, minus_infty, 0);
67e971f1 9808 TEST_f_b (isnan, qnan_value, 1);
ef1bb361
JM
9809
9810 END (isnan);
9811}
9812
8847214f
UD
9813static void
9814isnormal_test (void)
9815{
9816 START (isnormal);
9817
9818 TEST_f_b (isnormal, 0, 0);
9819 TEST_f_b (isnormal, minus_zero, 0);
9820 TEST_f_b (isnormal, 10, 1);
ef1bb361 9821 TEST_f_b (isnormal, min_subnorm_value, 0);
8847214f
UD
9822 TEST_f_b (isnormal, plus_infty, 0);
9823 TEST_f_b (isnormal, minus_infty, 0);
67e971f1 9824 TEST_f_b (isnormal, qnan_value, 0);
8847214f
UD
9825
9826 END (isnormal);
9827}
9828
57267616
TS
9829static void
9830issignaling_test (void)
9831{
9832 START (issignaling);
9833
9834 TEST_f_b (issignaling, 0, 0);
9835 TEST_f_b (issignaling, minus_zero, 0);
9836 TEST_f_b (issignaling, 10, 0);
9837 TEST_f_b (issignaling, min_subnorm_value, 0);
9838 TEST_f_b (issignaling, plus_infty, 0);
9839 TEST_f_b (issignaling, minus_infty, 0);
9840 TEST_f_b (issignaling, qnan_value, 0);
9841
9842 END (issignaling);
9843}
9844
0e8e0c1c
JM
9845static void
9846isunordered_test (void)
9847{
9848 START (isunordered);
9849
9850 TEST_ff_i (isunordered, minus_zero, minus_zero, 0);
9851 TEST_ff_i (isunordered, minus_zero, plus_zero, 0);
9852 TEST_ff_i (isunordered, minus_zero, (FLOAT) 1, 0);
67e971f1 9853 TEST_ff_i (isunordered, minus_zero, qnan_value, 1);
0e8e0c1c
JM
9854 TEST_ff_i (isunordered, plus_zero, minus_zero, 0);
9855 TEST_ff_i (isunordered, plus_zero, plus_zero, 0);
9856 TEST_ff_i (isunordered, plus_zero, (FLOAT) 1, 0);
67e971f1 9857 TEST_ff_i (isunordered, plus_zero, qnan_value, 1);
0e8e0c1c
JM
9858 TEST_ff_i (isunordered, (FLOAT) 1, minus_zero, 0);
9859 TEST_ff_i (isunordered, (FLOAT) 1, plus_zero, 0);
9860 TEST_ff_i (isunordered, (FLOAT) 1, (FLOAT) 1, 0);
67e971f1
TS
9861 TEST_ff_i (isunordered, (FLOAT) 1, qnan_value, 1);
9862 TEST_ff_i (isunordered, qnan_value, minus_zero, 1);
9863 TEST_ff_i (isunordered, qnan_value, plus_zero, 1);
9864 TEST_ff_i (isunordered, qnan_value, (FLOAT) 1, 1);
9865 TEST_ff_i (isunordered, qnan_value, qnan_value, 1);
0e8e0c1c
JM
9866
9867 END (isunordered);
9868}
9869
74c57478
JM
9870static const struct test_f_f_data j0_test_data[] =
9871 {
9872 START_DATA (j0),
9873 /* j0 is the Bessel function of the first kind of order 0 */
9874 TEST_f_f (j0, qnan_value, qnan_value),
9875 TEST_f_f (j0, plus_infty, 0),
9876 TEST_f_f (j0, -1.0, 0.765197686557966551449717526102663221L),
9877 TEST_f_f (j0, 0.0, 1.0),
9878 TEST_f_f (j0, 0.125L, 0.996097563041985204620768999453174712L),
9879 TEST_f_f (j0, 0.75L, 0.864242275166648623555731103820923211L),
9880 TEST_f_f (j0, 1.0, 0.765197686557966551449717526102663221L),
9881 TEST_f_f (j0, 1.5, 0.511827671735918128749051744283411720L),
9882 TEST_f_f (j0, 2.0, 0.223890779141235668051827454649948626L),
9883 TEST_f_f (j0, 8.0, 0.171650807137553906090869407851972001L),
9884 TEST_f_f (j0, 10.0, -0.245935764451348335197760862485328754L),
9885 TEST_f_f (j0, 4.0, -3.9714980986384737228659076845169804197562E-1L),
9886 TEST_f_f (j0, -4.0, -3.9714980986384737228659076845169804197562E-1L),
8847214f 9887
74c57478 9888 TEST_f_f (j0, 0x1.d7ce3ap+107L, 2.775523647291230802651040996274861694514e-17L),
c36e1d23
JM
9889
9890#ifndef TEST_FLOAT
74c57478
JM
9891 TEST_f_f (j0, -0x1.001000001p+593L, -3.927269966354206207832593635798954916263e-90L),
9892 TEST_f_f (j0, 0x1p1023L, -1.5665258060609012834424478437196679802783e-155L),
c36e1d23
JM
9893#endif
9894
d2f9799e 9895#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM
9896 TEST_f_f (j0, 0x1p16382L, -1.2193782500509000574176799046642541129387e-2466L),
9897 TEST_f_f (j0, 0x1p16383L, 9.5859502826270374691362975419147645151233e-2467L),
d2f9799e 9898#endif
74c57478
JM
9899 END_DATA (j0)
9900 };
8847214f
UD
9901
9902static void
74c57478 9903j0_test (void)
8847214f 9904{
8a216c1b 9905 FLOAT s, c;
8847214f 9906 errno = 0;
cd53c157
UD
9907 FUNC (sincos) (0, &s, &c);
9908 if (errno == ENOSYS)
9909 /* Required function not implemented. */
9910 return;
74c57478 9911 FUNC(j0) (0);
8847214f
UD
9912 if (errno == ENOSYS)
9913 /* Function not implemented. */
9914 return;
9915
74c57478
JM
9916 START (j0);
9917 RUN_TEST_LOOP_f_f (j0, j0_test_data, );
9918 END (j0);
9919}
8847214f 9920
8847214f 9921
74c57478
JM
9922static const struct test_f_f_data j1_test_data[] =
9923 {
9924 START_DATA (j1),
9925 /* j1 is the Bessel function of the first kind of order 1 */
9926 TEST_f_f (j1, qnan_value, qnan_value),
9927 TEST_f_f (j1, plus_infty, 0),
8847214f 9928
74c57478
JM
9929 TEST_f_f (j1, -1.0, -0.440050585744933515959682203718914913L),
9930 TEST_f_f (j1, 0.0, 0.0),
9931 TEST_f_f (j1, 0.125L, 0.0623780091344946810942311355879361177L),
9932 TEST_f_f (j1, 0.75L, 0.349243602174862192523281016426251335L),
9933 TEST_f_f (j1, 1.0, 0.440050585744933515959682203718914913L),
9934 TEST_f_f (j1, 1.5, 0.557936507910099641990121213156089400L),
9935 TEST_f_f (j1, 2.0, 0.576724807756873387202448242269137087L),
9936 TEST_f_f (j1, 8.0, 0.234636346853914624381276651590454612L),
9937 TEST_f_f (j1, 10.0, 0.0434727461688614366697487680258592883L),
8847214f 9938
74c57478 9939 TEST_f_f (j1, 0x1.3ffp+74L, 1.818984347516051243459364437186082741567e-12L),
c36e1d23
JM
9940
9941#ifndef TEST_FLOAT
74c57478
JM
9942 TEST_f_f (j1, 0x1.ff00000000002p+840L, 1.846591691699331493194965158699937660696e-127L),
9943 TEST_f_f (j1, 0x1p1023L, 8.2687542933709649327986678723012001545638e-155L),
c36e1d23
JM
9944#endif
9945
d2f9799e 9946#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM
9947 TEST_f_f (j1, 0x1p16382L, 8.0839224448726336195866026476176740513439e-2467L),
9948 TEST_f_f (j1, 0x1p16383L, -3.8895531955766020648617743624167352352217e-2467L),
d2f9799e 9949#endif
74c57478
JM
9950 END_DATA (j1)
9951 };
d2f9799e 9952
74c57478
JM
9953static void
9954j1_test (void)
9955{
9956 FLOAT s, c;
9957 errno = 0;
9958 FUNC (sincos) (0, &s, &c);
9959 if (errno == ENOSYS)
9960 /* Required function not implemented. */
9961 return;
9962 FUNC(j1) (0);
9963 if (errno == ENOSYS)
9964 /* Function not implemented. */
9965 return;
9966
9967 START (j1);
9968 RUN_TEST_LOOP_f_f (j1, j1_test_data, );
8847214f
UD
9969 END (j1);
9970}
9971
0e400df5
JM
9972static const struct test_if_f_data jn_test_data[] =
9973 {
9974 START_DATA (jn),
9975 /* jn is the Bessel function of the first kind of order n. */
9976 /* jn (0, x) == j0 (x) */
9977 TEST_if_f (jn, 0, qnan_value, qnan_value),
9978 TEST_if_f (jn, 0, plus_infty, 0),
9979 TEST_if_f (jn, 0, -1.0, 0.765197686557966551449717526102663221L),
9980 TEST_if_f (jn, 0, 0.0, 1.0),
9981 TEST_if_f (jn, 0, 0.125L, 0.996097563041985204620768999453174712L),
9982 TEST_if_f (jn, 0, 0.75L, 0.864242275166648623555731103820923211L),
9983 TEST_if_f (jn, 0, 1.0, 0.765197686557966551449717526102663221L),
9984 TEST_if_f (jn, 0, 1.5, 0.511827671735918128749051744283411720L),
9985 TEST_if_f (jn, 0, 2.0, 0.223890779141235668051827454649948626L),
9986 TEST_if_f (jn, 0, 8.0, 0.171650807137553906090869407851972001L),
9987 TEST_if_f (jn, 0, 10.0, -0.245935764451348335197760862485328754L),
9988 TEST_if_f (jn, 0, 4.0, -3.9714980986384737228659076845169804197562E-1L),
9989 TEST_if_f (jn, 0, -4.0, -3.9714980986384737228659076845169804197562E-1L),
9990
9991 /* jn (1, x) == j1 (x) */
9992 TEST_if_f (jn, 1, qnan_value, qnan_value),
9993 TEST_if_f (jn, 1, plus_infty, 0),
9994 TEST_if_f (jn, 1, -1.0, -0.440050585744933515959682203718914913L),
9995 TEST_if_f (jn, 1, 0.0, 0.0),
9996 TEST_if_f (jn, 1, 0.125L, 0.0623780091344946810942311355879361177L),
9997 TEST_if_f (jn, 1, 0.75L, 0.349243602174862192523281016426251335L),
9998 TEST_if_f (jn, 1, 1.0, 0.440050585744933515959682203718914913L),
9999 TEST_if_f (jn, 1, 1.5, 0.557936507910099641990121213156089400L),
10000 TEST_if_f (jn, 1, 2.0, 0.576724807756873387202448242269137087L),
10001 TEST_if_f (jn, 1, 8.0, 0.234636346853914624381276651590454612L),
10002 TEST_if_f (jn, 1, 10.0, 0.0434727461688614366697487680258592883L),
10003
10004 /* jn (3, x) */
10005 TEST_if_f (jn, 3, qnan_value, qnan_value),
10006 TEST_if_f (jn, 3, plus_infty, 0),
10007
10008 TEST_if_f (jn, 3, -1.0, -0.0195633539826684059189053216217515083L),
10009 TEST_if_f (jn, 3, 0.0, 0.0),
10010 TEST_if_f (jn, 3, 0.125L, 0.406503832554912875023029337653442868e-4L),
10011 TEST_if_f (jn, 3, 0.75L, 0.848438342327410884392755236884386804e-2L),
10012 TEST_if_f (jn, 3, 1.0, 0.0195633539826684059189053216217515083L),
10013 TEST_if_f (jn, 3, 2.0, 0.128943249474402051098793332969239835L),
10014 TEST_if_f (jn, 3, 10.0, 0.0583793793051868123429354784103409563L),
10015
10016 /* jn (10, x) */
10017 TEST_if_f (jn, 10, qnan_value, qnan_value),
10018 TEST_if_f (jn, 10, plus_infty, 0),
10019
10020 TEST_if_f (jn, 10, -1.0, 0.263061512368745320699785368779050294e-9L),
10021 TEST_if_f (jn, 10, 0.0, 0.0),
10022 TEST_if_f (jn, 10, 0.125L, 0.250543369809369890173993791865771547e-18L),
10023 TEST_if_f (jn, 10, 0.75L, 0.149621713117596814698712483621682835e-10L),
10024 TEST_if_f (jn, 10, 1.0, 0.263061512368745320699785368779050294e-9L),
10025 TEST_if_f (jn, 10, 2.0, 0.251538628271673670963516093751820639e-6L),
10026 TEST_if_f (jn, 10, 10.0, 0.207486106633358857697278723518753428L),
10027
10028 /* BZ #11589 .*/
10029 TEST_if_f (jn, 2, 2.4048255576957729L, 0.43175480701968038399746111312430703L),
10030 TEST_if_f (jn, 3, 2.4048255576957729L, 0.19899990535769083404042146764530813L),
10031 TEST_if_f (jn, 4, 2.4048255576957729L, 0.647466661641779720084932282551219891E-1L),
10032 TEST_if_f (jn, 5, 2.4048255576957729L, 0.163892432048058525099230549946147698E-1L),
10033 TEST_if_f (jn, 6, 2.4048255576957729L, 0.34048184720278336646673682895929161E-2L),
10034 TEST_if_f (jn, 7, 2.4048255576957729L, 0.60068836573295394221291569249883076E-3L),
10035 TEST_if_f (jn, 8, 2.4048255576957729L, 0.92165786705344923232879022467054148E-4L),
10036 TEST_if_f (jn, 9, 2.4048255576957729L, 0.12517270977961513005428966643852564E-4L),
10037
10038 /* Bug 14155: spurious exception may occur. */
10039 TEST_if_f (jn, 2, 0x1.ffff62p+99L, -4.43860668048170034334926693188979974489e-16L, UNDERFLOW_EXCEPTION_OK),
10040 END_DATA (jn)
10041 };
10042
8847214f
UD
10043static void
10044jn_test (void)
10045{
8a216c1b 10046 FLOAT s, c;
8847214f 10047 errno = 0;
cd53c157
UD
10048 FUNC (sincos) (0, &s, &c);
10049 if (errno == ENOSYS)
10050 /* Required function not implemented. */
10051 return;
8847214f
UD
10052 FUNC(jn) (1, 1);
10053 if (errno == ENOSYS)
10054 /* Function not implemented. */
10055 return;
10056
8847214f 10057 START (jn);
0e400df5 10058 RUN_TEST_LOOP_if_f (jn, jn_test_data, );
8847214f
UD
10059 END (jn);
10060}
10061
10062
243216e1
JM
10063static const struct test_fi_f_data ldexp_test_data[] =
10064 {
10065 START_DATA (ldexp),
10066 TEST_fi_f (ldexp, 0, 0, 0),
10067 TEST_fi_f (ldexp, minus_zero, 0, minus_zero),
8847214f 10068
243216e1
JM
10069 TEST_fi_f (ldexp, plus_infty, 1, plus_infty),
10070 TEST_fi_f (ldexp, minus_infty, 1, minus_infty),
10071 TEST_fi_f (ldexp, qnan_value, 1, qnan_value),
8847214f 10072
243216e1
JM
10073 TEST_fi_f (ldexp, 0.8L, 4, 12.8L),
10074 TEST_fi_f (ldexp, -0.854375L, 5, -27.34L),
8847214f 10075
243216e1
JM
10076 /* ldexp (x, 0) == x. */
10077 TEST_fi_f (ldexp, 1.0L, 0L, 1.0L),
10078 END_DATA (ldexp)
10079 };
af00a34d 10080
243216e1
JM
10081static void
10082ldexp_test (void)
10083{
10084 START (ldexp);
10085 RUN_TEST_LOOP_fi_f (ldexp, ldexp_test_data, );
af00a34d 10086 END (ldexp);
8847214f
UD
10087}
10088
2550dfe9 10089
8847214f
UD
10090static void
10091lgamma_test (void)
10092{
10093 errno = 0;
10094 FUNC(lgamma) (0);
10095 if (errno == ENOSYS)
10096 /* Function not implemented. */
10097 return;
8847214f
UD
10098
10099 START (lgamma);
10100
c31a5b1e
JM
10101 TEST_f_f1 (lgamma, plus_infty, plus_infty, 1);
10102 TEST_f_f1 (lgamma, 0, plus_infty, 1, DIVIDE_BY_ZERO_EXCEPTION);
10103 TEST_f_f1 (lgamma, minus_zero, plus_infty, -1, DIVIDE_BY_ZERO_EXCEPTION);
10104 TEST_f_f1 (lgamma, qnan_value, qnan_value, IGNORE);
8847214f
UD
10105
10106 /* lgamma (x) == +inf plus divide by zero exception for integer x <= 0. */
c31a5b1e
JM
10107 TEST_f_f1 (lgamma, -3, plus_infty, IGNORE, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE);
10108 TEST_f_f1 (lgamma, minus_infty, plus_infty, IGNORE);
10109 TEST_f_f1 (lgamma, -max_value, plus_infty, IGNORE, DIVIDE_BY_ZERO_EXCEPTION);
10110 TEST_f_f1 (lgamma, max_value, plus_infty, 1, OVERFLOW_EXCEPTION);
8847214f
UD
10111
10112 TEST_f_f1 (lgamma, 1, 0, 1);
10113
10114 TEST_f_f1 (lgamma, 3, M_LN2l, 1);
10115
10116 TEST_f_f1 (lgamma, 0.5, M_LOG_SQRT_PIl, 1);
10117 TEST_f_f1 (lgamma, -0.5, M_LOG_2_SQRT_PIl, -1);
79df8ce5
AJ
10118 TEST_f_f1 (lgamma, 0.7L, 0.260867246531666514385732417016759578L, 1);
10119 TEST_f_f1 (lgamma, 1.2L, -0.853740900033158497197028392998854470e-1L, 1);
8847214f
UD
10120
10121 END (lgamma);
10122}
10123
2550dfe9 10124
8847214f
UD
10125static void
10126lrint_test (void)
10127{
10128 /* XXX this test is incomplete. We need to have a way to specifiy
10129 the rounding method and test the critical cases. So far, only
10130 unproblematic numbers are tested. */
64d063b8 10131 /* TODO: missing +/-Inf as well as qNaN tests. */
8847214f
UD
10132
10133 START (lrint);
10134
10135 TEST_f_l (lrint, 0.0, 0);
10136 TEST_f_l (lrint, minus_zero, 0);
3c6cad26
UD
10137 TEST_f_l (lrint, 0.2L, 0);
10138 TEST_f_l (lrint, -0.2L, 0);
8847214f 10139
3c6cad26
UD
10140 TEST_f_l (lrint, 1.4L, 1);
10141 TEST_f_l (lrint, -1.4L, -1);
8847214f 10142
3c6cad26
UD
10143 TEST_f_l (lrint, 8388600.3L, 8388600);
10144 TEST_f_l (lrint, -8388600.3L, -8388600);
8847214f 10145
3eb61415
UD
10146 TEST_f_l (lrint, 1071930.0008, 1071930);
10147#ifndef TEST_FLOAT
10148 TEST_f_l (lrint, 1073741824.01, 1073741824);
39007ae3
UD
10149# if LONG_MAX > 281474976710656
10150 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10151# endif
3eb61415
UD
10152#endif
10153
8847214f
UD
10154 END (lrint);
10155}
10156
2550dfe9 10157
6624dbc0
UD
10158static void
10159lrint_test_tonearest (void)
10160{
10161 int save_round_mode;
10162 START (lrint_tonearest);
10163
10164 save_round_mode = fegetround ();
10165
10166 if (!fesetround (FE_TONEAREST))
10167 {
10168 TEST_f_l (lrint, 0.0, 0);
10169 TEST_f_l (lrint, minus_zero, 0);
10170 TEST_f_l (lrint, 0.2L, 0);
10171 TEST_f_l (lrint, -0.2L, 0);
10172 TEST_f_l (lrint, 0.5L, 0);
10173 TEST_f_l (lrint, -0.5L, 0);
10174 TEST_f_l (lrint, 0.8L, 1);
10175 TEST_f_l (lrint, -0.8L, -1);
10176
10177 TEST_f_l (lrint, 1.4L, 1);
10178 TEST_f_l (lrint, -1.4L, -1);
10179
10180 TEST_f_l (lrint, 8388600.3L, 8388600);
10181 TEST_f_l (lrint, -8388600.3L, -8388600);
10182
10183 TEST_f_l (lrint, 1071930.0008, 1071930);
10184#ifndef TEST_FLOAT
10185 TEST_f_l (lrint, 1073741824.01, 1073741824);
10186# if LONG_MAX > 281474976710656
10187 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10188# endif
10189#endif
10190 }
10191
10192 fesetround (save_round_mode);
10193
10194 END (lrint_tonearest);
10195}
10196
10197
10198static void
10199lrint_test_towardzero (void)
10200{
10201 int save_round_mode;
10202 START (lrint_towardzero);
10203
10204 save_round_mode = fegetround ();
10205
10206 if (!fesetround (FE_TOWARDZERO))
10207 {
10208 TEST_f_l (lrint, 0.0, 0);
10209 TEST_f_l (lrint, minus_zero, 0);
10210 TEST_f_l (lrint, 0.2L, 0);
10211 TEST_f_l (lrint, -0.2L, 0);
10212 TEST_f_l (lrint, 0.5L, 0);
10213 TEST_f_l (lrint, -0.5L, 0);
10214 TEST_f_l (lrint, 0.8L, 0);
10215 TEST_f_l (lrint, -0.8L, 0);
10216
10217 TEST_f_l (lrint, 1.4L, 1);
10218 TEST_f_l (lrint, -1.4L, -1);
10219
10220 TEST_f_l (lrint, 8388600.3L, 8388600);
10221 TEST_f_l (lrint, -8388600.3L, -8388600);
10222
10223 TEST_f_l (lrint, 1071930.0008, 1071930);
10224#ifndef TEST_FLOAT
10225 TEST_f_l (lrint, 1073741824.01, 1073741824);
10226# if LONG_MAX > 281474976710656
10227 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10228# endif
10229#endif
10230 }
10231
10232 fesetround (save_round_mode);
10233
10234 END (lrint_towardzero);
10235}
10236
10237
10238static void
10239lrint_test_downward (void)
10240{
10241 int save_round_mode;
10242 START (lrint_downward);
10243
10244 save_round_mode = fegetround ();
10245
10246 if (!fesetround (FE_DOWNWARD))
10247 {
10248 TEST_f_l (lrint, 0.0, 0);
10249 TEST_f_l (lrint, minus_zero, 0);
10250 TEST_f_l (lrint, 0.2L, 0);
10251 TEST_f_l (lrint, -0.2L, -1);
10252 TEST_f_l (lrint, 0.5L, 0);
10253 TEST_f_l (lrint, -0.5L, -1);
10254 TEST_f_l (lrint, 0.8L, 0);
10255 TEST_f_l (lrint, -0.8L, -1);
10256
10257 TEST_f_l (lrint, 1.4L, 1);
10258 TEST_f_l (lrint, -1.4L, -2);
10259
10260 TEST_f_l (lrint, 8388600.3L, 8388600);
10261 TEST_f_l (lrint, -8388600.3L, -8388601);
10262
10263 TEST_f_l (lrint, 1071930.0008, 1071930);
10264#ifndef TEST_FLOAT
10265 TEST_f_l (lrint, 1073741824.01, 1073741824);
10266# if LONG_MAX > 281474976710656
10267 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
10268# endif
10269#endif
10270 }
10271
10272 fesetround (save_round_mode);
10273
10274 END (lrint_downward);
10275}
10276
10277
10278static void
10279lrint_test_upward (void)
10280{
10281 int save_round_mode;
10282 START (lrint_upward);
10283
10284 save_round_mode = fegetround ();
10285
10286 if (!fesetround (FE_UPWARD))
10287 {
10288 TEST_f_l (lrint, 0.0, 0);
10289 TEST_f_l (lrint, minus_zero, 0);
10290 TEST_f_l (lrint, 0.2L, 1);
10291 TEST_f_l (lrint, -0.2L, 0);
10292 TEST_f_l (lrint, 0.5L, 1);
10293 TEST_f_l (lrint, -0.5L, 0);
10294 TEST_f_l (lrint, 0.8L, 1);
10295 TEST_f_l (lrint, -0.8L, 0);
10296
10297 TEST_f_l (lrint, 1.4L, 2);
10298 TEST_f_l (lrint, -1.4L, -1);
10299
10300 TEST_f_l (lrint, 8388600.3L, 8388601);
10301 TEST_f_l (lrint, -8388600.3L, -8388600);
10302
10303#ifndef TEST_FLOAT
10304 TEST_f_l (lrint, 1071930.0008, 1071931);
10305 TEST_f_l (lrint, 1073741824.01, 1073741825);
10306# if LONG_MAX > 281474976710656 && defined (TEST_LDOUBLE)
89210b4c 10307 TEST_f_l (lrint, 281474976710656.025, 281474976710656);
6624dbc0
UD
10308# endif
10309#endif
10310 }
10311
10312 fesetround (save_round_mode);
10313
10314 END (lrint_upward);
10315}
10316
10317
8847214f
UD
10318static void
10319llrint_test (void)
10320{
10321 /* XXX this test is incomplete. We need to have a way to specifiy
10322 the rounding method and test the critical cases. So far, only
10323 unproblematic numbers are tested. */
64d063b8 10324 /* TODO: missing +/-Inf as well as qNaN tests. */
8847214f
UD
10325
10326 START (llrint);
10327
10328 TEST_f_L (llrint, 0.0, 0);
10329 TEST_f_L (llrint, minus_zero, 0);
3c6cad26
UD
10330 TEST_f_L (llrint, 0.2L, 0);
10331 TEST_f_L (llrint, -0.2L, 0);
8847214f 10332
3c6cad26
UD
10333 TEST_f_L (llrint, 1.4L, 1);
10334 TEST_f_L (llrint, -1.4L, -1);
8847214f 10335
3c6cad26
UD
10336 TEST_f_L (llrint, 8388600.3L, 8388600);
10337 TEST_f_L (llrint, -8388600.3L, -8388600);
8847214f 10338
3eb61415
UD
10339 TEST_f_l (llrint, 1071930.0008, 1071930);
10340
8847214f
UD
10341 /* Test boundary conditions. */
10342 /* 0x1FFFFF */
10343 TEST_f_L (llrint, 2097151.0,2097151LL);
10344 /* 0x800000 */
10345 TEST_f_L (llrint, 8388608.0, 8388608LL);
10346 /* 0x1000000 */
10347 TEST_f_L (llrint, 16777216.0, 16777216LL);
10348 /* 0x20000000000 */
10349 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10350 /* 0x40000000000 */
10351 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
39007ae3
UD
10352 /* 0x1000000000000 */
10353 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
8847214f
UD
10354 /* 0x10000000000000 */
10355 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10356 /* 0x10000080000000 */
10357 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10358 /* 0x20000000000000 */
10359 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10360 /* 0x80000000000000 */
10361 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10362 /* 0x100000000000000 */
10363 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
f964490f
RM
10364#ifdef TEST_LDOUBLE
10365 /* The input can only be represented in long double. */
10366 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370496LL);
10367 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10368 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10369 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370497LL);
10370 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370498LL);
10371
10372 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370496LL);
10373 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10374 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10375 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370497LL);
10376 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370498LL);
10377
830fce04
RM
10378# if LDBL_MANT_DIG > 100
10379 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10380 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10381 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10382 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370495LL);
10383 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370496LL);
10384 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370497LL);
10385
10386 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10387 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10388 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10389 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370495LL);
10390 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370496LL);
10391 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370497LL);
10392#endif
10393
f964490f
RM
10394 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740992LL);
10395 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10396 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10397 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740993LL);
10398 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740994LL);
10399
10400 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740992LL);
10401 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10402 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10403 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740993LL);
10404 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740994LL);
10405
830fce04
RM
10406# if LDBL_MANT_DIG > 100
10407 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10408 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10409 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10410 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740992LL);
10411 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740993LL);
10412 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740994LL);
10413
10414 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10415 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10416 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10417 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740992LL);
10418 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740993LL);
10419 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740994LL);
10420#endif
10421
f964490f
RM
10422 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927936LL);
10423 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10424 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10425 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927937LL);
10426 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927938LL);
10427
10428 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927936LL);
10429 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10430 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10431 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927937LL);
10432 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927938LL);
830fce04
RM
10433
10434# if LDBL_MANT_DIG > 100
10435 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775806LL);
10436 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775806LL);
10437 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10438 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10439 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10440 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10441 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10442 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10443 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775807LL);
10444 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775807LL);
10445 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10446 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10447# endif
f964490f 10448#endif
8847214f
UD
10449
10450 END (llrint);
10451}
10452
830fce04
RM
10453static void
10454llrint_test_tonearest (void)
10455{
10456 int save_round_mode;
10457 START (llrint_tonearest);
10458
10459 save_round_mode = fegetround ();
10460
10461 if (!fesetround (FE_TONEAREST))
10462 {
10463 TEST_f_L (llrint, 0.0, 0);
10464 TEST_f_L (llrint, minus_zero, 0);
10465 TEST_f_L (llrint, 0.2L, 0);
10466 TEST_f_L (llrint, -0.2L, 0);
10467
10468 TEST_f_L (llrint, 1.4L, 1);
10469 TEST_f_L (llrint, -1.4L, -1);
10470
10471 TEST_f_L (llrint, 8388600.3L, 8388600);
10472 TEST_f_L (llrint, -8388600.3L, -8388600);
10473
10474 TEST_f_l (llrint, 1071930.0008, 1071930);
10475
10476 /* Test boundary conditions. */
10477 /* 0x1FFFFF */
10478 TEST_f_L (llrint, 2097151.0,2097151LL);
10479 /* 0x800000 */
10480 TEST_f_L (llrint, 8388608.0, 8388608LL);
10481 /* 0x1000000 */
10482 TEST_f_L (llrint, 16777216.0, 16777216LL);
10483 /* 0x20000000000 */
10484 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10485 /* 0x40000000000 */
10486 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10487 /* 0x1000000000000 */
10488 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10489 /* 0x10000000000000 */
10490 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10491 /* 0x10000080000000 */
10492 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10493 /* 0x20000000000000 */
10494 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10495 /* 0x80000000000000 */
10496 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10497 /* 0x100000000000000 */
10498 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10499#ifdef TEST_LDOUBLE
10500 /* The input can only be represented in long double. */
10501 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370496LL);
10502 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10503 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10504 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370497LL);
10505 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370498LL);
10506
10507 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370496LL);
10508 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10509 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10510 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370497LL);
10511 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370498LL);
10512
10513# if LDBL_MANT_DIG > 100
10514 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10515 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10516 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10517 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370495LL);
10518 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370496LL);
10519 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370497LL);
10520
10521 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10522 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10523 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10524 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370495LL);
10525 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370496LL);
10526 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370497LL);
10527#endif
10528
10529 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740992LL);
10530 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10531 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10532 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740993LL);
10533 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740994LL);
10534
10535 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740992LL);
10536 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10537 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10538 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740993LL);
10539 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740994LL);
10540
10541# if LDBL_MANT_DIG > 100
10542 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10543 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10544 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10545 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740992LL);
10546 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740993LL);
10547 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740994LL);
10548
10549 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10550 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10551 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10552 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740992LL);
10553 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740993LL);
10554 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740994LL);
10555#endif
10556
10557 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927936LL);
10558 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10559 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10560 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927937LL);
10561 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927938LL);
10562
10563 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927936LL);
10564 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10565 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10566 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927937LL);
10567 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927938LL);
10568
10569# if LDBL_MANT_DIG > 100
10570 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775806LL);
10571 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775806LL);
10572 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10573 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10574 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10575 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10576 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10577 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10578 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775807LL);
10579 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775807LL);
10580 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10581 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10582# endif
10583#endif
10584 }
10585
10586 fesetround (save_round_mode);
10587
10588 END (llrint_tonearest);
10589}
10590
10591static void
10592llrint_test_towardzero (void)
10593{
10594 int save_round_mode;
10595 START (llrint_towardzero);
10596
10597 save_round_mode = fegetround ();
10598
10599 if (!fesetround (FE_TOWARDZERO))
10600 {
10601 TEST_f_L (llrint, 0.0, 0);
10602 TEST_f_L (llrint, minus_zero, 0);
10603 TEST_f_L (llrint, 0.2L, 0);
10604 TEST_f_L (llrint, -0.2L, 0);
10605
10606 TEST_f_L (llrint, 1.4L, 1);
10607 TEST_f_L (llrint, -1.4L, -1);
10608
10609 TEST_f_L (llrint, 8388600.3L, 8388600);
10610 TEST_f_L (llrint, -8388600.3L, -8388600);
10611
10612 TEST_f_l (llrint, 1071930.0008, 1071930);
10613
10614 /* Test boundary conditions. */
10615 /* 0x1FFFFF */
10616 TEST_f_L (llrint, 2097151.0,2097151LL);
10617 /* 0x800000 */
10618 TEST_f_L (llrint, 8388608.0, 8388608LL);
10619 /* 0x1000000 */
10620 TEST_f_L (llrint, 16777216.0, 16777216LL);
10621 /* 0x20000000000 */
10622 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10623 /* 0x40000000000 */
10624 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10625 /* 0x1000000000000 */
10626 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10627 /* 0x10000000000000 */
10628 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10629 /* 0x10000080000000 */
10630 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10631 /* 0x20000000000000 */
10632 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10633 /* 0x80000000000000 */
10634 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10635 /* 0x100000000000000 */
10636 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10637#ifdef TEST_LDOUBLE
10638 /* The input can only be represented in long double. */
10639 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370495LL);
10640 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10641 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10642 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370496LL);
10643 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370497LL);
10644
10645 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370495LL);
10646 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10647 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10648 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370496LL);
10649 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370497LL);
10650
10651# if LDBL_MANT_DIG > 100
10652 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10653 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10654 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10655 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370494LL);
10656 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370495LL);
10657 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370496LL);
10658
10659 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10660 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10661 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10662 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370494LL);
10663 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370495LL);
10664 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370496LL);
10665#endif
10666
10667 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740991LL);
10668 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10669 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10670 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740992LL);
10671 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740993LL);
10672
10673 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740991LL);
10674 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10675 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10676 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740992LL);
10677 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740993LL);
10678
10679# if LDBL_MANT_DIG > 100
10680 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10681 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10682 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10683 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740991LL);
10684 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740992LL);
10685 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740993LL);
10686
10687 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10688 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10689 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10690 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740991LL);
10691 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740992LL);
10692 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740993LL);
10693#endif
10694
10695 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927935LL);
10696 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10697 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10698 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927936LL);
10699 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927937LL);
10700
10701 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927935LL);
10702 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10703 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10704 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927936LL);
10705 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927937LL);
10706
10707# if LDBL_MANT_DIG > 100
10708 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775805LL);
10709 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775805LL);
10710 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10711 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10712 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10713 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10714 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10715 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10716 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775806LL);
10717 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775806LL);
10718 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10719 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10720# endif
10721#endif
10722 }
10723
10724 fesetround (save_round_mode);
10725
10726 END (llrint_towardzero);
10727}
10728
10729static void
10730llrint_test_downward (void)
10731{
10732 int save_round_mode;
10733 START (llrint_downward);
10734
10735 save_round_mode = fegetround ();
10736
10737 if (!fesetround (FE_DOWNWARD))
10738 {
10739 TEST_f_L (llrint, 0.0, 0);
10740 TEST_f_L (llrint, minus_zero, 0);
10741 TEST_f_L (llrint, 0.2L, 0);
10742 TEST_f_L (llrint, -0.2L, -1);
10743
10744 TEST_f_L (llrint, 1.4L, 1);
10745 TEST_f_L (llrint, -1.4L, -2);
10746
10747 TEST_f_L (llrint, 8388600.3L, 8388600);
10748 TEST_f_L (llrint, -8388600.3L, -8388601);
10749
10750 TEST_f_l (llrint, 1071930.0008, 1071930);
10751
10752 /* Test boundary conditions. */
10753 /* 0x1FFFFF */
10754 TEST_f_L (llrint, 2097151.0,2097151LL);
10755 /* 0x800000 */
10756 TEST_f_L (llrint, 8388608.0, 8388608LL);
10757 /* 0x1000000 */
10758 TEST_f_L (llrint, 16777216.0, 16777216LL);
10759 /* 0x20000000000 */
10760 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10761 /* 0x40000000000 */
10762 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10763 /* 0x1000000000000 */
10764 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10765 /* 0x10000000000000 */
10766 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10767 /* 0x10000080000000 */
10768 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10769 /* 0x20000000000000 */
10770 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10771 /* 0x80000000000000 */
10772 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10773 /* 0x100000000000000 */
10774 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10775#ifdef TEST_LDOUBLE
10776 /* The input can only be represented in long double. */
10777 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370495LL);
10778 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370496LL);
10779 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370496LL);
10780 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370496LL);
10781 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370497LL);
10782
10783 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370495LL);
10784 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370496LL);
10785 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370497LL);
10786 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370494LL);
10787 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370495LL);
10788 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370496LL);
10789
10790 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370496LL);
10791 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370497LL);
10792 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370497LL);
10793 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370497LL);
10794 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370498LL);
10795
10796 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370496LL);
10797 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370497LL);
10798 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370498LL);
10799 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370495LL);
10800 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370496LL);
10801 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370497LL);
10802
10803 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740991LL);
10804 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740992LL);
10805 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740992LL);
10806 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740992LL);
10807 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740993LL);
10808
10809 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740991LL);
10810 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740992LL);
10811 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740993LL);
10812 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740991LL);
10813 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740992LL);
10814 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740993LL);
10815
10816 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740992LL);
10817 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740993LL);
10818 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740993LL);
10819 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740993LL);
10820 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740994LL);
10821
10822 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740992LL);
10823 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740993LL);
10824 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740994LL);
10825 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740992LL);
10826 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740993LL);
10827 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740994LL);
10828
10829 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927935LL);
10830 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927936LL);
10831 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927936LL);
10832 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927936LL);
10833 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927937LL);
10834
10835 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927936LL);
10836 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927937LL);
10837 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927937LL);
10838 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927937LL);
10839 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927938LL);
10840
10841# if LDBL_MANT_DIG > 100
10842 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775805LL);
10843 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775806LL);
10844 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10845 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10846 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775806LL);
10847 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775807LL);
10848 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775806L);
10849 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775807LL);
10850 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775806LL);
10851 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775807LL);
10852 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10853 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10854# endif
10855#endif
10856 }
10857
10858 fesetround (save_round_mode);
10859
10860 END (llrint_downward);
10861}
10862
10863static void
10864llrint_test_upward (void)
10865{
10866 int save_round_mode;
10867 START (llrint_upward);
10868
10869 save_round_mode = fegetround ();
10870
10871 if (!fesetround (FE_UPWARD))
10872 {
10873 TEST_f_L (llrint, 0.0, 0);
10874 TEST_f_L (llrint, minus_zero, 0);
10875 TEST_f_L (llrint, 0.2L, 1);
10876 TEST_f_L (llrint, -0.2L, 0);
10877
10878 TEST_f_L (llrint, 1.4L, 2);
10879 TEST_f_L (llrint, -1.4L, -1);
10880
10881 TEST_f_L (llrint, 8388600.3L, 8388601);
10882 TEST_f_L (llrint, -8388600.3L, -8388600);
10883#ifndef TEST_FLOAT
10884 TEST_f_l (llrint, 1071930.0008, 1071931);
10885#endif
10886 /* Test boundary conditions. */
10887 /* 0x1FFFFF */
10888 TEST_f_L (llrint, 2097151.0,2097151LL);
10889 /* 0x800000 */
10890 TEST_f_L (llrint, 8388608.0, 8388608LL);
10891 /* 0x1000000 */
10892 TEST_f_L (llrint, 16777216.0, 16777216LL);
10893 /* 0x20000000000 */
10894 TEST_f_L (llrint, 2199023255552.0, 2199023255552LL);
10895 /* 0x40000000000 */
10896 TEST_f_L (llrint, 4398046511104.0, 4398046511104LL);
10897 /* 0x1000000000000 */
10898 TEST_f_L (llrint, 281474976710656.0, 281474976710656LL);
10899 /* 0x10000000000000 */
10900 TEST_f_L (llrint, 4503599627370496.0, 4503599627370496LL);
10901 /* 0x10000080000000 */
10902 TEST_f_L (llrint, 4503601774854144.0, 4503601774854144LL);
10903 /* 0x20000000000000 */
10904 TEST_f_L (llrint, 9007199254740992.0, 9007199254740992LL);
10905 /* 0x80000000000000 */
10906 TEST_f_L (llrint, 36028797018963968.0, 36028797018963968LL);
10907 /* 0x100000000000000 */
10908 TEST_f_L (llrint, 72057594037927936.0, 72057594037927936LL);
10909#ifdef TEST_LDOUBLE
10910 /* The input can only be represented in long double. */
10911 TEST_f_L (llrint, 4503599627370495.5L, 4503599627370496LL);
10912 TEST_f_L (llrint, 4503599627370496.25L, 4503599627370497LL);
10913 TEST_f_L (llrint, 4503599627370496.5L, 4503599627370497LL);
10914 TEST_f_L (llrint, 4503599627370496.75L, 4503599627370497LL);
10915 TEST_f_L (llrint, 4503599627370497.5L, 4503599627370498LL);
10916
10917 TEST_f_L (llrint, 4503599627370495.4999999999999L, 4503599627370496LL);
10918 TEST_f_L (llrint, 4503599627370496.4999999999999L, 4503599627370497LL);
10919 TEST_f_L (llrint, 4503599627370497.4999999999999L, 4503599627370498LL);
10920 TEST_f_L (llrint, 4503599627370494.5000000000001L, 4503599627370495LL);
10921 TEST_f_L (llrint, 4503599627370495.5000000000001L, 4503599627370496LL);
10922 TEST_f_L (llrint, 4503599627370496.5000000000001L, 4503599627370497LL);
10923
10924 TEST_f_L (llrint, -4503599627370495.5L, -4503599627370495LL);
10925 TEST_f_L (llrint, -4503599627370496.25L, -4503599627370496LL);
10926 TEST_f_L (llrint, -4503599627370496.5L, -4503599627370496LL);
10927 TEST_f_L (llrint, -4503599627370496.75L, -4503599627370496LL);
10928 TEST_f_L (llrint, -4503599627370497.5L, -4503599627370497LL);
10929
10930 TEST_f_L (llrint, -4503599627370495.4999999999999L, -4503599627370495LL);
10931 TEST_f_L (llrint, -4503599627370496.4999999999999L, -4503599627370496LL);
10932 TEST_f_L (llrint, -4503599627370497.4999999999999L, -4503599627370497LL);
10933 TEST_f_L (llrint, -4503599627370494.5000000000001L, -4503599627370494LL);
10934 TEST_f_L (llrint, -4503599627370495.5000000000001L, -4503599627370495LL);
10935 TEST_f_L (llrint, -4503599627370496.5000000000001L, -4503599627370496LL);
10936
10937 TEST_f_L (llrint, 9007199254740991.5L, 9007199254740992LL);
10938 TEST_f_L (llrint, 9007199254740992.25L, 9007199254740993LL);
10939 TEST_f_L (llrint, 9007199254740992.5L, 9007199254740993LL);
10940 TEST_f_L (llrint, 9007199254740992.75L, 9007199254740993LL);
10941 TEST_f_L (llrint, 9007199254740993.5L, 9007199254740994LL);
10942
10943 TEST_f_L (llrint, 9007199254740991.4999999999999L, 9007199254740992LL);
10944 TEST_f_L (llrint, 9007199254740992.4999999999999L, 9007199254740993LL);
10945 TEST_f_L (llrint, 9007199254740993.4999999999999L, 9007199254740994LL);
10946 TEST_f_L (llrint, 9007199254740991.5000000000001L, 9007199254740992LL);
10947 TEST_f_L (llrint, 9007199254740992.5000000000001L, 9007199254740993LL);
10948 TEST_f_L (llrint, 9007199254740993.5000000000001L, 9007199254740994LL);
10949
10950 TEST_f_L (llrint, -9007199254740991.5L, -9007199254740991LL);
10951 TEST_f_L (llrint, -9007199254740992.25L, -9007199254740992LL);
10952 TEST_f_L (llrint, -9007199254740992.5L, -9007199254740992LL);
10953 TEST_f_L (llrint, -9007199254740992.75L, -9007199254740992LL);
10954 TEST_f_L (llrint, -9007199254740993.5L, -9007199254740993LL);
10955
10956 TEST_f_L (llrint, -9007199254740991.4999999999999L, -9007199254740991LL);
10957 TEST_f_L (llrint, -9007199254740992.4999999999999L, -9007199254740992LL);
10958 TEST_f_L (llrint, -9007199254740993.4999999999999L, -9007199254740993LL);
10959 TEST_f_L (llrint, -9007199254740991.5000000000001L, -9007199254740991LL);
10960 TEST_f_L (llrint, -9007199254740992.5000000000001L, -9007199254740992LL);
10961 TEST_f_L (llrint, -9007199254740993.5000000000001L, -9007199254740993LL);
10962
10963 TEST_f_L (llrint, 72057594037927935.5L, 72057594037927936LL);
10964 TEST_f_L (llrint, 72057594037927936.25L, 72057594037927937LL);
10965 TEST_f_L (llrint, 72057594037927936.5L, 72057594037927937LL);
10966 TEST_f_L (llrint, 72057594037927936.75L, 72057594037927937LL);
10967 TEST_f_L (llrint, 72057594037927937.5L, 72057594037927938LL);
10968
10969 TEST_f_L (llrint, -72057594037927935.5L, -72057594037927935LL);
10970 TEST_f_L (llrint, -72057594037927936.25L, -72057594037927936LL);
10971 TEST_f_L (llrint, -72057594037927936.5L, -72057594037927936LL);
10972 TEST_f_L (llrint, -72057594037927936.75L, -72057594037927936LL);
10973 TEST_f_L (llrint, -72057594037927937.5L, -72057594037927937LL);
10974
10975# if LDBL_MANT_DIG > 100
10976 TEST_f_L (llrint, 9223372036854775805.5L, 9223372036854775806LL);
10977 TEST_f_L (llrint, -9223372036854775805.5L, -9223372036854775805LL);
10978 TEST_f_L (llrint, 9223372036854775806.0L, 9223372036854775806LL);
10979 TEST_f_L (llrint, -9223372036854775806.0L, -9223372036854775806LL);
10980 TEST_f_L (llrint, 9223372036854775806.25L, 9223372036854775807LL);
10981 TEST_f_L (llrint, -9223372036854775806.25L, -9223372036854775806LL);
10982 TEST_f_L (llrint, 9223372036854775806.5L, 9223372036854775807L);
10983 TEST_f_L (llrint, -9223372036854775806.5L, -9223372036854775806LL);
10984 TEST_f_L (llrint, 9223372036854775806.75L, 9223372036854775807LL);
10985 TEST_f_L (llrint, -9223372036854775806.75L, -9223372036854775806LL);
10986 TEST_f_L (llrint, 9223372036854775807.0L, 9223372036854775807LL);
10987 TEST_f_L (llrint, -9223372036854775807.0L, -9223372036854775807LL);
10988# endif
10989#endif
10990 }
10991
10992 fesetround (save_round_mode);
10993
10994 END (llrint_upward);
10995}
10996
2550dfe9 10997
74c57478
JM
10998static const struct test_f_f_data log_test_data[] =
10999 {
11000 START_DATA (log),
11001 TEST_f_f (log, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11002 TEST_f_f (log, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11003
11004 TEST_f_f (log, 1, 0),
11005
11006 TEST_f_f (log, -1, qnan_value, INVALID_EXCEPTION),
11007 TEST_f_f (log, -max_value, qnan_value, INVALID_EXCEPTION),
11008 TEST_f_f (log, minus_infty, qnan_value, INVALID_EXCEPTION),
11009 TEST_f_f (log, plus_infty, plus_infty),
11010 TEST_f_f (log, qnan_value, qnan_value),
11011
11012 TEST_f_f (log, M_El, 1),
f98ece5f 11013 TEST_f_f (log, M_1_DIV_El, -1),
74c57478
JM
11014 TEST_f_f (log, 2, M_LN2l),
11015 TEST_f_f (log, 10, M_LN10l),
11016 TEST_f_f (log, 0.75L, -0.287682072451780927439219005993827432L),
11017 END_DATA (log)
11018 };
11019
8847214f
UD
11020static void
11021log_test (void)
11022{
e6d3c4a7
AJ
11023 errno = 0;
11024 FUNC(log) (1);
11025 if (errno == ENOSYS)
11026 /* Function not implemented. */
11027 return;
8847214f 11028 START (log);
74c57478 11029 RUN_TEST_LOOP_f_f (log, log_test_data, );
8847214f
UD
11030 END (log);
11031}
11032
11033
74c57478
JM
11034static const struct test_f_f_data log10_test_data[] =
11035 {
11036 START_DATA (log10),
11037 TEST_f_f (log10, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11038 TEST_f_f (log10, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11039
11040 TEST_f_f (log10, 1, 0),
11041
11042 /* log10 (x) == qNaN plus invalid exception if x < 0. */
11043 TEST_f_f (log10, -1, qnan_value, INVALID_EXCEPTION),
11044 TEST_f_f (log10, -max_value, qnan_value, INVALID_EXCEPTION),
11045 TEST_f_f (log10, minus_infty, qnan_value, INVALID_EXCEPTION),
11046
11047 TEST_f_f (log10, plus_infty, plus_infty),
11048 TEST_f_f (log10, qnan_value, qnan_value),
11049
11050 TEST_f_f (log10, 0.1L, -1),
11051 TEST_f_f (log10, 10.0, 1),
11052 TEST_f_f (log10, 100.0, 2),
11053 TEST_f_f (log10, 10000.0, 4),
11054 TEST_f_f (log10, M_El, M_LOG10El),
11055 TEST_f_f (log10, 0.75L, -0.124938736608299953132449886193870744L),
11056 END_DATA (log10)
11057 };
11058
8847214f
UD
11059static void
11060log10_test (void)
11061{
e6d3c4a7
AJ
11062 errno = 0;
11063 FUNC(log10) (1);
11064 if (errno == ENOSYS)
11065 /* Function not implemented. */
11066 return;
11067
8847214f 11068 START (log10);
74c57478
JM
11069 RUN_TEST_LOOP_f_f (log10, log10_test_data, );
11070 END (log10);
11071}
8847214f 11072
8847214f 11073
74c57478
JM
11074static const struct test_f_f_data log1p_test_data[] =
11075 {
11076 START_DATA (log1p),
11077 TEST_f_f (log1p, 0, 0),
11078 TEST_f_f (log1p, minus_zero, minus_zero),
8847214f 11079
74c57478
JM
11080 TEST_f_f (log1p, -1, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11081 TEST_f_f (log1p, -2, qnan_value, INVALID_EXCEPTION),
11082 TEST_f_f (log1p, -max_value, qnan_value, INVALID_EXCEPTION),
11083 TEST_f_f (log1p, minus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 11084
74c57478
JM
11085 TEST_f_f (log1p, plus_infty, plus_infty),
11086 TEST_f_f (log1p, qnan_value, qnan_value),
8847214f 11087
74c57478 11088 TEST_f_f (log1p, M_El - 1.0, 1),
8847214f 11089
74c57478
JM
11090 TEST_f_f (log1p, -0.25L, -0.287682072451780927439219005993827432L),
11091 TEST_f_f (log1p, -0.875, -2.07944154167983592825169636437452970L),
11092 END_DATA (log1p)
11093 };
8847214f
UD
11094
11095static void
11096log1p_test (void)
11097{
e6d3c4a7
AJ
11098 errno = 0;
11099 FUNC(log1p) (0);
11100 if (errno == ENOSYS)
11101 /* Function not implemented. */
11102 return;
11103
8847214f 11104 START (log1p);
74c57478
JM
11105 RUN_TEST_LOOP_f_f (log1p, log1p_test_data, );
11106 END (log1p);
11107}
8847214f 11108
8847214f 11109
74c57478
JM
11110static const struct test_f_f_data log2_test_data[] =
11111 {
11112 START_DATA (log2),
11113 TEST_f_f (log2, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11114 TEST_f_f (log2, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 11115
74c57478 11116 TEST_f_f (log2, 1, 0),
8847214f 11117
74c57478
JM
11118 TEST_f_f (log2, -1, qnan_value, INVALID_EXCEPTION),
11119 TEST_f_f (log2, -max_value, qnan_value, INVALID_EXCEPTION),
11120 TEST_f_f (log2, minus_infty, qnan_value, INVALID_EXCEPTION),
8847214f 11121
74c57478
JM
11122 TEST_f_f (log2, plus_infty, plus_infty),
11123 TEST_f_f (log2, qnan_value, qnan_value),
8847214f 11124
74c57478
JM
11125 TEST_f_f (log2, M_El, M_LOG2El),
11126 TEST_f_f (log2, 2.0, 1),
11127 TEST_f_f (log2, 16.0, 4),
11128 TEST_f_f (log2, 256.0, 8),
11129 TEST_f_f (log2, 0.75L, -.415037499278843818546261056052183492L),
11130 END_DATA (log2)
11131 };
8847214f
UD
11132
11133static void
11134log2_test (void)
11135{
e6d3c4a7
AJ
11136 errno = 0;
11137 FUNC(log2) (1);
11138 if (errno == ENOSYS)
11139 /* Function not implemented. */
11140 return;
11141
8847214f 11142 START (log2);
74c57478 11143 RUN_TEST_LOOP_f_f (log2, log2_test_data, );
8847214f
UD
11144 END (log2);
11145}
11146
11147
74c57478
JM
11148static const struct test_f_f_data logb_test_data[] =
11149 {
11150 START_DATA (logb),
11151 TEST_f_f (logb, plus_infty, plus_infty),
11152 TEST_f_f (logb, minus_infty, plus_infty),
8847214f 11153
74c57478 11154 TEST_f_f (logb, 0, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
8847214f 11155
74c57478
JM
11156 TEST_f_f (logb, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
11157 TEST_f_f (logb, qnan_value, qnan_value),
8847214f 11158
74c57478
JM
11159 TEST_f_f (logb, 1, 0),
11160 TEST_f_f (logb, M_El, 1),
11161 TEST_f_f (logb, 1024, 10),
11162 TEST_f_f (logb, -2000, 10),
8847214f 11163
74c57478
JM
11164 TEST_f_f (logb, 0x0.1p-127, -131),
11165 TEST_f_f (logb, 0x0.01p-127, -135),
11166 TEST_f_f (logb, 0x0.011p-127, -135),
89c9aa49 11167#ifndef TEST_FLOAT
74c57478
JM
11168 TEST_f_f (logb, 0x0.8p-1022, -1023),
11169 TEST_f_f (logb, 0x0.1p-1022, -1026),
11170 TEST_f_f (logb, 0x0.00111p-1022, -1034),
11171 TEST_f_f (logb, 0x0.00001p-1022, -1042),
11172 TEST_f_f (logb, 0x0.000011p-1022, -1042),
11173 TEST_f_f (logb, 0x0.0000000000001p-1022, -1074),
89c9aa49
AZ
11174#endif
11175#if defined TEST_LDOUBLE && LDBL_MIN_EXP - LDBL_MANT_DIG <= -16400
74c57478
JM
11176 TEST_f_f (logb, 0x1p-16400L, -16400),
11177 TEST_f_f (logb, 0x.00000000001p-16382L, -16426),
89c9aa49 11178#endif
74c57478
JM
11179 END_DATA (logb)
11180 };
89c9aa49 11181
74c57478
JM
11182static void
11183logb_test (void)
11184{
11185 START (logb);
11186 RUN_TEST_LOOP_f_f (logb, logb_test_data, );
8847214f
UD
11187 END (logb);
11188}
11189
74c57478
JM
11190static const struct test_f_f_data logb_downward_test_data[] =
11191 {
11192 START_DATA (logb_downward),
11193 /* IEEE 754-2008 says (section 5.3.3) that "logB(1) is +0.". Libm
11194 should not return -0 from logb in any rounding mode. PowerPC32 has
11195 failed with this test for power4 logb (and logbl on all PowerPC
11196 platforms) in the past due to instruction selection. GCC PR 52775
11197 provides the availability of the fcfid insn in 32-bit mode which
11198 eliminates the use of fsub in this instance and prevents the negative
11199 signed 0.0. */
11200
11201 /* BZ #887 */
11202 TEST_f_f (logb, 1.000e+0, plus_zero),
11203 END_DATA (logb_downward)
11204 };
11205
a462cb63
RA
11206static void
11207logb_test_downward (void)
11208{
a462cb63
RA
11209 errno = 0;
11210
11211 FUNC(logb) (0);
11212 if (errno == ENOSYS)
11213 /* Function not implemented. */
11214 return;
11215
11216 START (logb_downward);
74c57478 11217 RUN_TEST_LOOP_f_f (logb, logb_downward_test_data, FE_DOWNWARD);
a462cb63
RA
11218 END (logb_downward);
11219}
2550dfe9 11220
8847214f
UD
11221static void
11222lround_test (void)
11223{
64d063b8
TS
11224 /* TODO: missing +/-Inf as well as qNaN tests. */
11225
8847214f
UD
11226 START (lround);
11227
11228 TEST_f_l (lround, 0, 0);
11229 TEST_f_l (lround, minus_zero, 0);
3c6cad26
UD
11230 TEST_f_l (lround, 0.2L, 0.0);
11231 TEST_f_l (lround, -0.2L, 0);
8847214f
UD
11232 TEST_f_l (lround, 0.5, 1);
11233 TEST_f_l (lround, -0.5, -1);
3c6cad26
UD
11234 TEST_f_l (lround, 0.8L, 1);
11235 TEST_f_l (lround, -0.8L, -1);
8847214f
UD
11236 TEST_f_l (lround, 1.5, 2);
11237 TEST_f_l (lround, -1.5, -2);
11238 TEST_f_l (lround, 22514.5, 22515);
11239 TEST_f_l (lround, -22514.5, -22515);
3eb61415 11240 TEST_f_l (lround, 1071930.0008, 1071930);
8847214f 11241#ifndef TEST_FLOAT
3eb61415 11242 TEST_f_l (lround, 1073741824.01, 1073741824);
39007ae3
UD
11243# if LONG_MAX > 281474976710656
11244 TEST_f_l (lround, 281474976710656.025, 281474976710656);
169d7f11 11245 TEST_f_l (lround, 18014398509481974, 18014398509481974);
39007ae3 11246# endif
8847214f
UD
11247 TEST_f_l (lround, 2097152.5, 2097153);
11248 TEST_f_l (lround, -2097152.5, -2097153);
c1e6b459
UD
11249 /* nextafter(0.5,-1) */
11250 TEST_f_l (lround, 0x1.fffffffffffffp-2, 0);
11251 /* nextafter(-0.5,1) */
11252 TEST_f_l (lround, -0x1.fffffffffffffp-2, 0);
11253#else
11254 /* nextafter(0.5,-1) */
11255 TEST_f_l (lround, 0x1.fffffp-2, 0);
11256 /* nextafter(-0.5,1) */
11257 TEST_f_l (lround, -0x1.fffffp-2, 0);
11258 TEST_f_l (lround, 0x1.fffffep+23, 16777215);
11259 TEST_f_l (lround, -0x1.fffffep+23, -16777215);
8847214f
UD
11260#endif
11261 END (lround);
11262}
11263
11264
11265static void
11266llround_test (void)
11267{
64d063b8
TS
11268 /* TODO: missing +/-Inf as well as qNaN tests. */
11269
8847214f
UD
11270 START (llround);
11271
11272 TEST_f_L (llround, 0, 0);
11273 TEST_f_L (llround, minus_zero, 0);
3c6cad26
UD
11274 TEST_f_L (llround, 0.2L, 0.0);
11275 TEST_f_L (llround, -0.2L, 0);
8847214f
UD
11276 TEST_f_L (llround, 0.5, 1);
11277 TEST_f_L (llround, -0.5, -1);
3c6cad26
UD
11278 TEST_f_L (llround, 0.8L, 1);
11279 TEST_f_L (llround, -0.8L, -1);
8847214f
UD
11280 TEST_f_L (llround, 1.5, 2);
11281 TEST_f_L (llround, -1.5, -2);
11282 TEST_f_L (llround, 22514.5, 22515);
11283 TEST_f_L (llround, -22514.5, -22515);
3eb61415 11284 TEST_f_l (llround, 1071930.0008, 1071930);
8847214f
UD
11285#ifndef TEST_FLOAT
11286 TEST_f_L (llround, 2097152.5, 2097153);
11287 TEST_f_L (llround, -2097152.5, -2097153);
11288 TEST_f_L (llround, 34359738368.5, 34359738369ll);
11289 TEST_f_L (llround, -34359738368.5, -34359738369ll);
169d7f11 11290 TEST_f_L (llround, -3.65309740835E17, -365309740835000000LL);
8847214f
UD
11291#endif
11292
11293 /* Test boundary conditions. */
11294 /* 0x1FFFFF */
11295 TEST_f_L (llround, 2097151.0, 2097151LL);
11296 /* 0x800000 */
11297 TEST_f_L (llround, 8388608.0, 8388608LL);
11298 /* 0x1000000 */
11299 TEST_f_L (llround, 16777216.0, 16777216LL);
11300 /* 0x20000000000 */
11301 TEST_f_L (llround, 2199023255552.0, 2199023255552LL);
11302 /* 0x40000000000 */
11303 TEST_f_L (llround, 4398046511104.0, 4398046511104LL);
39007ae3
UD
11304 /* 0x1000000000000 */
11305 TEST_f_L (llround, 281474976710656.0, 281474976710656LL);
8847214f
UD
11306 /* 0x10000000000000 */
11307 TEST_f_L (llround, 4503599627370496.0, 4503599627370496LL);
11308 /* 0x10000080000000 */
3eb61415 11309 TEST_f_L (llround, 4503601774854144.0, 4503601774854144LL);
8847214f
UD
11310 /* 0x20000000000000 */
11311 TEST_f_L (llround, 9007199254740992.0, 9007199254740992LL);
11312 /* 0x80000000000000 */
11313 TEST_f_L (llround, 36028797018963968.0, 36028797018963968LL);
11314 /* 0x100000000000000 */
11315 TEST_f_L (llround, 72057594037927936.0, 72057594037927936LL);
11316
601d2942
UD
11317#ifndef TEST_FLOAT
11318 /* 0x100000000 */
11319 TEST_f_L (llround, 4294967295.5, 4294967296LL);
11320 /* 0x200000000 */
11321 TEST_f_L (llround, 8589934591.5, 8589934592LL);
c1e6b459
UD
11322
11323 /* nextafter(0.5,-1) */
11324 TEST_f_L (llround, 0x1.fffffffffffffp-2, 0);
11325 /* nextafter(-0.5,1) */
11326 TEST_f_L (llround, -0x1.fffffffffffffp-2, 0);
11327 /* On PowerPC an exponent of '52' is the largest incrementally
11328 * representable sequence of whole-numbers in the 'double' range. We test
11329 * lround to make sure that a guard bit set during the lround operation
11330 * hasn't forced an erroneous shift giving us an incorrect result. The odd
11331 * numbers between +-(2^52+1 and 2^53-1) are affected since they have the
11332 * rightmost bit set. */
11333 /* +-(2^52+1) */
11334 TEST_f_L (llround, 0x1.0000000000001p+52,4503599627370497LL);
11335 TEST_f_L (llround, -0x1.0000000000001p+52,-4503599627370497LL);
11336 /* +-(2^53-1): Input is the last (positive and negative) incrementally
11337 * representable whole-number in the 'double' range that might round
11338 * erroneously. */
11339 TEST_f_L (llround, 0x1.fffffffffffffp+52, 9007199254740991LL);
11340 TEST_f_L (llround, -0x1.fffffffffffffp+52, -9007199254740991LL);
11341#else
11342 /* nextafter(0.5,-1) */
11343 TEST_f_L (llround, 0x1.fffffep-2, 0);
11344 /* nextafter(-0.5,1) */
11345 TEST_f_L (llround, -0x1.fffffep-2, 0);
11346 /* As above, on PowerPC an exponent of '23' is the largest incrementally
11347 * representable sequence of whole-numbers in the 'float' range.
11348 * Likewise, numbers between +-(2^23+1 and 2^24-1) are affected. */
11349 TEST_f_L (llround, 0x1.000002p+23,8388609);
11350 TEST_f_L (llround, -0x1.000002p+23,-8388609);
11351 TEST_f_L (llround, 0x1.fffffep+23, 16777215);
11352 TEST_f_L (llround, -0x1.fffffep+23, -16777215);
601d2942
UD
11353#endif
11354
c1e6b459 11355
f964490f
RM
11356#ifdef TEST_LDOUBLE
11357 /* The input can only be represented in long double. */
11358 TEST_f_L (llround, 4503599627370495.5L, 4503599627370496LL);
11359 TEST_f_L (llround, 4503599627370496.25L, 4503599627370496LL);
11360 TEST_f_L (llround, 4503599627370496.5L, 4503599627370497LL);
11361 TEST_f_L (llround, 4503599627370496.75L, 4503599627370497LL);
11362 TEST_f_L (llround, 4503599627370497.5L, 4503599627370498LL);
11363
830fce04
RM
11364# if LDBL_MANT_DIG > 100
11365 TEST_f_L (llround, 4503599627370495.4999999999999L, 4503599627370495LL);
11366 TEST_f_L (llround, 4503599627370496.4999999999999L, 4503599627370496LL);
11367 TEST_f_L (llround, 4503599627370497.4999999999999L, 4503599627370497LL);
11368 TEST_f_L (llround, 4503599627370494.5000000000001L, 4503599627370495LL);
11369 TEST_f_L (llround, 4503599627370495.5000000000001L, 4503599627370496LL);
11370 TEST_f_L (llround, 4503599627370496.5000000000001L, 4503599627370497LL);
11371
11372 TEST_f_L (llround, -4503599627370495.4999999999999L, -4503599627370495LL);
11373 TEST_f_L (llround, -4503599627370496.4999999999999L, -4503599627370496LL);
11374 TEST_f_L (llround, -4503599627370497.4999999999999L, -4503599627370497LL);
11375 TEST_f_L (llround, -4503599627370494.5000000000001L, -4503599627370495LL);
11376 TEST_f_L (llround, -4503599627370495.5000000000001L, -4503599627370496LL);
11377 TEST_f_L (llround, -4503599627370496.5000000000001L, -4503599627370497LL);
11378# endif
11379
f964490f
RM
11380 TEST_f_L (llround, -4503599627370495.5L, -4503599627370496LL);
11381 TEST_f_L (llround, -4503599627370496.25L, -4503599627370496LL);
11382 TEST_f_L (llround, -4503599627370496.5L, -4503599627370497LL);
11383 TEST_f_L (llround, -4503599627370496.75L, -4503599627370497LL);
11384 TEST_f_L (llround, -4503599627370497.5L, -4503599627370498LL);
11385
11386 TEST_f_L (llround, 9007199254740991.5L, 9007199254740992LL);
11387 TEST_f_L (llround, 9007199254740992.25L, 9007199254740992LL);
11388 TEST_f_L (llround, 9007199254740992.5L, 9007199254740993LL);
11389 TEST_f_L (llround, 9007199254740992.75L, 9007199254740993LL);
11390 TEST_f_L (llround, 9007199254740993.5L, 9007199254740994LL);
11391
830fce04
RM
11392# if LDBL_MANT_DIG > 100
11393 TEST_f_L (llround, 9007199254740991.4999999999999L, 9007199254740991LL);
11394 TEST_f_L (llround, 9007199254740992.4999999999999L, 9007199254740992LL);
11395 TEST_f_L (llround, 9007199254740993.4999999999999L, 9007199254740993LL);
11396 TEST_f_L (llround, 9007199254740991.5000000000001L, 9007199254740992LL);
11397 TEST_f_L (llround, 9007199254740992.5000000000001L, 9007199254740993LL);
11398 TEST_f_L (llround, 9007199254740993.5000000000001L, 9007199254740994LL);
11399
11400 TEST_f_L (llround, -9007199254740991.4999999999999L, -9007199254740991LL);
11401 TEST_f_L (llround, -9007199254740992.4999999999999L, -9007199254740992LL);
11402 TEST_f_L (llround, -9007199254740993.4999999999999L, -9007199254740993LL);
11403 TEST_f_L (llround, -9007199254740991.5000000000001L, -9007199254740992LL);
11404 TEST_f_L (llround, -9007199254740992.5000000000001L, -9007199254740993LL);
11405 TEST_f_L (llround, -9007199254740993.5000000000001L, -9007199254740994LL);
11406# endif
11407
f964490f
RM
11408 TEST_f_L (llround, -9007199254740991.5L, -9007199254740992LL);
11409 TEST_f_L (llround, -9007199254740992.25L, -9007199254740992LL);
11410 TEST_f_L (llround, -9007199254740992.5L, -9007199254740993LL);
11411 TEST_f_L (llround, -9007199254740992.75L, -9007199254740993LL);
11412 TEST_f_L (llround, -9007199254740993.5L, -9007199254740994LL);
11413
11414 TEST_f_L (llround, 72057594037927935.5L, 72057594037927936LL);
11415 TEST_f_L (llround, 72057594037927936.25L, 72057594037927936LL);
11416 TEST_f_L (llround, 72057594037927936.5L, 72057594037927937LL);
11417 TEST_f_L (llround, 72057594037927936.75L, 72057594037927937LL);
11418 TEST_f_L (llround, 72057594037927937.5L, 72057594037927938LL);
11419
11420 TEST_f_L (llround, -72057594037927935.5L, -72057594037927936LL);
11421 TEST_f_L (llround, -72057594037927936.25L, -72057594037927936LL);
11422 TEST_f_L (llround, -72057594037927936.5L, -72057594037927937LL);
11423 TEST_f_L (llround, -72057594037927936.75L, -72057594037927937LL);
11424 TEST_f_L (llround, -72057594037927937.5L, -72057594037927938LL);
1e832e37
RM
11425
11426 TEST_f_L (llround, 9223372036854775806.25L, 9223372036854775806LL);
11427 TEST_f_L (llround, -9223372036854775806.25L, -9223372036854775806LL);
11428 TEST_f_L (llround, 9223372036854775806.5L, 9223372036854775807LL);
11429 TEST_f_L (llround, -9223372036854775806.5L, -9223372036854775807LL);
11430 TEST_f_L (llround, 9223372036854775807.0L, 9223372036854775807LL);
11431 TEST_f_L (llround, -9223372036854775807.0L, -9223372036854775807LL);
f964490f
RM
11432#endif
11433
8847214f
UD
11434 END (llround);
11435}
11436
11437static void
11438modf_test (void)
11439{
11440 FLOAT x;
11441
11442 START (modf);
11443
11444 TEST_fF_f1 (modf, plus_infty, 0, plus_infty);
11445 TEST_fF_f1 (modf, minus_infty, minus_zero, minus_infty);
67e971f1 11446 TEST_fF_f1 (modf, qnan_value, qnan_value, qnan_value);
8847214f
UD
11447 TEST_fF_f1 (modf, 0, 0, 0);
11448 TEST_fF_f1 (modf, 1.5, 0.5, 1);
11449 TEST_fF_f1 (modf, 2.5, 0.5, 2);
11450 TEST_fF_f1 (modf, -2.5, -0.5, -2);
11451 TEST_fF_f1 (modf, 20, 0, 20);
11452 TEST_fF_f1 (modf, 21, 0, 21);
11453 TEST_fF_f1 (modf, 89.5, 0.5, 89);
11454
11455 END (modf);
11456}
11457
11458
74c57478
JM
11459static const struct test_f_f_data nearbyint_test_data[] =
11460 {
11461 START_DATA (nearbyint),
11462
11463 TEST_f_f (nearbyint, 0.0, 0.0),
11464 TEST_f_f (nearbyint, minus_zero, minus_zero),
11465 TEST_f_f (nearbyint, plus_infty, plus_infty),
11466 TEST_f_f (nearbyint, minus_infty, minus_infty),
11467 TEST_f_f (nearbyint, qnan_value, qnan_value),
11468
11469 /* Subnormal values */
11470 TEST_f_f (nearbyint, -8.98847e+307, -8.98847e+307),
11471 TEST_f_f (nearbyint, -4.45015e-308, minus_zero),
11472
11473 /* Default rounding mode is round to nearest. */
11474 TEST_f_f (nearbyint, 0.5, 0.0),
11475 TEST_f_f (nearbyint, 1.5, 2.0),
11476 TEST_f_f (nearbyint, -0.5, minus_zero),
11477 TEST_f_f (nearbyint, -1.5, -2.0),
11478
11479 TEST_f_f (nearbyint, 262144.75, 262145.0),
11480 TEST_f_f (nearbyint, 262142.75, 262143.0),
11481 TEST_f_f (nearbyint, 524286.75, 524287.0),
11482 TEST_f_f (nearbyint, 524288.75, 524289.0),
11483
11484 TEST_f_f (nearbyint, 1048576.75, 1048577.0),
11485 TEST_f_f (nearbyint, 2097152.75, 2097153.0),
11486 TEST_f_f (nearbyint, 2492472.75, 2492473.0),
11487 TEST_f_f (nearbyint, 2886220.75, 2886221.0),
11488 TEST_f_f (nearbyint, 3058792.75, 3058793.0),
11489 TEST_f_f (nearbyint, -1048576.75, -1048577.0),
11490 TEST_f_f (nearbyint, -2097152.75, -2097153.0),
11491 TEST_f_f (nearbyint, -2492472.75, -2492473.0),
11492 TEST_f_f (nearbyint, -2886220.75, -2886221.0),
11493 TEST_f_f (nearbyint, -3058792.75, -3058793.0),
11494#ifndef TEST_FLOAT
11495 TEST_f_f (nearbyint, 70368744177664.75, 70368744177665.0),
11496 TEST_f_f (nearbyint, 140737488355328.75, 140737488355329.0),
11497 TEST_f_f (nearbyint, 281474976710656.75, 281474976710657.0),
11498 TEST_f_f (nearbyint, 562949953421312.75, 562949953421313.0),
11499 TEST_f_f (nearbyint, 1125899906842624.75, 1125899906842625.0),
11500 TEST_f_f (nearbyint, -70368744177664.75, -70368744177665.0),
11501 TEST_f_f (nearbyint, -140737488355328.75, -140737488355329.0),
11502 TEST_f_f (nearbyint, -281474976710656.75, -281474976710657.0),
11503 TEST_f_f (nearbyint, -562949953421312.75, -562949953421313.0),
11504 TEST_f_f (nearbyint, -1125899906842624.75, -1125899906842625.0),
11505#endif
11506
11507 END_DATA (nearbyint)
11508 };
11509
8847214f
UD
11510static void
11511nearbyint_test (void)
11512{
11513 START (nearbyint);
74c57478 11514 RUN_TEST_LOOP_f_f (nearbyint, nearbyint_test_data, );
8847214f
UD
11515 END (nearbyint);
11516}
11517
601a3a5f
JM
11518static const struct test_ff_f_data nextafter_test_data[] =
11519 {
11520 START_DATA (nextafter),
8847214f 11521
601a3a5f
JM
11522 TEST_ff_f (nextafter, 0, 0, 0),
11523 TEST_ff_f (nextafter, minus_zero, 0, 0),
11524 TEST_ff_f (nextafter, 0, minus_zero, minus_zero),
11525 TEST_ff_f (nextafter, minus_zero, minus_zero, minus_zero),
8847214f 11526
601a3a5f
JM
11527 TEST_ff_f (nextafter, 9, 9, 9),
11528 TEST_ff_f (nextafter, -9, -9, -9),
11529 TEST_ff_f (nextafter, plus_infty, plus_infty, plus_infty),
11530 TEST_ff_f (nextafter, minus_infty, minus_infty, minus_infty),
8847214f 11531
601a3a5f
JM
11532 TEST_ff_f (nextafter, qnan_value, 1.1L, qnan_value),
11533 TEST_ff_f (nextafter, 1.1L, qnan_value, qnan_value),
11534 TEST_ff_f (nextafter, qnan_value, qnan_value, qnan_value),
8847214f 11535
601a3a5f
JM
11536 TEST_ff_f (nextafter, max_value, plus_infty, plus_infty, OVERFLOW_EXCEPTION),
11537 TEST_ff_f (nextafter, -max_value, minus_infty, minus_infty, OVERFLOW_EXCEPTION),
64b02fd2 11538
757de559 11539#ifdef TEST_LDOUBLE
601a3a5f
JM
11540 // XXX Enable once gcc is fixed.
11541 //TEST_ff_f (nextafter, 0x0.00000040000000000000p-16385L, -0.1L, 0x0.0000003ffffffff00000p-16385L),
757de559
UD
11542#endif
11543
601a3a5f
JM
11544 /* XXX We need the hexadecimal FP number representation here for further
11545 tests. */
11546 END_DATA (nextafter)
11547 };
8847214f 11548
601a3a5f
JM
11549static void
11550nextafter_test (void)
11551{
11552
11553 START (nextafter);
11554 RUN_TEST_LOOP_ff_f (nextafter, nextafter_test_data, );
8847214f
UD
11555 END (nextafter);
11556}
11557
fe559c5e 11558
601a3a5f
JM
11559static const struct test_ff_f_data_nexttoward nexttoward_test_data[] =
11560 {
11561 START_DATA (nexttoward),
11562 TEST_ff_f (nexttoward, 0, 0, 0),
11563 TEST_ff_f (nexttoward, minus_zero, 0, 0),
11564 TEST_ff_f (nexttoward, 0, minus_zero, minus_zero),
11565 TEST_ff_f (nexttoward, minus_zero, minus_zero, minus_zero),
8847214f 11566
601a3a5f
JM
11567 TEST_ff_f (nexttoward, 9, 9, 9),
11568 TEST_ff_f (nexttoward, -9, -9, -9),
11569 TEST_ff_f (nexttoward, plus_infty, plus_infty, plus_infty),
11570 TEST_ff_f (nexttoward, minus_infty, minus_infty, minus_infty),
8847214f 11571
601a3a5f
JM
11572 TEST_ff_f (nexttoward, qnan_value, 1.1L, qnan_value),
11573 TEST_ff_f (nexttoward, 1.1L, qnan_value, qnan_value),
11574 TEST_ff_f (nexttoward, qnan_value, qnan_value, qnan_value),
8847214f 11575
7cb029ee 11576#ifdef TEST_FLOAT
601a3a5f
JM
11577 TEST_ff_f (nexttoward, 1.0, 1.1L, 0x1.000002p0),
11578 TEST_ff_f (nexttoward, 1.0, LDBL_MAX, 0x1.000002p0),
11579 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000001p0, 0x1.000002p0),
11580 TEST_ff_f (nexttoward, 1.0, 0.9L, 0x0.ffffffp0),
11581 TEST_ff_f (nexttoward, 1.0, -LDBL_MAX, 0x0.ffffffp0),
11582 TEST_ff_f (nexttoward, 1.0, 0x0.fffffffffffff8p0, 0x0.ffffffp0),
11583 TEST_ff_f (nexttoward, -1.0, -1.1L, -0x1.000002p0),
11584 TEST_ff_f (nexttoward, -1.0, -LDBL_MAX, -0x1.000002p0),
11585 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000001p0, -0x1.000002p0),
11586 TEST_ff_f (nexttoward, -1.0, -0.9L, -0x0.ffffffp0),
11587 TEST_ff_f (nexttoward, -1.0, LDBL_MAX, -0x0.ffffffp0),
11588 TEST_ff_f (nexttoward, -1.0, -0x0.fffffffffffff8p0, -0x0.ffffffp0),
11589 TEST_ff_f (nexttoward, -0x1.3p-145, -0xap-148L, -0x1.4p-145, UNDERFLOW_EXCEPTION),
7cb029ee 11590# if LDBL_MANT_DIG >= 64
601a3a5f
JM
11591 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000002p0L, 0x1.000002p0),
11592 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffp0L, 0x0.ffffffp0),
11593 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000002p0L, -0x1.000002p0),
11594 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffp0L, -0x0.ffffffp0),
7cb029ee
JM
11595# endif
11596# if LDBL_MANT_DIG >= 106
601a3a5f
JM
11597 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000000000000000008p0L, 0x1.000002p0),
11598 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffcp0L, 0x0.ffffffp0),
11599 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000000000000000008p0L, -0x1.000002p0),
11600 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffcp0L, -0x0.ffffffp0),
7cb029ee
JM
11601# endif
11602# if LDBL_MANT_DIG >= 113
601a3a5f
JM
11603 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000000000000000000001p0L, 0x1.000002p0),
11604 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.ffffffp0),
11605 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000000000000000000001p0L, -0x1.000002p0),
11606 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.ffffffp0),
7cb029ee
JM
11607# endif
11608#endif
11609#ifdef TEST_DOUBLE
601a3a5f
JM
11610 TEST_ff_f (nexttoward, 1.0, 1.1L, 0x1.0000000000001p0),
11611 TEST_ff_f (nexttoward, 1.0, LDBL_MAX, 0x1.0000000000001p0),
11612 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000001p0, 0x1.0000000000001p0),
11613 TEST_ff_f (nexttoward, 1.0, 0.9L, 0x0.fffffffffffff8p0),
11614 TEST_ff_f (nexttoward, 1.0, -LDBL_MAX, 0x0.fffffffffffff8p0),
11615 TEST_ff_f (nexttoward, 1.0, 0x0.fffffffffffff8p0, 0x0.fffffffffffff8p0),
11616 TEST_ff_f (nexttoward, -1.0, -1.1L, -0x1.0000000000001p0),
11617 TEST_ff_f (nexttoward, -1.0, -LDBL_MAX, -0x1.0000000000001p0),
11618 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000001p0, -0x1.0000000000001p0),
11619 TEST_ff_f (nexttoward, -1.0, -0.9L, -0x0.fffffffffffff8p0),
11620 TEST_ff_f (nexttoward, -1.0, LDBL_MAX, -0x0.fffffffffffff8p0),
11621 TEST_ff_f (nexttoward, -1.0, -0x0.fffffffffffff8p0, -0x0.fffffffffffff8p0),
11622 TEST_ff_f (nexttoward, -1.0, -0x8.00346dc5d6388p-3L, -0x1.0000000000001p0),
11623 TEST_ff_f (nexttoward, 0x1p-1074, 0x1p-1073L, 0x1p-1073, UNDERFLOW_EXCEPTION),
7cb029ee 11624# if LDBL_MANT_DIG >= 64
601a3a5f
JM
11625 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000002p0L, 0x1.0000000000001p0),
11626 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffp0L, 0x0.fffffffffffff8p0),
11627 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000002p0L, -0x1.0000000000001p0),
11628 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffp0L, -0x0.fffffffffffff8p0),
7cb029ee
JM
11629# endif
11630# if LDBL_MANT_DIG >= 106
601a3a5f
JM
11631 TEST_ff_f (nexttoward, 1.0, 0x1.000000000000000000000000008p0L, 0x1.0000000000001p0),
11632 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffcp0L, 0x0.fffffffffffff8p0),
11633 TEST_ff_f (nexttoward, -1.0, -0x1.000000000000000000000000008p0L, -0x1.0000000000001p0),
11634 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffcp0L, -0x0.fffffffffffff8p0),
7cb029ee
JM
11635# endif
11636# if LDBL_MANT_DIG >= 113
601a3a5f
JM
11637 TEST_ff_f (nexttoward, 1.0, 0x1.0000000000000000000000000001p0L, 0x1.0000000000001p0),
11638 TEST_ff_f (nexttoward, 1.0, 0x0.ffffffffffffffffffffffffffff8p0L, 0x0.fffffffffffff8p0),
11639 TEST_ff_f (nexttoward, -1.0, -0x1.0000000000000000000000000001p0L, -0x1.0000000000001p0),
11640 TEST_ff_f (nexttoward, -1.0, -0x0.ffffffffffffffffffffffffffff8p0L, -0x0.fffffffffffff8p0),
7cb029ee
JM
11641# endif
11642#endif
601a3a5f
JM
11643 END_DATA (nexttoward)
11644 };
8847214f
UD
11645
11646static void
601a3a5f 11647nexttoward_test (void)
8847214f 11648{
601a3a5f
JM
11649 START (nexttoward);
11650 RUN_TEST_LOOP_ff_f (nexttoward, nexttoward_test_data, );
11651 END (nexttoward);
11652}
8847214f 11653
8847214f 11654
601a3a5f
JM
11655static const struct test_ff_f_data pow_test_data[] =
11656 {
11657 START_DATA (pow),
11658 TEST_ff_f (pow, 0, 0, 1),
11659 TEST_ff_f (pow, 0, minus_zero, 1),
11660 TEST_ff_f (pow, minus_zero, 0, 1),
11661 TEST_ff_f (pow, minus_zero, minus_zero, 1),
8847214f 11662
601a3a5f
JM
11663 TEST_ff_f (pow, 10, 0, 1),
11664 TEST_ff_f (pow, 10, minus_zero, 1),
11665 TEST_ff_f (pow, -10, 0, 1),
11666 TEST_ff_f (pow, -10, minus_zero, 1),
8847214f 11667
601a3a5f
JM
11668 TEST_ff_f (pow, qnan_value, 0, 1),
11669 TEST_ff_f (pow, qnan_value, minus_zero, 1),
8847214f 11670
15daa639 11671#ifndef TEST_INLINE
601a3a5f
JM
11672 TEST_ff_f (pow, 1.1L, plus_infty, plus_infty),
11673 TEST_ff_f (pow, plus_infty, plus_infty, plus_infty),
11674 TEST_ff_f (pow, -1.1L, plus_infty, plus_infty),
11675 TEST_ff_f (pow, minus_infty, plus_infty, plus_infty),
11676
11677 TEST_ff_f (pow, 0.9L, plus_infty, 0),
11678 TEST_ff_f (pow, 1e-7L, plus_infty, 0),
11679 TEST_ff_f (pow, -0.9L, plus_infty, 0),
11680 TEST_ff_f (pow, -1e-7L, plus_infty, 0),
11681
11682 TEST_ff_f (pow, 1.1L, minus_infty, 0),
11683 TEST_ff_f (pow, plus_infty, minus_infty, 0),
11684 TEST_ff_f (pow, -1.1L, minus_infty, 0),
11685 TEST_ff_f (pow, minus_infty, minus_infty, 0),
11686
11687 TEST_ff_f (pow, 0.9L, minus_infty, plus_infty),
11688 TEST_ff_f (pow, 1e-7L, minus_infty, plus_infty),
11689 TEST_ff_f (pow, -0.9L, minus_infty, plus_infty),
11690 TEST_ff_f (pow, -1e-7L, minus_infty, plus_infty),
11691
11692 TEST_ff_f (pow, plus_infty, 1e-7L, plus_infty),
11693 TEST_ff_f (pow, plus_infty, 1, plus_infty),
11694 TEST_ff_f (pow, plus_infty, 1e7L, plus_infty),
11695 TEST_ff_f (pow, plus_infty, min_subnorm_value, plus_infty),
11696
11697 TEST_ff_f (pow, plus_infty, -1e-7L, 0),
11698 TEST_ff_f (pow, plus_infty, -1, 0),
11699 TEST_ff_f (pow, plus_infty, -1e7L, 0),
11700 TEST_ff_f (pow, plus_infty, -min_subnorm_value, 0),
11701
11702 TEST_ff_f (pow, minus_infty, 1, minus_infty),
11703 TEST_ff_f (pow, minus_infty, 11, minus_infty),
11704 TEST_ff_f (pow, minus_infty, 1001, minus_infty),
11705
11706 TEST_ff_f (pow, minus_infty, 2, plus_infty),
11707 TEST_ff_f (pow, minus_infty, 12, plus_infty),
11708 TEST_ff_f (pow, minus_infty, 1002, plus_infty),
11709 TEST_ff_f (pow, minus_infty, 0.1L, plus_infty),
11710 TEST_ff_f (pow, minus_infty, 1.1L, plus_infty),
11711 TEST_ff_f (pow, minus_infty, 11.1L, plus_infty),
11712 TEST_ff_f (pow, minus_infty, 1001.1L, plus_infty),
11713 TEST_ff_f (pow, minus_infty, min_subnorm_value, plus_infty),
11714
11715 TEST_ff_f (pow, minus_infty, -1, minus_zero),
11716 TEST_ff_f (pow, minus_infty, -11, minus_zero),
11717 TEST_ff_f (pow, minus_infty, -1001, minus_zero),
11718
11719 TEST_ff_f (pow, minus_infty, -2, 0),
11720 TEST_ff_f (pow, minus_infty, -12, 0),
11721 TEST_ff_f (pow, minus_infty, -1002, 0),
11722 TEST_ff_f (pow, minus_infty, -0.1L, 0),
11723 TEST_ff_f (pow, minus_infty, -1.1L, 0),
11724 TEST_ff_f (pow, minus_infty, -11.1L, 0),
11725 TEST_ff_f (pow, minus_infty, -1001.1L, 0),
11726 TEST_ff_f (pow, minus_infty, -min_subnorm_value, 0),
11727#endif
11728
11729 TEST_ff_f (pow, qnan_value, qnan_value, qnan_value),
11730 TEST_ff_f (pow, 0, qnan_value, qnan_value),
11731 TEST_ff_f (pow, 1, qnan_value, 1),
11732 TEST_ff_f (pow, -1, qnan_value, qnan_value),
11733 TEST_ff_f (pow, qnan_value, 1, qnan_value),
11734 TEST_ff_f (pow, qnan_value, -1, qnan_value),
11735
11736 /* pow (x, qNaN) == qNaN. */
11737 TEST_ff_f (pow, 3.0, qnan_value, qnan_value),
11738 TEST_ff_f (pow, minus_zero, qnan_value, qnan_value),
11739 TEST_ff_f (pow, plus_infty, qnan_value, qnan_value),
11740 TEST_ff_f (pow, -3.0, qnan_value, qnan_value),
11741 TEST_ff_f (pow, minus_infty, qnan_value, qnan_value),
11742
11743 TEST_ff_f (pow, qnan_value, 3.0, qnan_value),
11744 TEST_ff_f (pow, qnan_value, -3.0, qnan_value),
11745 TEST_ff_f (pow, qnan_value, plus_infty, qnan_value),
11746 TEST_ff_f (pow, qnan_value, minus_infty, qnan_value),
11747 TEST_ff_f (pow, qnan_value, 2.5, qnan_value),
11748 TEST_ff_f (pow, qnan_value, -2.5, qnan_value),
11749 TEST_ff_f (pow, qnan_value, min_subnorm_value, qnan_value),
11750 TEST_ff_f (pow, qnan_value, -min_subnorm_value, qnan_value),
11751
11752 TEST_ff_f (pow, 1, plus_infty, 1),
11753 TEST_ff_f (pow, -1, plus_infty, 1),
11754 TEST_ff_f (pow, 1, minus_infty, 1),
11755 TEST_ff_f (pow, -1, minus_infty, 1),
11756 TEST_ff_f (pow, 1, 1, 1),
11757 TEST_ff_f (pow, 1, -1, 1),
11758 TEST_ff_f (pow, 1, 1.25, 1),
11759 TEST_ff_f (pow, 1, -1.25, 1),
11760 TEST_ff_f (pow, 1, 0x1p62L, 1),
11761 TEST_ff_f (pow, 1, 0x1p63L, 1),
11762 TEST_ff_f (pow, 1, 0x1p64L, 1),
11763 TEST_ff_f (pow, 1, 0x1p72L, 1),
11764 TEST_ff_f (pow, 1, min_subnorm_value, 1),
11765 TEST_ff_f (pow, 1, -min_subnorm_value, 1),
11766
11767 /* pow (x, +-0) == 1. */
11768 TEST_ff_f (pow, plus_infty, 0, 1),
11769 TEST_ff_f (pow, plus_infty, minus_zero, 1),
11770 TEST_ff_f (pow, minus_infty, 0, 1),
11771 TEST_ff_f (pow, minus_infty, minus_zero, 1),
11772 TEST_ff_f (pow, 32.75L, 0, 1),
11773 TEST_ff_f (pow, 32.75L, minus_zero, 1),
11774 TEST_ff_f (pow, -32.75L, 0, 1),
11775 TEST_ff_f (pow, -32.75L, minus_zero, 1),
11776 TEST_ff_f (pow, 0x1p72L, 0, 1),
11777 TEST_ff_f (pow, 0x1p72L, minus_zero, 1),
11778 TEST_ff_f (pow, 0x1p-72L, 0, 1),
11779 TEST_ff_f (pow, 0x1p-72L, minus_zero, 1),
11780
11781 TEST_ff_f (pow, -0.1L, 1.1L, qnan_value, INVALID_EXCEPTION),
11782 TEST_ff_f (pow, -0.1L, -1.1L, qnan_value, INVALID_EXCEPTION),
11783 TEST_ff_f (pow, -10.1L, 1.1L, qnan_value, INVALID_EXCEPTION),
11784 TEST_ff_f (pow, -10.1L, -1.1L, qnan_value, INVALID_EXCEPTION),
11785 TEST_ff_f (pow, -1.01L, min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11786 TEST_ff_f (pow, -1.01L, -min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11787 TEST_ff_f (pow, -1.0L, min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11788 TEST_ff_f (pow, -1.0L, -min_subnorm_value, qnan_value, INVALID_EXCEPTION),
11789
11790 TEST_ff_f (pow, 0, -1, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11791 TEST_ff_f (pow, 0, -11, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11792 TEST_ff_f (pow, 0, -0xffffff, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa 11793#ifndef TEST_FLOAT
601a3a5f 11794 TEST_ff_f (pow, 0, -0x1.fffffffffffffp+52L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM
11795#endif
11796#ifdef TEST_LDOUBLE
11797# if LDBL_MANT_DIG >= 64
601a3a5f 11798 TEST_ff_f (pow, 0, -0x1.fffffffffffffffep+63L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM
11799# endif
11800# if LDBL_MANT_DIG >= 106
601a3a5f 11801 TEST_ff_f (pow, 0, -0x1.ffffffffffffffffffffffffff8p+105L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM
11802# endif
11803# if LDBL_MANT_DIG >= 113
601a3a5f 11804 TEST_ff_f (pow, 0, -0x1.ffffffffffffffffffffffffffffp+112L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM
11805# endif
11806#endif
601a3a5f
JM
11807 TEST_ff_f (pow, minus_zero, -1, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11808 TEST_ff_f (pow, minus_zero, -11L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11809 TEST_ff_f (pow, minus_zero, -0xffffff, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11810 TEST_ff_f (pow, minus_zero, -0x1fffffe, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa 11811#ifndef TEST_FLOAT
601a3a5f
JM
11812 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffp+52L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11813 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffp+53L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM
11814#endif
11815#ifdef TEST_LDOUBLE
11816# if LDBL_MANT_DIG >= 64
601a3a5f
JM
11817 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffffep+63L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11818 TEST_ff_f (pow, minus_zero, -0x1.fffffffffffffffep+64L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM
11819# endif
11820# if LDBL_MANT_DIG >= 106
601a3a5f
JM
11821 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11822 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM
11823# endif
11824# if LDBL_MANT_DIG >= 113
601a3a5f
JM
11825 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11826 TEST_ff_f (pow, minus_zero, -0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
2460d3aa
JM
11827# endif
11828#endif
8847214f 11829
601a3a5f
JM
11830 TEST_ff_f (pow, 0, -2, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11831 TEST_ff_f (pow, 0, -11.1L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11832 TEST_ff_f (pow, 0, -min_subnorm_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11833 TEST_ff_f (pow, 0, -0x1p24, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11834 TEST_ff_f (pow, 0, -0x1p127, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11835 TEST_ff_f (pow, 0, -max_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11836 TEST_ff_f (pow, minus_zero, -2, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11837 TEST_ff_f (pow, minus_zero, -11.1L, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11838 TEST_ff_f (pow, minus_zero, -min_subnorm_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11839 TEST_ff_f (pow, minus_zero, -0x1p24, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11840 TEST_ff_f (pow, minus_zero, -0x1p127, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11841 TEST_ff_f (pow, minus_zero, -max_value, plus_infty, DIVIDE_BY_ZERO_EXCEPTION|ERRNO_ERANGE),
11842
11843 TEST_ff_f (pow, 0x1p72L, 0x1p72L, plus_infty, OVERFLOW_EXCEPTION),
11844 TEST_ff_f (pow, 10, -0x1p72L, 0, UNDERFLOW_EXCEPTION),
11845 TEST_ff_f (pow, max_value, max_value, plus_infty, OVERFLOW_EXCEPTION),
11846 TEST_ff_f (pow, 10, -max_value, 0, UNDERFLOW_EXCEPTION),
11847
11848 TEST_ff_f (pow, 0, 1, 0),
11849 TEST_ff_f (pow, 0, 11, 0),
11850
11851 TEST_ff_f (pow, minus_zero, 1, minus_zero),
11852 TEST_ff_f (pow, minus_zero, 11, minus_zero),
11853
11854 TEST_ff_f (pow, 0, 2, 0),
11855 TEST_ff_f (pow, 0, 11.1L, 0),
11856
11857 TEST_ff_f (pow, minus_zero, 2, 0),
11858 TEST_ff_f (pow, minus_zero, 11.1L, 0),
11859 TEST_ff_f (pow, 0, plus_infty, 0),
11860 TEST_ff_f (pow, minus_zero, plus_infty, 0),
11861 TEST_ff_f (pow, 0, minus_infty, plus_infty, DIVIDE_BY_ZERO_EXCEPTION_OK),
11862 TEST_ff_f (pow, minus_zero, minus_infty, plus_infty, DIVIDE_BY_ZERO_EXCEPTION_OK),
8847214f 11863
15daa639 11864#ifndef TEST_INLINE
601a3a5f
JM
11865 /* pow (x, +inf) == +inf for |x| > 1. */
11866 TEST_ff_f (pow, 1.5, plus_infty, plus_infty),
8847214f 11867
601a3a5f
JM
11868 /* pow (x, +inf) == +0 for |x| < 1. */
11869 TEST_ff_f (pow, 0.5, plus_infty, 0.0),
8847214f 11870
601a3a5f
JM
11871 /* pow (x, -inf) == +0 for |x| > 1. */
11872 TEST_ff_f (pow, 1.5, minus_infty, 0.0),
8847214f 11873
601a3a5f
JM
11874 /* pow (x, -inf) == +inf for |x| < 1. */
11875 TEST_ff_f (pow, 0.5, minus_infty, plus_infty),
15daa639 11876#endif
8847214f 11877
601a3a5f
JM
11878 /* pow (+inf, y) == +inf for y > 0. */
11879 TEST_ff_f (pow, plus_infty, 2, plus_infty),
11880 TEST_ff_f (pow, plus_infty, 0xffffff, plus_infty),
2460d3aa 11881#ifndef TEST_FLOAT
601a3a5f 11882 TEST_ff_f (pow, plus_infty, 0x1.fffffffffffffp+52L, plus_infty),
2460d3aa
JM
11883#endif
11884#ifdef TEST_LDOUBLE
11885# if LDBL_MANT_DIG >= 64
601a3a5f 11886 TEST_ff_f (pow, plus_infty, 0x1.fffffffffffffffep+63L, plus_infty),
2460d3aa
JM
11887# endif
11888# if LDBL_MANT_DIG >= 106
601a3a5f 11889 TEST_ff_f (pow, plus_infty, 0x1.ffffffffffffffffffffffffff8p+105L, plus_infty),
2460d3aa
JM
11890# endif
11891# if LDBL_MANT_DIG >= 113
601a3a5f 11892 TEST_ff_f (pow, plus_infty, 0x1.ffffffffffffffffffffffffffffp+112L, plus_infty),
2460d3aa
JM
11893# endif
11894#endif
601a3a5f
JM
11895 TEST_ff_f (pow, plus_infty, 0x1p24, plus_infty),
11896 TEST_ff_f (pow, plus_infty, 0x1p127, plus_infty),
11897 TEST_ff_f (pow, plus_infty, max_value, plus_infty),
8847214f 11898
601a3a5f
JM
11899 /* pow (+inf, y) == +0 for y < 0. */
11900 TEST_ff_f (pow, plus_infty, -1, 0.0),
11901 TEST_ff_f (pow, plus_infty, -0xffffff, 0.0),
2460d3aa 11902#ifndef TEST_FLOAT
601a3a5f 11903 TEST_ff_f (pow, plus_infty, -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, plus_infty, -0x1.fffffffffffffffep+63L, 0.0),
2460d3aa
JM
11908# endif
11909# if LDBL_MANT_DIG >= 106
601a3a5f 11910 TEST_ff_f (pow, plus_infty, -0x1.ffffffffffffffffffffffffff8p+105L, 0.0),
2460d3aa
JM
11911# endif
11912# if LDBL_MANT_DIG >= 113
601a3a5f 11913 TEST_ff_f (pow, plus_infty, -0x1.ffffffffffffffffffffffffffffp+112L, 0.0),
2460d3aa
JM
11914# endif
11915#endif
601a3a5f
JM
11916 TEST_ff_f (pow, plus_infty, -0x1p24, 0.0),
11917 TEST_ff_f (pow, plus_infty, -0x1p127, 0.0),
11918 TEST_ff_f (pow, plus_infty, -max_value, 0.0),
8847214f 11919
601a3a5f
JM
11920 /* pow (-inf, y) == -inf for y an odd integer > 0. */
11921 TEST_ff_f (pow, minus_infty, 27, minus_infty),
11922 TEST_ff_f (pow, minus_infty, 0xffffff, minus_infty),
11923 TEST_ff_f (pow, minus_infty, 0x1fffffe, plus_infty),
2460d3aa 11924#ifndef TEST_FLOAT
601a3a5f
JM
11925 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffp+52L, minus_infty),
11926 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffp+53L, plus_infty),
2460d3aa
JM
11927#endif
11928#ifdef TEST_LDOUBLE
11929# if LDBL_MANT_DIG >= 64
601a3a5f
JM
11930 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffffep+63L, minus_infty),
11931 TEST_ff_f (pow, minus_infty, 0x1.fffffffffffffffep+64L, plus_infty),
2460d3aa
JM
11932# endif
11933# if LDBL_MANT_DIG >= 106
601a3a5f
JM
11934 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffff8p+105L, minus_infty),
11935 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffff8p+106L, plus_infty),
2460d3aa
JM
11936# endif
11937# if LDBL_MANT_DIG >= 113
601a3a5f
JM
11938 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffffffp+112L, minus_infty),
11939 TEST_ff_f (pow, minus_infty, 0x1.ffffffffffffffffffffffffffffp+113L, plus_infty),
2460d3aa
JM
11940# endif
11941#endif
8847214f 11942
601a3a5f
JM
11943 /* pow (-inf, y) == +inf for y > 0 and not an odd integer. */
11944 TEST_ff_f (pow, minus_infty, 28, plus_infty),
11945 TEST_ff_f (pow, minus_infty, 0x1p24, plus_infty),
11946 TEST_ff_f (pow, minus_infty, 0x1p127, plus_infty),
11947 TEST_ff_f (pow, minus_infty, max_value, plus_infty),
8847214f 11948
601a3a5f
JM
11949 /* pow (-inf, y) == -0 for y an odd integer < 0. */
11950 TEST_ff_f (pow, minus_infty, -3, minus_zero),
11951 TEST_ff_f (pow, minus_infty, -0xffffff, minus_zero),
11952 TEST_ff_f (pow, minus_infty, -0x1fffffe, plus_zero),
2460d3aa 11953#ifndef TEST_FLOAT
601a3a5f
JM
11954 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffp+52L, minus_zero),
11955 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffp+53L, plus_zero),
2460d3aa
JM
11956#endif
11957#ifdef TEST_LDOUBLE
11958# if LDBL_MANT_DIG >= 64
601a3a5f
JM
11959 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffffep+63L, minus_zero),
11960 TEST_ff_f (pow, minus_infty, -0x1.fffffffffffffffep+64L, plus_zero),
2460d3aa
JM
11961# endif
11962# if LDBL_MANT_DIG >= 106
601a3a5f
JM
11963 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffff8p+105L, minus_zero),
11964 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffff8p+106L, plus_zero),
2460d3aa
JM
11965# endif
11966# if LDBL_MANT_DIG >= 113
601a3a5f
JM
11967 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffffffp+112L, minus_zero),
11968 TEST_ff_f (pow, minus_infty, -0x1.ffffffffffffffffffffffffffffp+113L, plus_zero),
2460d3aa
JM
11969# endif
11970#endif
601a3a5f
JM
11971 /* pow (-inf, y) == +0 for y < 0 and not an odd integer. */
11972 TEST_ff_f (pow, minus_infty, -2.0, 0.0),
11973 TEST_ff_f (pow, minus_infty, -0x1p24, 0.0),
11974 TEST_ff_f (pow, minus_infty, -0x1p127, 0.0),
11975 TEST_ff_f (pow, minus_infty, -max_value, 0.0),
8847214f 11976
601a3a5f
JM
11977 /* pow (+0, y) == +0 for y an odd integer > 0. */
11978 TEST_ff_f (pow, 0.0, 27, 0.0),
11979 TEST_ff_f (pow, 0.0, 0xffffff, 0.0),
2460d3aa 11980#ifndef TEST_FLOAT
601a3a5f 11981 TEST_ff_f (pow, 0.0, 0x1.fffffffffffffp+52L, 0.0),
2460d3aa
JM
11982#endif
11983#ifdef TEST_LDOUBLE
11984# if LDBL_MANT_DIG >= 64
601a3a5f 11985 TEST_ff_f (pow, 0.0, 0x1.fffffffffffffffep+63L, 0.0),
2460d3aa
JM
11986# endif
11987# if LDBL_MANT_DIG >= 106
601a3a5f 11988 TEST_ff_f (pow, 0.0, 0x1.ffffffffffffffffffffffffff8p+105L, 0.0),
2460d3aa
JM
11989# endif
11990# if LDBL_MANT_DIG >= 113
601a3a5f 11991 TEST_ff_f (pow, 0.0, 0x1.ffffffffffffffffffffffffffffp+112L, 0.0),
2460d3aa
JM
11992# endif
11993#endif
8847214f 11994
601a3a5f
JM
11995 /* pow (-0, y) == -0 for y an odd integer > 0. */
11996 TEST_ff_f (pow, minus_zero, 27, minus_zero),
11997 TEST_ff_f (pow, minus_zero, 0xffffff, minus_zero),
11998 TEST_ff_f (pow, minus_zero, 0x1fffffe, plus_zero),
2460d3aa 11999#ifndef TEST_FLOAT
601a3a5f
JM
12000 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffp+52L, minus_zero),
12001 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffp+53L, plus_zero),
2460d3aa
JM
12002#endif
12003#ifdef TEST_LDOUBLE
12004# if LDBL_MANT_DIG >= 64
601a3a5f
JM
12005 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffffep+63L, minus_zero),
12006 TEST_ff_f (pow, minus_zero, 0x1.fffffffffffffffep+64L, plus_zero),
2460d3aa
JM
12007# endif
12008# if LDBL_MANT_DIG >= 106
601a3a5f
JM
12009 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffff8p+105L, minus_zero),
12010 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffff8p+106L, plus_zero),
2460d3aa
JM
12011# endif
12012# if LDBL_MANT_DIG >= 113
601a3a5f
JM
12013 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffffffp+112L, minus_zero),
12014 TEST_ff_f (pow, minus_zero, 0x1.ffffffffffffffffffffffffffffp+113L, plus_zero),
2460d3aa
JM
12015# endif
12016#endif
8847214f 12017
601a3a5f
JM
12018 /* pow (+0, y) == +0 for y > 0 and not an odd integer. */
12019 TEST_ff_f (pow, 0.0, 4, 0.0),
12020 TEST_ff_f (pow, 0.0, 0x1p24, 0.0),
12021 TEST_ff_f (pow, 0.0, 0x1p127, 0.0),
12022 TEST_ff_f (pow, 0.0, max_value, 0.0),
12023 TEST_ff_f (pow, 0.0, min_subnorm_value, 0.0),
8847214f 12024
601a3a5f
JM
12025 /* pow (-0, y) == +0 for y > 0 and not an odd integer. */
12026 TEST_ff_f (pow, minus_zero, 4, 0.0),
12027 TEST_ff_f (pow, minus_zero, 0x1p24, 0.0),
12028 TEST_ff_f (pow, minus_zero, 0x1p127, 0.0),
12029 TEST_ff_f (pow, minus_zero, max_value, 0.0),
12030 TEST_ff_f (pow, minus_zero, min_subnorm_value, 0.0),
8847214f 12031
601a3a5f
JM
12032 TEST_ff_f (pow, 16, 0.25L, 2),
12033 TEST_ff_f (pow, 0x1p64L, 0.125L, 256),
12034 TEST_ff_f (pow, 2, 4, 16),
12035 TEST_ff_f (pow, 256, 8, 0x1p64L),
164f863e 12036
601a3a5f 12037 TEST_ff_f (pow, 0.75L, 1.25L, 0.697953644326574699205914060237425566L),
8847214f 12038
4c95adde 12039#if defined TEST_DOUBLE || defined TEST_LDOUBLE
601a3a5f 12040 TEST_ff_f (pow, -7.49321e+133, -9.80818e+16, 0, UNDERFLOW_EXCEPTION),
8847214f
UD
12041#endif
12042
601a3a5f
JM
12043 TEST_ff_f (pow, -1.0, -0xffffff, -1.0),
12044 TEST_ff_f (pow, -1.0, -0x1fffffe, 1.0),
d6270972 12045#ifndef TEST_FLOAT
601a3a5f
JM
12046 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffp+52L, -1.0),
12047 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffp+53L, 1.0),
d6270972
JM
12048#endif
12049#ifdef TEST_LDOUBLE
12050# if LDBL_MANT_DIG >= 64
601a3a5f
JM
12051 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffffep+63L, -1.0),
12052 TEST_ff_f (pow, -1.0, -0x1.fffffffffffffffep+64L, 1.0),
d6270972
JM
12053# endif
12054# if LDBL_MANT_DIG >= 106
601a3a5f
JM
12055 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffff8p+105L, -1.0),
12056 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffff8p+106L, 1.0),
d6270972
JM
12057# endif
12058# if LDBL_MANT_DIG >= 113
601a3a5f
JM
12059 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffffffp+112L, -1.0),
12060 TEST_ff_f (pow, -1.0, -0x1.ffffffffffffffffffffffffffffp+113L, 1.0),
d6270972
JM
12061# endif
12062#endif
601a3a5f 12063 TEST_ff_f (pow, -1.0, -max_value, 1.0),
d6270972 12064
601a3a5f
JM
12065 TEST_ff_f (pow, -1.0, 0xffffff, -1.0),
12066 TEST_ff_f (pow, -1.0, 0x1fffffe, 1.0),
d6270972 12067#ifndef TEST_FLOAT
601a3a5f
JM
12068 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffp+52L, -1.0),
12069 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffp+53L, 1.0),
d6270972
JM
12070#endif
12071#ifdef TEST_LDOUBLE
12072# if LDBL_MANT_DIG >= 64
601a3a5f
JM
12073 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffffep+63L, -1.0),
12074 TEST_ff_f (pow, -1.0, 0x1.fffffffffffffffep+64L, 1.0),
d6270972
JM
12075# endif
12076# if LDBL_MANT_DIG >= 106
601a3a5f
JM
12077 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffff8p+105L, -1.0),
12078 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffff8p+106L, 1.0),
d6270972
JM
12079# endif
12080# if LDBL_MANT_DIG >= 113
601a3a5f
JM
12081 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffffffp+112L, -1.0),
12082 TEST_ff_f (pow, -1.0, 0x1.ffffffffffffffffffffffffffffp+113L, 1.0),
d6270972
JM
12083# endif
12084#endif
601a3a5f 12085 TEST_ff_f (pow, -1.0, max_value, 1.0),
d6270972 12086
601a3a5f
JM
12087 TEST_ff_f (pow, -2.0, 126, 0x1p126),
12088 TEST_ff_f (pow, -2.0, 127, -0x1p127),
12089 /* Allow inexact results for float to be considered to underflow. */
12090 TEST_ff_f (pow, -2.0, -126, 0x1p-126, UNDERFLOW_EXCEPTION_OK_FLOAT),
12091 TEST_ff_f (pow, -2.0, -127, -0x1p-127, UNDERFLOW_EXCEPTION_OK_FLOAT),
d6270972 12092
601a3a5f
JM
12093 TEST_ff_f (pow, -2.0, -0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12094 TEST_ff_f (pow, -2.0, -0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12095#ifndef TEST_FLOAT
601a3a5f
JM
12096 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12097 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM
12098#endif
12099#ifdef TEST_LDOUBLE
12100# if LDBL_MANT_DIG >= 64
601a3a5f
JM
12101 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12102 TEST_ff_f (pow, -2.0, -0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM
12103# endif
12104# if LDBL_MANT_DIG >= 106
601a3a5f
JM
12105 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12106 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM
12107# endif
12108# if LDBL_MANT_DIG >= 113
601a3a5f
JM
12109 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12110 TEST_ff_f (pow, -2.0, -0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM
12111# endif
12112#endif
601a3a5f 12113 TEST_ff_f (pow, -2.0, -max_value, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12114
601a3a5f
JM
12115 TEST_ff_f (pow, -2.0, 0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12116 TEST_ff_f (pow, -2.0, 0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12117#ifndef TEST_FLOAT
601a3a5f
JM
12118 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12119 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM
12120#endif
12121#ifdef TEST_LDOUBLE
12122# if LDBL_MANT_DIG >= 64
601a3a5f
JM
12123 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12124 TEST_ff_f (pow, -2.0, 0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM
12125# endif
12126# if LDBL_MANT_DIG >= 106
601a3a5f
JM
12127 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12128 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM
12129# endif
12130# if LDBL_MANT_DIG >= 113
601a3a5f
JM
12131 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12132 TEST_ff_f (pow, -2.0, 0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM
12133# endif
12134#endif
601a3a5f 12135 TEST_ff_f (pow, -2.0, max_value, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12136
601a3a5f
JM
12137 TEST_ff_f (pow, -max_value, 0.5, qnan_value, INVALID_EXCEPTION),
12138 TEST_ff_f (pow, -max_value, 1.5, qnan_value, INVALID_EXCEPTION),
12139 TEST_ff_f (pow, -max_value, 1000.5, qnan_value, INVALID_EXCEPTION),
12140 TEST_ff_f (pow, -max_value, -2, plus_zero, UNDERFLOW_EXCEPTION),
12141 TEST_ff_f (pow, -max_value, -3, minus_zero, UNDERFLOW_EXCEPTION),
12142 TEST_ff_f (pow, -max_value, 2, plus_infty, OVERFLOW_EXCEPTION),
12143 TEST_ff_f (pow, -max_value, 3, minus_infty, OVERFLOW_EXCEPTION),
d6270972 12144
601a3a5f
JM
12145 TEST_ff_f (pow, -max_value, -0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12146 TEST_ff_f (pow, -max_value, -0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12147#ifndef TEST_FLOAT
601a3a5f
JM
12148 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12149 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM
12150#endif
12151#ifdef TEST_LDOUBLE
12152# if LDBL_MANT_DIG >= 64
601a3a5f
JM
12153 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12154 TEST_ff_f (pow, -max_value, -0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM
12155# endif
12156# if LDBL_MANT_DIG >= 106
601a3a5f
JM
12157 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12158 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM
12159# endif
12160# if LDBL_MANT_DIG >= 113
601a3a5f
JM
12161 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12162 TEST_ff_f (pow, -max_value, -0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM
12163# endif
12164#endif
601a3a5f 12165 TEST_ff_f (pow, -max_value, -max_value, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12166
601a3a5f
JM
12167 TEST_ff_f (pow, -max_value, 0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12168 TEST_ff_f (pow, -max_value, 0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12169#ifndef TEST_FLOAT
601a3a5f
JM
12170 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12171 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM
12172#endif
12173#ifdef TEST_LDOUBLE
12174# if LDBL_MANT_DIG >= 64
601a3a5f
JM
12175 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12176 TEST_ff_f (pow, -max_value, 0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM
12177# endif
12178# if LDBL_MANT_DIG >= 106
601a3a5f
JM
12179 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12180 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM
12181# endif
12182# if LDBL_MANT_DIG >= 113
601a3a5f
JM
12183 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12184 TEST_ff_f (pow, -max_value, 0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM
12185# endif
12186#endif
601a3a5f 12187 TEST_ff_f (pow, -max_value, max_value, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12188
601a3a5f
JM
12189 TEST_ff_f (pow, -0.5, 126, 0x1p-126),
12190 TEST_ff_f (pow, -0.5, 127, -0x1p-127),
12191 TEST_ff_f (pow, -0.5, -126, 0x1p126),
12192 TEST_ff_f (pow, -0.5, -127, -0x1p127),
d6270972 12193
601a3a5f
JM
12194 TEST_ff_f (pow, -0.5, -0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12195 TEST_ff_f (pow, -0.5, -0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12196#ifndef TEST_FLOAT
601a3a5f
JM
12197 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12198 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM
12199#endif
12200#ifdef TEST_LDOUBLE
12201# if LDBL_MANT_DIG >= 64
601a3a5f
JM
12202 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12203 TEST_ff_f (pow, -0.5, -0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM
12204# endif
12205# if LDBL_MANT_DIG >= 106
601a3a5f
JM
12206 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12207 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM
12208# endif
12209# if LDBL_MANT_DIG >= 113
601a3a5f
JM
12210 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12211 TEST_ff_f (pow, -0.5, -0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM
12212# endif
12213#endif
601a3a5f 12214 TEST_ff_f (pow, -0.5, -max_value, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12215
601a3a5f
JM
12216 TEST_ff_f (pow, -0.5, 0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12217 TEST_ff_f (pow, -0.5, 0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12218#ifndef TEST_FLOAT
601a3a5f
JM
12219 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12220 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM
12221#endif
12222#ifdef TEST_LDOUBLE
12223# if LDBL_MANT_DIG >= 64
601a3a5f
JM
12224 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12225 TEST_ff_f (pow, -0.5, 0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM
12226# endif
12227# if LDBL_MANT_DIG >= 106
601a3a5f
JM
12228 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12229 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM
12230# endif
12231# if LDBL_MANT_DIG >= 113
601a3a5f
JM
12232 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12233 TEST_ff_f (pow, -0.5, 0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM
12234# endif
12235#endif
601a3a5f 12236 TEST_ff_f (pow, -0.5, max_value, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12237
601a3a5f
JM
12238 TEST_ff_f (pow, -min_value, 0.5, qnan_value, INVALID_EXCEPTION),
12239 TEST_ff_f (pow, -min_value, 1.5, qnan_value, INVALID_EXCEPTION),
12240 TEST_ff_f (pow, -min_value, 1000.5, qnan_value, INVALID_EXCEPTION),
12241 TEST_ff_f (pow, -min_value, -2, plus_infty, OVERFLOW_EXCEPTION),
12242 TEST_ff_f (pow, -min_value, -3, minus_infty, OVERFLOW_EXCEPTION),
12243 /* Allow inexact results to be considered to underflow. */
12244 TEST_ff_f (pow, -min_value, 1, -min_value, UNDERFLOW_EXCEPTION_OK),
12245 TEST_ff_f (pow, -min_value, 2, plus_zero, UNDERFLOW_EXCEPTION),
12246 TEST_ff_f (pow, -min_value, 3, minus_zero, UNDERFLOW_EXCEPTION),
d6270972 12247
601a3a5f
JM
12248 TEST_ff_f (pow, -min_value, -0xffffff, minus_infty, OVERFLOW_EXCEPTION),
12249 TEST_ff_f (pow, -min_value, -0x1fffffe, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12250#ifndef TEST_FLOAT
601a3a5f
JM
12251 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffp+52L, minus_infty, OVERFLOW_EXCEPTION),
12252 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffp+53L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM
12253#endif
12254#ifdef TEST_LDOUBLE
12255# if LDBL_MANT_DIG >= 64
601a3a5f
JM
12256 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffffep+63L, minus_infty, OVERFLOW_EXCEPTION),
12257 TEST_ff_f (pow, -min_value, -0x1.fffffffffffffffep+64L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM
12258# endif
12259# if LDBL_MANT_DIG >= 106
601a3a5f
JM
12260 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffff8p+105L, minus_infty, OVERFLOW_EXCEPTION),
12261 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffff8p+106L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM
12262# endif
12263# if LDBL_MANT_DIG >= 113
601a3a5f
JM
12264 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffffffp+112L, minus_infty, OVERFLOW_EXCEPTION),
12265 TEST_ff_f (pow, -min_value, -0x1.ffffffffffffffffffffffffffffp+113L, plus_infty, OVERFLOW_EXCEPTION),
d6270972
JM
12266# endif
12267#endif
601a3a5f 12268 TEST_ff_f (pow, -min_value, -max_value, plus_infty, OVERFLOW_EXCEPTION),
d6270972 12269
601a3a5f
JM
12270 TEST_ff_f (pow, -min_value, 0xffffff, minus_zero, UNDERFLOW_EXCEPTION),
12271 TEST_ff_f (pow, -min_value, 0x1fffffe, plus_zero, UNDERFLOW_EXCEPTION),
d6270972 12272#ifndef TEST_FLOAT
601a3a5f
JM
12273 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffp+52L, minus_zero, UNDERFLOW_EXCEPTION),
12274 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffp+53L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM
12275#endif
12276#ifdef TEST_LDOUBLE
12277# if LDBL_MANT_DIG >= 64
601a3a5f
JM
12278 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffffep+63L, minus_zero, UNDERFLOW_EXCEPTION),
12279 TEST_ff_f (pow, -min_value, 0x1.fffffffffffffffep+64L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM
12280# endif
12281# if LDBL_MANT_DIG >= 106
601a3a5f
JM
12282 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffff8p+105L, minus_zero, UNDERFLOW_EXCEPTION),
12283 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffff8p+106L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM
12284# endif
12285# if LDBL_MANT_DIG >= 113
601a3a5f
JM
12286 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffffffp+112L, minus_zero, UNDERFLOW_EXCEPTION),
12287 TEST_ff_f (pow, -min_value, 0x1.ffffffffffffffffffffffffffffp+113L, plus_zero, UNDERFLOW_EXCEPTION),
d6270972
JM
12288# endif
12289#endif
601a3a5f
JM
12290 TEST_ff_f (pow, -min_value, max_value, plus_zero, UNDERFLOW_EXCEPTION),
12291
12292 TEST_ff_f (pow, 0x0.ffffffp0, 10, 0.999999403953712118183885036774764444747L),
12293 TEST_ff_f (pow, 0x0.ffffffp0, 100, 0.999994039553108359406305079606228341585L),
12294 TEST_ff_f (pow, 0x0.ffffffp0, 1000, 0.9999403971297699052276650144650733772182L),
12295 TEST_ff_f (pow, 0x0.ffffffp0, 0x1p24, 0.3678794302077803437135155590023422899744L),
12296 TEST_ff_f (pow, 0x0.ffffffp0, 0x1p30, 1.603807831524924233828134753069728224044e-28L),
12297 TEST_ff_f (pow, 0x0.ffffffp0, 0x1.234566p30, 2.374884712135295099971443365381007297732e-32L),
12298 TEST_ff_f (pow, 0x0.ffffffp0, -10, 1.000000596046643153205170848674671339688L),
12299 TEST_ff_f (pow, 0x0.ffffffp0, -100, 1.000005960482418779499387594989252621451L),
12300 TEST_ff_f (pow, 0x0.ffffffp0, -1000, 1.000059606422943986382898964231519867906L),
12301 TEST_ff_f (pow, 0x0.ffffffp0, -0x1p24, 2.7182819094701610539628664526874952929416L),
12302 TEST_ff_f (pow, 0x0.ffffffp0, -0x1p30, 6.2351609734265057988914412331288163636075e+27L),
12303 TEST_ff_f (pow, 0x0.ffffffp0, -0x1.234566p30, 4.2107307141696353498921307077142537353515e+31L),
12304 TEST_ff_f (pow, 0x1.000002p0, 0x1p24, 7.3890552180866447284268641248075832310141L),
12305 TEST_ff_f (pow, 0x1.000002p0, 0x1.234566p29, 4.2107033006507495188536371520637025716256e+31L),
12306 TEST_ff_f (pow, 0x1.000002p0, -0x1.234566p29, 2.3749001736727769098946062325205705312166e-32L),
c483f6b4 12307
1bead169 12308#if !defined TEST_FLOAT
601a3a5f
JM
12309 TEST_ff_f (pow, 0x0.fffffffffffff8p0L, 0x1.23456789abcdfp62L, 1.0118762747827252817436395051178295138220e-253L),
12310 TEST_ff_f (pow, 0x0.fffffffffffff8p0L, -0x1.23456789abcdfp62L, 9.8826311568054561811190162420900667121992e+252L),
12311 TEST_ff_f (pow, 0x1.0000000000001p0L, 0x1.23456789abcdfp61L, 9.8826311568044974397135026217687399395481e+252L),
12312 TEST_ff_f (pow, 0x1.0000000000001p0L, -0x1.23456789abcdfp61L, 1.0118762747828234466621210689458255908670e-253L),
c483f6b4
JM
12313#endif
12314
1bead169 12315#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 64 && LDBL_MAX_EXP >= 16384
601a3a5f
JM
12316 TEST_ff_f (pow, 0x0.ffffffffffffffffp0L, 0x1.23456789abcdef0ep77L, 1.2079212226420368189981778807634890018840e-4048L),
12317 TEST_ff_f (pow, 0x0.ffffffffffffffffp0L, -0x1.23456789abcdef0ep77L, 8.2786855736563746280496724205839522148001e+4047L),
12318 TEST_ff_f (pow, 0x1.0000000000000002p0L, 0x1.23456789abcdef0ep76L, 8.2786855736563683535324500168799315131570e+4047L),
12319 TEST_ff_f (pow, 0x1.0000000000000002p0L, -0x1.23456789abcdef0ep76L, 1.2079212226420377344964713407722652880280e-4048L),
1bead169
JM
12320#endif
12321
12322#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 113
601a3a5f
JM
12323 TEST_ff_f (pow, 0x0.ffffffffffffffffffffffffffff8p0L, 0x1.23456789abcdef0123456789abcdp126L, 1.2079212226420440237790185999151440179953e-4048L),
12324 TEST_ff_f (pow, 0x0.ffffffffffffffffffffffffffff8p0L, -0x1.23456789abcdef0123456789abcdp126L, 8.2786855736563252489063231915535105363602e+4047L),
12325 TEST_ff_f (pow, 0x1.0000000000000000000000000001p0L, 0x1.23456789abcdef0123456789abcdp125L, 8.2786855736563252489063231915423647547782e+4047L),
12326 TEST_ff_f (pow, 0x1.0000000000000000000000000001p0L, -0x1.23456789abcdef0123456789abcdp125L, 1.2079212226420440237790185999167702696503e-4048L),
1bead169
JM
12327#endif
12328
12329#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
601a3a5f
JM
12330 TEST_ff_f (pow, 1e4932L, 0.75L, 1e3699L),
12331 TEST_ff_f (pow, 1e4928L, 0.75L, 1e3696L),
12332 TEST_ff_f (pow, 1e4924L, 0.75L, 1e3693L),
12333 TEST_ff_f (pow, 1e4920L, 0.75L, 1e3690L),
12334 TEST_ff_f (pow, 10.0L, 4932.0L, 1e4932L),
12335 TEST_ff_f (pow, 10.0L, 4931.0L, 1e4931L),
12336 TEST_ff_f (pow, 10.0L, 4930.0L, 1e4930L),
12337 TEST_ff_f (pow, 10.0L, 4929.0L, 1e4929L),
12338 TEST_ff_f (pow, 10.0L, -4931.0L, 1e-4931L),
12339 TEST_ff_f (pow, 10.0L, -4930.0L, 1e-4930L),
12340 TEST_ff_f (pow, 10.0L, -4929.0L, 1e-4929L),
12341 TEST_ff_f (pow, 1e27L, 182.0L, 1e4914L),
12342 TEST_ff_f (pow, 1e27L, -182.0L, 1e-4914L),
12343#endif
12344
12345 TEST_ff_f (pow, min_subnorm_value, min_subnorm_value, 1.0L),
12346 TEST_ff_f (pow, min_subnorm_value, -min_subnorm_value, 1.0L),
12347 TEST_ff_f (pow, max_value, min_subnorm_value, 1.0L),
12348 TEST_ff_f (pow, max_value, -min_subnorm_value, 1.0L),
12349 TEST_ff_f (pow, 0.99L, min_subnorm_value, 1.0L),
12350 TEST_ff_f (pow, 0.99L, -min_subnorm_value, 1.0L),
12351 TEST_ff_f (pow, 1.01L, min_subnorm_value, 1.0L),
12352 TEST_ff_f (pow, 1.01L, -min_subnorm_value, 1.0L),
12353
12354 TEST_ff_f (pow, 2.0L, -100000.0L, plus_zero, UNDERFLOW_EXCEPTION),
12355 END_DATA (pow)
12356 };
7a25eb06 12357
601a3a5f
JM
12358static void
12359pow_test (void)
12360{
12361
12362 errno = 0;
12363 FUNC(pow) (0, 0);
12364 if (errno == ENOSYS)
12365 /* Function not implemented. */
12366 return;
12367
12368 START (pow);
12369 RUN_TEST_LOOP_ff_f (pow, pow_test_data, );
8847214f
UD
12370 END (pow);
12371}
12372
b7cd39e8 12373
601a3a5f
JM
12374static const struct test_ff_f_data pow_tonearest_test_data[] =
12375 {
12376 START_DATA (pow_tonearest),
12377 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12378 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12379 END_DATA (pow_tonearest)
12380 };
12381
b7cd39e8
JM
12382static void
12383pow_test_tonearest (void)
12384{
b7cd39e8
JM
12385 errno = 0;
12386 FUNC(pow) (0, 0);
12387 if (errno == ENOSYS)
12388 /* Function not implemented. */
12389 return;
12390
12391 START (pow_tonearest);
601a3a5f 12392 RUN_TEST_LOOP_ff_f (pow, pow_tonearest_test_data, FE_TONEAREST);
b7cd39e8
JM
12393 END (pow_tonearest);
12394}
12395
12396
601a3a5f
JM
12397static const struct test_ff_f_data pow_towardzero_test_data[] =
12398 {
12399 START_DATA (pow_towardzero),
12400 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12401 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12402 END_DATA (pow_towardzero)
12403 };
12404
b7cd39e8
JM
12405static void
12406pow_test_towardzero (void)
12407{
b7cd39e8
JM
12408 errno = 0;
12409 FUNC(pow) (0, 0);
12410 if (errno == ENOSYS)
12411 /* Function not implemented. */
12412 return;
12413
12414 START (pow_towardzero);
601a3a5f 12415 RUN_TEST_LOOP_ff_f (pow, pow_towardzero_test_data, FE_TOWARDZERO);
b7cd39e8
JM
12416 END (pow_towardzero);
12417}
12418
12419
601a3a5f
JM
12420static const struct test_ff_f_data pow_downward_test_data[] =
12421 {
12422 START_DATA (pow_downward),
12423 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12424 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12425 END_DATA (pow_downward)
12426 };
12427
b7cd39e8
JM
12428static void
12429pow_test_downward (void)
12430{
b7cd39e8
JM
12431 errno = 0;
12432 FUNC(pow) (0, 0);
12433 if (errno == ENOSYS)
12434 /* Function not implemented. */
12435 return;
12436
12437 START (pow_downward);
601a3a5f 12438 RUN_TEST_LOOP_ff_f (pow, pow_downward_test_data, FE_DOWNWARD);
b7cd39e8
JM
12439 END (pow_downward);
12440}
12441
12442
601a3a5f
JM
12443static const struct test_ff_f_data pow_upward_test_data[] =
12444 {
12445 START_DATA (pow_upward),
12446 TEST_ff_f (pow, 1.0625L, 1.125L, 1.070582293028761362162622578677070098674L),
12447 TEST_ff_f (pow, 1.5L, 1.03125L, 1.519127098714743184071644334163037684948L),
12448 END_DATA (pow_upward)
12449 };
12450
b7cd39e8
JM
12451static void
12452pow_test_upward (void)
12453{
b7cd39e8
JM
12454 errno = 0;
12455 FUNC(pow) (0, 0);
12456 if (errno == ENOSYS)
12457 /* Function not implemented. */
12458 return;
12459
12460 START (pow_upward);
601a3a5f 12461 RUN_TEST_LOOP_ff_f (pow, pow_upward_test_data, FE_UPWARD);
b7cd39e8
JM
12462 END (pow_upward);
12463}
12464
12465
601a3a5f
JM
12466static const struct test_ff_f_data remainder_test_data[] =
12467 {
12468 START_DATA (remainder),
12469 TEST_ff_f (remainder, 1, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12470 TEST_ff_f (remainder, 1, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12471 TEST_ff_f (remainder, plus_infty, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12472 TEST_ff_f (remainder, plus_infty, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12473 TEST_ff_f (remainder, plus_infty, 1, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12474 TEST_ff_f (remainder, plus_infty, 2, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12475 TEST_ff_f (remainder, minus_infty, minus_zero, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12476 TEST_ff_f (remainder, minus_infty, 0, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12477 TEST_ff_f (remainder, minus_infty, 1, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12478 TEST_ff_f (remainder, minus_infty, 2, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
12479 TEST_ff_f (remainder, qnan_value, qnan_value, qnan_value, ERRNO_UNCHANGED),
12480 TEST_ff_f (remainder, 0, qnan_value, qnan_value, ERRNO_UNCHANGED),
12481 TEST_ff_f (remainder, qnan_value, 0, qnan_value, ERRNO_UNCHANGED),
12482
12483 TEST_ff_f (remainder, 7.0, plus_infty, 7.0, ERRNO_UNCHANGED),
12484 TEST_ff_f (remainder, 7.0, minus_infty, 7.0, ERRNO_UNCHANGED),
12485
12486 TEST_ff_f (remainder, 1.625, 1.0, -0.375),
12487 TEST_ff_f (remainder, -1.625, 1.0, 0.375),
12488 TEST_ff_f (remainder, 1.625, -1.0, -0.375),
12489 TEST_ff_f (remainder, -1.625, -1.0, 0.375),
12490 TEST_ff_f (remainder, 5.0, 2.0, 1.0),
12491 TEST_ff_f (remainder, 3.0, 2.0, -1.0),
12492 END_DATA (remainder)
12493 };
12494
8847214f
UD
12495static void
12496remainder_test (void)
12497{
aaca11d8
UD
12498 errno = 0;
12499 FUNC(remainder) (1.625, 1.0);
12500 if (errno == ENOSYS)
12501 /* Function not implemented. */
12502 return;
8847214f
UD
12503
12504 START (remainder);
601a3a5f 12505 RUN_TEST_LOOP_ff_f (remainder, remainder_test_data, );
8847214f
UD
12506 END (remainder);
12507}
12508
12509static void
12510remquo_test (void)
12511{
12512 /* x is needed. */
12513 int x;
12514
aaca11d8
UD
12515 errno = 0;
12516 FUNC(remquo) (1.625, 1.0, &x);
12517 if (errno == ENOSYS)
12518 /* Function not implemented. */
12519 return;
12520
8847214f
UD
12521 START (remquo);
12522
67e971f1
TS
12523 TEST_ffI_f1 (remquo, 1, 0, qnan_value, IGNORE, INVALID_EXCEPTION);
12524 TEST_ffI_f1 (remquo, 1, minus_zero, qnan_value, IGNORE, INVALID_EXCEPTION);
12525 TEST_ffI_f1 (remquo, plus_infty, 1, qnan_value, IGNORE, INVALID_EXCEPTION);
12526 TEST_ffI_f1 (remquo, minus_infty, 1, qnan_value, IGNORE, INVALID_EXCEPTION);
12527 TEST_ffI_f1 (remquo, qnan_value, qnan_value, qnan_value, IGNORE);
8847214f
UD
12528
12529 TEST_ffI_f1 (remquo, 1.625, 1.0, -0.375, 2);
12530 TEST_ffI_f1 (remquo, -1.625, 1.0, 0.375, -2);
12531 TEST_ffI_f1 (remquo, 1.625, -1.0, -0.375, -2);
12532 TEST_ffI_f1 (remquo, -1.625, -1.0, 0.375, 2);
12533
12534 TEST_ffI_f1 (remquo, 5, 2, 1, 2);
12535 TEST_ffI_f1 (remquo, 3, 2, -1, 2);
12536
12537 END (remquo);
12538}
12539
74c57478
JM
12540static const struct test_f_f_data rint_test_data[] =
12541 {
12542 START_DATA (rint),
12543 /* TODO: missing qNaN tests. */
12544
12545 TEST_f_f (rint, 0.0, 0.0),
12546 TEST_f_f (rint, minus_zero, minus_zero),
12547 TEST_f_f (rint, plus_infty, plus_infty),
12548 TEST_f_f (rint, minus_infty, minus_infty),
12549
12550 /* Default rounding mode is round to even. */
12551 TEST_f_f (rint, 0.5, 0.0),
12552 TEST_f_f (rint, 1.5, 2.0),
12553 TEST_f_f (rint, 2.5, 2.0),
12554 TEST_f_f (rint, 3.5, 4.0),
12555 TEST_f_f (rint, 4.5, 4.0),
12556 TEST_f_f (rint, -0.5, -0.0),
12557 TEST_f_f (rint, -1.5, -2.0),
12558 TEST_f_f (rint, -2.5, -2.0),
12559 TEST_f_f (rint, -3.5, -4.0),
12560 TEST_f_f (rint, -4.5, -4.0),
12561 TEST_f_f (rint, 0.1, 0.0),
12562 TEST_f_f (rint, 0.25, 0.0),
12563 TEST_f_f (rint, 0.625, 1.0),
12564 TEST_f_f (rint, -0.1, -0.0),
12565 TEST_f_f (rint, -0.25, -0.0),
12566 TEST_f_f (rint, -0.625, -1.0),
12567 TEST_f_f (rint, 262144.75, 262145.0),
12568 TEST_f_f (rint, 262142.75, 262143.0),
12569 TEST_f_f (rint, 524286.75, 524287.0),
12570 TEST_f_f (rint, 524288.75, 524289.0),
12571 TEST_f_f (rint, 1048576.75, 1048577.0),
12572 TEST_f_f (rint, 2097152.75, 2097153.0),
12573 TEST_f_f (rint, -1048576.75, -1048577.0),
12574 TEST_f_f (rint, -2097152.75, -2097153.0),
12575#ifndef TEST_FLOAT
12576 TEST_f_f (rint, 70368744177664.75, 70368744177665.0),
12577 TEST_f_f (rint, 140737488355328.75, 140737488355329.0),
12578 TEST_f_f (rint, 281474976710656.75, 281474976710657.0),
12579 TEST_f_f (rint, 562949953421312.75, 562949953421313.0),
12580 TEST_f_f (rint, 1125899906842624.75, 1125899906842625.0),
12581 TEST_f_f (rint, -70368744177664.75, -70368744177665.0),
12582 TEST_f_f (rint, -140737488355328.75, -140737488355329.0),
12583 TEST_f_f (rint, -281474976710656.75, -281474976710657.0),
12584 TEST_f_f (rint, -562949953421312.75, -562949953421313.0),
12585 TEST_f_f (rint, -1125899906842624.75, -1125899906842625.0),
fe45ce09 12586#endif
f964490f 12587#ifdef TEST_LDOUBLE
74c57478
JM
12588 /* The result can only be represented in long double. */
12589 TEST_f_f (rint, 4503599627370495.5L, 4503599627370496.0L),
12590 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12591 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12592 TEST_f_f (rint, 4503599627370496.75L, 4503599627370497.0L),
12593 TEST_f_f (rint, 4503599627370497.5L, 4503599627370498.0L),
830fce04 12594
5c68d401 12595# if LDBL_MANT_DIG > 100
74c57478
JM
12596 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370495.0L),
12597 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370496.0L),
12598 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370497.0L),
5c68d401 12599# endif
f964490f 12600
74c57478
JM
12601 TEST_f_f (rint, -4503599627370495.5L, -4503599627370496.0L),
12602 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12603 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12604 TEST_f_f (rint, -4503599627370496.75L, -4503599627370497.0L),
12605 TEST_f_f (rint, -4503599627370497.5L, -4503599627370498.0L),
830fce04 12606
5c68d401 12607# if LDBL_MANT_DIG > 100
74c57478
JM
12608 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370495.0L),
12609 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370496.0L),
12610 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370497.0L),
12611
12612 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12613 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12614 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12615 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740992.0L),
12616 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740993.0L),
12617 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740994.0L),
12618
12619 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12620 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12621 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12622 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740992.0L),
12623 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740993.0L),
12624 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740994.0L),
5c68d401 12625# endif
f964490f 12626
74c57478
JM
12627 TEST_f_f (rint, 9007199254740991.5L, 9007199254740992.0L),
12628 TEST_f_f (rint, 9007199254740992.25L, 9007199254740992.0L),
12629 TEST_f_f (rint, 9007199254740992.5L, 9007199254740992.0L),
12630 TEST_f_f (rint, 9007199254740992.75L, 9007199254740993.0L),
12631 TEST_f_f (rint, 9007199254740993.5L, 9007199254740994.0L),
12632
12633 TEST_f_f (rint, -9007199254740991.5L, -9007199254740992.0L),
12634 TEST_f_f (rint, -9007199254740992.25L, -9007199254740992.0L),
12635 TEST_f_f (rint, -9007199254740992.5L, -9007199254740992.0L),
12636 TEST_f_f (rint, -9007199254740992.75L, -9007199254740993.0L),
12637 TEST_f_f (rint, -9007199254740993.5L, -9007199254740994.0L),
12638
12639 TEST_f_f (rint, 72057594037927935.5L, 72057594037927936.0L),
12640 TEST_f_f (rint, 72057594037927936.25L, 72057594037927936.0L),
12641 TEST_f_f (rint, 72057594037927936.5L, 72057594037927936.0L),
12642 TEST_f_f (rint, 72057594037927936.75L, 72057594037927937.0L),
12643 TEST_f_f (rint, 72057594037927937.5L, 72057594037927938.0L),
12644
12645 TEST_f_f (rint, -72057594037927935.5L, -72057594037927936.0L),
12646 TEST_f_f (rint, -72057594037927936.25L, -72057594037927936.0L),
12647 TEST_f_f (rint, -72057594037927936.5L, -72057594037927936.0L),
12648 TEST_f_f (rint, -72057594037927936.75L, -72057594037927937.0L),
12649 TEST_f_f (rint, -72057594037927937.5L, -72057594037927938.0L),
12650
12651 TEST_f_f (rint, 10141204801825835211973625643007.5L, 10141204801825835211973625643008.0L),
12652 TEST_f_f (rint, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
12653 TEST_f_f (rint, 10141204801825835211973625643008.5L, 10141204801825835211973625643008.0L),
12654 TEST_f_f (rint, 10141204801825835211973625643008.75L, 10141204801825835211973625643009.0L),
12655 TEST_f_f (rint, 10141204801825835211973625643009.5L, 10141204801825835211973625643010.0L),
12656#endif
12657 END_DATA (rint)
12658 };
1dc23588 12659
74c57478
JM
12660static void
12661rint_test (void)
12662{
12663 START (rint);
12664 RUN_TEST_LOOP_f_f (rint, rint_test_data, );
8847214f
UD
12665 END (rint);
12666}
12667
74c57478
JM
12668static const struct test_f_f_data rint_tonearest_test_data[] =
12669 {
12670 START_DATA (rint_tonearest),
12671 TEST_f_f (rint, 2.0, 2.0),
12672 TEST_f_f (rint, 1.5, 2.0),
12673 TEST_f_f (rint, 1.0, 1.0),
12674 TEST_f_f (rint, 0.5, 0.0),
12675 TEST_f_f (rint, 0.0, 0.0),
12676 TEST_f_f (rint, minus_zero, minus_zero),
12677 TEST_f_f (rint, -0.5, -0.0),
12678 TEST_f_f (rint, -1.0, -1.0),
12679 TEST_f_f (rint, -1.5, -2.0),
12680 TEST_f_f (rint, -2.0, -2.0),
12681 TEST_f_f (rint, 0.1, 0.0),
12682 TEST_f_f (rint, 0.25, 0.0),
12683 TEST_f_f (rint, 0.625, 1.0),
12684 TEST_f_f (rint, -0.1, -0.0),
12685 TEST_f_f (rint, -0.25, -0.0),
12686 TEST_f_f (rint, -0.625, -1.0),
12687 TEST_f_f (rint, 1048576.75, 1048577.0),
12688 TEST_f_f (rint, 2097152.75, 2097153.0),
12689 TEST_f_f (rint, -1048576.75, -1048577.0),
12690 TEST_f_f (rint, -2097152.75, -2097153.0),
12691#ifndef TEST_FLOAT
12692 TEST_f_f (rint, 70368744177664.75, 70368744177665.0),
12693 TEST_f_f (rint, 140737488355328.75, 140737488355329.0),
12694 TEST_f_f (rint, 281474976710656.75, 281474976710657.0),
12695 TEST_f_f (rint, 562949953421312.75, 562949953421313.0),
12696 TEST_f_f (rint, 1125899906842624.75, 1125899906842625.0),
12697 TEST_f_f (rint, -70368744177664.75, -70368744177665.0),
12698 TEST_f_f (rint, -140737488355328.75, -140737488355329.0),
12699 TEST_f_f (rint, -281474976710656.75, -281474976710657.0),
12700 TEST_f_f (rint, -562949953421312.75, -562949953421313.0),
12701 TEST_f_f (rint, -1125899906842624.75, -1125899906842625.0),
12702#endif
12703#ifdef TEST_LDOUBLE
12704 /* The result can only be represented in long double. */
12705 TEST_f_f (rint, 4503599627370495.5L, 4503599627370496.0L),
12706 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12707 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12708 TEST_f_f (rint, 4503599627370496.75L, 4503599627370497.0L),
12709 TEST_f_f (rint, 4503599627370497.5L, 4503599627370498.0L),
12710# if LDBL_MANT_DIG > 100
12711 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370495.0L),
12712 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370496.0L),
12713 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370497.0L),
12714# endif
12715 TEST_f_f (rint, -4503599627370495.5L, -4503599627370496.0L),
12716 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12717 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12718 TEST_f_f (rint, -4503599627370496.75L, -4503599627370497.0L),
12719 TEST_f_f (rint, -4503599627370497.5L, -4503599627370498.0L),
12720# if LDBL_MANT_DIG > 100
12721 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370495.0L),
12722 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370496.0L),
12723 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370497.0L),
12724
12725 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12726 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12727 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12728 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740992.0L),
12729 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740993.0L),
12730 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740994.0L),
12731
12732 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12733 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12734 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12735 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740992.0L),
12736 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740993.0L),
12737 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740994.0L),
12738# endif
12739#endif
12740 END_DATA (rint_tonearest)
12741 };
12742
4d37c8aa
UD
12743static void
12744rint_test_tonearest (void)
12745{
4d37c8aa 12746 START (rint_tonearest);
74c57478
JM
12747 RUN_TEST_LOOP_f_f (rint, rint_tonearest_test_data, FE_TONEAREST);
12748 END (rint_tonearest);
12749}
4d37c8aa 12750
74c57478
JM
12751static const struct test_f_f_data rint_towardzero_test_data[] =
12752 {
12753 START_DATA (rint_towardzero),
12754 TEST_f_f (rint, 2.0, 2.0),
12755 TEST_f_f (rint, 1.5, 1.0),
12756 TEST_f_f (rint, 1.0, 1.0),
12757 TEST_f_f (rint, 0.5, 0.0),
12758 TEST_f_f (rint, 0.0, 0.0),
12759 TEST_f_f (rint, minus_zero, minus_zero),
12760 TEST_f_f (rint, -0.5, -0.0),
12761 TEST_f_f (rint, -1.0, -1.0),
12762 TEST_f_f (rint, -1.5, -1.0),
12763 TEST_f_f (rint, -2.0, -2.0),
12764 TEST_f_f (rint, 0.1, 0.0),
12765 TEST_f_f (rint, 0.25, 0.0),
12766 TEST_f_f (rint, 0.625, 0.0),
12767 TEST_f_f (rint, -0.1, -0.0),
12768 TEST_f_f (rint, -0.25, -0.0),
12769 TEST_f_f (rint, -0.625, -0.0),
12770 TEST_f_f (rint, 1048576.75, 1048576.0),
12771 TEST_f_f (rint, 2097152.75, 2097152.0),
12772 TEST_f_f (rint, -1048576.75, -1048576.0),
12773 TEST_f_f (rint, -2097152.75, -2097152.0),
12774#ifndef TEST_FLOAT
12775 TEST_f_f (rint, 70368744177664.75, 70368744177664.0),
12776 TEST_f_f (rint, 140737488355328.75, 140737488355328.0),
12777 TEST_f_f (rint, 281474976710656.75, 281474976710656.0),
12778 TEST_f_f (rint, 562949953421312.75, 562949953421312.0),
12779 TEST_f_f (rint, 1125899906842624.75, 1125899906842624.0),
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),
fe45ce09 12785#endif
5c68d401 12786#ifdef TEST_LDOUBLE
74c57478
JM
12787 /* The result can only be represented in long double. */
12788 TEST_f_f (rint, 4503599627370495.5L, 4503599627370495.0L),
12789 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12790 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12791 TEST_f_f (rint, 4503599627370496.75L, 4503599627370496.0L),
12792 TEST_f_f (rint, 4503599627370497.5L, 4503599627370497.0L),
5c68d401 12793# if LDBL_MANT_DIG > 100
74c57478
JM
12794 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370494.0L),
12795 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370495.0L),
12796 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370496.0L),
5c68d401 12797# endif
74c57478
JM
12798 TEST_f_f (rint, -4503599627370495.5L, -4503599627370495.0L),
12799 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12800 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12801 TEST_f_f (rint, -4503599627370496.75L, -4503599627370496.0L),
12802 TEST_f_f (rint, -4503599627370497.5L, -4503599627370497.0L),
5c68d401 12803# if LDBL_MANT_DIG > 100
74c57478
JM
12804 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370494.0L),
12805 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370495.0L),
12806 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370496.0L),
12807
12808 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12809 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12810 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12811 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740991.0L),
12812 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740992.0L),
12813 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740993.0L),
12814
12815 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12816 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12817 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12818 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740991.0L),
12819 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740992.0L),
12820 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740993.0L),
5c68d401
RM
12821# endif
12822#endif
74c57478
JM
12823 END_DATA (rint_towardzero)
12824 };
4d37c8aa
UD
12825
12826static void
12827rint_test_towardzero (void)
12828{
4d37c8aa 12829 START (rint_towardzero);
74c57478
JM
12830 RUN_TEST_LOOP_f_f (rint, rint_towardzero_test_data, FE_TOWARDZERO);
12831 END (rint_towardzero);
12832}
4d37c8aa 12833
74c57478
JM
12834static const struct test_f_f_data rint_downward_test_data[] =
12835 {
12836 START_DATA (rint_downward),
12837 TEST_f_f (rint, 2.0, 2.0),
12838 TEST_f_f (rint, 1.5, 1.0),
12839 TEST_f_f (rint, 1.0, 1.0),
12840 TEST_f_f (rint, 0.5, 0.0),
12841 TEST_f_f (rint, 0.0, 0.0),
12842 TEST_f_f (rint, minus_zero, minus_zero),
12843 TEST_f_f (rint, -0.5, -1.0),
12844 TEST_f_f (rint, -1.0, -1.0),
12845 TEST_f_f (rint, -1.5, -2.0),
12846 TEST_f_f (rint, -2.0, -2.0),
12847 TEST_f_f (rint, 0.1, 0.0),
12848 TEST_f_f (rint, 0.25, 0.0),
12849 TEST_f_f (rint, 0.625, 0.0),
12850 TEST_f_f (rint, -0.1, -1.0),
12851 TEST_f_f (rint, -0.25, -1.0),
12852 TEST_f_f (rint, -0.625, -1.0),
12853 TEST_f_f (rint, 1048576.75, 1048576.0),
12854 TEST_f_f (rint, 2097152.75, 2097152.0),
12855 TEST_f_f (rint, -1048576.75, -1048577.0),
12856 TEST_f_f (rint, -2097152.75, -2097153.0),
12857#ifndef TEST_FLOAT
12858 TEST_f_f (rint, 70368744177664.75, 70368744177664.0),
12859 TEST_f_f (rint, 140737488355328.75, 140737488355328.0),
12860 TEST_f_f (rint, 281474976710656.75, 281474976710656.0),
12861 TEST_f_f (rint, 562949953421312.75, 562949953421312.0),
12862 TEST_f_f (rint, 1125899906842624.75, 1125899906842624.0),
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),
fe45ce09 12868#endif
5c68d401 12869#ifdef TEST_LDOUBLE
74c57478
JM
12870 /* The result can only be represented in long double. */
12871 TEST_f_f (rint, 4503599627370495.5L, 4503599627370495.0L),
12872 TEST_f_f (rint, 4503599627370496.25L, 4503599627370496.0L),
12873 TEST_f_f (rint, 4503599627370496.5L, 4503599627370496.0L),
12874 TEST_f_f (rint, 4503599627370496.75L, 4503599627370496.0L),
12875 TEST_f_f (rint, 4503599627370497.5L, 4503599627370497.0L),
5c68d401 12876# if LDBL_MANT_DIG > 100
74c57478
JM
12877 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370494.0L),
12878 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370495.0L),
12879 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370496.0L),
5c68d401 12880# endif
74c57478
JM
12881 TEST_f_f (rint, -4503599627370495.5L, -4503599627370496.0L),
12882 TEST_f_f (rint, -4503599627370496.25L, -4503599627370497.0L),
12883 TEST_f_f (rint, -4503599627370496.5L, -4503599627370497.0L),
12884 TEST_f_f (rint, -4503599627370496.75L, -4503599627370497.0L),
12885 TEST_f_f (rint, -4503599627370497.5L, -4503599627370498.0L),
5c68d401 12886# if LDBL_MANT_DIG > 100
74c57478
JM
12887 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370495.0L),
12888 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370496.0L),
12889 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370497.0L),
12890
12891 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740991.0L),
12892 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740992.0L),
12893 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740993.0L),
12894 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740991.0L),
12895 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740992.0L),
12896 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740993.0L),
12897
12898 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740992.0L),
12899 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740993.0L),
12900 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740994.0L),
12901 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740992.0L),
12902 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740993.0L),
12903 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740994.0L),
5c68d401
RM
12904# endif
12905#endif
74c57478
JM
12906 END_DATA (rint_downward)
12907 };
4d37c8aa
UD
12908
12909static void
12910rint_test_downward (void)
12911{
4d37c8aa 12912 START (rint_downward);
74c57478
JM
12913 RUN_TEST_LOOP_f_f (rint, rint_downward_test_data, FE_DOWNWARD);
12914 END (rint_downward);
12915}
4d37c8aa 12916
74c57478
JM
12917static const struct test_f_f_data rint_upward_test_data[] =
12918 {
12919 START_DATA (rint_upward),
12920 TEST_f_f (rint, 2.0, 2.0),
12921 TEST_f_f (rint, 1.5, 2.0),
12922 TEST_f_f (rint, 1.0, 1.0),
12923 TEST_f_f (rint, 0.5, 1.0),
12924 TEST_f_f (rint, 0.0, 0.0),
12925 TEST_f_f (rint, minus_zero, minus_zero),
12926 TEST_f_f (rint, -0.5, -0.0),
12927 TEST_f_f (rint, -1.0, -1.0),
12928 TEST_f_f (rint, -1.5, -1.0),
12929 TEST_f_f (rint, -2.0, -2.0),
12930 TEST_f_f (rint, 0.1, 1.0),
12931 TEST_f_f (rint, 0.25, 1.0),
12932 TEST_f_f (rint, 0.625, 1.0),
12933 TEST_f_f (rint, -0.1, -0.0),
12934 TEST_f_f (rint, -0.25, -0.0),
12935 TEST_f_f (rint, -0.625, -0.0),
12936 TEST_f_f (rint, 1048576.75, 1048577.0),
12937 TEST_f_f (rint, 2097152.75, 2097153.0),
12938 TEST_f_f (rint, -1048576.75, -1048576.0),
12939 TEST_f_f (rint, -2097152.75, -2097152.0),
12940#ifndef TEST_FLOAT
12941 TEST_f_f (rint, 70368744177664.75, 70368744177665.0),
12942 TEST_f_f (rint, 140737488355328.75, 140737488355329.0),
12943 TEST_f_f (rint, 281474976710656.75, 281474976710657.0),
12944 TEST_f_f (rint, 562949953421312.75, 562949953421313.0),
12945 TEST_f_f (rint, 1125899906842624.75, 1125899906842625.0),
12946 TEST_f_f (rint, -70368744177664.75, -70368744177664.0),
12947 TEST_f_f (rint, -140737488355328.75, -140737488355328.0),
12948 TEST_f_f (rint, -281474976710656.75, -281474976710656.0),
12949 TEST_f_f (rint, -562949953421312.75, -562949953421312.0),
12950 TEST_f_f (rint, -1125899906842624.75, -1125899906842624.0),
fe45ce09 12951#endif
5c68d401 12952#ifdef TEST_LDOUBLE
74c57478
JM
12953 /* The result can only be represented in long double. */
12954 TEST_f_f (rint, 4503599627370495.5L, 4503599627370496.0L),
12955 TEST_f_f (rint, 4503599627370496.25L, 4503599627370497.0L),
12956 TEST_f_f (rint, 4503599627370496.5L, 4503599627370497.0L),
12957 TEST_f_f (rint, 4503599627370496.75L, 4503599627370497.0L),
12958 TEST_f_f (rint, 4503599627370497.5L, 4503599627370498.0L),
5c68d401 12959# if LDBL_MANT_DIG > 100
74c57478
JM
12960 TEST_f_f (rint, 4503599627370494.5000000000001L, 4503599627370495.0L),
12961 TEST_f_f (rint, 4503599627370495.5000000000001L, 4503599627370496.0L),
12962 TEST_f_f (rint, 4503599627370496.5000000000001L, 4503599627370497.0L),
5c68d401 12963# endif
74c57478
JM
12964 TEST_f_f (rint, -4503599627370495.5L, -4503599627370495.0L),
12965 TEST_f_f (rint, -4503599627370496.25L, -4503599627370496.0L),
12966 TEST_f_f (rint, -4503599627370496.5L, -4503599627370496.0L),
12967 TEST_f_f (rint, -4503599627370496.75L, -4503599627370496.0L),
12968 TEST_f_f (rint, -4503599627370497.5L, -4503599627370497.0L),
5c68d401 12969# if LDBL_MANT_DIG > 100
74c57478
JM
12970 TEST_f_f (rint, -4503599627370494.5000000000001L, -4503599627370494.0L),
12971 TEST_f_f (rint, -4503599627370495.5000000000001L, -4503599627370495.0L),
12972 TEST_f_f (rint, -4503599627370496.5000000000001L, -4503599627370496.0L),
12973
12974 TEST_f_f (rint, 9007199254740991.0000000000001L, 9007199254740992.0L),
12975 TEST_f_f (rint, 9007199254740992.0000000000001L, 9007199254740993.0L),
12976 TEST_f_f (rint, 9007199254740993.0000000000001L, 9007199254740994.0L),
12977 TEST_f_f (rint, 9007199254740991.5000000000001L, 9007199254740992.0L),
12978 TEST_f_f (rint, 9007199254740992.5000000000001L, 9007199254740993.0L),
12979 TEST_f_f (rint, 9007199254740993.5000000000001L, 9007199254740994.0L),
12980
12981 TEST_f_f (rint, -9007199254740991.0000000000001L, -9007199254740991.0L),
12982 TEST_f_f (rint, -9007199254740992.0000000000001L, -9007199254740992.0L),
12983 TEST_f_f (rint, -9007199254740993.0000000000001L, -9007199254740993.0L),
12984 TEST_f_f (rint, -9007199254740991.5000000000001L, -9007199254740991.0L),
12985 TEST_f_f (rint, -9007199254740992.5000000000001L, -9007199254740992.0L),
12986 TEST_f_f (rint, -9007199254740993.5000000000001L, -9007199254740993.0L),
5c68d401
RM
12987# endif
12988#endif
74c57478
JM
12989 END_DATA (rint_upward)
12990 };
4d37c8aa
UD
12991
12992static void
12993rint_test_upward (void)
12994{
4d37c8aa 12995 START (rint_upward);
74c57478 12996 RUN_TEST_LOOP_f_f (rint, rint_upward_test_data, FE_UPWARD);
4d37c8aa
UD
12997 END (rint_upward);
12998}
12999
74c57478
JM
13000static const struct test_f_f_data round_test_data[] =
13001 {
13002 START_DATA (round),
13003 /* TODO: missing +/-Inf as well as qNaN tests. */
13004
13005 TEST_f_f (round, 0, 0),
13006 TEST_f_f (round, minus_zero, minus_zero),
13007 TEST_f_f (round, 0.2L, 0.0),
13008 TEST_f_f (round, -0.2L, minus_zero),
13009 TEST_f_f (round, 0.5, 1.0),
13010 TEST_f_f (round, -0.5, -1.0),
13011 TEST_f_f (round, 0.8L, 1.0),
13012 TEST_f_f (round, -0.8L, -1.0),
13013 TEST_f_f (round, 1.5, 2.0),
13014 TEST_f_f (round, -1.5, -2.0),
13015 TEST_f_f (round, 0.1, 0.0),
13016 TEST_f_f (round, 0.25, 0.0),
13017 TEST_f_f (round, 0.625, 1.0),
13018 TEST_f_f (round, -0.1, -0.0),
13019 TEST_f_f (round, -0.25, -0.0),
13020 TEST_f_f (round, -0.625, -1.0),
13021 TEST_f_f (round, 2097152.5, 2097153),
13022 TEST_f_f (round, -2097152.5, -2097153),
8847214f 13023
f964490f 13024#ifdef TEST_LDOUBLE
74c57478
JM
13025 /* The result can only be represented in long double. */
13026 TEST_f_f (round, 4503599627370495.5L, 4503599627370496.0L),
13027 TEST_f_f (round, 4503599627370496.25L, 4503599627370496.0L),
13028 TEST_f_f (round, 4503599627370496.5L, 4503599627370497.0L),
13029 TEST_f_f (round, 4503599627370496.75L, 4503599627370497.0L),
13030 TEST_f_f (round, 4503599627370497.5L, 4503599627370498.0L),
5c68d401 13031# if LDBL_MANT_DIG > 100
74c57478
JM
13032 TEST_f_f (round, 4503599627370494.5000000000001L, 4503599627370495.0L),
13033 TEST_f_f (round, 4503599627370495.5000000000001L, 4503599627370496.0L),
13034 TEST_f_f (round, 4503599627370496.5000000000001L, 4503599627370497.0L),
5c68d401 13035# endif
f964490f 13036
74c57478
JM
13037 TEST_f_f (round, -4503599627370495.5L, -4503599627370496.0L),
13038 TEST_f_f (round, -4503599627370496.25L, -4503599627370496.0L),
13039 TEST_f_f (round, -4503599627370496.5L, -4503599627370497.0L),
13040 TEST_f_f (round, -4503599627370496.75L, -4503599627370497.0L),
13041 TEST_f_f (round, -4503599627370497.5L, -4503599627370498.0L),
5c68d401 13042# if LDBL_MANT_DIG > 100
74c57478
JM
13043 TEST_f_f (round, -4503599627370494.5000000000001L, -4503599627370495.0L),
13044 TEST_f_f (round, -4503599627370495.5000000000001L, -4503599627370496.0L),
13045 TEST_f_f (round, -4503599627370496.5000000000001L, -4503599627370497.0L),
5c68d401 13046# endif
f964490f 13047
74c57478
JM
13048 TEST_f_f (round, 9007199254740991.5L, 9007199254740992.0L),
13049 TEST_f_f (round, 9007199254740992.25L, 9007199254740992.0L),
13050 TEST_f_f (round, 9007199254740992.5L, 9007199254740993.0L),
13051 TEST_f_f (round, 9007199254740992.75L, 9007199254740993.0L),
13052 TEST_f_f (round, 9007199254740993.5L, 9007199254740994.0L),
f964490f 13053
74c57478
JM
13054 TEST_f_f (round, -9007199254740991.5L, -9007199254740992.0L),
13055 TEST_f_f (round, -9007199254740992.25L, -9007199254740992.0L),
13056 TEST_f_f (round, -9007199254740992.5L, -9007199254740993.0L),
13057 TEST_f_f (round, -9007199254740992.75L, -9007199254740993.0L),
13058 TEST_f_f (round, -9007199254740993.5L, -9007199254740994.0L),
f964490f 13059
5c68d401 13060# if LDBL_MANT_DIG > 100
74c57478
JM
13061 TEST_f_f (round, 9007199254740991.0000000000001L, 9007199254740991.0L),
13062 TEST_f_f (round, 9007199254740992.0000000000001L, 9007199254740992.0L),
13063 TEST_f_f (round, 9007199254740993.0000000000001L, 9007199254740993.0L),
13064 TEST_f_f (round, 9007199254740991.5000000000001L, 9007199254740992.0L),
13065 TEST_f_f (round, 9007199254740992.5000000000001L, 9007199254740993.0L),
13066 TEST_f_f (round, 9007199254740993.5000000000001L, 9007199254740994.0L),
13067
13068 TEST_f_f (round, -9007199254740991.0000000000001L, -9007199254740991.0L),
13069 TEST_f_f (round, -9007199254740992.0000000000001L, -9007199254740992.0L),
13070 TEST_f_f (round, -9007199254740993.0000000000001L, -9007199254740993.0L),
13071 TEST_f_f (round, -9007199254740991.5000000000001L, -9007199254740992.0L),
13072 TEST_f_f (round, -9007199254740992.5000000000001L, -9007199254740993.0L),
13073 TEST_f_f (round, -9007199254740993.5000000000001L, -9007199254740994.0L),
5c68d401
RM
13074# endif
13075
74c57478
JM
13076 TEST_f_f (round, 72057594037927935.5L, 72057594037927936.0L),
13077 TEST_f_f (round, 72057594037927936.25L, 72057594037927936.0L),
13078 TEST_f_f (round, 72057594037927936.5L, 72057594037927937.0L),
13079 TEST_f_f (round, 72057594037927936.75L, 72057594037927937.0L),
13080 TEST_f_f (round, 72057594037927937.5L, 72057594037927938.0L),
13081
13082 TEST_f_f (round, -72057594037927935.5L, -72057594037927936.0L),
13083 TEST_f_f (round, -72057594037927936.25L, -72057594037927936.0L),
13084 TEST_f_f (round, -72057594037927936.5L, -72057594037927937.0L),
13085 TEST_f_f (round, -72057594037927936.75L, -72057594037927937.0L),
13086 TEST_f_f (round, -72057594037927937.5L, -72057594037927938.0L),
13087
13088 TEST_f_f (round, 10141204801825835211973625643007.5L, 10141204801825835211973625643008.0L),
13089 TEST_f_f (round, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
13090 TEST_f_f (round, 10141204801825835211973625643008.5L, 10141204801825835211973625643009.0L),
13091 TEST_f_f (round, 10141204801825835211973625643008.75L, 10141204801825835211973625643009.0L),
13092 TEST_f_f (round, 10141204801825835211973625643009.5L, 10141204801825835211973625643010.0L),
13093#endif
13094 END_DATA (round)
13095 };
f964490f 13096
74c57478
JM
13097static void
13098round_test (void)
13099{
13100 START (round);
13101 RUN_TEST_LOOP_f_f (round, round_test_data, );
8847214f
UD
13102 END (round);
13103}
13104
13105
601a3a5f
JM
13106static const struct test_ff_f_data scalb_test_data[] =
13107 {
13108 START_DATA (scalb),
13109 TEST_ff_f (scalb, 2.0, 0.5, qnan_value, INVALID_EXCEPTION),
13110 TEST_ff_f (scalb, 3.0, -2.5, qnan_value, INVALID_EXCEPTION),
13111
13112 TEST_ff_f (scalb, 0, qnan_value, qnan_value),
13113 TEST_ff_f (scalb, 1, qnan_value, qnan_value),
13114
13115 TEST_ff_f (scalb, 1, 0, 1),
13116 TEST_ff_f (scalb, -1, 0, -1),
13117
13118 TEST_ff_f (scalb, 0, plus_infty, qnan_value, INVALID_EXCEPTION),
13119 TEST_ff_f (scalb, minus_zero, plus_infty, qnan_value, INVALID_EXCEPTION),
13120
13121 TEST_ff_f (scalb, 0, 2, 0),
13122 TEST_ff_f (scalb, minus_zero, -4, minus_zero),
13123 TEST_ff_f (scalb, 0, 0, 0),
13124 TEST_ff_f (scalb, minus_zero, 0, minus_zero),
13125 TEST_ff_f (scalb, 0, -1, 0),
13126 TEST_ff_f (scalb, minus_zero, -10, minus_zero),
13127 TEST_ff_f (scalb, 0, minus_infty, 0),
13128 TEST_ff_f (scalb, minus_zero, minus_infty, minus_zero),
13129
13130 TEST_ff_f (scalb, plus_infty, -1, plus_infty),
13131 TEST_ff_f (scalb, minus_infty, -10, minus_infty),
13132 TEST_ff_f (scalb, plus_infty, 0, plus_infty),
13133 TEST_ff_f (scalb, minus_infty, 0, minus_infty),
13134 TEST_ff_f (scalb, plus_infty, 2, plus_infty),
13135 TEST_ff_f (scalb, minus_infty, 100, minus_infty),
13136
13137 TEST_ff_f (scalb, 0.1L, minus_infty, 0.0),
13138 TEST_ff_f (scalb, -0.1L, minus_infty, minus_zero),
13139
13140 TEST_ff_f (scalb, 1, plus_infty, plus_infty),
13141 TEST_ff_f (scalb, -1, plus_infty, minus_infty),
13142 TEST_ff_f (scalb, plus_infty, plus_infty, plus_infty),
13143 TEST_ff_f (scalb, minus_infty, plus_infty, minus_infty),
13144
13145 TEST_ff_f (scalb, plus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
13146 TEST_ff_f (scalb, minus_infty, minus_infty, qnan_value, INVALID_EXCEPTION),
13147
13148 TEST_ff_f (scalb, qnan_value, 1, qnan_value),
13149 TEST_ff_f (scalb, 1, qnan_value, qnan_value),
13150 TEST_ff_f (scalb, qnan_value, 0, qnan_value),
13151 TEST_ff_f (scalb, 0, qnan_value, qnan_value),
13152 TEST_ff_f (scalb, qnan_value, plus_infty, qnan_value),
13153 TEST_ff_f (scalb, plus_infty, qnan_value, qnan_value),
13154 TEST_ff_f (scalb, qnan_value, qnan_value, qnan_value),
13155
13156 TEST_ff_f (scalb, 0.8L, 4, 12.8L),
13157 TEST_ff_f (scalb, -0.854375L, 5, -27.34L),
13158 END_DATA (scalb)
13159 };
13160
8847214f
UD
13161static void
13162scalb_test (void)
13163{
13164
13165 START (scalb);
601a3a5f 13166 RUN_TEST_LOOP_ff_f (scalb, scalb_test_data, );
8847214f
UD
13167 END (scalb);
13168}
13169
13170
243216e1
JM
13171static const struct test_fi_f_data scalbn_test_data[] =
13172 {
13173 START_DATA (scalbn),
13174 TEST_fi_f (scalbn, 0, 0, 0),
13175 TEST_fi_f (scalbn, minus_zero, 0, minus_zero),
13176
13177 TEST_fi_f (scalbn, plus_infty, 1, plus_infty),
13178 TEST_fi_f (scalbn, minus_infty, 1, minus_infty),
13179 TEST_fi_f (scalbn, qnan_value, 1, qnan_value),
13180
13181 TEST_fi_f (scalbn, 0.8L, 4, 12.8L),
13182 TEST_fi_f (scalbn, -0.854375L, 5, -27.34L),
13183
13184 TEST_fi_f (scalbn, 1, 0L, 1),
13185
13186 TEST_fi_f (scalbn, 1, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13187 TEST_fi_f (scalbn, 1, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13188 TEST_fi_f (scalbn, max_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13189 TEST_fi_f (scalbn, max_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13190 TEST_fi_f (scalbn, min_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13191 TEST_fi_f (scalbn, min_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13192 TEST_fi_f (scalbn, min_value / 4, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13193 TEST_fi_f (scalbn, min_value / 4, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13194 END_DATA (scalbn)
13195 };
13196
8847214f
UD
13197static void
13198scalbn_test (void)
13199{
13200
13201 START (scalbn);
243216e1 13202 RUN_TEST_LOOP_fi_f (scalbn, scalbn_test_data, );
8847214f
UD
13203 END (scalbn);
13204}
13205
2550dfe9 13206
68fc074c
JM
13207static const struct test_fl_f_data scalbln_test_data[] =
13208 {
13209 START_DATA (scalbln),
13210 TEST_fl_f (scalbln, 0, 0, 0),
13211 TEST_fl_f (scalbln, minus_zero, 0, minus_zero),
13212
13213 TEST_fl_f (scalbln, plus_infty, 1, plus_infty),
13214 TEST_fl_f (scalbln, minus_infty, 1, minus_infty),
13215 TEST_fl_f (scalbln, qnan_value, 1, qnan_value),
13216
13217 TEST_fl_f (scalbln, 0.8L, 4, 12.8L),
13218 TEST_fl_f (scalbln, -0.854375L, 5, -27.34L),
13219
13220 TEST_fl_f (scalbln, 1, 0L, 1),
13221
13222 TEST_fl_f (scalbln, 1, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13223 TEST_fl_f (scalbln, 1, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13224 TEST_fl_f (scalbln, max_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13225 TEST_fl_f (scalbln, max_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13226 TEST_fl_f (scalbln, min_value, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13227 TEST_fl_f (scalbln, min_value, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13228 TEST_fl_f (scalbln, min_value / 4, INT_MAX, plus_infty, OVERFLOW_EXCEPTION),
13229 TEST_fl_f (scalbln, min_value / 4, INT_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13230
13231 TEST_fl_f (scalbln, 1, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION),
13232 TEST_fl_f (scalbln, 1, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13233 TEST_fl_f (scalbln, max_value, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION),
13234 TEST_fl_f (scalbln, max_value, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13235 TEST_fl_f (scalbln, min_value, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION),
13236 TEST_fl_f (scalbln, min_value, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13237 TEST_fl_f (scalbln, min_value / 4, LONG_MAX, plus_infty, OVERFLOW_EXCEPTION),
13238 TEST_fl_f (scalbln, min_value / 4, LONG_MIN, plus_zero, UNDERFLOW_EXCEPTION),
13239
13240#if LONG_MAX >= 0x100000000
13241 TEST_fl_f (scalbln, 1, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION),
13242 TEST_fl_f (scalbln, 1, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION),
13243 TEST_fl_f (scalbln, max_value, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION),
13244 TEST_fl_f (scalbln, max_value, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION),
13245 TEST_fl_f (scalbln, min_value, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION),
13246 TEST_fl_f (scalbln, min_value, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION),
13247 TEST_fl_f (scalbln, min_value / 4, 0x88000000L, plus_infty, OVERFLOW_EXCEPTION),
13248 TEST_fl_f (scalbln, min_value / 4, -0x88000000L, plus_zero, UNDERFLOW_EXCEPTION),
13249#endif
13250 END_DATA (scalbln)
13251 };
13252
8847214f
UD
13253static void
13254scalbln_test (void)
13255{
13256
13257 START (scalbln);
68fc074c 13258 RUN_TEST_LOOP_fl_f (scalbln, scalbln_test_data, );
8847214f
UD
13259 END (scalbn);
13260}
13261
2550dfe9 13262
8847214f
UD
13263static void
13264signbit_test (void)
13265{
64d063b8 13266 /* TODO: missing qNaN tests. */
8847214f
UD
13267
13268 START (signbit);
13269
13270 TEST_f_b (signbit, 0, 0);
13271 TEST_f_b (signbit, minus_zero, 1);
13272 TEST_f_b (signbit, plus_infty, 0);
13273 TEST_f_b (signbit, minus_infty, 1);
13274
13275 /* signbit (x) != 0 for x < 0. */
13276 TEST_f_b (signbit, -1, 1);
13277 /* signbit (x) == 0 for x >= 0. */
13278 TEST_f_b (signbit, 1, 0);
13279
13280 END (signbit);
13281}
13282
2550dfe9 13283
74c57478
JM
13284static const struct test_f_f_data sin_test_data[] =
13285 {
13286 START_DATA (sin),
13287 TEST_f_f (sin, 0, 0),
13288 TEST_f_f (sin, minus_zero, minus_zero),
13289 TEST_f_f (sin, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13290 TEST_f_f (sin, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13291 TEST_f_f (sin, qnan_value, qnan_value, ERRNO_UNCHANGED),
8847214f 13292
74c57478
JM
13293 TEST_f_f (sin, M_PI_6l, 0.5),
13294 TEST_f_f (sin, -M_PI_6l, -0.5),
13295 TEST_f_f (sin, M_PI_2l, 1),
13296 TEST_f_f (sin, -M_PI_2l, -1),
13297 TEST_f_f (sin, 0.75L, 0.681638760023334166733241952779893935L),
8847214f 13298
74c57478
JM
13299 TEST_f_f (sin, 0x1p65, -0.047183876212354673805106149805700013943218L),
13300 TEST_f_f (sin, -0x1p65, 0.047183876212354673805106149805700013943218L),
8c0247db 13301
74c57478 13302 TEST_f_f (sin, 0x1.7f4134p+103, -6.6703229329788657073304190650534846045235e-08L),
7a845b2c 13303
d32e4346 13304#ifdef TEST_DOUBLE
74c57478
JM
13305 TEST_f_f (sin, 0.80190127184058835, 0.71867942238767868),
13306 TEST_f_f (sin, 2.522464e-1, 2.4957989804940911e-1),
8848d99d
JM
13307#endif
13308
13309#ifndef TEST_FLOAT
74c57478
JM
13310 TEST_f_f (sin, 1e22, -0.8522008497671888017727058937530293682618L),
13311 TEST_f_f (sin, 0x1p1023, 0.5631277798508840134529434079444683477104L),
8848d99d
JM
13312#endif
13313
13314#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478 13315 TEST_f_f (sin, 0x1p16383L, 0.3893629985894208126948115852610595405563L),
d32e4346
RM
13316#endif
13317
74c57478
JM
13318 TEST_f_f (sin, 0x1p+120, 3.77820109360752022655548470056922991960587e-01L),
13319 TEST_f_f (sin, 0x1p+127, 6.23385512955870240370428801097126489001833e-01L),
13320 TEST_f_f (sin, 0x1.fffff8p+127, 4.85786063130487339701113680434728152037092e-02L),
13321 TEST_f_f (sin, 0x1.fffffep+127, -5.21876523333658540551505357019806722935726e-01L),
13322 TEST_f_f (sin, 0x1p+50, 4.96396515208940840876821859865411368093356e-01L),
13323 TEST_f_f (sin, 0x1p+28, -9.86198211836975655703110310527108292055548e-01L),
13324 END_DATA (sin)
13325 };
4ffffbd2 13326
74c57478
JM
13327static void
13328sin_test (void)
13329{
13330 errno = 0;
13331 FUNC(sin) (0);
13332 if (errno == ENOSYS)
13333 /* Function not implemented. */
13334 return;
8847214f 13335
74c57478
JM
13336 START (sin);
13337 RUN_TEST_LOOP_f_f (sin, sin_test_data, );
13338 END (sin);
8847214f
UD
13339}
13340
2550dfe9 13341
74c57478
JM
13342static const struct test_f_f_data sin_tonearest_test_data[] =
13343 {
13344 START_DATA (sin_tonearest),
13345 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13346 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13347 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13348 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13349 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13350 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13351 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13352 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13353 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13354 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13355 END_DATA (sin_tonearest)
13356 };
13357
804360ed
JM
13358static void
13359sin_test_tonearest (void)
13360{
804360ed
JM
13361 errno = 0;
13362 FUNC(sin) (0);
13363 if (errno == ENOSYS)
13364 /* Function not implemented. */
13365 return;
13366
13367 START (sin_tonearest);
74c57478 13368 RUN_TEST_LOOP_f_f (sin, sin_tonearest_test_data, FE_TONEAREST);
804360ed
JM
13369 END (sin_tonearest);
13370}
13371
13372
74c57478
JM
13373static const struct test_f_f_data sin_towardzero_test_data[] =
13374 {
13375 START_DATA (sin_towardzero),
13376 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13377 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13378 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13379 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13380 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13381 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13382 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13383 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13384 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13385 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13386 END_DATA (sin_towardzero)
13387 };
13388
804360ed
JM
13389static void
13390sin_test_towardzero (void)
13391{
804360ed
JM
13392 errno = 0;
13393 FUNC(sin) (0);
13394 if (errno == ENOSYS)
13395 /* Function not implemented. */
13396 return;
13397
13398 START (sin_towardzero);
74c57478 13399 RUN_TEST_LOOP_f_f (sin, sin_towardzero_test_data, FE_TOWARDZERO);
804360ed
JM
13400 END (sin_towardzero);
13401}
13402
13403
74c57478
JM
13404static const struct test_f_f_data sin_downward_test_data[] =
13405 {
13406 START_DATA (sin_downward),
13407 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13408 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13409 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13410 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13411 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13412 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13413 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13414 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13415 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13416 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13417 END_DATA (sin_downward)
13418 };
13419
804360ed
JM
13420static void
13421sin_test_downward (void)
13422{
804360ed
JM
13423 errno = 0;
13424 FUNC(sin) (0);
13425 if (errno == ENOSYS)
13426 /* Function not implemented. */
13427 return;
13428
13429 START (sin_downward);
74c57478 13430 RUN_TEST_LOOP_f_f (sin, sin_downward_test_data, FE_DOWNWARD);
804360ed
JM
13431 END (sin_downward);
13432}
13433
13434
74c57478
JM
13435static const struct test_f_f_data sin_upward_test_data[] =
13436 {
13437 START_DATA (sin_upward),
13438 TEST_f_f (sin, 1, 0.8414709848078965066525023216302989996226L),
13439 TEST_f_f (sin, 2, 0.9092974268256816953960198659117448427023L),
13440 TEST_f_f (sin, 3, 0.1411200080598672221007448028081102798469L),
13441 TEST_f_f (sin, 4, -0.7568024953079282513726390945118290941359L),
13442 TEST_f_f (sin, 5, -0.9589242746631384688931544061559939733525L),
13443 TEST_f_f (sin, 6, -0.2794154981989258728115554466118947596280L),
13444 TEST_f_f (sin, 7, 0.6569865987187890903969990915936351779369L),
13445 TEST_f_f (sin, 8, 0.9893582466233817778081235982452886721164L),
13446 TEST_f_f (sin, 9, 0.4121184852417565697562725663524351793439L),
13447 TEST_f_f (sin, 10, -0.5440211108893698134047476618513772816836L),
13448 END_DATA (sin_upward)
13449 };
13450
804360ed
JM
13451static void
13452sin_test_upward (void)
13453{
804360ed
JM
13454 errno = 0;
13455 FUNC(sin) (0);
13456 if (errno == ENOSYS)
13457 /* Function not implemented. */
13458 return;
13459
13460 START (sin_upward);
74c57478 13461 RUN_TEST_LOOP_f_f (sin, sin_upward_test_data, FE_UPWARD);
804360ed
JM
13462 END (sin_upward);
13463}
13464
13465
8847214f
UD
13466static void
13467sincos_test (void)
13468{
13469 FLOAT sin_res, cos_res;
13470
aaca11d8
UD
13471 errno = 0;
13472 FUNC(sincos) (0, &sin_res, &cos_res);
13473 if (errno == ENOSYS)
13474 /* Function not implemented. */
13475 return;
13476
8847214f
UD
13477 START (sincos);
13478
13479 /* sincos is treated differently because it returns void. */
13480 TEST_extra (sincos, 0, 0, 1);
13481
13482 TEST_extra (sincos, minus_zero, minus_zero, 1);
67e971f1
TS
13483 TEST_extra (sincos, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION);
13484 TEST_extra (sincos, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION);
13485 TEST_extra (sincos, qnan_value, qnan_value, qnan_value);
8847214f 13486
aba5e333
CD
13487 /* The value of M_PI_2l is never exactly PI/2, and therefore the
13488 answer is never exactly zero. The answer is equal to the error
13489 in rounding PI/2 for the type used. Thus the answer is unique
13490 to each type. */
13491#ifdef TEST_FLOAT
13492 /* 32-bit float. */
418601aa 13493 TEST_extra (sincos, M_PI_2l, 1, -0x1.777a5cp-25L);
aba5e333
CD
13494#endif
13495#if defined TEST_DOUBLE || (defined TEST_LDOUBLE && LDBL_MANT_DIG == 53)
13496 /* 64-bit double or 64-bit long double. */
418601aa 13497 TEST_extra (sincos, M_PI_2l, 1, 0x1.1a62633145c07p-54L);
aba5e333
CD
13498#endif
13499#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 64
13500 /* 96-bit long double. */
418601aa 13501 TEST_extra (sincos, M_PI_2l, 1, -0xe.ce675d1fc8f8cbbp-69L);
aba5e333
CD
13502#endif
13503#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 106
13504 /* 128-bit IBM long double. */
418601aa 13505 TEST_extra (sincos, M_PI_2l, 1, 0x1.c1cd129024e088a67cc74020bcp-107L);
aba5e333
CD
13506#endif
13507#if defined TEST_LDOUBLE && LDBL_MANT_DIG == 113
13508 /* 128-bit long double. */
418601aa 13509 TEST_extra (sincos, M_PI_2l, 1, 0x1.cd129024e088a67cc74020bbea64p-115L);
aba5e333
CD
13510#endif
13511
3c6cad26
UD
13512 TEST_extra (sincos, M_PI_6l, 0.5, 0.86602540378443864676372317075293616L);
13513 TEST_extra (sincos, M_PI_6l*2.0, 0.86602540378443864676372317075293616L, 0.5);
2550dfe9 13514 TEST_extra (sincos, 0.75L, 0.681638760023334166733241952779893935L, 0.731688868873820886311838753000084544L);
8847214f 13515
ea40808a
AJ
13516 TEST_extra (sincos, 0x1p65, -0.047183876212354673805106149805700013943218L, 0.99888622066058013610642172179340364209972L);
13517 TEST_extra (sincos, -0x1p65, 0.047183876212354673805106149805700013943218L, 0.99888622066058013610642172179340364209972L);
8c0247db 13518
d32e4346
RM
13519#ifdef TEST_DOUBLE
13520 TEST_extra (sincos, 0.80190127184058835, 0.71867942238767868, 0.69534156199418473);
8848d99d
JM
13521#endif
13522
13523#ifndef TEST_FLOAT
13524 TEST_extra (sincos, 1e22, -0.8522008497671888017727058937530293682618L, 0.5232147853951389454975944733847094921409L);
13525 TEST_extra (sincos, 0x1p1023, 0.5631277798508840134529434079444683477104L, -0.826369834614147994500785680811743734805L);
13526#endif
13527
13528#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
13529 TEST_extra (sincos, 0x1p16383L, 0.3893629985894208126948115852610595405563L, 0.9210843909921906206874509522505756251609L);
d32e4346
RM
13530#endif
13531
4ffffbd2
LD
13532 TEST_extra (sincos, 0x1p+120, 3.77820109360752022655548470056922991960587e-01L, -9.25879022854837867303861764107414946730833e-01L);
13533 TEST_extra (sincos, 0x1p+127, 6.23385512955870240370428801097126489001833e-01L, 7.81914638714960072263910298466369236613162e-01L);
13534 TEST_extra (sincos, 0x1.fffff8p+127, 4.85786063130487339701113680434728152037092e-02L, 9.98819362551949040703862043664101081064641e-01L);
13535 TEST_extra (sincos, 0x1.fffffep+127, -5.21876523333658540551505357019806722935726e-01L, 8.53021039830304158051791467692161107353094e-01L);
13536 TEST_extra (sincos, 0x1p+50, 4.96396515208940840876821859865411368093356e-01L, 8.68095904660550604334592502063501320395739e-01L);
13537 TEST_extra (sincos, 0x1p+28, -9.86198211836975655703110310527108292055548e-01L, -1.65568979490578758865468278195361551113358e-01L);
13538
8847214f
UD
13539 END (sincos);
13540}
13541
74c57478
JM
13542static const struct test_f_f_data sinh_test_data[] =
13543 {
13544 START_DATA (sinh),
13545 TEST_f_f (sinh, 0, 0),
13546 TEST_f_f (sinh, minus_zero, minus_zero),
13547
13548#ifndef TEST_INLINE
13549 TEST_f_f (sinh, plus_infty, plus_infty),
13550 TEST_f_f (sinh, minus_infty, minus_infty),
13551#endif
13552 TEST_f_f (sinh, qnan_value, qnan_value),
13553
13554 TEST_f_f (sinh, 0.75L, 0.822316731935829980703661634446913849L),
13555 TEST_f_f (sinh, 0x8p-32L, 1.86264514923095703232705808926175479e-9L),
13556 END_DATA (sinh)
13557 };
13558
8847214f
UD
13559static void
13560sinh_test (void)
13561{
aaca11d8 13562 errno = 0;
3c6cad26 13563 FUNC(sinh) (0.7L);
aaca11d8
UD
13564 if (errno == ENOSYS)
13565 /* Function not implemented. */
13566 return;
13567
8847214f 13568 START (sinh);
74c57478 13569 RUN_TEST_LOOP_f_f (sinh, sinh_test_data, );
8847214f
UD
13570 END (sinh);
13571}
13572
ca811b22 13573
74c57478
JM
13574static const struct test_f_f_data sinh_tonearest_test_data[] =
13575 {
13576 START_DATA (sinh_tonearest),
13577 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13578 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13579 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13580 END_DATA (sinh_tonearest)
13581 };
13582
ca811b22
JM
13583static void
13584sinh_test_tonearest (void)
13585{
ca811b22
JM
13586 errno = 0;
13587 FUNC(sinh) (0);
13588 if (errno == ENOSYS)
13589 /* Function not implemented. */
13590 return;
13591
13592 START (sinh_tonearest);
74c57478 13593 RUN_TEST_LOOP_f_f (sinh, sinh_tonearest_test_data, FE_TONEAREST);
ca811b22
JM
13594 END (sinh_tonearest);
13595}
13596
13597
74c57478
JM
13598static const struct test_f_f_data sinh_towardzero_test_data[] =
13599 {
13600 START_DATA (sinh_towardzero),
13601 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13602 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13603 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13604 END_DATA (sinh_towardzero)
13605 };
13606
ca811b22
JM
13607static void
13608sinh_test_towardzero (void)
13609{
ca811b22
JM
13610 errno = 0;
13611 FUNC(sinh) (0);
13612 if (errno == ENOSYS)
13613 /* Function not implemented. */
13614 return;
13615
13616 START (sinh_towardzero);
74c57478 13617 RUN_TEST_LOOP_f_f (sinh, sinh_towardzero_test_data, FE_TOWARDZERO);
ca811b22
JM
13618 END (sinh_towardzero);
13619}
13620
13621
74c57478
JM
13622static const struct test_f_f_data sinh_downward_test_data[] =
13623 {
13624 START_DATA (sinh_downward),
13625 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13626 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13627 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13628 END_DATA (sinh_downward)
13629 };
13630
ca811b22
JM
13631static void
13632sinh_test_downward (void)
13633{
ca811b22
JM
13634 errno = 0;
13635 FUNC(sinh) (0);
13636 if (errno == ENOSYS)
13637 /* Function not implemented. */
13638 return;
13639
13640 START (sinh_downward);
74c57478 13641 RUN_TEST_LOOP_f_f (sinh, sinh_downward_test_data, FE_DOWNWARD);
ca811b22
JM
13642 END (sinh_downward);
13643}
13644
13645
74c57478
JM
13646static const struct test_f_f_data sinh_upward_test_data[] =
13647 {
13648 START_DATA (sinh_upward),
13649 TEST_f_f (sinh, 22, 1792456423.065795780701106568345764104225L),
13650 TEST_f_f (sinh, 23, 4872401723.124451299966006944252978187305L),
13651 TEST_f_f (sinh, 24, 13244561064.92173614705070540368454568168L),
13652 END_DATA (sinh_upward)
13653 };
13654
ca811b22
JM
13655static void
13656sinh_test_upward (void)
13657{
ca811b22
JM
13658 errno = 0;
13659 FUNC(sinh) (0);
13660 if (errno == ENOSYS)
13661 /* Function not implemented. */
13662 return;
13663
13664 START (sinh_upward);
74c57478 13665 RUN_TEST_LOOP_f_f (sinh, sinh_upward_test_data, FE_UPWARD);
ca811b22
JM
13666 END (sinh_upward);
13667}
13668
13669
74c57478
JM
13670static const struct test_f_f_data sqrt_test_data[] =
13671 {
13672 START_DATA (sqrt),
13673 TEST_f_f (sqrt, 0, 0),
13674 TEST_f_f (sqrt, qnan_value, qnan_value),
13675 TEST_f_f (sqrt, plus_infty, plus_infty),
13676
13677 TEST_f_f (sqrt, minus_zero, minus_zero),
13678
13679 /* sqrt (x) == qNaN plus invalid exception for x < 0. */
13680 TEST_f_f (sqrt, -1, qnan_value, INVALID_EXCEPTION),
13681 TEST_f_f (sqrt, -max_value, qnan_value, INVALID_EXCEPTION),
13682 TEST_f_f (sqrt, minus_infty, qnan_value, INVALID_EXCEPTION),
13683
13684 TEST_f_f (sqrt, 2209, 47),
13685 TEST_f_f (sqrt, 4, 2),
13686 TEST_f_f (sqrt, 2, M_SQRT2l),
13687 TEST_f_f (sqrt, 0.25, 0.5),
13688 TEST_f_f (sqrt, 6642.25, 81.5),
13689 TEST_f_f (sqrt, 15190.5625L, 123.25L),
13690 TEST_f_f (sqrt, 0.75L, 0.866025403784438646763723170752936183L),
13691 END_DATA (sqrt)
13692 };
13693
8847214f
UD
13694static void
13695sqrt_test (void)
13696{
e6d3c4a7
AJ
13697 errno = 0;
13698 FUNC(sqrt) (1);
13699 if (errno == ENOSYS)
13700 /* Function not implemented. */
13701 return;
13702
8847214f 13703 START (sqrt);
74c57478 13704 RUN_TEST_LOOP_f_f (sqrt, sqrt_test_data, );
8847214f
UD
13705 END (sqrt);
13706}
13707
2550dfe9 13708
74c57478
JM
13709static const struct test_f_f_data tan_test_data[] =
13710 {
13711 START_DATA (tan),
13712 TEST_f_f (tan, 0, 0),
13713 TEST_f_f (tan, minus_zero, minus_zero),
13714 TEST_f_f (tan, plus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13715 TEST_f_f (tan, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13716 TEST_f_f (tan, qnan_value, qnan_value, ERRNO_UNCHANGED),
13717
13718 TEST_f_f (tan, M_PI_4l, 1),
13719 TEST_f_f (tan, 0.75L, 0.931596459944072461165202756573936428L),
13720
13721 TEST_f_f (tan, 0x1p65, -0.0472364872359047946798414219288370688827L),
13722 TEST_f_f (tan, -0x1p65, 0.0472364872359047946798414219288370688827L),
13723
13724 TEST_f_f (tan, 0xc.9p-4, 0.9995162902115457818029468900654150261381L),
13725 TEST_f_f (tan, 0xc.908p-4, 0.9997603425502441410973077452249560802034L),
13726 TEST_f_f (tan, 0xc.90cp-4, 0.9998823910588060302788513970802357770031L),
13727 TEST_f_f (tan, 0xc.90ep-4, 0.9999434208994808753305784795924711152508L),
13728 TEST_f_f (tan, 0xc.90fp-4, 0.9999739372166156702433266059635165160515L),
13729 TEST_f_f (tan, 0xc.90f8p-4, 0.9999891957244072765118898375645469865764L),
13730 TEST_f_f (tan, 0xc.90fcp-4, 0.9999968250656122402859679132395522927393L),
13731 TEST_f_f (tan, 0xc.90fdp-4, 0.9999987324100083358016192309006353329444L),
13732 TEST_f_f (tan, 0xc.90fd8p-4, 0.9999996860835706212861509874451585282616L),
13733 TEST_f_f (tan, 0xc.90fdap-4, 0.9999999245021033010474530133665235922808L),
13734 TEST_f_f (tan, 0xc.ap-4, 1.0073556597407272165371804539701396631519L),
13735 TEST_f_f (tan, 0xc.98p-4, 1.0034282930863044654045449407466962736255L),
13736 TEST_f_f (tan, 0xc.94p-4, 1.0014703786820082237342656561856877993328L),
13737 TEST_f_f (tan, 0xc.92p-4, 1.0004928571392300571266638743539017593717L),
13738 TEST_f_f (tan, 0xc.91p-4, 1.0000044544650244953647966900221905361131L),
13739 TEST_f_f (tan, 0xc.90fep-4, 1.0000006397580424009014454926842136804016L),
13740 TEST_f_f (tan, 0xc.90fdcp-4, 1.0000001629206928242190327320047489394217L),
13741 TEST_f_f (tan, 0xc.90fdbp-4, 1.0000000437113909572052640953950483705005L),
13742
13743 TEST_f_f (tan, -0xc.9p-4, -0.9995162902115457818029468900654150261381L),
13744 TEST_f_f (tan, -0xc.908p-4, -0.9997603425502441410973077452249560802034L),
13745 TEST_f_f (tan, -0xc.90cp-4, -0.9998823910588060302788513970802357770031L),
13746 TEST_f_f (tan, -0xc.90ep-4, -0.9999434208994808753305784795924711152508L),
13747 TEST_f_f (tan, -0xc.90fp-4, -0.9999739372166156702433266059635165160515L),
13748 TEST_f_f (tan, -0xc.90f8p-4, -0.9999891957244072765118898375645469865764L),
13749 TEST_f_f (tan, -0xc.90fcp-4, -0.9999968250656122402859679132395522927393L),
13750 TEST_f_f (tan, -0xc.90fdp-4, -0.9999987324100083358016192309006353329444L),
13751 TEST_f_f (tan, -0xc.90fd8p-4, -0.9999996860835706212861509874451585282616L),
13752 TEST_f_f (tan, -0xc.90fdap-4, -0.9999999245021033010474530133665235922808L),
13753 TEST_f_f (tan, -0xc.ap-4, -1.0073556597407272165371804539701396631519L),
13754 TEST_f_f (tan, -0xc.98p-4, -1.0034282930863044654045449407466962736255L),
13755 TEST_f_f (tan, -0xc.94p-4, -1.0014703786820082237342656561856877993328L),
13756 TEST_f_f (tan, -0xc.92p-4, -1.0004928571392300571266638743539017593717L),
13757 TEST_f_f (tan, -0xc.91p-4, -1.0000044544650244953647966900221905361131L),
13758 TEST_f_f (tan, -0xc.90fep-4, -1.0000006397580424009014454926842136804016L),
13759 TEST_f_f (tan, -0xc.90fdcp-4, -1.0000001629206928242190327320047489394217L),
13760 TEST_f_f (tan, -0xc.90fdbp-4, -1.0000000437113909572052640953950483705005L),
13761
13762#ifndef TEST_FLOAT
13763 TEST_f_f (tan, 1e22, -1.628778225606898878549375936939548513545L),
13764 TEST_f_f (tan, 0x1p1023, -0.6814476476066215012854144040167365190368L),
13765#endif
13766
13767#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
13768 TEST_f_f (tan, 0x1p16383L, 0.422722393732022337800504160054440141575L),
13769#endif
13770 END_DATA (tan)
13771 };
13772
8847214f
UD
13773static void
13774tan_test (void)
13775{
e6d3c4a7
AJ
13776 errno = 0;
13777 FUNC(tan) (0);
13778 if (errno == ENOSYS)
13779 /* Function not implemented. */
13780 return;
13781
8847214f 13782 START (tan);
74c57478 13783 RUN_TEST_LOOP_f_f (tan, tan_test_data, );
8847214f
UD
13784 END (tan);
13785}
13786
804360ed 13787
74c57478
JM
13788static const struct test_f_f_data tan_tonearest_test_data[] =
13789 {
13790 START_DATA (tan_tonearest),
13791 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13792 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13793 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13794 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13795 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13796 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13797 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13798 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13799 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13800 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13801 END_DATA (tan_tonearest)
13802 };
13803
804360ed
JM
13804static void
13805tan_test_tonearest (void)
13806{
804360ed
JM
13807 errno = 0;
13808 FUNC(tan) (0);
13809 if (errno == ENOSYS)
13810 /* Function not implemented. */
13811 return;
13812
13813 START (tan_tonearest);
74c57478 13814 RUN_TEST_LOOP_f_f (tan, tan_tonearest_test_data, FE_TONEAREST);
804360ed
JM
13815 END (tan_tonearest);
13816}
13817
13818
74c57478
JM
13819static const struct test_f_f_data tan_towardzero_test_data[] =
13820 {
13821 START_DATA (tan_towardzero),
13822 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13823 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13824 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13825 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13826 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13827 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13828 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13829 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13830 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13831 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13832 END_DATA (tan_towardzero)
13833 };
13834
804360ed
JM
13835static void
13836tan_test_towardzero (void)
13837{
804360ed
JM
13838 errno = 0;
13839 FUNC(tan) (0);
13840 if (errno == ENOSYS)
13841 /* Function not implemented. */
13842 return;
13843
13844 START (tan_towardzero);
74c57478 13845 RUN_TEST_LOOP_f_f (tan, tan_towardzero_test_data, FE_TOWARDZERO);
804360ed
JM
13846 END (tan_towardzero);
13847}
13848
13849
74c57478
JM
13850static const struct test_f_f_data tan_downward_test_data[] =
13851 {
13852 START_DATA (tan_downward),
13853 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13854 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13855 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13856 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13857 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13858 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13859 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13860 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13861 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13862 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13863 END_DATA (tan_downward)
13864 };
13865
804360ed
JM
13866static void
13867tan_test_downward (void)
13868{
804360ed
JM
13869 errno = 0;
13870 FUNC(tan) (0);
13871 if (errno == ENOSYS)
13872 /* Function not implemented. */
13873 return;
13874
13875 START (tan_downward);
74c57478 13876 RUN_TEST_LOOP_f_f (tan, tan_downward_test_data, FE_DOWNWARD);
804360ed
JM
13877 END (tan_downward);
13878}
13879
13880
74c57478
JM
13881static const struct test_f_f_data tan_upward_test_data[] =
13882 {
13883 START_DATA (tan_upward),
13884 TEST_f_f (tan, 1, 1.5574077246549022305069748074583601730873L),
13885 TEST_f_f (tan, 2, -2.1850398632615189916433061023136825434320L),
13886 TEST_f_f (tan, 3, -0.1425465430742778052956354105339134932261L),
13887 TEST_f_f (tan, 4, 1.1578212823495775831373424182673239231198L),
13888 TEST_f_f (tan, 5, -3.3805150062465856369827058794473439087096L),
13889 TEST_f_f (tan, 6, -0.2910061913847491570536995888681755428312L),
13890 TEST_f_f (tan, 7, 0.8714479827243187364564508896003135663222L),
13891 TEST_f_f (tan, 8, -6.7997114552203786999252627596086333648814L),
13892 TEST_f_f (tan, 9, -0.4523156594418098405903708757987855343087L),
13893 TEST_f_f (tan, 10, 0.6483608274590866712591249330098086768169L),
13894 END_DATA (tan_upward)
13895 };
13896
804360ed
JM
13897static void
13898tan_test_upward (void)
13899{
804360ed
JM
13900 errno = 0;
13901 FUNC(tan) (0);
13902 if (errno == ENOSYS)
13903 /* Function not implemented. */
13904 return;
13905
13906 START (tan_upward);
74c57478 13907 RUN_TEST_LOOP_f_f (tan, tan_upward_test_data, FE_UPWARD);
804360ed
JM
13908 END (tan_upward);
13909}
13910
13911
74c57478
JM
13912static const struct test_f_f_data tanh_test_data[] =
13913 {
13914 START_DATA (tanh),
13915 TEST_f_f (tanh, 0, 0),
13916 TEST_f_f (tanh, minus_zero, minus_zero),
8847214f 13917
15daa639 13918#ifndef TEST_INLINE
74c57478
JM
13919 TEST_f_f (tanh, plus_infty, 1),
13920 TEST_f_f (tanh, minus_infty, -1),
15daa639 13921#endif
74c57478 13922 TEST_f_f (tanh, qnan_value, qnan_value),
3eab00bd 13923
74c57478
JM
13924 TEST_f_f (tanh, 0.75L, 0.635148952387287319214434357312496495L),
13925 TEST_f_f (tanh, -0.75L, -0.635148952387287319214434357312496495L),
8847214f 13926
74c57478
JM
13927 TEST_f_f (tanh, 1.0L, 0.7615941559557648881194582826047935904L),
13928 TEST_f_f (tanh, -1.0L, -0.7615941559557648881194582826047935904L),
30e5dcb7 13929
74c57478
JM
13930 /* 2^-57 */
13931 TEST_f_f (tanh, 0x1p-57L, 6.938893903907228377647697925567626953125e-18L),
13932 END_DATA (tanh)
13933 };
8847214f
UD
13934
13935static void
74c57478 13936tanh_test (void)
8847214f
UD
13937{
13938 errno = 0;
74c57478 13939 FUNC(tanh) (0.7L);
8847214f
UD
13940 if (errno == ENOSYS)
13941 /* Function not implemented. */
13942 return;
8847214f 13943
74c57478
JM
13944 START (tanh);
13945 RUN_TEST_LOOP_f_f (tanh, tanh_test_data, );
13946 END (tanh);
13947}
8847214f 13948
74c57478
JM
13949static const struct test_f_f_data tgamma_test_data[] =
13950 {
13951 START_DATA (tgamma),
13952 TEST_f_f (tgamma, plus_infty, plus_infty),
13953 TEST_f_f (tgamma, max_value, plus_infty, OVERFLOW_EXCEPTION),
13954 TEST_f_f (tgamma, 0, plus_infty, DIVIDE_BY_ZERO_EXCEPTION),
13955 TEST_f_f (tgamma, minus_zero, minus_infty, DIVIDE_BY_ZERO_EXCEPTION),
13956 /* tgamma (x) == qNaN plus invalid exception for integer x <= 0. */
13957 TEST_f_f (tgamma, -2, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13958 TEST_f_f (tgamma, -max_value, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13959 TEST_f_f (tgamma, minus_infty, qnan_value, INVALID_EXCEPTION|ERRNO_EDOM),
13960 TEST_f_f (tgamma, qnan_value, qnan_value),
13961
13962 TEST_f_f (tgamma, 0.5, M_SQRT_PIl),
13963 TEST_f_f (tgamma, -0.5, -M_2_SQRT_PIl),
13964
13965 TEST_f_f (tgamma, 1, 1),
13966 TEST_f_f (tgamma, 2, 1),
13967 TEST_f_f (tgamma, 3, 2),
13968 TEST_f_f (tgamma, 4, 6),
13969 TEST_f_f (tgamma, 5, 24),
13970 TEST_f_f (tgamma, 6, 120),
13971 TEST_f_f (tgamma, 7, 720),
13972 TEST_f_f (tgamma, 8, 5040),
13973 TEST_f_f (tgamma, 9, 40320),
13974 TEST_f_f (tgamma, 10, 362880),
13975
13976 TEST_f_f (tgamma, 0.7L, 1.29805533264755778568117117915281162L),
13977 TEST_f_f (tgamma, 1.2L, 0.918168742399760610640951655185830401L),
13978
13979 TEST_f_f (tgamma, 1.5L, 8.8622692545275801364908374167057259139877e-01L),
13980 TEST_f_f (tgamma, 2.5L, 1.3293403881791370204736256125058588870982e+00L),
13981 TEST_f_f (tgamma, 3.5L, 3.3233509704478425511840640312646472177454e+00L),
13982 TEST_f_f (tgamma, 4.5L, 1.1631728396567448929144224109426265262109e+01L),
13983 TEST_f_f (tgamma, 5.5L, 5.2342777784553520181149008492418193679490e+01L),
13984 TEST_f_f (tgamma, 6.5L, 2.8788527781504436099631954670830006523720e+02L),
13985 TEST_f_f (tgamma, 7.5L, 1.8712543057977883464760770536039504240418e+03L),
13986 TEST_f_f (tgamma, 8.5L, 1.4034407293483412598570577902029628180313e+04L),
13987 TEST_f_f (tgamma, 9.5L, 1.1929246199460900708784991216725183953266e+05L),
13988 TEST_f_f (tgamma, -1.5L, 2.3632718012073547030642233111215269103967e+00L),
13989 TEST_f_f (tgamma, -2.5L, -9.4530872048294188122568932444861076415869e-01L),
13990 TEST_f_f (tgamma, -3.5L, 2.7008820585226910892162552127103164690248e-01L),
13991 TEST_f_f (tgamma, -4.5L, -6.0019601300504246427027893615784810422774e-02L),
13992 TEST_f_f (tgamma, -5.5L, 1.0912654781909862986732344293779056440504e-02L),
13993 TEST_f_f (tgamma, -6.5L, -1.6788699664476712287280529682737009908468e-03L),
13994 TEST_f_f (tgamma, -7.5L, 2.2384932885968949716374039576982679877958e-04L),
13995 TEST_f_f (tgamma, -8.5L, -2.6335215159963470254557693619979623385833e-05L),
13996 TEST_f_f (tgamma, -9.5L, 2.7721279115751021320587045915768024616666e-06L),
13997 TEST_f_f (tgamma, 0x1p-24L, 1.6777215422784394050795179874582764575261e+07L),
13998 TEST_f_f (tgamma, -0x1p-24L, -1.6777216577215723853867349114260580375249e+07L),
13999 TEST_f_f (tgamma, 0x1p-53L, 9.0071992547409914227843350984672492007618e+15L),
14000 TEST_f_f (tgamma, -0x1p-53L, -9.0071992547409925772156649015329704137860e+15L),
14001 TEST_f_f (tgamma, 0x1p-64L, 1.8446744073709551615422784335098467139447e+19L),
14002 TEST_f_f (tgamma, -0x1p-64L, -1.8446744073709551616577215664901532860660e+19L),
14003 TEST_f_f (tgamma, 0x1p-106L, 8.1129638414606681695789005144063422784335e+31L),
14004 TEST_f_f (tgamma, -0x1p-106L, -8.1129638414606681695789005144064577215665e+31L),
14005 TEST_f_f (tgamma, 0x1p-113L, 1.0384593717069655257060992658440191422784e+34L),
14006 TEST_f_f (tgamma, -0x1p-113L, -1.0384593717069655257060992658440192577216e+34L),
14007 TEST_f_f (tgamma, 0x1p-127L, 1.7014118346046923173168730371588410572742e+38L),
14008 TEST_f_f (tgamma, -0x1p-127L, -1.7014118346046923173168730371588410572858e+38L),
d8cd06db 14009#ifdef TEST_FLOAT
74c57478
JM
14010 TEST_f_f (tgamma, 0x1p-128L, plus_infty, OVERFLOW_EXCEPTION),
14011 TEST_f_f (tgamma, -0x1p-128L, minus_infty, OVERFLOW_EXCEPTION),
14012 TEST_f_f (tgamma, 0x1p-149L, plus_infty, OVERFLOW_EXCEPTION),
14013 TEST_f_f (tgamma, -0x1p-149L, minus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14014#else
74c57478
JM
14015 TEST_f_f (tgamma, 0x1p-128L, 3.4028236692093846346337460743176821145542e+38L),
14016 TEST_f_f (tgamma, -0x1p-128L, -3.4028236692093846346337460743176821145658e+38L),
14017 TEST_f_f (tgamma, 0x1p-149L, 7.1362384635297994052914298472474756819137e+44L),
14018 TEST_f_f (tgamma, -0x1p-149L, -7.1362384635297994052914298472474756819137e+44L),
d8cd06db
JM
14019#endif
14020#ifndef TEST_FLOAT
74c57478
JM
14021 TEST_f_f (tgamma, 0x1p-1023L, 8.9884656743115795386465259539451236680899e+307L),
14022 TEST_f_f (tgamma, -0x1p-1023L, -8.9884656743115795386465259539451236680899e+307L),
d8cd06db 14023# if !defined TEST_LDOUBLE || LDBL_MAX_EXP <= 1024
74c57478
JM
14024 TEST_f_f (tgamma, 0x1p-1024L, plus_infty, OVERFLOW_EXCEPTION),
14025 TEST_f_f (tgamma, -0x1p-1024L, minus_infty, OVERFLOW_EXCEPTION),
14026 TEST_f_f (tgamma, 0x1p-1074L, plus_infty, OVERFLOW_EXCEPTION),
14027 TEST_f_f (tgamma, -0x1p-1074L, minus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14028# else
74c57478
JM
14029 TEST_f_f (tgamma, 0x1p-1024L, 1.7976931348623159077293051907890247336180e+308L),
14030 TEST_f_f (tgamma, -0x1p-1024L, -1.7976931348623159077293051907890247336180e+308L),
14031 TEST_f_f (tgamma, 0x1p-1074L, 2.0240225330731061835249534671891730704956e+323L),
14032 TEST_f_f (tgamma, -0x1p-1074L, -2.0240225330731061835249534671891730704956e+323L),
d8cd06db
JM
14033# endif
14034#endif
14035#if defined TEST_LDOUBLE && LDBL_MIN_EXP <= -16381
74c57478
JM
14036 TEST_f_f (tgamma, 0x1p-16383L, 5.9486574767861588254287966331400356538172e+4931L),
14037 TEST_f_f (tgamma, -0x1p-16383L, -5.9486574767861588254287966331400356538172e+4931L),
14038 TEST_f_f (tgamma, 0x1p-16384L, plus_infty, OVERFLOW_EXCEPTION),
14039 TEST_f_f (tgamma, -0x1p-16384L, minus_infty, OVERFLOW_EXCEPTION),
14040 TEST_f_f (tgamma, 0x1p-16445L, plus_infty, OVERFLOW_EXCEPTION),
14041 TEST_f_f (tgamma, -0x1p-16445L, minus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14042# if LDBL_MANT_DIG >= 113
74c57478
JM
14043 TEST_f_f (tgamma, 0x1p-16494L, plus_infty, OVERFLOW_EXCEPTION),
14044 TEST_f_f (tgamma, -0x1p-16494L, minus_infty, OVERFLOW_EXCEPTION),
d8cd06db
JM
14045# endif
14046#endif
74c57478
JM
14047 TEST_f_f (tgamma, 0x8.00001p0L, 5.0400096882277802019946778420223050233915e+03L),
14048 TEST_f_f (tgamma, 0x7.fffff8p0L, 5.0399951558933225045148935487583089307135e+03L),
14049 TEST_f_f (tgamma, 0x7.000008p0L, 7.2000064296977505705636258629805621178587e+02L),
14050 TEST_f_f (tgamma, 0x6.fffff8p0L, 7.1999935703082425988147448928288557689866e+02L),
14051 TEST_f_f (tgamma, 0x6.000008p0L, 1.2000009762487825358530770343720418162783e+02L),
14052 TEST_f_f (tgamma, 0x5.fffff8p0L, 1.1999990237520611552119807476573441975106e+02L),
14053 TEST_f_f (tgamma, 0x5.000008p0L, 2.4000017236155647574166073485628713443799e+01L),
14054 TEST_f_f (tgamma, 0x4.fffff8p0L, 2.3999982763857938712639837029547357501709e+01L),
14055 TEST_f_f (tgamma, 0x4.000008p0L, 6.0000035937827461765660468073471093546129e+00L),
14056 TEST_f_f (tgamma, 0x3.fffffcp0L, 5.9999982031095793171233994481968816873643e+00L),
14057 TEST_f_f (tgamma, 0x3.000004p0L, 2.0000004400179308360529417942462250547999e+00L),
14058 TEST_f_f (tgamma, 0x2.fffffcp0L, 1.9999995599822108706107786027549565954046e+00L),
14059 TEST_f_f (tgamma, 0x2.000004p0L, 1.0000001007996638509889062631687945799175e+00L),
14060 TEST_f_f (tgamma, 0x1.fffffep0L, 9.9999994960018563231526611134590489120697e-01L),
14061 TEST_f_f (tgamma, 0x1.000002p0L, 9.9999993119054472483596471908942669644327e-01L),
14062 TEST_f_f (tgamma, 0x0.ffffffp0L, 1.0000000344047381790797322460568297132998e+00L),
14063 TEST_f_f (tgamma, -0x0.ffffffp0L, -1.6777216422784419250710305882992376932423e+07L),
14064 TEST_f_f (tgamma, -0x1.000002p0L, 8.3886075772158332060084424806449513922858e+06L),
14065 TEST_f_f (tgamma, -0x1.fffffep0L, 4.1943044613922792026014320172298377770578e+06L),
14066 TEST_f_f (tgamma, -0x2.000004p0L, -2.0971515386080557574407223895988378776747e+06L),
14067 TEST_f_f (tgamma, -0x2.fffffcp0L, -6.9905087601970247876992248591045142913324e+05L),
14068 TEST_f_f (tgamma, -0x3.000004p0L, 6.9905045731381300146131914617735687322025e+05L),
14069 TEST_f_f (tgamma, -0x3.fffffcp0L, 1.7476272942159602684441970627092458855771e+05L),
14070 TEST_f_f (tgamma, -0x4.000008p0L, -8.7381270578483499672965708923121931082305e+04L),
14071 TEST_f_f (tgamma, -0x4.fffff8p0L, -1.7476280884325863043793087474680780379554e+04L),
14072 TEST_f_f (tgamma, -0x5.000008p0L, 1.7476252449031389167286893378510439443844e+04L),
14073 TEST_f_f (tgamma, -0x5.fffff8p0L, 2.9127137122026653716311560165769071985443e+03L),
14074 TEST_f_f (tgamma, -0x6.000008p0L, -2.9127085100239567622341538102130981196910e+03L),
14075 TEST_f_f (tgamma, -0x6.fffff8p0L, -4.1610198723079349791939054365613377035519e+02L),
14076 TEST_f_f (tgamma, -0x7.000008p0L, 4.1610118737306415004517215226199741948733e+02L),
14077 TEST_f_f (tgamma, -0x7.fffff8p0L, 5.2012751504050764429534086402871289946986e+01L),
14078 TEST_f_f (tgamma, -0x8.00001p0L, -2.6006296115134418896533598545925084576702e+01L),
14079 TEST_f_f (tgamma, -0x9.fffffp0L, 2.8896008370721717567612135720915723136310e-01L),
14080 TEST_f_f (tgamma, -0xa.00001p0L, -2.8895878754728051776830454190076999107021e-01L),
14081 TEST_f_f (tgamma, -0x13.ffffep0L, 2.1550026214525536756224040483579183652119e-13L),
14082 TEST_f_f (tgamma, -0x14.00002p0L, -2.1549777908265594916405421768142757507179e-13L),
14083 TEST_f_f (tgamma, -0x1d.ffffep0L, 1.9765721589464867957912772592816027583176e-27L),
14084 TEST_f_f (tgamma, -0x1e.00002p0L, -1.9765463890341964384070157599286498212650e-27L),
14085 TEST_f_f (tgamma, -0x27.ffffcp0L, 3.2129279441390812141195076945616975790225e-43L, UNDERFLOW_EXCEPTION_FLOAT),
14086 TEST_f_f (tgamma, -0x28.00004p0L, -3.2128372159115252365699015758097981155793e-43L, UNDERFLOW_EXCEPTION_FLOAT),
14087 TEST_f_f (tgamma, -0x28.ffffcp0L, -7.8364103489619817539676737414096652170685e-45L, UNDERFLOW_EXCEPTION_FLOAT),
14088 TEST_f_f (tgamma, -0x29.00004p0L, 7.8361876024016854597745353972619195760515e-45L, UNDERFLOW_EXCEPTION_FLOAT),
d8cd06db 14089#ifdef TEST_FLOAT
74c57478
JM
14090 TEST_f_f (tgamma, -0x29.ffffcp0L, plus_zero, UNDERFLOW_EXCEPTION_FLOAT),
14091 TEST_f_f (tgamma, -0x2a.00004p0L, minus_zero, UNDERFLOW_EXCEPTION_FLOAT),
d8cd06db 14092#else
74c57478
JM
14093 TEST_f_f (tgamma, -0x29.ffffcp0L, 1.8658121573125798145204120066590953505132e-46L),
14094 TEST_f_f (tgamma, -0x2a.00004p0L, -1.8657587834931410688246126853566488626385e-46L),
14095#endif
14096#ifndef TEST_FLOAT
14097 TEST_f_f (tgamma, 0x8.0000000000008p0L, 5.0400000000000180457125667322294144477136e+03L),
14098 TEST_f_f (tgamma, 0x7.ffffffffffffcp0L, 5.0399999999999909771437166339103165198442e+03L),
14099 TEST_f_f (tgamma, 0x7.0000000000004p0L, 7.2000000000000119762397445457359071259652e+02L),
14100 TEST_f_f (tgamma, 0x6.ffffffffffffcp0L, 7.1999999999999880237602554542848858572672e+02L),
14101 TEST_f_f (tgamma, 0x6.0000000000004p0L, 1.2000000000000018184042734842640022086408e+02L),
14102 TEST_f_f (tgamma, 0x5.ffffffffffffcp0L, 1.1999999999999981815957265157389249327533e+02L),
14103 TEST_f_f (tgamma, 0x5.0000000000004p0L, 2.4000000000000032104829055124673225982803e+01L),
14104 TEST_f_f (tgamma, 0x4.ffffffffffffcp0L, 2.3999999999999967895170944875373910918544e+01L),
14105 TEST_f_f (tgamma, 0x4.0000000000004p0L, 6.0000000000000066939396342309789716341613e+00L),
14106 TEST_f_f (tgamma, 0x3.ffffffffffffep0L, 5.9999999999999966530301828845138185025345e+00L),
14107 TEST_f_f (tgamma, 0x3.0000000000002p0L, 2.0000000000000008195971324717875960213536e+00L),
14108 TEST_f_f (tgamma, 0x2.ffffffffffffep0L, 1.9999999999999991804028675282128956223990e+00L),
14109 TEST_f_f (tgamma, 0x2.0000000000002p0L, 1.0000000000000001877539613108624482361963e+00L),
14110 TEST_f_f (tgamma, 0x1.fffffffffffffp0L, 9.9999999999999990612301934456883679778984e-01L),
14111 TEST_f_f (tgamma, 0x1.0000000000001p0L, 9.9999999999999987183237573039992418700531e-01L),
14112 TEST_f_f (tgamma, 0x0.fffffffffffff8p0L, 1.0000000000000000640838121348000744796665e+00L),
14113 TEST_f_f (tgamma, -0x0.fffffffffffff8p0L, -9.0071992547409924227843350984672961392521e+15L),
14114 TEST_f_f (tgamma, -0x1.0000000000001p0L, 4.5035996273704955772156649015331740980405e+15L),
14115 TEST_f_f (tgamma, -0x1.fffffffffffffp0L, 2.2517998136852484613921675492337776673289e+15L),
14116 TEST_f_f (tgamma, -0x2.0000000000002p0L, -1.1258999068426235386078324507668462444260e+15L),
14117 TEST_f_f (tgamma, -0x2.ffffffffffffep0L, -3.7529996894754154268627807196691509198813e+14L),
14118 TEST_f_f (tgamma, -0x3.0000000000002p0L, 3.7529996894754112398038859470009084971438e+14L),
14119 TEST_f_f (tgamma, -0x3.ffffffffffffep0L, 9.3824992236885396088236184658402406857503e+13L),
14120 TEST_f_f (tgamma, -0x4.0000000000004p0L, -4.6912496118442603911763815341745722862351e+13L),
14121 TEST_f_f (tgamma, -0x4.ffffffffffffcp0L, -9.3824992236885475509805702650262155809819e+12L),
14122 TEST_f_f (tgamma, -0x5.0000000000004p0L, 9.3824992236885191156860964016850034672946e+12L),
14123 TEST_f_f (tgamma, -0x5.ffffffffffffcp0L, 1.5637498706147581566449098589862357835505e+12L),
14124 TEST_f_f (tgamma, -0x6.0000000000004p0L, -1.5637498706147529544662012521330708016396e+12L),
14125 TEST_f_f (tgamma, -0x6.ffffffffffffcp0L, -2.2339283865925119357965832452642909859289e+11L),
14126 TEST_f_f (tgamma, -0x7.0000000000004p0L, 2.2339283865925039372192897706214475877342e+11L),
14127 TEST_f_f (tgamma, -0x7.ffffffffffffcp0L, 2.7924104832406402297655703264222230055898e+10L),
14128 TEST_f_f (tgamma, -0x8.0000000000008p0L, -1.3962052416203121511868106259843527348026e+10L),
14129 TEST_f_f (tgamma, -0x9.ffffffffffff8p0L, 1.5513391573559147700413058496716749249803e+08L),
14130 TEST_f_f (tgamma, -0xa.0000000000008p0L, -1.5513391573559018084419393002828541166901e+08L),
14131 TEST_f_f (tgamma, -0x13.ffffffffffffp0L, 1.1569515572952029402736625857313236848570e-04L),
14132 TEST_f_f (tgamma, -0x14.000000000001p0L, -1.1569515572951781096476686854873801225397e-04L),
14133 TEST_f_f (tgamma, -0x1d.ffffffffffffp0L, 1.0611571800204311628217068863959963842891e-18L),
14134 TEST_f_f (tgamma, -0x1e.000000000001p0L, -1.0611571800204053929094168642022073530425e-18L),
14135 TEST_f_f (tgamma, -0x27.fffffffffffep0L, 1.7249032006742266376460389310340465554361e-34L),
14136 TEST_f_f (tgamma, -0x28.000000000002p0L, -1.7249032006741359094184881234822934593822e-34L),
14137 TEST_f_f (tgamma, -0x28.fffffffffffep0L, -4.2070809772542120404320040128839297118648e-36L),
14138 TEST_f_f (tgamma, -0x29.000000000002p0L, 4.2070809772539892938717205103652583609422e-36L),
14139 TEST_f_f (tgamma, -0x29.fffffffffffep0L, 1.0016859469652887505173040814397197718981e-37L),
14140 TEST_f_f (tgamma, -0x2a.000000000002p0L, -1.0016859469652353766978684241048308120274e-37L),
14141 TEST_f_f (tgamma, -0x31.fffffffffffep0L, 4.6273774273632946947805289899230181990085e-51L),
14142 TEST_f_f (tgamma, -0x32.000000000002p0L, -4.6273774273630367887073532197576655720178e-51L),
14143 TEST_f_f (tgamma, -0x63.fffffffffffcp0L, 7.5400833348840965463348754984345825364294e-145L),
14144 TEST_f_f (tgamma, -0x64.000000000004p0L, -7.5400833348831085791638490135462230991587e-145L),
14145 TEST_f_f (tgamma, -0x95.fffffffffff8p0L, 6.1582369322723207086020016423767264008839e-250L),
14146 TEST_f_f (tgamma, -0x96.000000000008p0L, -6.1582369322705655439003240743176243138734e-250L),
14147 TEST_f_f (tgamma, -0xb4.fffffffffff8p0L, -9.6760879059917574597728750098636253931457e-319L, UNDERFLOW_EXCEPTION_DOUBLE),
14148 TEST_f_f (tgamma, -0xb5.000000000008p0L, 9.6760879059888966544677044221698800670218e-319L, UNDERFLOW_EXCEPTION_DOUBLE),
14149 TEST_f_f (tgamma, -0xb5.fffffffffff8p0L, 5.3165318164789884455066481673086605454904e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14150 TEST_f_f (tgamma, -0xb6.000000000008p0L, -5.3165318164774149139661976747137185876909e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14151 TEST_f_f (tgamma, -0xb6.fffffffffff8p0L, -2.9052086428846935908287469917922960610289e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
14152 TEST_f_f (tgamma, -0xb7.000000000008p0L, 2.9052086428838328351126988236541632950925e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14153# if !defined TEST_LDOUBLE || LDBL_MAX_EXP <= 1024
74c57478
JM
14154 TEST_f_f (tgamma, -0xb7.fffffffffff8p0L, plus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
14155 TEST_f_f (tgamma, -0xb8.000000000008p0L, minus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14156# else
74c57478
JM
14157 TEST_f_f (tgamma, -0xb7.fffffffffff8p0L, 1.5789177406982032823826953250736039527543e-325L),
14158 TEST_f_f (tgamma, -0xb8.000000000008p0L, -1.5789177406977349925854817486109369828857e-325L),
d8cd06db
JM
14159# endif
14160#endif
14161#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
74c57478
JM
14162 TEST_f_f (tgamma, 0x8.00000000000000000000000004p0L, 5.0400000000000000000000000000020034765587e+03L),
14163 TEST_f_f (tgamma, 0x7.fffffffffffffffffffffffffep0L, 5.0399999999999999999999999999989982617206e+03L),
14164 TEST_f_f (tgamma, 0x7.00000000000000000000000002p0L, 7.2000000000000000000000000000013296297113e+02L),
14165 TEST_f_f (tgamma, 0x6.fffffffffffffffffffffffffep0L, 7.1999999999999999999999999999986703702887e+02L),
14166 TEST_f_f (tgamma, 0x6.00000000000000000000000002p0L, 1.2000000000000000000000000000002018834292e+02L),
14167 TEST_f_f (tgamma, 0x5.fffffffffffffffffffffffffep0L, 1.1999999999999999999999999999997981165708e+02L),
14168 TEST_f_f (tgamma, 0x5.00000000000000000000000002p0L, 2.4000000000000000000000000000003564352042e+01L),
14169 TEST_f_f (tgamma, 0x4.fffffffffffffffffffffffffep0L, 2.3999999999999999999999999999996435647958e+01L),
14170 TEST_f_f (tgamma, 0x4.00000000000000000000000002p0L, 6.0000000000000000000000000000007431765907e+00L),
14171 TEST_f_f (tgamma, 0x3.ffffffffffffffffffffffffffp0L, 5.9999999999999999999999999999996284117046e+00L),
14172 TEST_f_f (tgamma, 0x3.00000000000000000000000001p0L, 2.0000000000000000000000000000000909935607e+00L),
14173 TEST_f_f (tgamma, 0x2.ffffffffffffffffffffffffffp0L, 1.9999999999999999999999999999999090064393e+00L),
14174 TEST_f_f (tgamma, 0x2.00000000000000000000000001p0L, 1.0000000000000000000000000000000208448771e+00L),
14175 TEST_f_f (tgamma, 0x1.ffffffffffffffffffffffffff8p0L, 9.9999999999999999999999999999998957756146e-01L),
14176 TEST_f_f (tgamma, 0x1.000000000000000000000000008p0L, 9.9999999999999999999999999999998577053525e-01L),
14177 TEST_f_f (tgamma, 0x0.ffffffffffffffffffffffffffcp0L, 1.0000000000000000000000000000000071147324e+00L),
14178 TEST_f_f (tgamma, -0x0.ffffffffffffffffffffffffffcp0L, -8.1129638414606681695789005144064422784335e+31L),
14179 TEST_f_f (tgamma, -0x1.000000000000000000000000008p0L, 4.0564819207303340847894502572031577215665e+31L),
14180 TEST_f_f (tgamma, -0x1.ffffffffffffffffffffffffff8p0L, 2.0282409603651670423947251286016461392168e+31L),
14181 TEST_f_f (tgamma, -0x2.00000000000000000000000001p0L, -1.0141204801825835211973625643007538607832e+31L),
14182 TEST_f_f (tgamma, -0x2.ffffffffffffffffffffffffffp0L, -3.3804016006086117373245418810028760196114e+30L),
14183 TEST_f_f (tgamma, -0x3.00000000000000000000000001p0L, 3.3804016006086117373245418810024573137219e+30L),
14184 TEST_f_f (tgamma, -0x3.ffffffffffffffffffffffffffp0L, 8.4510040015215293433113547025072942156952e+29L),
14185 TEST_f_f (tgamma, -0x4.00000000000000000000000002p0L, -4.2255020007607646716556773512527057843048e+29L),
14186 TEST_f_f (tgamma, -0x4.fffffffffffffffffffffffffep0L, -8.4510040015215293433113547025080884313904e+28L),
14187 TEST_f_f (tgamma, -0x5.00000000000000000000000002p0L, 8.4510040015215293433113547025052449019430e+28L),
14188 TEST_f_f (tgamma, -0x5.fffffffffffffffffffffffffep0L, 1.4085006669202548905518924504180378867132e+28L),
14189 TEST_f_f (tgamma, -0x6.00000000000000000000000002p0L, -1.4085006669202548905518924504175176688423e+28L),
14190 TEST_f_f (tgamma, -0x6.fffffffffffffffffffffffffep0L, -2.0121438098860784150741320720257967542615e+27L),
14191 TEST_f_f (tgamma, -0x7.00000000000000000000000002p0L, 2.0121438098860784150741320720249968965322e+27L),
14192 TEST_f_f (tgamma, -0x7.fffffffffffffffffffffffffep0L, 2.5151797623575980188426650900322769448110e+26L),
14193 TEST_f_f (tgamma, -0x8.00000000000000000000000004p0L, -1.2575898811787990094213325450153421028080e+26L),
14194 TEST_f_f (tgamma, -0x9.fffffffffffffffffffffffffcp0L, 1.3973220901986655660237028277960625420495e+24L),
14195 TEST_f_f (tgamma, -0xa.00000000000000000000000004p0L, -1.3973220901986655660237028277947663821128e+24L),
14196 TEST_f_f (tgamma, -0x13.fffffffffffffffffffffffff8p0L, 1.0420893204640670202556853709074896123293e+12L),
14197 TEST_f_f (tgamma, -0x14.00000000000000000000000008p0L, -1.0420893204640670202556853709050065497299e+12L),
14198 TEST_f_f (tgamma, -0x1d.fffffffffffffffffffffffff8p0L, 9.5580541610429641982963434151488827190079e-03L),
14199 TEST_f_f (tgamma, -0x1e.00000000000000000000000008p0L, -9.5580541610429641982963434151231128067179e-03L),
14200 TEST_f_f (tgamma, -0x27.fffffffffffffffffffffffffp0L, 1.5536546823612837336494536911280147806523e-18L),
14201 TEST_f_f (tgamma, -0x28.0000000000000000000000001p0L, -1.5536546823612837336494536911189419578973e-18L),
14202 TEST_f_f (tgamma, -0x28.fffffffffffffffffffffffffp0L, -3.7894016642958139845108626612879138384405e-20L),
14203 TEST_f_f (tgamma, -0x29.0000000000000000000000001p0L, 3.7894016642958139845108626612656391824122e-20L),
14204 TEST_f_f (tgamma, -0x29.fffffffffffffffffffffffffp0L, 9.0223849149900332964544349078285357440663e-22L),
14205 TEST_f_f (tgamma, -0x2a.0000000000000000000000001p0L, -9.0223849149900332964544349077751619246306e-22L),
14206 TEST_f_f (tgamma, -0x31.fffffffffffffffffffffffffp0L, 4.1679710515150795310771069868348482819424e-35L),
14207 TEST_f_f (tgamma, -0x32.0000000000000000000000001p0L, -4.1679710515150795310771069868090576746248e-35L),
14208 TEST_f_f (tgamma, -0x63.ffffffffffffffffffffffffep0L, 6.7915032994648558610510614163560656864280e-129L),
14209 TEST_f_f (tgamma, -0x64.0000000000000000000000002p0L, -6.7915032994648558610510614162572689693253e-129L),
14210 TEST_f_f (tgamma, -0x95.ffffffffffffffffffffffffcp0L, 5.5468467106873795353190582463444660395353e-234L),
14211 TEST_f_f (tgamma, -0x96.0000000000000000000000004p0L, -5.5468467106873795353190582461689495693675e-234L),
14212 TEST_f_f (tgamma, -0xb4.ffffffffffffffffffffffffcp0L, -8.7154451775644399729745472278589884205029e-303L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14213 TEST_f_f (tgamma, -0xb5.0000000000000000000000004p0L, 8.7154451775644399729745472275729078899858e-303L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14214 TEST_f_f (tgamma, -0xb5.ffffffffffffffffffffffffcp0L, 4.7887061415189230620739270482742524864974e-305L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14215 TEST_f_f (tgamma, -0xb6.0000000000000000000000004p0L, -4.7887061415189230620739270481168993324524e-305L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14216 TEST_f_f (tgamma, -0xb6.ffffffffffffffffffffffffcp0L, -2.6167793123054224382917634143575601407067e-307L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14217 TEST_f_f (tgamma, -0xb7.0000000000000000000000004p0L, 2.6167793123054224382917634142714845691019e-307L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
14218 TEST_f_f (tgamma, -0xb7.ffffffffffffffffffffffffcp0L, 1.4221626697312078468976975078030462044826e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
14219 TEST_f_f (tgamma, -0xb8.0000000000000000000000004p0L, -1.4221626697312078468976975077562172247612e-309L, UNDERFLOW_EXCEPTION_DOUBLE),
14220 TEST_f_f (tgamma, -0xbb.ffffffffffffffffffffffffcp0L, 1.1756150745511026776007338998283058108448e-318L, UNDERFLOW_EXCEPTION_DOUBLE),
14221 TEST_f_f (tgamma, -0xbc.0000000000000000000000004p0L, -1.1756150745511026776007338997894360215107e-318L, UNDERFLOW_EXCEPTION_DOUBLE),
14222 TEST_f_f (tgamma, -0xbc.ffffffffffffffffffffffffcp0L, -6.2201855796354639026493857133773832713743e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14223 TEST_f_f (tgamma, -0xbd.0000000000000000000000004p0L, 6.2201855796354639026493857131715153125175e-321L, UNDERFLOW_EXCEPTION_DOUBLE),
14224 TEST_f_f (tgamma, -0xbd.ffffffffffffffffffffffffcp0L, 3.2737818840186652119207293228302560914295e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
14225 TEST_f_f (tgamma, -0xbe.0000000000000000000000004p0L, -3.2737818840186652119207293227217957948294e-323L, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14226# if LDBL_MAX_EXP <= 1024
74c57478
JM
14227 TEST_f_f (tgamma, -0xbe.ffffffffffffffffffffffffcp0L, minus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
14228 TEST_f_f (tgamma, -0xbf.0000000000000000000000004p0L, plus_zero, UNDERFLOW_EXCEPTION_DOUBLE),
d8cd06db 14229# else
74c57478
JM
14230 TEST_f_f (tgamma, -0xbe.ffffffffffffffffffffffffcp0L, -1.7140219288055838805867692789687487834686e-325L),
14231 TEST_f_f (tgamma, -0xbf.0000000000000000000000004p0L, 1.7140219288055838805867692789119066543632e-325L),
d8cd06db
JM
14232# endif
14233#endif
14234#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM
14235 TEST_f_f (tgamma, 0x8.000000000000001p0L, 5.0400000000000000088113830892247051102283e+03L),
14236 TEST_f_f (tgamma, 0x7.fffffffffffffff8p0L, 5.0399999999999999955943084553876474508520e+03L),
14237 TEST_f_f (tgamma, 0x7.0000000000000008p0L, 7.2000000000000000058477733127664675369681e+02L),
14238 TEST_f_f (tgamma, 0x6.fffffffffffffff8p0L, 7.1999999999999999941522266872335324679893e+02L),
14239 TEST_f_f (tgamma, 0x6.0000000000000008p0L, 1.2000000000000000008878927116622375680433e+02L),
14240 TEST_f_f (tgamma, 0x5.fffffffffffffff8p0L, 1.1999999999999999991121072883377624326546e+02L),
14241 TEST_f_f (tgamma, 0x5.0000000000000008p0L, 2.4000000000000000015676186062072582846211e+01L),
14242 TEST_f_f (tgamma, 0x4.fffffffffffffff8p0L, 2.3999999999999999984323813937927417165027e+01L),
14243 TEST_f_f (tgamma, 0x4.0000000000000008p0L, 6.0000000000000000032685252120268430507939e+00L),
14244 TEST_f_f (tgamma, 0x3.fffffffffffffffcp0L, 5.9999999999999999983657373939865784753909e+00L),
14245 TEST_f_f (tgamma, 0x3.0000000000000004p0L, 2.0000000000000000004001939123397399171482e+00L),
14246 TEST_f_f (tgamma, 0x2.fffffffffffffffcp0L, 1.9999999999999999995998060876602600829690e+00L),
14247 TEST_f_f (tgamma, 0x2.0000000000000004p0L, 1.0000000000000000000916767389213195151634e+00L),
14248 TEST_f_f (tgamma, 0x1.fffffffffffffffep0L, 9.9999999999999999995416163053934024243282e-01L),
14249 TEST_f_f (tgamma, 0x1.0000000000000002p0L, 9.9999999999999999993741815221210931418291e-01L),
14250 TEST_f_f (tgamma, 0x0.ffffffffffffffffp0L, 1.0000000000000000000312909238939453429173e+00L),
14251 TEST_f_f (tgamma, -0x0.ffffffffffffffffp0L, -1.8446744073709551616422784335098467139470e+19L),
14252 TEST_f_f (tgamma, -0x1.0000000000000002p0L, 9.2233720368547758075772156649015328607596e+18L),
14253 TEST_f_f (tgamma, -0x1.fffffffffffffffep0L, 4.6116860184273879044613921675492335697983e+18L),
14254 TEST_f_f (tgamma, -0x2.0000000000000004p0L, -2.3058430092136939515386078324507664305064e+18L),
14255 TEST_f_f (tgamma, -0x2.fffffffffffffffcp0L, -7.6861433640456465087601961140530007887063e+17L),
14256 TEST_f_f (tgamma, -0x3.0000000000000004p0L, 7.6861433640456465045731372192803325462836e+17L),
14257 TEST_f_f (tgamma, -0x3.fffffffffffffffcp0L, 1.9215358410114116272942156951799168638773e+17L),
14258 TEST_f_f (tgamma, -0x4.0000000000000008p0L, -9.6076792050570581270578430482008313684602e+16L),
14259 TEST_f_f (tgamma, -0x4.fffffffffffffff8p0L, -1.9215358410114116280884313903598337283601e+16L),
14260 TEST_f_f (tgamma, -0x5.0000000000000008p0L, 1.9215358410114116252449019429734996071487e+16L),
14261 TEST_f_f (tgamma, -0x5.fffffffffffffff8p0L, 3.2025597350190193803788671320812043622696e+15L),
14262 TEST_f_f (tgamma, -0x6.0000000000000008p0L, -3.2025597350190193751766884234743511972877e+15L),
14263 TEST_f_f (tgamma, -0x6.fffffffffffffff8p0L, -4.5750853357414562579675426149912896787735e+14L),
14264 TEST_f_f (tgamma, -0x7.0000000000000008p0L, 4.5750853357414562499689653215166468353753e+14L),
14265 TEST_f_f (tgamma, -0x7.fffffffffffffff8p0L, 5.7188566696768203227694481100089533685959e+13L),
14266 TEST_f_f (tgamma, -0x8.000000000000001p0L, -2.8594283348384101534210280804672371201060e+13L),
14267 TEST_f_f (tgamma, -0x9.fffffffffffffffp0L, 3.1771425942649001828476427167843945971988e+11L),
14268 TEST_f_f (tgamma, -0xa.000000000000001p0L, -3.1771425942649001698860433502350057763905e+11L),
14269 TEST_f_f (tgamma, -0x13.ffffffffffffffep0L, 2.3694367893405502075347562184931828448654e-01L),
14270 TEST_f_f (tgamma, -0x14.000000000000002p0L, -2.3694367893405501827041302245929389013031e-01L),
14271 TEST_f_f (tgamma, -0x1d.ffffffffffffffep0L, 2.1732499046818166459536268654187775086902e-15L),
14272 TEST_f_f (tgamma, -0x1e.000000000000002p0L, -2.1732499046818166201837145753965837196590e-15L),
14273 TEST_f_f (tgamma, -0x27.ffffffffffffffcp0L, 3.5326017549807232935581894777156474496719e-31L),
14274 TEST_f_f (tgamma, -0x28.000000000000004p0L, -3.5326017549807232028299619269080956965758e-31L),
14275 TEST_f_f (tgamma, -0x28.ffffffffffffffcp0L, -8.6161018414163982777002940498289948893044e-33L),
14276 TEST_f_f (tgamma, -0x29.000000000000004p0L, 8.6161018414163980549537337663264762179535e-33L),
14277 TEST_f_f (tgamma, -0x29.ffffffffffffffcp0L, 2.0514528193848567329552463626090806737389e-34L),
14278 TEST_f_f (tgamma, -0x2a.000000000000004p0L, -2.0514528193848566795814269269517457847791e-34L),
14279 TEST_f_f (tgamma, -0x31.ffffffffffffffcp0L, 9.4768689712397635680446279661359728835046e-48L),
14280 TEST_f_f (tgamma, -0x32.000000000000004p0L, -9.4768689712397633101385547903658075308777e-48L),
14281 TEST_f_f (tgamma, -0x63.ffffffffffffff8p0L, 1.5442090669841618542494279375256856430049e-141L),
14282 TEST_f_f (tgamma, -0x64.000000000000008p0L, -1.5442090669841617554527108348771968070612e-141L),
14283 TEST_f_f (tgamma, -0x95.ffffffffffffffp0L, 1.2612069237291916400144732227892704713839e-246L),
14284 TEST_f_f (tgamma, -0x96.00000000000001p0L, -1.2612069237291914644980030550324645611752e-246L),
14285 TEST_f_f (tgamma, -0xb4.ffffffffffffffp0L, -1.9816628031468191243385005680879281767694e-315L),
14286 TEST_f_f (tgamma, -0xb5.00000000000001p0L, 1.9816628031468188382579700510291588022368e-315L),
14287 TEST_f_f (tgamma, -0xb5.ffffffffffffffp0L, 1.0888257160147357826865964233809723297472e-317L),
14288 TEST_f_f (tgamma, -0xb6.00000000000001p0L, -1.0888257160147356253334423783317128355514e-317L),
14289 TEST_f_f (tgamma, -0xb6.ffffffffffffffp0L, -5.9498673006269714905418984659220067091260e-320L),
14290 TEST_f_f (tgamma, -0xb7.00000000000001p0L, 5.9498673006269706297861824177538685763601e-320L),
14291 TEST_f_f (tgamma, -0xb7.ffffffffffffffp0L, 3.2336235329494410277123118903958061569834e-322L),
14292 TEST_f_f (tgamma, -0xb8.00000000000001p0L, -3.2336235329494405594225146768193434900135e-322L),
14293 TEST_f_f (tgamma, -0xbb.ffffffffffffffp0L, 2.6730392040715350119087465463119939092815e-331L),
14294 TEST_f_f (tgamma, -0xbc.00000000000001p0L, -2.6730392040715346232108532050343031951651e-331L),
14295 TEST_f_f (tgamma, -0xbc.ffffffffffffffp0L, -1.4143064571807063556111222197839950086445e-333L),
14296 TEST_f_f (tgamma, -0xbd.00000000000001p0L, 1.4143064571807061497431633629389135273431e-333L),
14297 TEST_f_f (tgamma, -0xbd.ffffffffffffffp0L, 7.4437181956879281879706555863416819210399e-336L),
14298 TEST_f_f (tgamma, -0xbe.00000000000001p0L, -7.4437181956879271033676895858841525581153e-336L),
14299 TEST_f_f (tgamma, -0xbe.ffffffffffffffp0L, -3.8972346574282346536709453101948570578636e-338L),
14300 TEST_f_f (tgamma, -0xbf.00000000000001p0L, 3.8972346574282340852496542564155275274974e-338L),
14301 TEST_f_f (tgamma, -0xf9.ffffffffffffffp0L, 2.2289142548411573883553287678043297937797e-476L),
14302 TEST_f_f (tgamma, -0xfa.00000000000001p0L, -2.2289142548411570466476165308364665814265e-476L),
14303 TEST_f_f (tgamma, -0x1f3.fffffffffffffep0L, 2.9528489142763141594943668922610562530068e-1118L),
14304 TEST_f_f (tgamma, -0x1f4.00000000000002p0L, -2.9528489142763131406565394149878256133744e-1118L),
14305 TEST_f_f (tgamma, -0x2ed.fffffffffffffcp0L, 6.9801511765871818502006905472380418430269e-1817L),
14306 TEST_f_f (tgamma, -0x2ee.00000000000004p0L, -6.9801511765871767194421856376592926002995e-1817L),
14307 TEST_f_f (tgamma, -0x3e7.fffffffffffffcp0L, 4.4768809295877296071892611539415773519036e-2552L),
14308 TEST_f_f (tgamma, -0x3e8.00000000000004p0L, -4.4768809295877261735541135972060089530309e-2552L),
14309 TEST_f_f (tgamma, -0x4e1.fffffffffffff8p0L, 5.4651488569236507565341414077911790252381e-3315L),
14310 TEST_f_f (tgamma, -0x4e2.00000000000008p0L, -5.4651488569236421026544487194247355967789e-3315L),
14311 TEST_f_f (tgamma, -0x5db.fffffffffffff8p0L, 1.8718211510339187689122114747834510481993e-4099L),
14312 TEST_f_f (tgamma, -0x5dc.00000000000008p0L, -1.8718211510339157291960718369454861898499e-4099L),
14313 TEST_f_f (tgamma, -0x6d5.fffffffffffff8p0L, 4.2925786447266492555651378780094011518063e-4902L),
14314 TEST_f_f (tgamma, -0x6d6.00000000000008p0L, -4.2925786447266421378134368786479937285900e-4902L),
14315 TEST_f_f (tgamma, -0x6e2.fffffffffffff8p0L, -2.8229173528168668283609231628661510187536e-4944L, UNDERFLOW_EXCEPTION),
14316 TEST_f_f (tgamma, -0x6e3.00000000000008p0L, 2.8229173528168621428945467532322397890424e-4944L, UNDERFLOW_EXCEPTION),
14317 TEST_f_f (tgamma, -0x6e3.fffffffffffff8p0L, 1.6002932839097884515524894602387278842659e-4947L, UNDERFLOW_EXCEPTION),
14318 TEST_f_f (tgamma, -0x6e4.00000000000008p0L, -1.6002932839097857951909742110188634438017e-4947L, UNDERFLOW_EXCEPTION),
14319 TEST_f_f (tgamma, -0x6e4.fffffffffffff8p0L, -9.0668174725767051085164382743343408095146e-4951L, UNDERFLOW_EXCEPTION),
14320 TEST_f_f (tgamma, -0x6e5.00000000000008p0L, 9.0668174725766900571689083050287838090189e-4951L, UNDERFLOW_EXCEPTION),
d8cd06db 14321# if LDBL_MANT_DIG <= 64
74c57478
JM
14322 TEST_f_f (tgamma, -0x6e5.fffffffffffff8p0L, plus_zero, UNDERFLOW_EXCEPTION),
14323 TEST_f_f (tgamma, -0x6e6.00000000000008p0L, minus_zero, UNDERFLOW_EXCEPTION),
d8cd06db 14324# else
74c57478
JM
14325 TEST_f_f (tgamma, -0x6e5.fffffffffffff8p0L, 5.1340982290921319983501912122292601780326e-4954L, UNDERFLOW_EXCEPTION),
14326 TEST_f_f (tgamma, -0x6e6.00000000000008p0L, -5.1340982290921234748578193083614111497314e-4954L, UNDERFLOW_EXCEPTION),
d8cd06db
JM
14327# endif
14328# if LDBL_MANT_DIG >= 113
74c57478
JM
14329 TEST_f_f (tgamma, 0x8.0000000000000000000000000008p0L, 5.0400000000000000000000000000000156521606e+03L),
14330 TEST_f_f (tgamma, 0x7.fffffffffffffffffffffffffffcp0L, 5.0399999999999999999999999999999921739197e+03L),
14331 TEST_f_f (tgamma, 0x7.0000000000000000000000000004p0L, 7.2000000000000000000000000000000103877321e+02L),
14332 TEST_f_f (tgamma, 0x6.fffffffffffffffffffffffffffcp0L, 7.1999999999999999999999999999999896122679e+02L),
14333 TEST_f_f (tgamma, 0x6.0000000000000000000000000004p0L, 1.2000000000000000000000000000000015772143e+02L),
14334 TEST_f_f (tgamma, 0x5.fffffffffffffffffffffffffffcp0L, 1.1999999999999999999999999999999984227857e+02L),
14335 TEST_f_f (tgamma, 0x5.0000000000000000000000000004p0L, 2.4000000000000000000000000000000027846500e+01L),
14336 TEST_f_f (tgamma, 0x4.fffffffffffffffffffffffffffcp0L, 2.3999999999999999999999999999999972153500e+01L),
14337 TEST_f_f (tgamma, 0x4.0000000000000000000000000004p0L, 6.0000000000000000000000000000000058060671e+00L),
14338 TEST_f_f (tgamma, 0x3.fffffffffffffffffffffffffffep0L, 5.9999999999999999999999999999999970969664e+00L),
14339 TEST_f_f (tgamma, 0x3.0000000000000000000000000002p0L, 2.0000000000000000000000000000000007108872e+00L),
14340 TEST_f_f (tgamma, 0x2.fffffffffffffffffffffffffffep0L, 1.9999999999999999999999999999999992891128e+00L),
14341 TEST_f_f (tgamma, 0x2.0000000000000000000000000002p0L, 1.0000000000000000000000000000000001628506e+00L),
14342 TEST_f_f (tgamma, 0x1.ffffffffffffffffffffffffffffp0L, 9.9999999999999999999999999999999991857470e-01L),
14343 TEST_f_f (tgamma, 0x1.0000000000000000000000000001p0L, 9.9999999999999999999999999999999988883231e-01L),
14344 TEST_f_f (tgamma, 0x0.ffffffffffffffffffffffffffff8p0L, 1.0000000000000000000000000000000000555838e+00L),
14345 TEST_f_f (tgamma, -0x0.ffffffffffffffffffffffffffff8p0L, -1.0384593717069655257060992658440192422784e+34L),
14346 TEST_f_f (tgamma, -0x1.0000000000000000000000000001p0L, 5.1922968585348276285304963292200955772157e+33L),
14347 TEST_f_f (tgamma, -0x1.ffffffffffffffffffffffffffffp0L, 2.5961484292674138142652481646100484613922e+33L),
14348 TEST_f_f (tgamma, -0x2.0000000000000000000000000002p0L, -1.2980742146337069071326240823050235386078e+33L),
14349 TEST_f_f (tgamma, -0x2.fffffffffffffffffffffffffffep0L, -4.3269140487790230237754136076834154268628e+32L),
14350 TEST_f_f (tgamma, -0x3.0000000000000000000000000002p0L, 4.3269140487790230237754136076834112398039e+32L),
14351 TEST_f_f (tgamma, -0x3.fffffffffffffffffffffffffffep0L, 1.0817285121947557559438534019208539608824e+32L),
14352 TEST_f_f (tgamma, -0x4.0000000000000000000000000004p0L, -5.4086425609737787797192670096042603911764e+31L),
14353 TEST_f_f (tgamma, -0x4.fffffffffffffffffffffffffffcp0L, -1.0817285121947557559438534019208547550981e+31L),
14354 TEST_f_f (tgamma, -0x5.0000000000000000000000000004p0L, 1.0817285121947557559438534019208519115686e+31L),
14355 TEST_f_f (tgamma, -0x5.fffffffffffffffffffffffffffcp0L, 1.8028808536579262599064223365347581566449e+30L),
14356 TEST_f_f (tgamma, -0x6.0000000000000000000000000004p0L, -1.8028808536579262599064223365347529544662e+30L),
14357 TEST_f_f (tgamma, -0x6.fffffffffffffffffffffffffffcp0L, -2.5755440766541803712948890521925119357966e+29L),
14358 TEST_f_f (tgamma, -0x7.0000000000000000000000000004p0L, 2.5755440766541803712948890521925039372193e+29L),
14359 TEST_f_f (tgamma, -0x7.fffffffffffffffffffffffffffcp0L, 3.2194300958177254641186113152406402297656e+28L),
14360 TEST_f_f (tgamma, -0x8.0000000000000000000000000008p0L, -1.6097150479088627320593056576203121511868e+28L),
14361 TEST_f_f (tgamma, -0x9.fffffffffffffffffffffffffff8p0L, 1.7885722754542919245103396195781369922635e+26L),
14362 TEST_f_f (tgamma, -0xa.0000000000000000000000000008p0L, -1.7885722754542919245103396195781240306642e+26L),
14363 TEST_f_f (tgamma, -0x13.fffffffffffffffffffffffffffp0L, 1.3338743301940057859272772747600099590309e+14L),
14364 TEST_f_f (tgamma, -0x14.000000000000000000000000001p0L, -1.3338743301940057859272772747599851284049e+14L),
14365 TEST_f_f (tgamma, -0x1d.fffffffffffffffffffffffffffp0L, 1.2234309326134994173819319571374205986026e+00L),
14366 TEST_f_f (tgamma, -0x1e.000000000000000000000000001p0L, -1.2234309326134994173819319571373948286903e+00L),
14367 TEST_f_f (tgamma, -0x27.ffffffffffffffffffffffffffep0L, 1.9886779934224431790713007246380976767855e-16L),
14368 TEST_f_f (tgamma, -0x28.000000000000000000000000002p0L, -1.9886779934224431790713007246380069485580e-16L),
14369 TEST_f_f (tgamma, -0x28.ffffffffffffffffffffffffffep0L, -4.8504341302986419001739042064343853066259e-18L),
14370 TEST_f_f (tgamma, -0x29.000000000000000000000000002p0L, 4.8504341302986419001739042064341625600656e-18L),
14371 TEST_f_f (tgamma, -0x29.ffffffffffffffffffffffffffep0L, 1.1548652691187242619461676681986633377063e-19L),
14372 TEST_f_f (tgamma, -0x2a.000000000000000000000000002p0L, -1.1548652691187242619461676681986099638869e-19L),
14373 TEST_f_f (tgamma, -0x31.ffffffffffffffffffffffffffep0L, 5.3350029459393017997786969431322287652396e-33L),
14374 TEST_f_f (tgamma, -0x32.000000000000000000000000002p0L, -5.3350029459393017997786969431319708591664e-33L),
14375 TEST_f_f (tgamma, -0x63.ffffffffffffffffffffffffffcp0L, 8.6931242233150155021453586128730281632676e-127L),
14376 TEST_f_f (tgamma, -0x64.000000000000000000000000004p0L, -8.6931242233150155021453586128720401960966e-127L),
14377 TEST_f_f (tgamma, -0x95.ffffffffffffffffffffffffff8p0L, 7.0999637896798458052083945552094635720486e-232L),
14378 TEST_f_f (tgamma, -0x96.000000000000000000000000008p0L, -7.0999637896798458052083945552077084073470e-232L),
14379 TEST_f_f (tgamma, -0xb4.ffffffffffffffffffffffffff8p0L, -1.1155769827282483165407420451477844041365e-300L),
14380 TEST_f_f (tgamma, -0xb5.000000000000000000000000008p0L, 1.1155769827282483165407420451474983236060e-300L),
14381 TEST_f_f (tgamma, -0xb5.ffffffffffffffffffffffffff8p0L, 6.1295438611442215194546266216911239298981e-303L),
14382 TEST_f_f (tgamma, -0xb6.000000000000000000000000008p0L, -6.1295438611442215194546266216895503983577e-303L),
14383 TEST_f_f (tgamma, -0xb6.ffffffffffffffffffffffffff8p0L, -3.3494775197509407210134571703230189921356e-305L),
14384 TEST_f_f (tgamma, -0xb7.000000000000000000000000008p0L, 3.3494775197509407210134571703221582364195e-305L),
14385 TEST_f_f (tgamma, -0xb7.ffffffffffffffffffffffffff8p0L, 1.8203682172559460440290528099581627396147e-307L),
14386 TEST_f_f (tgamma, -0xb8.000000000000000000000000008p0L, -1.8203682172559460440290528099576944498174e-307L),
14387 TEST_f_f (tgamma, -0xbb.ffffffffffffffffffffffffff8p0L, 1.5047872954254114273289393917555491216542e-316L),
14388 TEST_f_f (tgamma, -0xbc.000000000000000000000000008p0L, -1.5047872954254114273289393917551604237609e-316L),
14389 TEST_f_f (tgamma, -0xbc.ffffffffffffffffffffffffff8p0L, -7.9618375419333937953912137129923244334851e-319L),
14390 TEST_f_f (tgamma, -0xbd.000000000000000000000000008p0L, 7.9618375419333937953912137129902657538965e-319L),
14391 TEST_f_f (tgamma, -0xbd.ffffffffffffffffffffffffff8p0L, 4.1904408115438914712585335331538555086887e-321L),
14392 TEST_f_f (tgamma, -0xbe.000000000000000000000000008p0L, -4.1904408115438914712585335331527709057227e-321L),
14393 TEST_f_f (tgamma, -0xbe.ffffffffffffffffffffffffff8p0L, -2.1939480688711473671510646770439036908579e-323L),
14394 TEST_f_f (tgamma, -0xbf.000000000000000000000000008p0L, 2.1939480688711473671510646770433352695669e-323L),
14395 TEST_f_f (tgamma, -0xf9.ffffffffffffffffffffffffff8p0L, 1.2547671759429278005937024349858508569625e-461L),
14396 TEST_f_f (tgamma, -0xfa.000000000000000000000000008p0L, -1.2547671759429278005937024349855091492502e-461L),
14397 TEST_f_f (tgamma, -0x1f3.ffffffffffffffffffffffffffp0L, 1.6623061587520224800948170558276526986560e-1103L),
14398 TEST_f_f (tgamma, -0x1f4.00000000000000000000000001p0L, -1.6623061587520224800948170558266338608285e-1103L),
14399 TEST_f_f (tgamma, -0x2ed.fffffffffffffffffffffffffep0L, 3.9294757797334687313030998663853566763041e-1802L),
14400 TEST_f_f (tgamma, -0x2ee.00000000000000000000000002p0L, -3.9294757797334687313030998663802259177992e-1802L),
14401 TEST_f_f (tgamma, -0x3e7.fffffffffffffffffffffffffep0L, 2.5202599107841713834679953735597552855978e-2537L),
14402 TEST_f_f (tgamma, -0x3e8.00000000000000000000000002p0L, -2.5202599107841713834679953735563216504503e-2537L),
14403 TEST_f_f (tgamma, -0x4e1.fffffffffffffffffffffffffcp0L, 3.0766052944457032773369415396747635242705e-3300L),
14404 TEST_f_f (tgamma, -0x4e2.00000000000000000000000004p0L, -3.0766052944457032773369415396661096445778e-3300L),
14405 TEST_f_f (tgamma, -0x5db.fffffffffffffffffffffffffcp0L, 1.0537416297875703295453200836588944487917e-4084L),
14406 TEST_f_f (tgamma, -0x5dc.00000000000000000000000004p0L, -1.0537416297875703295453200836558547326520e-4084L),
14407 TEST_f_f (tgamma, -0x6d5.fffffffffffffffffffffffffcp0L, 2.4165069481061837867659591369998698607387e-4887L),
14408 TEST_f_f (tgamma, -0x6d6.00000000000000000000000004p0L, -2.4165069481061837867659591369927521090377e-4887L),
14409 TEST_f_f (tgamma, -0x6e2.fffffffffffffffffffffffffcp0L, -1.5891611922804672355414813803008070609431e-4929L),
14410 TEST_f_f (tgamma, -0x6e3.00000000000000000000000004p0L, 1.5891611922804672355414813802961215945667e-4929L),
14411 TEST_f_f (tgamma, -0x6e3.fffffffffffffffffffffffffcp0L, 9.0088502963745308137272187091882496519917e-4933L, UNDERFLOW_EXCEPTION),
14412 TEST_f_f (tgamma, -0x6e4.00000000000000000000000004p0L, -9.0088502963745308137272187091616860368392e-4933L, UNDERFLOW_EXCEPTION),
14413 TEST_f_f (tgamma, -0x6e4.fffffffffffffffffffffffffcp0L, -5.1041644738665896961627301468488672286746e-4936L, UNDERFLOW_EXCEPTION),
14414 TEST_f_f (tgamma, -0x6e5.00000000000000000000000004p0L, 5.1041644738665896961627301468338158811446e-4936L, UNDERFLOW_EXCEPTION),
14415 TEST_f_f (tgamma, -0x6e5.fffffffffffffffffffffffffcp0L, 2.8902403589278537350864836618623260468143e-4939L, UNDERFLOW_EXCEPTION),
14416 TEST_f_f (tgamma, -0x6e6.00000000000000000000000004p0L, -2.8902403589278537350864836618538025544424e-4939L, UNDERFLOW_EXCEPTION),
14417 TEST_f_f (tgamma, -0x6eb.fffffffffffffffffffffffffcp0L, 9.4152481960798287090819640211017219042636e-4959L, UNDERFLOW_EXCEPTION),
14418 TEST_f_f (tgamma, -0x6ec.00000000000000000000000004p0L, -9.4152481960798287090819640210739431797168e-4959L, UNDERFLOW_EXCEPTION),
14419 TEST_f_f (tgamma, -0x6ec.fffffffffffffffffffffffffcp0L, -5.3103486723518492437010513373388172315540e-4962L, UNDERFLOW_EXCEPTION),
14420 TEST_f_f (tgamma, -0x6ed.00000000000000000000000004p0L, 5.3103486723518492437010513373231484108489e-4962L, UNDERFLOW_EXCEPTION),
14421 TEST_f_f (tgamma, -0x6ed.fffffffffffffffffffffffffcp0L, 2.9934321715624854812294539669328172615019e-4965L, UNDERFLOW_EXCEPTION),
14422 TEST_f_f (tgamma, -0x6ee.00000000000000000000000004p0L, -2.9934321715624854812294539669239841152754e-4965L, UNDERFLOW_EXCEPTION),
14423 TEST_f_f (tgamma, -0x6ee.fffffffffffffffffffffffffcp0L, minus_zero, UNDERFLOW_EXCEPTION),
14424 TEST_f_f (tgamma, -0x6ef.00000000000000000000000004p0L, plus_zero, UNDERFLOW_EXCEPTION),
d8cd06db
JM
14425# endif
14426#endif
74c57478 14427 TEST_f_f (tgamma, -0x1.0a32a2p+5L, 1.8125267978155035272941154746083439329912e-37L),
d8cd06db 14428#ifndef TEST_FLOAT
74c57478 14429 TEST_f_f (tgamma, -0x1.5800000080001p+7L, -3.1439271448823567326093363350637118195240e-304L, UNDERFLOW_EXCEPTION_LDOUBLE_IBM),
d8cd06db 14430#endif
74c57478
JM
14431 TEST_f_f (tgamma, 18.5L, 1.4986120533153361177371791123515513270334e+15L),
14432 TEST_f_f (tgamma, 19.5L, 2.7724322986333718178137813578503699550119e+16L),
14433 TEST_f_f (tgamma, 23.5L, 5.3613035875444147334274983856108155717836e+21L),
14434 TEST_f_f (tgamma, 29.5L, 1.6348125198274266444378807806868221866931e+30L),
14435 TEST_f_f (tgamma, 30.5L, 4.8226969334909086010917483030261254507447e+31L),
14436 TEST_f_f (tgamma, 31.5L, 1.4709225647147271233329832324229682624771e+33L),
14437 TEST_f_f (tgamma, 32.5L, 4.6334060788513904384988971821323500268029e+34L),
14438 TEST_f_f (tgamma, 33.5L, 1.5058569756267018925121415841930137587110e+36L),
14439 TEST_f_f (tgamma, 34.5L, 5.0446208683494513399156743070465960916817e+37L),
14440 TEST_f_f (tgamma, 0x2.30a43cp+4L, 3.4027979115654976101247558405326779640190e+38L),
d8cd06db 14441#ifdef TEST_FLOAT
74c57478 14442 TEST_f_f (tgamma, 0x2.30a44p+4L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14443#else
74c57478 14444 TEST_f_f (tgamma, 0x2.30a44p+4L, 3.4028438913396451054667218138127983367181e+38L),
d8cd06db
JM
14445#endif
14446#ifndef TEST_FLOAT
74c57478 14447 TEST_f_f (tgamma, 0xa.b9fd72b0fb238p+4L, 1.7976931348622298700886249281842651388250e+308L),
d8cd06db 14448# if !defined TEST_LDOUBLE || LDBL_MAX_EXP <= 1024
74c57478 14449 TEST_f_f (tgamma, 0xa.b9fd72b0fb24p+4L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14450# else
74c57478 14451 TEST_f_f (tgamma, 0xa.b9fd72b0fb24p+4L, 1.7976931348624926129589466917917870782484e+308L),
d8cd06db
JM
14452# endif
14453#endif
14454#if defined TEST_LDOUBLE && LDBL_MANT_DIG >= 106
74c57478 14455 TEST_f_f (tgamma, 0xa.b9fd72b0fb23a9ddbf0d3804f4p+4L, 1.7976931348623158079372897140307719334857e+308L),
d8cd06db 14456# if LDBL_MAX_EXP <= 1024
74c57478 14457 TEST_f_f (tgamma, 0xa.b9fd72b0fb23a9ddbf0d3804f8p+4L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14458# else
74c57478 14459 TEST_f_f (tgamma, 0xa.b9fd72b0fb23a9ddbf0d3804f8p+4L, 1.7976931348623158079372897140599422519044e+308L),
d8cd06db
JM
14460# endif
14461#endif
14462#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM
14463 TEST_f_f (tgamma, 0x6.db8c603359a97108p+8L, 1.1897314953572317517071551278058233700012e+4932L),
14464 TEST_f_f (tgamma, 0x6.db8c603359a9711p+8L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db 14465# if LDBL_MANT_DIG >= 113
74c57478
JM
14466 TEST_f_f (tgamma, 0x6.db8c603359a971081bc4a2e9dfdp+8L, 1.1897314953572317650857593266265995494998e+4932L),
14467 TEST_f_f (tgamma, 0x6.db8c603359a971081bc4a2e9dfd4p+8L, plus_infty, OVERFLOW_EXCEPTION),
d8cd06db
JM
14468# endif
14469#endif
74c57478
JM
14470 END_DATA (tgamma)
14471 };
2550dfe9 14472
8847214f 14473static void
74c57478 14474tgamma_test (void)
8847214f 14475{
74c57478
JM
14476 errno = 0;
14477 FUNC(tgamma) (1);
14478 if (errno == ENOSYS)
14479 /* Function not implemented. */
14480 return;
8847214f 14481
74c57478
JM
14482 START (tgamma);
14483 RUN_TEST_LOOP_f_f (tgamma, tgamma_test_data, );
14484 END (tgamma);
14485}
8847214f 14486
8847214f 14487
74c57478
JM
14488static const struct test_f_f_data trunc_test_data[] =
14489 {
14490 START_DATA (trunc),
14491 TEST_f_f (trunc, plus_infty, plus_infty),
14492 TEST_f_f (trunc, minus_infty, minus_infty),
14493 TEST_f_f (trunc, qnan_value, qnan_value),
14494
14495 TEST_f_f (trunc, 0, 0),
14496 TEST_f_f (trunc, minus_zero, minus_zero),
14497 TEST_f_f (trunc, 0.1, 0),
14498 TEST_f_f (trunc, 0.25, 0),
14499 TEST_f_f (trunc, 0.625, 0),
14500 TEST_f_f (trunc, -0.1, minus_zero),
14501 TEST_f_f (trunc, -0.25, minus_zero),
14502 TEST_f_f (trunc, -0.625, minus_zero),
14503 TEST_f_f (trunc, 1, 1),
14504 TEST_f_f (trunc, -1, -1),
14505 TEST_f_f (trunc, 1.625, 1),
14506 TEST_f_f (trunc, -1.625, -1),
14507
14508 TEST_f_f (trunc, 1048580.625L, 1048580L),
14509 TEST_f_f (trunc, -1048580.625L, -1048580L),
14510
14511 TEST_f_f (trunc, 8388610.125L, 8388610.0L),
14512 TEST_f_f (trunc, -8388610.125L, -8388610.0L),
14513
14514 TEST_f_f (trunc, 4294967296.625L, 4294967296.0L),
14515 TEST_f_f (trunc, -4294967296.625L, -4294967296.0L),
8847214f 14516
f964490f 14517#ifdef TEST_LDOUBLE
74c57478
JM
14518 /* The result can only be represented in long double. */
14519 TEST_f_f (trunc, 4503599627370495.5L, 4503599627370495.0L),
14520 TEST_f_f (trunc, 4503599627370496.25L, 4503599627370496.0L),
14521 TEST_f_f (trunc, 4503599627370496.5L, 4503599627370496.0L),
14522 TEST_f_f (trunc, 4503599627370496.75L, 4503599627370496.0L),
14523 TEST_f_f (trunc, 4503599627370497.5L, 4503599627370497.0L),
f964490f 14524
5c68d401 14525# if LDBL_MANT_DIG > 100
74c57478
JM
14526 TEST_f_f (trunc, 4503599627370494.5000000000001L, 4503599627370494.0L),
14527 TEST_f_f (trunc, 4503599627370495.5000000000001L, 4503599627370495.0L),
14528 TEST_f_f (trunc, 4503599627370496.5000000000001L, 4503599627370496.0L),
5c68d401 14529# endif
830fce04 14530
74c57478
JM
14531 TEST_f_f (trunc, -4503599627370495.5L, -4503599627370495.0L),
14532 TEST_f_f (trunc, -4503599627370496.25L, -4503599627370496.0L),
14533 TEST_f_f (trunc, -4503599627370496.5L, -4503599627370496.0L),
14534 TEST_f_f (trunc, -4503599627370496.75L, -4503599627370496.0L),
14535 TEST_f_f (trunc, -4503599627370497.5L, -4503599627370497.0L),
830fce04 14536
5c68d401 14537# if LDBL_MANT_DIG > 100
74c57478
JM
14538 TEST_f_f (trunc, -4503599627370494.5000000000001L, -4503599627370494.0L),
14539 TEST_f_f (trunc, -4503599627370495.5000000000001L, -4503599627370495.0L),
14540 TEST_f_f (trunc, -4503599627370496.5000000000001L, -4503599627370496.0L),
5c68d401 14541# endif
f964490f 14542
74c57478
JM
14543 TEST_f_f (trunc, 9007199254740991.5L, 9007199254740991.0L),
14544 TEST_f_f (trunc, 9007199254740992.25L, 9007199254740992.0L),
14545 TEST_f_f (trunc, 9007199254740992.5L, 9007199254740992.0L),
14546 TEST_f_f (trunc, 9007199254740992.75L, 9007199254740992.0L),
14547 TEST_f_f (trunc, 9007199254740993.5L, 9007199254740993.0L),
f964490f 14548
5c68d401 14549# if LDBL_MANT_DIG > 100
74c57478
JM
14550 TEST_f_f (trunc, 9007199254740991.0000000000001L, 9007199254740991.0L),
14551 TEST_f_f (trunc, 9007199254740992.0000000000001L, 9007199254740992.0L),
14552 TEST_f_f (trunc, 9007199254740993.0000000000001L, 9007199254740993.0L),
14553 TEST_f_f (trunc, 9007199254740991.5000000000001L, 9007199254740991.0L),
14554 TEST_f_f (trunc, 9007199254740992.5000000000001L, 9007199254740992.0L),
14555 TEST_f_f (trunc, 9007199254740993.5000000000001L, 9007199254740993.0L),
5c68d401
RM
14556# endif
14557
74c57478
JM
14558 TEST_f_f (trunc, -9007199254740991.5L, -9007199254740991.0L),
14559 TEST_f_f (trunc, -9007199254740992.25L, -9007199254740992.0L),
14560 TEST_f_f (trunc, -9007199254740992.5L, -9007199254740992.0L),
14561 TEST_f_f (trunc, -9007199254740992.75L, -9007199254740992.0L),
14562 TEST_f_f (trunc, -9007199254740993.5L, -9007199254740993.0L),
f964490f 14563
5c68d401 14564# if LDBL_MANT_DIG > 100
74c57478
JM
14565 TEST_f_f (trunc, -9007199254740991.0000000000001L, -9007199254740991.0L),
14566 TEST_f_f (trunc, -9007199254740992.0000000000001L, -9007199254740992.0L),
14567 TEST_f_f (trunc, -9007199254740993.0000000000001L, -9007199254740993.0L),
14568 TEST_f_f (trunc, -9007199254740991.5000000000001L, -9007199254740991.0L),
14569 TEST_f_f (trunc, -9007199254740992.5000000000001L, -9007199254740992.0L),
14570 TEST_f_f (trunc, -9007199254740993.5000000000001L, -9007199254740993.0L),
5c68d401
RM
14571# endif
14572
74c57478
JM
14573 TEST_f_f (trunc, 72057594037927935.5L, 72057594037927935.0L),
14574 TEST_f_f (trunc, 72057594037927936.25L, 72057594037927936.0L),
14575 TEST_f_f (trunc, 72057594037927936.5L, 72057594037927936.0L),
14576 TEST_f_f (trunc, 72057594037927936.75L, 72057594037927936.0L),
14577 TEST_f_f (trunc, 72057594037927937.5L, 72057594037927937.0L),
14578
14579 TEST_f_f (trunc, -72057594037927935.5L, -72057594037927935.0L),
14580 TEST_f_f (trunc, -72057594037927936.25L, -72057594037927936.0L),
14581 TEST_f_f (trunc, -72057594037927936.5L, -72057594037927936.0L),
14582 TEST_f_f (trunc, -72057594037927936.75L, -72057594037927936.0L),
14583 TEST_f_f (trunc, -72057594037927937.5L, -72057594037927937.0L),
14584
14585 TEST_f_f (trunc, 10141204801825835211973625643007.5L, 10141204801825835211973625643007.0L),
14586 TEST_f_f (trunc, 10141204801825835211973625643008.25L, 10141204801825835211973625643008.0L),
14587 TEST_f_f (trunc, 10141204801825835211973625643008.5L, 10141204801825835211973625643008.0L),
14588 TEST_f_f (trunc, 10141204801825835211973625643008.75L, 10141204801825835211973625643008.0L),
14589 TEST_f_f (trunc, 10141204801825835211973625643009.5L, 10141204801825835211973625643009.0L),
14590#endif
14591 END_DATA (trunc)
14592 };
14593
14594static void
14595trunc_test (void)
14596{
14597 START (trunc);
14598 RUN_TEST_LOOP_f_f (trunc, trunc_test_data, );
14599 END (trunc);
14600}
14601
14602static const struct test_f_f_data y0_test_data[] =
14603 {
14604 START_DATA (y0),
14605 /* y0 is the Bessel function of the second kind of order 0 */
14606 TEST_f_f (y0, -1.0, minus_infty, INVALID_EXCEPTION),
14607 TEST_f_f (y0, -max_value, minus_infty, INVALID_EXCEPTION),
14608 TEST_f_f (y0, 0.0, minus_infty),
14609 TEST_f_f (y0, qnan_value, qnan_value),
14610 TEST_f_f (y0, plus_infty, 0),
14611
14612 TEST_f_f (y0, 0.125L, -1.38968062514384052915582277745018693L),
14613 TEST_f_f (y0, 0.75L, -0.137172769385772397522814379396581855L),
14614 TEST_f_f (y0, 1.0, 0.0882569642156769579829267660235151628L),
14615 TEST_f_f (y0, 1.5, 0.382448923797758843955068554978089862L),
14616 TEST_f_f (y0, 2.0, 0.510375672649745119596606592727157873L),
14617 TEST_f_f (y0, 8.0, 0.223521489387566220527323400498620359L),
14618 TEST_f_f (y0, 10.0, 0.0556711672835993914244598774101900481L),
f964490f 14619
74c57478 14620 TEST_f_f (y0, 0x1.3ffp+74L, 1.818984347516051243459467456433028748678e-12L),
f964490f 14621
74c57478
JM
14622#ifndef TEST_FLOAT
14623 TEST_f_f (y0, 0x1.ff00000000002p+840L, 1.846591691699331493194965158699937660696e-127L),
14624 TEST_f_f (y0, 0x1p1023L, 8.2687542933709649327986678723012001545638e-155L),
f964490f 14625#endif
8847214f 14626
74c57478
JM
14627#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
14628 TEST_f_f (y0, 0x1p16382L, 8.0839224448726336195866026476176740513439e-2467L),
14629 TEST_f_f (y0, 0x1p16383L, -3.8895531955766020648617743624167352352217e-2467L),
14630#endif
14631
14632 TEST_f_f (y0, 0x1p-10L, -4.4865150767109739412411806297168793661098L),
14633 TEST_f_f (y0, 0x1p-20L, -8.8992283012125827603076426611387876938160L),
14634 TEST_f_f (y0, 0x1p-30L, -1.3311940304267782826037118027401817264906e+1L),
14635 TEST_f_f (y0, 0x1p-40L, -1.7724652307320814696990854700366226762563e+1L),
14636 TEST_f_f (y0, 0x1p-50L, -2.2137364310373846564919987139743760738155e+1L),
14637 TEST_f_f (y0, 0x1p-60L, -2.6550076313426878432849115782108205929120e+1L),
14638 TEST_f_f (y0, 0x1p-70L, -3.0962788316479910300778244424468159753887e+1L),
14639 TEST_f_f (y0, 0x1p-80L, -3.5375500319532942168707373066828113573541e+1L),
14640 TEST_f_f (y0, 0x1p-90L, -3.9788212322585974036636501709188067393195e+1L),
14641 TEST_f_f (y0, 0x1p-100L, -4.420092432563900590456563035154802121284e+1L),
14642 TEST_f_f (y0, 0x1p-110L, -4.861363632869203777249475899390797503250e+1L),
14643 END_DATA (y0)
14644 };
8847214f
UD
14645
14646static void
14647y0_test (void)
14648{
8a216c1b 14649 FLOAT s, c;
8847214f 14650 errno = 0;
cd53c157
UD
14651 FUNC (sincos) (0, &s, &c);
14652 if (errno == ENOSYS)
14653 /* Required function not implemented. */
14654 return;
8847214f
UD
14655 FUNC(y0) (1);
14656 if (errno == ENOSYS)
14657 /* Function not implemented. */
14658 return;
14659
8847214f 14660 START (y0);
74c57478
JM
14661 RUN_TEST_LOOP_f_f (y0, y0_test_data, );
14662 END (y0);
14663}
14664
8847214f 14665
74c57478
JM
14666static const struct test_f_f_data y1_test_data[] =
14667 {
14668 START_DATA (y1),
14669 /* y1 is the Bessel function of the second kind of order 1 */
14670 TEST_f_f (y1, -1.0, minus_infty, INVALID_EXCEPTION),
14671 TEST_f_f (y1, -max_value, minus_infty, INVALID_EXCEPTION),
14672 TEST_f_f (y1, 0.0, minus_infty),
14673 TEST_f_f (y1, plus_infty, 0),
14674 TEST_f_f (y1, qnan_value, qnan_value),
8847214f 14675
74c57478
JM
14676 TEST_f_f (y1, 0.125L, -5.19993611253477499595928744876579921L),
14677 TEST_f_f (y1, 0.75L, -1.03759455076928541973767132140642198L),
14678 TEST_f_f (y1, 1.0, -0.781212821300288716547150000047964821L),
14679 TEST_f_f (y1, 1.5, -0.412308626973911295952829820633445323L),
14680 TEST_f_f (y1, 2.0, -0.107032431540937546888370772277476637L),
14681 TEST_f_f (y1, 8.0, -0.158060461731247494255555266187483550L),
14682 TEST_f_f (y1, 10.0, 0.249015424206953883923283474663222803L),
8847214f 14683
74c57478 14684 TEST_f_f (y1, 0x1.27e204p+99L, -8.881610148467797208469612080785210013461e-16L),
c36e1d23
JM
14685
14686#ifndef TEST_FLOAT
74c57478
JM
14687 TEST_f_f (y1, 0x1.001000001p+593L, 3.927269966354206207832593635798954916263e-90L),
14688 TEST_f_f (y1, 0x1p1023L, 1.5665258060609012834424478437196679802783e-155L),
c36e1d23
JM
14689#endif
14690
d2f9799e 14691#if defined TEST_LDOUBLE && LDBL_MAX_EXP >= 16384
74c57478
JM
14692 TEST_f_f (y1, 0x1p16382L, 1.2193782500509000574176799046642541129387e-2466L),
14693 TEST_f_f (y1, 0x1p16383L, -9.5859502826270374691362975419147645151233e-2467L),
14694#endif
14695
14696 TEST_f_f (y1, 0x1p-10L, -6.5190099301063115047395187618929589514382e+02L),
14697 TEST_f_f (y1, 0x1p-20L, -6.6754421443450423911167962313100637952285e+05L),
14698 TEST_f_f (y1, 0x1p-30L, -6.8356527557643159612937462812258975438856e+08L),
14699 TEST_f_f (y1, 0x1p-40L, -6.9997084219026594793707805777425993547887e+11L),
14700 TEST_f_f (y1, 0x1p-50L, -7.1677014240283233068755952926181262431559e+14L),
14701 TEST_f_f (y1, 0x1p-60L, -7.3397262582050030662406095795388448059822e+17L),
14702 TEST_f_f (y1, 0x1p-70L, -7.5158796884019231398303842094477769620063e+20L),
14703 TEST_f_f (y1, 0x1p-80L, -7.6962608009235692951863134304745236090943e+23L),
14704 TEST_f_f (y1, 0x1p-90L, -7.8809710601457349582707849528059121757126e+26L),
14705 TEST_f_f (y1, 0x1p-100L, -8.0701143655892325972692837916732540679297e+29L),
14706 TEST_f_f (y1, 0x1p-110L, -8.2637971103633741796037466026734121655600e+32L),
14707 END_DATA (y1)
14708 };
8847214f
UD
14709
14710static void
14711y1_test (void)
14712{
8a216c1b 14713 FLOAT s, c;
8847214f 14714 errno = 0;
cd53c157
UD
14715 FUNC (sincos) (0, &s, &c);
14716 if (errno == ENOSYS)
14717 /* Required function not implemented. */
14718 return;
8847214f
UD
14719 FUNC(y1) (1);
14720 if (errno == ENOSYS)
14721 /* Function not implemented. */
14722 return;
14723
8847214f 14724 START (y1);
74c57478 14725 RUN_TEST_LOOP_f_f (y1, y1_test_data, );
8847214f
UD
14726 END (y1);
14727}
14728
2550dfe9 14729
0e400df5
JM
14730static const struct test_if_f_data yn_test_data[] =
14731 {
14732 START_DATA (yn),
14733 /* yn is the Bessel function of the second kind of order n */
14734 /* yn (0, x) == y0 (x) */
14735 TEST_if_f (yn, 0, -1.0, minus_infty, INVALID_EXCEPTION),
14736 TEST_if_f (yn, 0, -max_value, minus_infty, INVALID_EXCEPTION),
14737 TEST_if_f (yn, 0, 0.0, minus_infty),
14738 TEST_if_f (yn, 0, qnan_value, qnan_value),
14739 TEST_if_f (yn, 0, plus_infty, 0),
14740
14741 TEST_if_f (yn, 0, 0.125L, -1.38968062514384052915582277745018693L),
14742 TEST_if_f (yn, 0, 0.75L, -0.137172769385772397522814379396581855L),
14743 TEST_if_f (yn, 0, 1.0, 0.0882569642156769579829267660235151628L),
14744 TEST_if_f (yn, 0, 1.5, 0.382448923797758843955068554978089862L),
14745 TEST_if_f (yn, 0, 2.0, 0.510375672649745119596606592727157873L),
14746 TEST_if_f (yn, 0, 8.0, 0.223521489387566220527323400498620359L),
14747 TEST_if_f (yn, 0, 10.0, 0.0556711672835993914244598774101900481L),
14748
14749 /* yn (1, x) == y1 (x) */
14750 TEST_if_f (yn, 1, -1.0, minus_infty, INVALID_EXCEPTION),
14751 TEST_if_f (yn, 1, 0.0, minus_infty),
14752 TEST_if_f (yn, 1, plus_infty, 0),
14753 TEST_if_f (yn, 1, qnan_value, qnan_value),
14754
14755 TEST_if_f (yn, 1, 0.125L, -5.19993611253477499595928744876579921L),
14756 TEST_if_f (yn, 1, 0.75L, -1.03759455076928541973767132140642198L),
14757 TEST_if_f (yn, 1, 1.0, -0.781212821300288716547150000047964821L),
14758 TEST_if_f (yn, 1, 1.5, -0.412308626973911295952829820633445323L),
14759 TEST_if_f (yn, 1, 2.0, -0.107032431540937546888370772277476637L),
14760 TEST_if_f (yn, 1, 8.0, -0.158060461731247494255555266187483550L),
14761 TEST_if_f (yn, 1, 10.0, 0.249015424206953883923283474663222803L),
14762
14763 /* yn (3, x) */
14764 TEST_if_f (yn, 3, plus_infty, 0),
14765 TEST_if_f (yn, 3, qnan_value, qnan_value),
14766
14767 TEST_if_f (yn, 3, 0.125L, -2612.69757350066712600220955744091741L),
14768 TEST_if_f (yn, 3, 0.75L, -12.9877176234475433186319774484809207L),
14769 TEST_if_f (yn, 3, 1.0, -5.82151760596472884776175706442981440L),
14770 TEST_if_f (yn, 3, 2.0, -1.12778377684042778608158395773179238L),
14771 TEST_if_f (yn, 3, 10.0, -0.251362657183837329779204747654240998L),
14772
14773 /* yn (10, x) */
14774 TEST_if_f (yn, 10, plus_infty, 0),
14775 TEST_if_f (yn, 10, qnan_value, qnan_value),
14776
14777 TEST_if_f (yn, 10, 0.125L, -127057845771019398.252538486899753195L),
14778 TEST_if_f (yn, 10, 0.75L, -2133501638.90573424452445412893839236L),
14779 TEST_if_f (yn, 10, 1.0, -121618014.278689189288130426667971145L),
14780 TEST_if_f (yn, 10, 2.0, -129184.542208039282635913145923304214L),
14781 TEST_if_f (yn, 10, 10.0, -0.359814152183402722051986577343560609L),
14782
14783 /* Check whether yn returns correct value for LDBL_MIN, DBL_MIN,
14784 and FLT_MIN. See Bug 14173. */
14785 TEST_if_f (yn, 10, min_value, minus_infty, OVERFLOW_EXCEPTION),
14786
14787 TEST_if_f (yn, 10, min_value, minus_infty, OVERFLOW_EXCEPTION|ERRNO_ERANGE),
14788 END_DATA (yn)
14789 };
14790
8847214f
UD
14791static void
14792yn_test (void)
14793{
8a216c1b 14794 FLOAT s, c;
8847214f 14795 errno = 0;
cd53c157
UD
14796 FUNC (sincos) (0, &s, &c);
14797 if (errno == ENOSYS)
14798 /* Required function not implemented. */
14799 return;
8847214f
UD
14800 FUNC(yn) (1, 1);
14801 if (errno == ENOSYS)
14802 /* Function not implemented. */
14803 return;
14804
8847214f 14805 START (yn);
0e400df5 14806 RUN_TEST_LOOP_if_f (yn, yn_test_data, );
541428fe 14807 END (yn);
8847214f
UD
14808}
14809
14810
74c57478
JM
14811static const struct test_f_f_data significand_test_data[] =
14812 {
14813 START_DATA (significand),
14814 /* significand returns the mantissa of the exponential representation. */
14815 /* TODO: missing +/-Inf as well as qNaN tests. */
14816 TEST_f_f (significand, 4.0, 1.0),
14817 TEST_f_f (significand, 6.0, 1.5),
14818 TEST_f_f (significand, 8.0, 1.0),
14819 END_DATA (significand)
14820 };
14821
f5c8f285
UD
14822static void
14823significand_test (void)
14824{
f5c8f285 14825 START (significand);
74c57478 14826 RUN_TEST_LOOP_f_f (significand, significand_test_data, );
f5c8f285
UD
14827 END (significand);
14828}
14829
14830
8847214f
UD
14831static void
14832initialize (void)
14833{
14834 fpstack_test ("start *init*");
8847214f 14835
8847214f
UD
14836 /* Clear all exceptions. From now on we must not get random exceptions. */
14837 feclearexcept (FE_ALL_EXCEPT);
f2da7793 14838 errno = 0;
8847214f
UD
14839
14840 /* Test to make sure we start correctly. */
14841 fpstack_test ("end *init*");
14842}
14843
14844/* Definitions of arguments for argp functions. */
14845static const struct argp_option options[] =
14846{
14847 { "verbose", 'v', "NUMBER", 0, "Level of verbosity (0..3)"},
14848 { "ulps-file", 'u', NULL, 0, "Output ulps to file ULPs"},
14849 { "no-max-error", 'f', NULL, 0,
14850 "Don't output maximal errors of functions"},
14851 { "no-points", 'p', NULL, 0,
14852 "Don't output results of functions invocations"},
cd33623e
UD
14853 { "ignore-max-ulp", 'i', "yes/no", 0,
14854 "Ignore given maximal errors"},
26510bdd
CD
14855 { "output-dir", 'o', "DIR", 0,
14856 "Directory where generated files will be placed"},
8847214f
UD
14857 { NULL, 0, NULL, 0, NULL }
14858};
14859
14860/* Short description of program. */
14861static const char doc[] = "Math test suite: " TEST_MSG ;
14862
14863/* Prototype for option handler. */
fe559c5e 14864static error_t parse_opt (int key, char *arg, struct argp_state *state);
8847214f
UD
14865
14866/* Data structure to communicate with argp functions. */
14867static struct argp argp =
14868{
14869 options, parse_opt, NULL, doc,
14870};
14871
14872
14873/* Handle program arguments. */
14874static error_t
14875parse_opt (int key, char *arg, struct argp_state *state)
14876{
14877 switch (key)
14878 {
14879 case 'f':
6815fabc 14880 output_max_error = 0;
8847214f 14881 break;
cd33623e
UD
14882 case 'i':
14883 if (strcmp (arg, "yes") == 0)
14884 ignore_max_ulp = 1;
14885 else if (strcmp (arg, "no") == 0)
14886 ignore_max_ulp = 0;
14887 break;
26510bdd
CD
14888 case 'o':
14889 output_dir = (char *) malloc (strlen (arg) + 1);
14890 if (output_dir != NULL)
14891 strcpy (output_dir, arg);
14892 else
14893 return errno;
14894 break;
8847214f 14895 case 'p':
6815fabc 14896 output_points = 0;
8847214f
UD
14897 break;
14898 case 'u':
14899 output_ulps = 1;
14900 break;
14901 case 'v':
14902 if (optarg)
14903 verbose = (unsigned int) strtoul (optarg, NULL, 0);
14904 else
14905 verbose = 3;
14906 break;
14907 default:
14908 return ARGP_ERR_UNKNOWN;
14909 }
14910 return 0;
14911}
14912
14913#if 0
14914/* function to check our ulp calculation. */
14915void
14916check_ulp (void)
14917{
14918 int i;
14919
14920 FLOAT u, diff, ulp;
14921 /* This gives one ulp. */
14922 u = FUNC(nextafter) (10, 20);
14923 check_equal (10.0, u, 1, &diff, &ulp);
14924 printf ("One ulp: % .4" PRINTF_NEXPR "\n", ulp);
14925
14926 /* This gives one more ulp. */
14927 u = FUNC(nextafter) (u, 20);
14928 check_equal (10.0, u, 2, &diff, &ulp);
14929 printf ("two ulp: % .4" PRINTF_NEXPR "\n", ulp);
14930
14931 /* And now calculate 100 ulp. */
14932 for (i = 2; i < 100; i++)
14933 u = FUNC(nextafter) (u, 20);
14934 check_equal (10.0, u, 100, &diff, &ulp);
14935 printf ("100 ulp: % .4" PRINTF_NEXPR "\n", ulp);
14936}
14937#endif
14938
14939int
14940main (int argc, char **argv)
14941{
14942
14943 int remaining;
26510bdd
CD
14944 char *ulps_file_path;
14945 size_t dir_len = 0;
8847214f
UD
14946
14947 verbose = 1;
14948 output_ulps = 0;
14949 output_max_error = 1;
14950 output_points = 1;
26510bdd 14951 output_dir = NULL;
cd33623e
UD
14952 /* XXX set to 0 for releases. */
14953 ignore_max_ulp = 0;
bdf09fab 14954
8847214f
UD
14955 /* Parse and process arguments. */
14956 argp_parse (&argp, argc, argv, 0, &remaining, NULL);
14957
14958 if (remaining != argc)
14959 {
14960 fprintf (stderr, "wrong number of arguments");
14961 argp_help (&argp, stdout, ARGP_HELP_SEE, program_invocation_short_name);
14962 exit (EXIT_FAILURE);
14963 }
14964
14965 if (output_ulps)
14966 {
26510bdd
CD
14967 if (output_dir != NULL)
14968 dir_len = strlen (output_dir);
14969 ulps_file_path = (char *) malloc (dir_len + strlen (ulps_file_name) + 1);
14970 if (ulps_file_path == NULL)
14971 {
14972 perror ("can't allocate path for `ULPs' file: ");
14973 exit (1);
14974 }
14975 sprintf (ulps_file_path, "%s%s", output_dir == NULL ? "" : output_dir, ulps_file_name);
14976 ulps_file = fopen (ulps_file_path, "a");
8847214f
UD
14977 if (ulps_file == NULL)
14978 {
14979 perror ("can't open file `ULPs' for writing: ");
14980 exit (1);
14981 }
14982 }
14983
14984
14985 initialize ();
14986 printf (TEST_MSG);
14987
14988#if 0
14989 check_ulp ();
14990#endif
14991
ec751a23 14992 /* Keep the tests a wee bit ordered (according to ISO C99). */
8847214f 14993 /* Classification macros: */
ef1bb361 14994 finite_test ();
8847214f
UD
14995 fpclassify_test ();
14996 isfinite_test ();
ef1bb361
JM
14997 isinf_test ();
14998 isnan_test ();
8847214f 14999 isnormal_test ();
57267616 15000 issignaling_test ();
8847214f
UD
15001 signbit_test ();
15002
15003 /* Trigonometric functions: */
15004 acos_test ();
5ba3cc69
JM
15005 acos_test_tonearest ();
15006 acos_test_towardzero ();
15007 acos_test_downward ();
15008 acos_test_upward ();
8847214f 15009 asin_test ();
5ba3cc69
JM
15010 asin_test_tonearest ();
15011 asin_test_towardzero ();
15012 asin_test_downward ();
15013 asin_test_upward ();
8847214f
UD
15014 atan_test ();
15015 atan2_test ();
15016 cos_test ();
804360ed
JM
15017 cos_test_tonearest ();
15018 cos_test_towardzero ();
15019 cos_test_downward ();
15020 cos_test_upward ();
8847214f 15021 sin_test ();
804360ed
JM
15022 sin_test_tonearest ();
15023 sin_test_towardzero ();
15024 sin_test_downward ();
15025 sin_test_upward ();
8847214f
UD
15026 sincos_test ();
15027 tan_test ();
804360ed
JM
15028 tan_test_tonearest ();
15029 tan_test_towardzero ();
15030 tan_test_downward ();
15031 tan_test_upward ();
8847214f
UD
15032
15033 /* Hyperbolic functions: */
15034 acosh_test ();
15035 asinh_test ();
15036 atanh_test ();
15037 cosh_test ();
ca811b22
JM
15038 cosh_test_tonearest ();
15039 cosh_test_towardzero ();
15040 cosh_test_downward ();
15041 cosh_test_upward ();
8847214f 15042 sinh_test ();
ca811b22
JM
15043 sinh_test_tonearest ();
15044 sinh_test_towardzero ();
15045 sinh_test_downward ();
15046 sinh_test_upward ();
8847214f
UD
15047 tanh_test ();
15048
15049 /* Exponential and logarithmic functions: */
15050 exp_test ();
28afd92d
JM
15051 exp_test_tonearest ();
15052 exp_test_towardzero ();
15053 exp_test_downward ();
15054 exp_test_upward ();
8847214f
UD
15055 exp10_test ();
15056 exp2_test ();
15057 expm1_test ();
15058 frexp_test ();
15059 ldexp_test ();
15060 log_test ();
15061 log10_test ();
15062 log1p_test ();
15063 log2_test ();
15064 logb_test ();
a462cb63 15065 logb_test_downward ();
8847214f
UD
15066 modf_test ();
15067 ilogb_test ();
15068 scalb_test ();
15069 scalbn_test ();
15070 scalbln_test ();
f5c8f285 15071 significand_test ();
8847214f
UD
15072
15073 /* Power and absolute value functions: */
15074 cbrt_test ();
15075 fabs_test ();
15076 hypot_test ();
15077 pow_test ();
b7cd39e8
JM
15078 pow_test_tonearest ();
15079 pow_test_towardzero ();
15080 pow_test_downward ();
15081 pow_test_upward ();
8847214f
UD
15082 sqrt_test ();
15083
15084 /* Error and gamma functions: */
15085 erf_test ();
15086 erfc_test ();
15087 gamma_test ();
15088 lgamma_test ();
15089 tgamma_test ();
15090
15091 /* Nearest integer functions: */
15092 ceil_test ();
15093 floor_test ();
15094 nearbyint_test ();
15095 rint_test ();
4d37c8aa
UD
15096 rint_test_tonearest ();
15097 rint_test_towardzero ();
15098 rint_test_downward ();
15099 rint_test_upward ();
8847214f 15100 lrint_test ();
6624dbc0
UD
15101 lrint_test_tonearest ();
15102 lrint_test_towardzero ();
15103 lrint_test_downward ();
15104 lrint_test_upward ();
8847214f 15105 llrint_test ();
830fce04
RM
15106 llrint_test_tonearest ();
15107 llrint_test_towardzero ();
15108 llrint_test_downward ();
15109 llrint_test_upward ();
8847214f
UD
15110 round_test ();
15111 lround_test ();
15112 llround_test ();
15113 trunc_test ();
15114
15115 /* Remainder functions: */
15116 fmod_test ();
15117 remainder_test ();
15118 remquo_test ();
15119
15120 /* Manipulation functions: */
15121 copysign_test ();
15122 nextafter_test ();
fe559c5e 15123 nexttoward_test ();
8847214f
UD
15124
15125 /* maximum, minimum and positive difference functions */
15126 fdim_test ();
15127 fmax_test ();
15128 fmin_test ();
15129
15130 /* Multiply and add: */
15131 fma_test ();
8ec5b013
JM
15132 fma_test_towardzero ();
15133 fma_test_downward ();
15134 fma_test_upward ();
8847214f 15135
0e8e0c1c
JM
15136 /* Comparison macros: */
15137 isgreater_test ();
15138 isgreaterequal_test ();
15139 isless_test ();
15140 islessequal_test ();
15141 islessgreater_test ();
15142 isunordered_test ();
15143
8847214f
UD
15144 /* Complex functions: */
15145 cabs_test ();
15146 cacos_test ();
15147 cacosh_test ();
15148 carg_test ();
15149 casin_test ();
15150 casinh_test ();
15151 catan_test ();
15152 catanh_test ();
15153 ccos_test ();
15154 ccosh_test ();
15155 cexp_test ();
0cdc8e6f 15156 cimag_test ();
8847214f
UD
15157 clog10_test ();
15158 clog_test ();
0cdc8e6f 15159 conj_test ();
8847214f
UD
15160 cpow_test ();
15161 cproj_test ();
0cdc8e6f 15162 creal_test ();
8847214f
UD
15163 csin_test ();
15164 csinh_test ();
15165 csqrt_test ();
15166 ctan_test ();
ca61cf32
JM
15167 ctan_test_tonearest ();
15168 ctan_test_towardzero ();
15169 ctan_test_downward ();
15170 ctan_test_upward ();
8847214f 15171 ctanh_test ();
ca61cf32
JM
15172 ctanh_test_tonearest ();
15173 ctanh_test_towardzero ();
15174 ctanh_test_downward ();
15175 ctanh_test_upward ();
8847214f
UD
15176
15177 /* Bessel functions: */
15178 j0_test ();
15179 j1_test ();
15180 jn_test ();
15181 y0_test ();
15182 y1_test ();
15183 yn_test ();
15184
15185 if (output_ulps)
15186 fclose (ulps_file);
15187
15188 printf ("\nTest suite completed:\n");
f2da7793
JM
15189 printf (" %d test cases plus %d tests for exception flags and\n"
15190 " %d tests for errno executed.\n",
15191 noTests, noExcTests, noErrnoTests);
8847214f
UD
15192 if (noErrors)
15193 {
a9a56960 15194 printf (" %d errors occurred.\n", noErrors);
cf3141a5 15195 return 1;
8847214f
UD
15196 }
15197 printf (" All tests passed successfully.\n");
cf3141a5
AJ
15198
15199 return 0;
8847214f
UD
15200}
15201
15202/*
15203 * Local Variables:
15204 * mode:c
15205 * End:
15206 */