fix nan/infinity macros in math.h, etc.
[musl] / include / math.h
1 #ifndef _MATH_H
2 #define _MATH_H
3
4 #ifdef __cplusplus
5 extern "C" {
6 #endif
7
8 #define __NEED_float_t
9 #define __NEED_double_t
10 #define __NEED___uint16_t
11 #define __NEED___uint32_t
12 #define __NEED___uint64_t
13 #include <bits/alltypes.h>
14
15 #if 100*__GNUC__+__GNUC_MINOR__ >= 303
16 #define NAN       __builtin_nanf("")
17 #define INFINITY  __builtin_inff()
18 #else
19 #define NAN       (0.0f/0.0f)
20 #define INFINITY  1e40f
21 #endif
22
23 #define HUGE_VALF INFINITY
24 #define HUGE_VAL  ((double)INFINITY)
25 #define HUGE_VALL ((long double)INFINITY)
26
27 #define MATH_ERRNO  1
28 #define MATH_EXCEPT 2
29 #define math_errhandling 2
30
31 #define FP_ILOGBNAN (((unsigned)-1)>>1)
32 #define FP_ILOGB0 (~FP_ILOGBNAN)
33
34 #define FP_NAN       0
35 #define FP_INFINITE  1
36 #define FP_ZERO      2
37 #define FP_SUBNORMAL 3
38 #define FP_NORMAL    4
39
40 int __fpclassifyf(float);
41 int __fpclassify(double);
42 int __fpclassifyl(long double);
43
44 #define fpclassify(x) ( \
45         sizeof(x) == sizeof(float) ? __fpclassifyf(x) : \
46         sizeof(x) == sizeof(double) ? __fpclassify(x) : \
47         __fpclassifyl(x) )
48
49 #define isinf(x)    (fpclassify(x) == FP_INFINITE)
50 #define isnan(x)    (fpclassify(x) == FP_NAN)
51 #define isnormal(x) (fpclassify(x) == FP_NORMAL)
52 #define isfinite(x) (fpclassify(x) > FP_INFINITE)
53
54 #define isunordered(x,y) (isnan((x)) ? ((y),1) : isnan((y)))
55
56 static
57 #if __STDC_VERSION__ >= 199901L
58 inline
59 #endif
60 int __isrel(long double __x, long double __y, int __rel)
61 {
62         if (isunordered(__x, __y)) return 0;
63         if (__rel==-2) return __x < __y;
64         if (__rel==2) return __x > __y;
65         if (__rel==-1) return __x <= __y;
66         if (__rel==1) return __x >= __y;
67         return __x != __y;
68 }
69
70 #define isless(x,y) __isrel((x), (y), -2)
71 #define islessequal(x,y) __isrel((x), (y), -1)
72 #define islessgreater(x,y) __isrel((x), (y), 0)
73 #define isgreaterequal(x,y) __isrel((x), (y), 1)
74 #define isgreater(x,y) __isrel((x), (y), 2)
75
76 double      acos(double);
77 float       acosf(float);
78 long double acosl(long double);
79
80 double      acosh(double);
81 float       acoshf(float);
82 long double acoshl(long double);
83
84 double      asin(double);
85 float       asinf(float);
86 long double asinl(long double);
87
88 double      asinh(double);
89 float       asinhf(float);
90 long double asinhl(long double);
91
92 double      atan(double);
93 float       atanf(float);
94 long double atanl(long double);
95
96 double      atan2(double, double);
97 float       atan2f(float, float);
98 long double atan2l(long double, long double);
99
100 double      atanh(double);
101 float       atanhf(float);
102 long double atanhl(long double);
103
104 double      cbrt(double);
105 float       cbrtf(float);
106 long double cbrtl(long double);
107
108 double      ceil(double);
109 float       ceilf(float);
110 long double ceill(long double);
111
112 double      copysign(double, double);
113 float       copysignf(float, float);
114 long double copysignl(long double, long double);
115
116 double      cos(double);
117 float       cosf(float);
118 long double cosl(long double);
119
120 double      cosh(double);
121 float       coshf(float);
122 long double coshl(long double);
123
124 double      erf(double);
125 float       erff(float);
126 long double erfl(long double);
127
128 double      erfc(double);
129 float       erfcf(float);
130 long double erfcl(long double);
131
132 double      exp(double);
133 float       expf(float);
134 long double expl(long double);
135
136 double      exp2(double);
137 float       exp2f(float);
138 long double exp2l(long double);
139
140 double      expm1(double);
141 float       expm1f(float);
142 long double expm1l(long double);
143
144 double      fabs(double);
145 float       fabsf(float);
146 long double fabsl(long double);
147
148 double      fdim(double, double);
149 float       fdimf(float, float);
150 long double fdiml(long double, long double);
151
152 double      floor(double);
153 float       floorf(float);
154 long double floorl(long double);
155
156 double      fma(double, double, double);
157 float       fmaf(float, float, float);
158 long double fmal(long double, long double, long double);
159
160 double      fmax(double, double);
161 float       fmaxf(float, float);
162 long double fmaxl(long double, long double);
163
164 double      fmin(double, double);
165 float       fminf(float, float);
166 long double fminl(long double, long double);
167
168 double      fmod(double, double);
169 float       fmodf(float, float);
170 long double fmodl(long double, long double);
171
172 double      frexp(double, int *);
173 float       frexpf(float value, int *);
174 long double frexpl(long double value, int *);
175
176 double      hypot(double, double);
177 float       hypotf(float, float);
178 long double hypotl(long double, long double);
179
180 int         ilogb(double);
181 int         ilogbf(float);
182 int         ilogbl(long double);
183
184 double      ldexp(double, int);
185 float       ldexpf(float, int);
186 long double ldexpl(long double, int);
187
188 double      lgamma(double);
189 float       lgammaf(float);
190 long double lgammal(long double);
191
192 long long   llrint(double);
193 long long   llrintf(float);
194 long long   llrintl(long double);
195
196 long long   llround(double);
197 long long   llroundf(float);
198 long long   llroundl(long double);
199
200 double      log(double);
201 float       logf(float);
202 long double logl(long double);
203
204 double      log10(double);
205 float       log10f(float);
206 long double log10l(long double);
207
208 double      log1p(double);
209 float       log1pf(float);
210 long double log1pl(long double);
211
212 double      log2(double);
213 float       log2f(float);
214 long double log2l(long double);
215
216 double      logb(double);
217 float       logbf(float);
218 long double logbl(long double);
219
220 long        lrint(double);
221 long        lrintf(float);
222 long        lrintl(long double);
223
224 long        lround(double);
225 long        lroundf(float);
226 long        lroundl(long double);
227
228 double      modf(double, double *);
229 float       modff(float, float *);
230 long double modfl(long double, long double *);
231
232 double      nan(const char *);
233 float       nanf(const char *);
234 long double nanl(const char *);
235
236 double      nearbyint(double);
237 float       nearbyintf(float);
238 long double nearbyintl(long double);
239
240 double      nextafter(double, double);
241 float       nextafterf(float, float);
242 long double nextafterl(long double, long double);
243
244 double      nexttoward(double, long double);
245 float       nexttowardf(float, long double);
246 long double nexttowardl(long double, long double);
247
248 double      pow(double, double);
249 float       powf(float, float);
250 long double powl(long double, long double);
251
252 double      remainder(double, double);
253 float       remainderf(float, float);
254 long double remainderl(long double, long double);
255
256 double      remquo(double, double, int *);
257 float       remquof(float, float, int *);
258 long double remquol(long double, long double, int *);
259
260 double      rint(double);
261 float       rintf(float);
262 long double rintl(long double);
263
264 double      round(double);
265 float       roundf(float);
266 long double roundl(long double);
267
268 double      scalbln(double, long);
269 float       scalblnf(float, long);
270 long double scalblnl(long double, long);
271
272 double      scalbn(double, int);
273 float       scalbnf(float, int);
274 long double scalbnl(long double, int);
275
276 double      sin(double);
277 float       sinf(float);
278 long double sinl(long double);
279
280 double      sinh(double);
281 float       sinhf(float);
282 long double sinhl(long double);
283
284 double      sqrt(double);
285 float       sqrtf(float);
286 long double sqrtl(long double);
287
288 double      tan(double);
289 float       tanf(float);
290 long double tanl(long double);
291
292 double      tanh(double);
293 float       tanhf(float);
294 long double tanhl(long double);
295
296 double      tgamma(double);
297 float       tgammaf(float);
298 long double tgammal(long double);
299
300 double      trunc(double);
301 float       truncf(float);
302 long double truncl(long double);
303
304 #if defined(_XOPEN_SOURCE) || defined(_GNU_SOURCE)
305 #define MAXFLOAT        3.40282347e+38F
306 #define M_E             2.7182818284590452354   /* e */
307 #define M_LOG2E         1.4426950408889634074   /* log_2 e */
308 #define M_LOG10E        0.43429448190325182765  /* log_10 e */
309 #define M_LN2           0.69314718055994530942  /* log_e 2 */
310 #define M_LN10          2.30258509299404568402  /* log_e 10 */
311 #define M_PI            3.14159265358979323846  /* pi */
312 #define M_PI_2          1.57079632679489661923  /* pi/2 */
313 #define M_PI_4          0.78539816339744830962  /* pi/4 */
314 #define M_1_PI          0.31830988618379067154  /* 1/pi */
315 #define M_2_PI          0.63661977236758134308  /* 2/pi */
316 #define M_2_SQRTPI      1.12837916709551257390  /* 2/sqrt(pi) */
317 #define M_SQRT2         1.41421356237309504880  /* sqrt(2) */
318 #define M_SQRT1_2       0.70710678118654752440  /* 1/sqrt(2) */
319 double      j0(double);
320 double      j1(double);
321 double      jn(int, double);
322 double      y0(double);
323 double      y1(double);
324 double      yn(int, double);
325 extern int signgam;
326 #endif
327
328 #ifdef _GNU_SOURCE
329 double      scalb(double, double);
330 #endif
331
332 #ifdef __cplusplus
333 }
334 #endif
335
336 #endif