1 /* 2 * Copyright 2001-2010 Haiku Inc. All Rights Reserved. 3 * Distributed under the terms of the MIT License. 4 */ 5 #ifndef _MATH_H_ 6 #define _MATH_H_ 7 8 9 #define M_E 2.7182818284590452354 /* e */ 10 #define M_LOG2E 1.4426950408889634074 /* log 2e */ 11 #define M_LOG10E 0.43429448190325182765 /* log 10e */ 12 #define M_LN2 0.69314718055994530942 /* log e2 */ 13 #define M_LN10 2.30258509299404568402 /* log e10 */ 14 #define M_PI 3.14159265358979323846 /* pi */ 15 #define M_PI_2 1.57079632679489661923 /* pi/2 */ 16 #define M_PI_4 0.78539816339744830962 /* pi/4 */ 17 #define M_1_PI 0.31830988618379067154 /* 1/pi */ 18 #define M_2_PI 0.63661977236758134308 /* 2/pi */ 19 #define M_2_SQRTPI 1.12837916709551257390 /* 2/sqrt(pi) */ 20 #define M_SQRT2 1.41421356237309504880 /* sqrt(2) */ 21 #define M_SQRT1_2 0.70710678118654752440 /* 1/sqrt(2) */ 22 23 /* platform independent IEEE floating point special values */ 24 #if __GNUC__ >= 4 25 /* gcc4 and clang definitions */ 26 # ifndef HUGE_VAL 27 # define HUGE_VAL __builtin_huge_val() 28 # endif 29 30 # define HUGE_VALF __builtin_huge_valf() 31 # define HUGE_VALL __builtin_huge_vall() 32 # define NAN __builtin_nanf("") 33 # define INFINITY __builtin_inff() 34 #else 35 /* gcc2 definitions */ 36 # define __HUGE_VAL_v 0x7ff0000000000000LL 37 # define __huge_val_t union { unsigned char __c[8]; long long __ll; double __d; } 38 # ifndef HUGE_VAL 39 # define HUGE_VAL (((__huge_val_t) { __ll: __HUGE_VAL_v }).__d) 40 # endif 41 42 # define __HUGE_VALF_v 0x7f800000L 43 # define __huge_valf_t union { unsigned char __c[4]; long __l; float __f; } 44 # define HUGE_VALF (((__huge_valf_t) { __l: __HUGE_VALF_v }).__f) 45 46 /* TODO: define HUGE_VALL for long doubles */ 47 48 # define __NAN_VALF_v 0x7fc00000L 49 # define NAN (((__huge_valf_t) { __l: __NAN_VALF_v }).__f) 50 # define INFINITY HUGE_VALF 51 #endif 52 53 /* floating-point categories */ 54 #define FP_NAN 0 55 #define FP_INFINITE 1 56 #define FP_ZERO 2 57 #define FP_SUBNORMAL 3 58 #define FP_NORMAL 4 59 60 #ifdef __cplusplus 61 struct __exception; 62 extern "C" int matherr(struct __exception *); 63 struct __exception { 64 #else 65 struct exception; 66 extern int matherr(struct exception *); 67 struct exception { 68 #endif 69 int type; 70 char *name; 71 double arg1; 72 double arg2; 73 double retval; 74 }; 75 76 #define DOMAIN 1 77 #define SING 2 78 #define OVERFLOW 3 79 #define UNDERFLOW 4 80 #define TLOSS 5 81 #define PLOSS 6 82 83 extern int signgam; 84 85 86 #ifdef __cplusplus 87 extern "C" { 88 #endif 89 90 /* float math functions */ 91 extern float acosf(float x); 92 extern float acoshf(float x); 93 extern float asinf(float x); 94 extern float asinhf(float x); 95 extern float atan2f(float y, float x); 96 extern float atanf(float x); 97 extern float atanhf(float x); 98 extern float cbrtf(float x); 99 extern float ceilf(float x); 100 extern float cosf(float x); 101 extern float coshf(float x); 102 extern float expf(float x); 103 extern float expm1f(float x); 104 extern float fabsf(float x); 105 extern float fdimf(float x, float y); 106 extern float floorf(float x); 107 extern float fmaf(float x, float y, float z); 108 extern float fmaxf(float x, float y); 109 extern float fminf(float x, float y); 110 extern float fmodf(float x, float y); 111 extern float frexpf(float x, int *_exponent); 112 extern float gammaf(float x); 113 extern float hypotf(float x, float y); 114 extern float ldexpf(float x, int exponent); 115 extern float lgammaf(float x); 116 extern long long llrintf(float x); 117 extern long long llroundf(float x); 118 extern float log10f(float x); 119 extern float log1pf(float x); 120 extern float logbf(float x); 121 extern float logf(float x); 122 extern long lrintf(float x); 123 extern long lroundf(float x); 124 extern float modff(float x, float *y); 125 extern float nanf(const char *tagp); 126 extern float nearbyintf(float x); 127 extern float powf(float x, float y); 128 extern float remquof(float x, float y, int *quo); 129 extern float roundf(float x); 130 extern float sinf(float x); 131 extern float sinhf(float x); 132 extern float sqrtf(float x); 133 extern float tanf(float x); 134 extern float tanhf(float x); 135 136 /* double math functions */ 137 extern double acos(double x); 138 extern double acosh(double x); 139 extern double asin(double x); 140 extern double asinh(double x); 141 extern double atan(double x); 142 extern double atan2(double x, double y); 143 extern double atanh(double x); 144 extern double ceil(double x); 145 extern double cos(double x); 146 extern double cosh(double x); 147 extern double exp(double x); 148 extern double fabs(double x); 149 extern double fdim(double x, double y); 150 extern double floor(double x); 151 extern double fma(double x, double y, double z); 152 extern double fmax(double x, double y); 153 extern double fmin(double x, double y); 154 extern double fmod(double x, double y); 155 extern double frexp(double x, int *_exponent); 156 extern double gamma(double x); 157 extern double ldexp(double x, int exponent); 158 extern double lgamma(double x); 159 extern long long llrint(double x); 160 extern long long llround(double x); 161 extern double log(double x); 162 extern double log10(double x); 163 extern long lrint(double x); 164 extern long lround(double x); 165 extern double modf(double x, double *y); 166 extern double nan(const char* tagp); 167 extern double nearbyint(double x); 168 extern double pow(double x, double y); 169 extern double remquo(double x, double y, int *quo); 170 extern double round(double x); 171 extern double sin(double x); 172 extern double sinh(double x); 173 extern double sqrt(double x); 174 extern double tan(double x); 175 extern double tanh(double x); 176 extern double trunc(double x); 177 178 /* long double math functions */ 179 extern long double acosl(long double x); 180 extern long double acoshl(long double x); 181 extern long double asinl(long double x); 182 extern long double atanl(long double x); 183 extern long double atanhl(long double x); 184 extern long double atan2l(long double y, long double x); 185 extern long double ceill(long double x); 186 extern long double cosl(long double x); 187 extern long double coshl(long double x); 188 extern long double expl(long double x); 189 extern long double fabsl(long double x); 190 extern long double fdiml(long double x, long double y); 191 extern long double floorl(long double x); 192 extern long double fmal(long double x, long double y, long double z); 193 extern long double fmaxl(long double x, long double y); 194 extern long double fminl(long double x, long double y); 195 extern long double fmodl(long double x, long double y); 196 extern long double frexpl(long double num, int *exp); 197 extern long double lgammal(long double x); 198 extern long long llrintl(long double x); 199 extern long long llroundl(long double x); 200 extern long lrintl(long double x); 201 extern long lroundl(long double x); 202 extern long double modfl(long double value, long double *iptr); 203 extern long double nanl(const char* tagp); 204 extern long double nearbyintl(long double x); 205 extern long double powl(long double x, long double y); 206 extern long double remquol(long double x, long double y, int *quo); 207 extern long double roundl(long double x); 208 extern long double sinl(long double x); 209 extern long double sinhl(long double x); 210 extern long double sqrtl(long double x); 211 extern long double tanl(long double x); 212 extern long double tanhl(long double x); 213 extern long double truncl(long double x); 214 215 /* some BSD non-ANSI or POSIX math functions */ 216 extern double cbrt(double x); 217 extern double erf(double x); 218 extern double erfc(double x); 219 extern double expm1(double x); 220 extern double gamma_r(double x, int *y); 221 extern double hypot(double x, double y); 222 extern int ilogb(double x); 223 extern double j0(double x); 224 extern double j1(double x); 225 extern double jn(int x, double y); 226 extern double lgamma_r(double x, int *y); 227 extern double log1p(double x); 228 extern double logb(double x); 229 extern double nextafter(double x, double y); 230 extern double nexttoward(double x, long double y); 231 extern double remainder(double x, double y); 232 extern double rint(double x); 233 extern double scalb (double x, double y); 234 extern double y0(double x); 235 extern double y1(double x); 236 extern double yn(int x, double y); 237 238 /* other stuff as defined in BeOS */ 239 extern int isinff(float value); 240 extern int finitef(float value); 241 extern float dremf(float x, float y); 242 extern float significandf(float x); 243 extern float copysignf(float x, float y); 244 extern int isnanf(float value); 245 extern double significand(double x); 246 extern double copysign(double x, double y); 247 extern double scalbln(double x, long n); 248 extern double scalbn(double x, int y); 249 extern double drem(double x, double y); 250 extern int finite(double x); 251 extern float j0f(float x); 252 extern float j1f(float x); 253 extern float jnf(int x, float y); 254 extern float y0f(float x); 255 extern float y1f(float x); 256 extern float ynf(int x, float y); 257 extern float erff(float x); 258 extern float erfcf(float x); 259 extern float gammaf_r(float x, int *y); 260 extern float lgammaf_r(float x, int *y); 261 extern float rintf(float x); 262 extern float nextafterf(float x, float y); 263 extern float nexttowardf(float x, long double y); 264 extern float remainderf(float x, float y); 265 extern float scalbf(float x, float n); 266 extern float scalbnf(float x, int n); 267 extern int ilogbf(float x); 268 269 extern long double erfcl(long double x); 270 extern long double erfl(long double x); 271 extern long double nextafterl(long double x, long double y); 272 extern long double nexttowardl(long double x, long double y); 273 extern long double remainderl(long double x, long double y); 274 extern long double rintl(long double x); 275 extern long double scalbnl(long double x, int n); 276 extern long double scalblnl(long double x, long n); 277 278 /* prototypes for functions used in the macros below */ 279 extern int __fpclassifyf(float value); 280 extern int __signbitf(float value); 281 extern int __finitef(float value); 282 extern int __isnanf(float value); 283 extern int __isinff(float value); 284 285 extern int __fpclassifyl(long double value); 286 extern int __signbitl(long double value); 287 extern int __finitel(long double value); 288 extern int __isnanl(long double value); 289 extern int __isinfl(long double value); 290 291 extern int __fpclassify(double value); 292 extern int __signbit(double value); 293 extern int __finite(double value); 294 extern int __isnan(double value); 295 extern int __isinf(double value); 296 297 /* returns number of classification appropriate for 'value' */ 298 #define fpclassify(value) \ 299 (sizeof(value) == sizeof(float) ? __fpclassifyf(value) \ 300 : sizeof(value) == sizeof(double) ? __fpclassify(value) \ 301 : __fpclassifyl(value)) 302 303 /* returns non-zero if 'value' is negative */ 304 # define signbit(value) \ 305 (sizeof(value) == sizeof(float) ? __signbitf(value) \ 306 : sizeof(value) == sizeof(double) ? __signbit(value) \ 307 : __signbitl(value)) 308 309 /* returns non-zero if 'value' is not Inf or NaN */ 310 # define isfinite(value) \ 311 (sizeof(value) == sizeof(float) ? __finitef(value) \ 312 : sizeof(value) == sizeof(double) ? __finite(value) \ 313 : __finitel(value)) 314 315 /* returns non-zero if 'value' is neither zero, sub-normal, Inf, nor NaN */ 316 # define isnormal(value) \ 317 (fpclassify(value) == FP_NORMAL) 318 319 /* returns non-zero if 'value' is NaN */ 320 # define isnan(value) \ 321 (sizeof(value) == sizeof(float) ? __isnanf(value) \ 322 : sizeof(value) == sizeof(double) ? __isnan(value) \ 323 : __isnanl(value)) 324 325 /* returns non-zero if 'value is Inf */ 326 # define isinf(value) \ 327 (sizeof(value) == sizeof(float) ? __isinff(value) \ 328 : sizeof(value) == sizeof(double) ? __isinf(value) \ 329 : __isinfl(value)) 330 331 #ifdef __cplusplus 332 } 333 #endif 334 335 #endif /* _MATH_H_ */ 336