xref: /utopia/UTPA2-700.0.x/projects/tools/lint/mips-linux-gnu_include/math.h (revision 53ee8cc121a030b8d368113ac3e966b4705770ef)
1*53ee8cc1Swenshuai.xi /* Declarations for math functions.
2*53ee8cc1Swenshuai.xi    Copyright (C) 1991-1993, 1995-1999, 2001, 2002, 2004, 2006
3*53ee8cc1Swenshuai.xi    Free Software Foundation, Inc.
4*53ee8cc1Swenshuai.xi    This file is part of the GNU C Library.
5*53ee8cc1Swenshuai.xi 
6*53ee8cc1Swenshuai.xi    The GNU C Library is free software; you can redistribute it and/or
7*53ee8cc1Swenshuai.xi    modify it under the terms of the GNU Lesser General Public
8*53ee8cc1Swenshuai.xi    License as published by the Free Software Foundation; either
9*53ee8cc1Swenshuai.xi    version 2.1 of the License, or (at your option) any later version.
10*53ee8cc1Swenshuai.xi 
11*53ee8cc1Swenshuai.xi    The GNU C Library is distributed in the hope that it will be useful,
12*53ee8cc1Swenshuai.xi    but WITHOUT ANY WARRANTY; without even the implied warranty of
13*53ee8cc1Swenshuai.xi    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14*53ee8cc1Swenshuai.xi    Lesser General Public License for more details.
15*53ee8cc1Swenshuai.xi 
16*53ee8cc1Swenshuai.xi    You should have received a copy of the GNU Lesser General Public
17*53ee8cc1Swenshuai.xi    License along with the GNU C Library; if not, write to the Free
18*53ee8cc1Swenshuai.xi    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
19*53ee8cc1Swenshuai.xi    02111-1307 USA.  */
20*53ee8cc1Swenshuai.xi 
21*53ee8cc1Swenshuai.xi /*
22*53ee8cc1Swenshuai.xi  *	ISO C99 Standard: 7.12 Mathematics	<math.h>
23*53ee8cc1Swenshuai.xi  */
24*53ee8cc1Swenshuai.xi 
25*53ee8cc1Swenshuai.xi #ifndef	_MATH_H
26*53ee8cc1Swenshuai.xi #define	_MATH_H	1
27*53ee8cc1Swenshuai.xi 
28*53ee8cc1Swenshuai.xi #include <features.h>
29*53ee8cc1Swenshuai.xi 
30*53ee8cc1Swenshuai.xi __BEGIN_DECLS
31*53ee8cc1Swenshuai.xi 
32*53ee8cc1Swenshuai.xi /* Get machine-dependent HUGE_VAL value (returned on overflow).
33*53ee8cc1Swenshuai.xi    On all IEEE754 machines, this is +Infinity.  */
34*53ee8cc1Swenshuai.xi #include <bits/huge_val.h>
35*53ee8cc1Swenshuai.xi #ifdef __USE_ISOC99
36*53ee8cc1Swenshuai.xi # include <bits/huge_valf.h>
37*53ee8cc1Swenshuai.xi # include <bits/huge_vall.h>
38*53ee8cc1Swenshuai.xi 
39*53ee8cc1Swenshuai.xi /* Get machine-dependent INFINITY value.  */
40*53ee8cc1Swenshuai.xi # include <bits/inf.h>
41*53ee8cc1Swenshuai.xi 
42*53ee8cc1Swenshuai.xi /* Get machine-dependent NAN value (returned for some domain errors).  */
43*53ee8cc1Swenshuai.xi # include <bits/nan.h>
44*53ee8cc1Swenshuai.xi #endif /* __USE_ISOC99 */
45*53ee8cc1Swenshuai.xi 
46*53ee8cc1Swenshuai.xi /* Get general and ISO C99 specific information.  */
47*53ee8cc1Swenshuai.xi #include <bits/mathdef.h>
48*53ee8cc1Swenshuai.xi 
49*53ee8cc1Swenshuai.xi /* The file <bits/mathcalls.h> contains the prototypes for all the
50*53ee8cc1Swenshuai.xi    actual math functions.  These macros are used for those prototypes,
51*53ee8cc1Swenshuai.xi    so we can easily declare each function as both `name' and `__name',
52*53ee8cc1Swenshuai.xi    and can declare the float versions `namef' and `__namef'.  */
53*53ee8cc1Swenshuai.xi 
54*53ee8cc1Swenshuai.xi #define __MATHCALL(function,suffix, args)	\
55*53ee8cc1Swenshuai.xi   __MATHDECL (_Mdouble_,function,suffix, args)
56*53ee8cc1Swenshuai.xi #define __MATHDECL(type, function,suffix, args) \
57*53ee8cc1Swenshuai.xi   __MATHDECL_1(type, function,suffix, args); \
58*53ee8cc1Swenshuai.xi   __MATHDECL_1(type, __CONCAT(__,function),suffix, args)
59*53ee8cc1Swenshuai.xi #define __MATHCALLX(function,suffix, args, attrib)	\
60*53ee8cc1Swenshuai.xi   __MATHDECLX (_Mdouble_,function,suffix, args, attrib)
61*53ee8cc1Swenshuai.xi #define __MATHDECLX(type, function,suffix, args, attrib) \
62*53ee8cc1Swenshuai.xi   __MATHDECL_1(type, function,suffix, args) __attribute__ (attrib); \
63*53ee8cc1Swenshuai.xi   __MATHDECL_1(type, __CONCAT(__,function),suffix, args) __attribute__ (attrib)
64*53ee8cc1Swenshuai.xi #define __MATHDECL_1(type, function,suffix, args) \
65*53ee8cc1Swenshuai.xi   extern type __MATH_PRECNAME(function,suffix) args __THROW
66*53ee8cc1Swenshuai.xi 
67*53ee8cc1Swenshuai.xi #define _Mdouble_ 		double
68*53ee8cc1Swenshuai.xi #define __MATH_PRECNAME(name,r)	__CONCAT(name,r)
69*53ee8cc1Swenshuai.xi # define _Mdouble_BEGIN_NAMESPACE __BEGIN_NAMESPACE_STD
70*53ee8cc1Swenshuai.xi # define _Mdouble_END_NAMESPACE   __END_NAMESPACE_STD
71*53ee8cc1Swenshuai.xi #include <bits/mathcalls.h>
72*53ee8cc1Swenshuai.xi #undef	_Mdouble_
73*53ee8cc1Swenshuai.xi #undef _Mdouble_BEGIN_NAMESPACE
74*53ee8cc1Swenshuai.xi #undef _Mdouble_END_NAMESPACE
75*53ee8cc1Swenshuai.xi #undef	__MATH_PRECNAME
76*53ee8cc1Swenshuai.xi 
77*53ee8cc1Swenshuai.xi #if defined __USE_MISC || defined __USE_ISOC99
78*53ee8cc1Swenshuai.xi 
79*53ee8cc1Swenshuai.xi 
80*53ee8cc1Swenshuai.xi /* Include the file of declarations again, this time using `float'
81*53ee8cc1Swenshuai.xi    instead of `double' and appending f to each function name.  */
82*53ee8cc1Swenshuai.xi 
83*53ee8cc1Swenshuai.xi # ifndef _Mfloat_
84*53ee8cc1Swenshuai.xi #  define _Mfloat_		float
85*53ee8cc1Swenshuai.xi # endif
86*53ee8cc1Swenshuai.xi # define _Mdouble_ 		_Mfloat_
87*53ee8cc1Swenshuai.xi # ifdef __STDC__
88*53ee8cc1Swenshuai.xi #  define __MATH_PRECNAME(name,r) name##f##r
89*53ee8cc1Swenshuai.xi # else
90*53ee8cc1Swenshuai.xi #  define __MATH_PRECNAME(name,r) name/**/f/**/r
91*53ee8cc1Swenshuai.xi # endif
92*53ee8cc1Swenshuai.xi # define _Mdouble_BEGIN_NAMESPACE __BEGIN_NAMESPACE_C99
93*53ee8cc1Swenshuai.xi # define _Mdouble_END_NAMESPACE   __END_NAMESPACE_C99
94*53ee8cc1Swenshuai.xi # include <bits/mathcalls.h>
95*53ee8cc1Swenshuai.xi # undef	_Mdouble_
96*53ee8cc1Swenshuai.xi # undef _Mdouble_BEGIN_NAMESPACE
97*53ee8cc1Swenshuai.xi # undef _Mdouble_END_NAMESPACE
98*53ee8cc1Swenshuai.xi # undef	__MATH_PRECNAME
99*53ee8cc1Swenshuai.xi 
100*53ee8cc1Swenshuai.xi # if (__STDC__ - 0 || __GNUC__ - 0) \
101*53ee8cc1Swenshuai.xi      && (!defined __NO_LONG_DOUBLE_MATH || defined __LDBL_COMPAT)
102*53ee8cc1Swenshuai.xi #  ifdef __LDBL_COMPAT
103*53ee8cc1Swenshuai.xi 
104*53ee8cc1Swenshuai.xi #   ifdef __USE_ISOC99
105*53ee8cc1Swenshuai.xi extern float __nldbl_nexttowardf (float __x, long double __y)
106*53ee8cc1Swenshuai.xi 				  __THROW __attribute__ ((__const__));
107*53ee8cc1Swenshuai.xi #    ifdef __REDIRECT_NTH
108*53ee8cc1Swenshuai.xi extern float __REDIRECT_NTH (nexttowardf, (float __x, long double __y),
109*53ee8cc1Swenshuai.xi 			     __nldbl_nexttowardf)
110*53ee8cc1Swenshuai.xi      __attribute__ ((__const__));
111*53ee8cc1Swenshuai.xi extern double __REDIRECT_NTH (nexttoward, (double __x, long double __y),
112*53ee8cc1Swenshuai.xi 			      nextafter) __attribute__ ((__const__));
113*53ee8cc1Swenshuai.xi extern long double __REDIRECT_NTH (nexttowardl,
114*53ee8cc1Swenshuai.xi 				   (long double __x, long double __y),
115*53ee8cc1Swenshuai.xi 				   nextafter) __attribute__ ((__const__));
116*53ee8cc1Swenshuai.xi #    endif
117*53ee8cc1Swenshuai.xi #   endif
118*53ee8cc1Swenshuai.xi 
119*53ee8cc1Swenshuai.xi /* Include the file of declarations again, this time using `long double'
120*53ee8cc1Swenshuai.xi    instead of `double' and appending l to each function name.  */
121*53ee8cc1Swenshuai.xi 
122*53ee8cc1Swenshuai.xi #   undef __MATHDECL_1
123*53ee8cc1Swenshuai.xi #   define __MATHDECL_2(type, function,suffix, args, alias) \
124*53ee8cc1Swenshuai.xi   extern type __REDIRECT_NTH(__MATH_PRECNAME(function,suffix), \
125*53ee8cc1Swenshuai.xi 			     args, alias)
126*53ee8cc1Swenshuai.xi #   define __MATHDECL_1(type, function,suffix, args) \
127*53ee8cc1Swenshuai.xi   __MATHDECL_2(type, function,suffix, args, __CONCAT(function,suffix))
128*53ee8cc1Swenshuai.xi #  endif
129*53ee8cc1Swenshuai.xi 
130*53ee8cc1Swenshuai.xi #  ifndef _Mlong_double_
131*53ee8cc1Swenshuai.xi #   define _Mlong_double_	long double
132*53ee8cc1Swenshuai.xi #  endif
133*53ee8cc1Swenshuai.xi #  define _Mdouble_ 		_Mlong_double_
134*53ee8cc1Swenshuai.xi #  ifdef __STDC__
135*53ee8cc1Swenshuai.xi #   define __MATH_PRECNAME(name,r) name##l##r
136*53ee8cc1Swenshuai.xi #  else
137*53ee8cc1Swenshuai.xi #   define __MATH_PRECNAME(name,r) name/**/l/**/r
138*53ee8cc1Swenshuai.xi #  endif
139*53ee8cc1Swenshuai.xi #  define _Mdouble_BEGIN_NAMESPACE __BEGIN_NAMESPACE_C99
140*53ee8cc1Swenshuai.xi #  define _Mdouble_END_NAMESPACE   __END_NAMESPACE_C99
141*53ee8cc1Swenshuai.xi #  include <bits/mathcalls.h>
142*53ee8cc1Swenshuai.xi #  undef _Mdouble_
143*53ee8cc1Swenshuai.xi # undef _Mdouble_BEGIN_NAMESPACE
144*53ee8cc1Swenshuai.xi # undef _Mdouble_END_NAMESPACE
145*53ee8cc1Swenshuai.xi #  undef __MATH_PRECNAME
146*53ee8cc1Swenshuai.xi 
147*53ee8cc1Swenshuai.xi # endif /* __STDC__ || __GNUC__ */
148*53ee8cc1Swenshuai.xi 
149*53ee8cc1Swenshuai.xi #endif	/* Use misc or ISO C99.  */
150*53ee8cc1Swenshuai.xi #undef	__MATHDECL_1
151*53ee8cc1Swenshuai.xi #undef	__MATHDECL
152*53ee8cc1Swenshuai.xi #undef	__MATHCALL
153*53ee8cc1Swenshuai.xi 
154*53ee8cc1Swenshuai.xi 
155*53ee8cc1Swenshuai.xi #if defined __USE_MISC || defined __USE_XOPEN
156*53ee8cc1Swenshuai.xi /* This variable is used by `gamma' and `lgamma'.  */
157*53ee8cc1Swenshuai.xi extern int signgam;
158*53ee8cc1Swenshuai.xi #endif
159*53ee8cc1Swenshuai.xi 
160*53ee8cc1Swenshuai.xi 
161*53ee8cc1Swenshuai.xi /* ISO C99 defines some generic macros which work on any data type.  */
162*53ee8cc1Swenshuai.xi #ifdef __USE_ISOC99
163*53ee8cc1Swenshuai.xi 
164*53ee8cc1Swenshuai.xi /* Get the architecture specific values describing the floating-point
165*53ee8cc1Swenshuai.xi    evaluation.  The following symbols will get defined:
166*53ee8cc1Swenshuai.xi 
167*53ee8cc1Swenshuai.xi     float_t	floating-point type at least as wide as `float' used
168*53ee8cc1Swenshuai.xi 		to evaluate `float' expressions
169*53ee8cc1Swenshuai.xi     double_t	floating-point type at least as wide as `double' used
170*53ee8cc1Swenshuai.xi 		to evaluate `double' expressions
171*53ee8cc1Swenshuai.xi 
172*53ee8cc1Swenshuai.xi     FLT_EVAL_METHOD
173*53ee8cc1Swenshuai.xi 		Defined to
174*53ee8cc1Swenshuai.xi 		  0	if `float_t' is `float' and `double_t' is `double'
175*53ee8cc1Swenshuai.xi 		  1	if `float_t' and `double_t' are `double'
176*53ee8cc1Swenshuai.xi 		  2	if `float_t' and `double_t' are `long double'
177*53ee8cc1Swenshuai.xi 		  else	`float_t' and `double_t' are unspecified
178*53ee8cc1Swenshuai.xi 
179*53ee8cc1Swenshuai.xi     INFINITY	representation of the infinity value of type `float'
180*53ee8cc1Swenshuai.xi 
181*53ee8cc1Swenshuai.xi     FP_FAST_FMA
182*53ee8cc1Swenshuai.xi     FP_FAST_FMAF
183*53ee8cc1Swenshuai.xi     FP_FAST_FMAL
184*53ee8cc1Swenshuai.xi 		If defined it indicates that the `fma' function
185*53ee8cc1Swenshuai.xi 		generally executes about as fast as a multiply and an add.
186*53ee8cc1Swenshuai.xi 		This macro is defined only iff the `fma' function is
187*53ee8cc1Swenshuai.xi 		implemented directly with a hardware multiply-add instructions.
188*53ee8cc1Swenshuai.xi 
189*53ee8cc1Swenshuai.xi     FP_ILOGB0	Expands to a value returned by `ilogb (0.0)'.
190*53ee8cc1Swenshuai.xi     FP_ILOGBNAN	Expands to a value returned by `ilogb (NAN)'.
191*53ee8cc1Swenshuai.xi 
192*53ee8cc1Swenshuai.xi     DECIMAL_DIG	Number of decimal digits supported by conversion between
193*53ee8cc1Swenshuai.xi 		decimal and all internal floating-point formats.
194*53ee8cc1Swenshuai.xi 
195*53ee8cc1Swenshuai.xi */
196*53ee8cc1Swenshuai.xi 
197*53ee8cc1Swenshuai.xi /* All floating-point numbers can be put in one of these categories.  */
198*53ee8cc1Swenshuai.xi enum
199*53ee8cc1Swenshuai.xi   {
200*53ee8cc1Swenshuai.xi     FP_NAN,
201*53ee8cc1Swenshuai.xi # define FP_NAN FP_NAN
202*53ee8cc1Swenshuai.xi     FP_INFINITE,
203*53ee8cc1Swenshuai.xi # define FP_INFINITE FP_INFINITE
204*53ee8cc1Swenshuai.xi     FP_ZERO,
205*53ee8cc1Swenshuai.xi # define FP_ZERO FP_ZERO
206*53ee8cc1Swenshuai.xi     FP_SUBNORMAL,
207*53ee8cc1Swenshuai.xi # define FP_SUBNORMAL FP_SUBNORMAL
208*53ee8cc1Swenshuai.xi     FP_NORMAL
209*53ee8cc1Swenshuai.xi # define FP_NORMAL FP_NORMAL
210*53ee8cc1Swenshuai.xi   };
211*53ee8cc1Swenshuai.xi 
212*53ee8cc1Swenshuai.xi /* Return number of classification appropriate for X.  */
213*53ee8cc1Swenshuai.xi # ifdef __NO_LONG_DOUBLE_MATH
214*53ee8cc1Swenshuai.xi #  define fpclassify(x) \
215*53ee8cc1Swenshuai.xi      (sizeof (x) == sizeof (float) ? __fpclassifyf (x) : __fpclassify (x))
216*53ee8cc1Swenshuai.xi # else
217*53ee8cc1Swenshuai.xi #  define fpclassify(x) \
218*53ee8cc1Swenshuai.xi      (sizeof (x) == sizeof (float)					      \
219*53ee8cc1Swenshuai.xi       ? __fpclassifyf (x)						      \
220*53ee8cc1Swenshuai.xi       : sizeof (x) == sizeof (double)					      \
221*53ee8cc1Swenshuai.xi       ? __fpclassify (x) : __fpclassifyl (x))
222*53ee8cc1Swenshuai.xi # endif
223*53ee8cc1Swenshuai.xi 
224*53ee8cc1Swenshuai.xi /* Return nonzero value if sign of X is negative.  */
225*53ee8cc1Swenshuai.xi # ifdef __NO_LONG_DOUBLE_MATH
226*53ee8cc1Swenshuai.xi #  define signbit(x) \
227*53ee8cc1Swenshuai.xi      (sizeof (x) == sizeof (float) ? __signbitf (x) : __signbit (x))
228*53ee8cc1Swenshuai.xi # else
229*53ee8cc1Swenshuai.xi #  define signbit(x) \
230*53ee8cc1Swenshuai.xi      (sizeof (x) == sizeof (float)					      \
231*53ee8cc1Swenshuai.xi       ? __signbitf (x)							      \
232*53ee8cc1Swenshuai.xi       : sizeof (x) == sizeof (double)					      \
233*53ee8cc1Swenshuai.xi       ? __signbit (x) : __signbitl (x))
234*53ee8cc1Swenshuai.xi # endif
235*53ee8cc1Swenshuai.xi 
236*53ee8cc1Swenshuai.xi /* Return nonzero value if X is not +-Inf or NaN.  */
237*53ee8cc1Swenshuai.xi # ifdef __NO_LONG_DOUBLE_MATH
238*53ee8cc1Swenshuai.xi #  define isfinite(x) \
239*53ee8cc1Swenshuai.xi      (sizeof (x) == sizeof (float) ? __finitef (x) : __finite (x))
240*53ee8cc1Swenshuai.xi # else
241*53ee8cc1Swenshuai.xi #  define isfinite(x) \
242*53ee8cc1Swenshuai.xi      (sizeof (x) == sizeof (float)					      \
243*53ee8cc1Swenshuai.xi       ? __finitef (x)							      \
244*53ee8cc1Swenshuai.xi       : sizeof (x) == sizeof (double)					      \
245*53ee8cc1Swenshuai.xi       ? __finite (x) : __finitel (x))
246*53ee8cc1Swenshuai.xi # endif
247*53ee8cc1Swenshuai.xi 
248*53ee8cc1Swenshuai.xi /* Return nonzero value if X is neither zero, subnormal, Inf, nor NaN.  */
249*53ee8cc1Swenshuai.xi # define isnormal(x) (fpclassify (x) == FP_NORMAL)
250*53ee8cc1Swenshuai.xi 
251*53ee8cc1Swenshuai.xi /* Return nonzero value if X is a NaN.  We could use `fpclassify' but
252*53ee8cc1Swenshuai.xi    we already have this functions `__isnan' and it is faster.  */
253*53ee8cc1Swenshuai.xi # ifdef __NO_LONG_DOUBLE_MATH
254*53ee8cc1Swenshuai.xi #  define isnan(x) \
255*53ee8cc1Swenshuai.xi      (sizeof (x) == sizeof (float) ? __isnanf (x) : __isnan (x))
256*53ee8cc1Swenshuai.xi # else
257*53ee8cc1Swenshuai.xi #  define isnan(x) \
258*53ee8cc1Swenshuai.xi      (sizeof (x) == sizeof (float)					      \
259*53ee8cc1Swenshuai.xi       ? __isnanf (x)							      \
260*53ee8cc1Swenshuai.xi       : sizeof (x) == sizeof (double)					      \
261*53ee8cc1Swenshuai.xi       ? __isnan (x) : __isnanl (x))
262*53ee8cc1Swenshuai.xi # endif
263*53ee8cc1Swenshuai.xi 
264*53ee8cc1Swenshuai.xi /* Return nonzero value is X is positive or negative infinity.  */
265*53ee8cc1Swenshuai.xi # ifdef __NO_LONG_DOUBLE_MATH
266*53ee8cc1Swenshuai.xi #  define isinf(x) \
267*53ee8cc1Swenshuai.xi      (sizeof (x) == sizeof (float) ? __isinff (x) : __isinf (x))
268*53ee8cc1Swenshuai.xi # else
269*53ee8cc1Swenshuai.xi #  define isinf(x) \
270*53ee8cc1Swenshuai.xi      (sizeof (x) == sizeof (float)					      \
271*53ee8cc1Swenshuai.xi       ? __isinff (x)							      \
272*53ee8cc1Swenshuai.xi       : sizeof (x) == sizeof (double)					      \
273*53ee8cc1Swenshuai.xi       ? __isinf (x) : __isinfl (x))
274*53ee8cc1Swenshuai.xi # endif
275*53ee8cc1Swenshuai.xi 
276*53ee8cc1Swenshuai.xi /* Bitmasks for the math_errhandling macro.  */
277*53ee8cc1Swenshuai.xi # define MATH_ERRNO	1	/* errno set by math functions.  */
278*53ee8cc1Swenshuai.xi # define MATH_ERREXCEPT	2	/* Exceptions raised by math functions.  */
279*53ee8cc1Swenshuai.xi 
280*53ee8cc1Swenshuai.xi #endif /* Use ISO C99.  */
281*53ee8cc1Swenshuai.xi 
282*53ee8cc1Swenshuai.xi #ifdef	__USE_MISC
283*53ee8cc1Swenshuai.xi /* Support for various different standard error handling behaviors.  */
284*53ee8cc1Swenshuai.xi typedef enum
285*53ee8cc1Swenshuai.xi {
286*53ee8cc1Swenshuai.xi   _IEEE_ = -1,	/* According to IEEE 754/IEEE 854.  */
287*53ee8cc1Swenshuai.xi   _SVID_,	/* According to System V, release 4.  */
288*53ee8cc1Swenshuai.xi   _XOPEN_,	/* Nowadays also Unix98.  */
289*53ee8cc1Swenshuai.xi   _POSIX_,
290*53ee8cc1Swenshuai.xi   _ISOC_	/* Actually this is ISO C99.  */
291*53ee8cc1Swenshuai.xi } _LIB_VERSION_TYPE;
292*53ee8cc1Swenshuai.xi 
293*53ee8cc1Swenshuai.xi /* This variable can be changed at run-time to any of the values above to
294*53ee8cc1Swenshuai.xi    affect floating point error handling behavior (it may also be necessary
295*53ee8cc1Swenshuai.xi    to change the hardware FPU exception settings).  */
296*53ee8cc1Swenshuai.xi extern _LIB_VERSION_TYPE _LIB_VERSION;
297*53ee8cc1Swenshuai.xi #endif
298*53ee8cc1Swenshuai.xi 
299*53ee8cc1Swenshuai.xi 
300*53ee8cc1Swenshuai.xi #ifdef __USE_SVID
301*53ee8cc1Swenshuai.xi /* In SVID error handling, `matherr' is called with this description
302*53ee8cc1Swenshuai.xi    of the exceptional condition.
303*53ee8cc1Swenshuai.xi 
304*53ee8cc1Swenshuai.xi    We have a problem when using C++ since `exception' is a reserved
305*53ee8cc1Swenshuai.xi    name in C++.  */
306*53ee8cc1Swenshuai.xi # ifdef __cplusplus
307*53ee8cc1Swenshuai.xi struct __exception
308*53ee8cc1Swenshuai.xi # else
309*53ee8cc1Swenshuai.xi struct exception
310*53ee8cc1Swenshuai.xi # endif
311*53ee8cc1Swenshuai.xi   {
312*53ee8cc1Swenshuai.xi     int type;
313*53ee8cc1Swenshuai.xi     char *name;
314*53ee8cc1Swenshuai.xi     double arg1;
315*53ee8cc1Swenshuai.xi     double arg2;
316*53ee8cc1Swenshuai.xi     double retval;
317*53ee8cc1Swenshuai.xi   };
318*53ee8cc1Swenshuai.xi 
319*53ee8cc1Swenshuai.xi # ifdef __cplusplus
320*53ee8cc1Swenshuai.xi extern int matherr (struct __exception *__exc) throw ();
321*53ee8cc1Swenshuai.xi # else
322*53ee8cc1Swenshuai.xi extern int matherr (struct exception *__exc);
323*53ee8cc1Swenshuai.xi # endif
324*53ee8cc1Swenshuai.xi 
325*53ee8cc1Swenshuai.xi # define X_TLOSS	1.41484755040568800000e+16
326*53ee8cc1Swenshuai.xi 
327*53ee8cc1Swenshuai.xi /* Types of exceptions in the `type' field.  */
328*53ee8cc1Swenshuai.xi # define DOMAIN		1
329*53ee8cc1Swenshuai.xi # define SING		2
330*53ee8cc1Swenshuai.xi # define OVERFLOW	3
331*53ee8cc1Swenshuai.xi # define UNDERFLOW	4
332*53ee8cc1Swenshuai.xi # define TLOSS		5
333*53ee8cc1Swenshuai.xi # define PLOSS		6
334*53ee8cc1Swenshuai.xi 
335*53ee8cc1Swenshuai.xi /* SVID mode specifies returning this large value instead of infinity.  */
336*53ee8cc1Swenshuai.xi # define HUGE		3.40282347e+38F
337*53ee8cc1Swenshuai.xi 
338*53ee8cc1Swenshuai.xi #else	/* !SVID */
339*53ee8cc1Swenshuai.xi 
340*53ee8cc1Swenshuai.xi # ifdef __USE_XOPEN
341*53ee8cc1Swenshuai.xi /* X/Open wants another strange constant.  */
342*53ee8cc1Swenshuai.xi #  define MAXFLOAT	3.40282347e+38F
343*53ee8cc1Swenshuai.xi # endif
344*53ee8cc1Swenshuai.xi 
345*53ee8cc1Swenshuai.xi #endif	/* SVID */
346*53ee8cc1Swenshuai.xi 
347*53ee8cc1Swenshuai.xi 
348*53ee8cc1Swenshuai.xi /* Some useful constants.  */
349*53ee8cc1Swenshuai.xi #if defined __USE_BSD || defined __USE_XOPEN
350*53ee8cc1Swenshuai.xi # define M_E		2.7182818284590452354	/* e */
351*53ee8cc1Swenshuai.xi # define M_LOG2E	1.4426950408889634074	/* log_2 e */
352*53ee8cc1Swenshuai.xi # define M_LOG10E	0.43429448190325182765	/* log_10 e */
353*53ee8cc1Swenshuai.xi # define M_LN2		0.69314718055994530942	/* log_e 2 */
354*53ee8cc1Swenshuai.xi # define M_LN10		2.30258509299404568402	/* log_e 10 */
355*53ee8cc1Swenshuai.xi # define M_PI		3.14159265358979323846	/* pi */
356*53ee8cc1Swenshuai.xi # define M_PI_2		1.57079632679489661923	/* pi/2 */
357*53ee8cc1Swenshuai.xi # define M_PI_4		0.78539816339744830962	/* pi/4 */
358*53ee8cc1Swenshuai.xi # define M_1_PI		0.31830988618379067154	/* 1/pi */
359*53ee8cc1Swenshuai.xi # define M_2_PI		0.63661977236758134308	/* 2/pi */
360*53ee8cc1Swenshuai.xi # define M_2_SQRTPI	1.12837916709551257390	/* 2/sqrt(pi) */
361*53ee8cc1Swenshuai.xi # define M_SQRT2	1.41421356237309504880	/* sqrt(2) */
362*53ee8cc1Swenshuai.xi # define M_SQRT1_2	0.70710678118654752440	/* 1/sqrt(2) */
363*53ee8cc1Swenshuai.xi #endif
364*53ee8cc1Swenshuai.xi 
365*53ee8cc1Swenshuai.xi /* The above constants are not adequate for computation using `long double's.
366*53ee8cc1Swenshuai.xi    Therefore we provide as an extension constants with similar names as a
367*53ee8cc1Swenshuai.xi    GNU extension.  Provide enough digits for the 128-bit IEEE quad.  */
368*53ee8cc1Swenshuai.xi #ifdef __USE_GNU
369*53ee8cc1Swenshuai.xi # define M_El		2.7182818284590452353602874713526625L  /* e */
370*53ee8cc1Swenshuai.xi # define M_LOG2El	1.4426950408889634073599246810018921L  /* log_2 e */
371*53ee8cc1Swenshuai.xi # define M_LOG10El	0.4342944819032518276511289189166051L  /* log_10 e */
372*53ee8cc1Swenshuai.xi # define M_LN2l		0.6931471805599453094172321214581766L  /* log_e 2 */
373*53ee8cc1Swenshuai.xi # define M_LN10l	2.3025850929940456840179914546843642L  /* log_e 10 */
374*53ee8cc1Swenshuai.xi # define M_PIl		3.1415926535897932384626433832795029L  /* pi */
375*53ee8cc1Swenshuai.xi # define M_PI_2l	1.5707963267948966192313216916397514L  /* pi/2 */
376*53ee8cc1Swenshuai.xi # define M_PI_4l	0.7853981633974483096156608458198757L  /* pi/4 */
377*53ee8cc1Swenshuai.xi # define M_1_PIl	0.3183098861837906715377675267450287L  /* 1/pi */
378*53ee8cc1Swenshuai.xi # define M_2_PIl	0.6366197723675813430755350534900574L  /* 2/pi */
379*53ee8cc1Swenshuai.xi # define M_2_SQRTPIl	1.1283791670955125738961589031215452L  /* 2/sqrt(pi) */
380*53ee8cc1Swenshuai.xi # define M_SQRT2l	1.4142135623730950488016887242096981L  /* sqrt(2) */
381*53ee8cc1Swenshuai.xi # define M_SQRT1_2l	0.7071067811865475244008443621048490L  /* 1/sqrt(2) */
382*53ee8cc1Swenshuai.xi #endif
383*53ee8cc1Swenshuai.xi 
384*53ee8cc1Swenshuai.xi 
385*53ee8cc1Swenshuai.xi /* When compiling in strict ISO C compatible mode we must not use the
386*53ee8cc1Swenshuai.xi    inline functions since they, among other things, do not set the
387*53ee8cc1Swenshuai.xi    `errno' variable correctly.  */
388*53ee8cc1Swenshuai.xi #if defined __STRICT_ANSI__ && !defined __NO_MATH_INLINES
389*53ee8cc1Swenshuai.xi # define __NO_MATH_INLINES	1
390*53ee8cc1Swenshuai.xi #endif
391*53ee8cc1Swenshuai.xi 
392*53ee8cc1Swenshuai.xi #if defined __USE_ISOC99 && __GNUC_PREREQ(2,97)
393*53ee8cc1Swenshuai.xi /* ISO C99 defines some macros to compare number while taking care for
394*53ee8cc1Swenshuai.xi    unordered numbers.  Many FPUs provide special instructions to support
395*53ee8cc1Swenshuai.xi    these operations.  Generic support in GCC for these as builtins went
396*53ee8cc1Swenshuai.xi    in before 3.0.0, but not all cpus added their patterns.  We define
397*53ee8cc1Swenshuai.xi    versions that use the builtins here, and <bits/mathinline.h> will
398*53ee8cc1Swenshuai.xi    undef/redefine as appropriate for the specific GCC version in use.  */
399*53ee8cc1Swenshuai.xi # define isgreater(x, y)	__builtin_isgreater(x, y)
400*53ee8cc1Swenshuai.xi # define isgreaterequal(x, y)	__builtin_isgreaterequal(x, y)
401*53ee8cc1Swenshuai.xi # define isless(x, y)		__builtin_isless(x, y)
402*53ee8cc1Swenshuai.xi # define islessequal(x, y)	__builtin_islessequal(x, y)
403*53ee8cc1Swenshuai.xi # define islessgreater(x, y)	__builtin_islessgreater(x, y)
404*53ee8cc1Swenshuai.xi # define isunordered(u, v)	__builtin_isunordered(u, v)
405*53ee8cc1Swenshuai.xi #endif
406*53ee8cc1Swenshuai.xi 
407*53ee8cc1Swenshuai.xi /* Get machine-dependent inline versions (if there are any).  */
408*53ee8cc1Swenshuai.xi #ifdef __USE_EXTERN_INLINES
409*53ee8cc1Swenshuai.xi # include <bits/mathinline.h>
410*53ee8cc1Swenshuai.xi #endif
411*53ee8cc1Swenshuai.xi 
412*53ee8cc1Swenshuai.xi #ifdef __USE_ISOC99
413*53ee8cc1Swenshuai.xi /* If we've still got undefined comparison macros, provide defaults.  */
414*53ee8cc1Swenshuai.xi 
415*53ee8cc1Swenshuai.xi /* Return nonzero value if X is greater than Y.  */
416*53ee8cc1Swenshuai.xi # ifndef isgreater
417*53ee8cc1Swenshuai.xi #  define isgreater(x, y) \
418*53ee8cc1Swenshuai.xi   (__extension__							      \
419*53ee8cc1Swenshuai.xi    ({ __typeof__(x) __x = (x); __typeof__(y) __y = (y);			      \
420*53ee8cc1Swenshuai.xi       !isunordered (__x, __y) && __x > __y; }))
421*53ee8cc1Swenshuai.xi # endif
422*53ee8cc1Swenshuai.xi 
423*53ee8cc1Swenshuai.xi /* Return nonzero value if X is greater than or equal to Y.  */
424*53ee8cc1Swenshuai.xi # ifndef isgreaterequal
425*53ee8cc1Swenshuai.xi #  define isgreaterequal(x, y) \
426*53ee8cc1Swenshuai.xi   (__extension__							      \
427*53ee8cc1Swenshuai.xi    ({ __typeof__(x) __x = (x); __typeof__(y) __y = (y);			      \
428*53ee8cc1Swenshuai.xi       !isunordered (__x, __y) && __x >= __y; }))
429*53ee8cc1Swenshuai.xi # endif
430*53ee8cc1Swenshuai.xi 
431*53ee8cc1Swenshuai.xi /* Return nonzero value if X is less than Y.  */
432*53ee8cc1Swenshuai.xi # ifndef isless
433*53ee8cc1Swenshuai.xi #  define isless(x, y) \
434*53ee8cc1Swenshuai.xi   (__extension__							      \
435*53ee8cc1Swenshuai.xi    ({ __typeof__(x) __x = (x); __typeof__(y) __y = (y);			      \
436*53ee8cc1Swenshuai.xi       !isunordered (__x, __y) && __x < __y; }))
437*53ee8cc1Swenshuai.xi # endif
438*53ee8cc1Swenshuai.xi 
439*53ee8cc1Swenshuai.xi /* Return nonzero value if X is less than or equal to Y.  */
440*53ee8cc1Swenshuai.xi # ifndef islessequal
441*53ee8cc1Swenshuai.xi #  define islessequal(x, y) \
442*53ee8cc1Swenshuai.xi   (__extension__							      \
443*53ee8cc1Swenshuai.xi    ({ __typeof__(x) __x = (x); __typeof__(y) __y = (y);			      \
444*53ee8cc1Swenshuai.xi       !isunordered (__x, __y) && __x <= __y; }))
445*53ee8cc1Swenshuai.xi # endif
446*53ee8cc1Swenshuai.xi 
447*53ee8cc1Swenshuai.xi /* Return nonzero value if either X is less than Y or Y is less than X.  */
448*53ee8cc1Swenshuai.xi # ifndef islessgreater
449*53ee8cc1Swenshuai.xi #  define islessgreater(x, y) \
450*53ee8cc1Swenshuai.xi   (__extension__							      \
451*53ee8cc1Swenshuai.xi    ({ __typeof__(x) __x = (x); __typeof__(y) __y = (y);			      \
452*53ee8cc1Swenshuai.xi       !isunordered (__x, __y) && (__x < __y || __y < __x); }))
453*53ee8cc1Swenshuai.xi # endif
454*53ee8cc1Swenshuai.xi 
455*53ee8cc1Swenshuai.xi /* Return nonzero value if arguments are unordered.  */
456*53ee8cc1Swenshuai.xi # ifndef isunordered
457*53ee8cc1Swenshuai.xi #  define isunordered(u, v) \
458*53ee8cc1Swenshuai.xi   (__extension__							      \
459*53ee8cc1Swenshuai.xi    ({ __typeof__(u) __u = (u); __typeof__(v) __v = (v);			      \
460*53ee8cc1Swenshuai.xi       fpclassify (__u) == FP_NAN || fpclassify (__v) == FP_NAN; }))
461*53ee8cc1Swenshuai.xi # endif
462*53ee8cc1Swenshuai.xi 
463*53ee8cc1Swenshuai.xi #endif
464*53ee8cc1Swenshuai.xi 
465*53ee8cc1Swenshuai.xi __END_DECLS
466*53ee8cc1Swenshuai.xi 
467*53ee8cc1Swenshuai.xi 
468*53ee8cc1Swenshuai.xi #endif /* math.h  */
469