Merge remote-tracking branch 'nsz/math'
This commit is contained in:
commit
969ddbc423
35 changed files with 806 additions and 910 deletions
|
|
@ -115,11 +115,9 @@ long double creall(long double complex);
|
|||
#define __CMPLX(x, y, t) \
|
||||
((union { _Complex t __z; t __xy[2]; }){.__xy = {(x),(y)}}.__z)
|
||||
|
||||
#if __STDC_VERSION__ >= 201112L
|
||||
#define CMPLX(x, y) __CMPLX(x, y, double)
|
||||
#define CMPLXF(x, y) __CMPLX(x, y, float)
|
||||
#define CMPLXL(x, y) __CMPLX(x, y, long double)
|
||||
#endif
|
||||
|
||||
#ifdef __cplusplus
|
||||
}
|
||||
|
|
|
|||
|
|
@ -399,14 +399,6 @@ float ynf(int, float);
|
|||
#ifdef _GNU_SOURCE
|
||||
long double lgammal_r(long double, int*);
|
||||
|
||||
long double j0l(long double);
|
||||
long double j1l(long double);
|
||||
long double jnl(int, long double);
|
||||
|
||||
long double y0l(long double);
|
||||
long double y1l(long double);
|
||||
long double ynl(int, long double);
|
||||
|
||||
void sincos(double, double*, double*);
|
||||
void sincosf(float, float*, float*);
|
||||
void sincosl(long double, long double*, long double*);
|
||||
|
|
|
|||
|
|
@ -59,10 +59,12 @@ sizeof(double) == sizeof(long double)
|
|||
|
||||
/* function selection */
|
||||
|
||||
#define __tg_real(fun, x) (__RETCAST(x)( \
|
||||
#define __tg_real_nocast(fun, x) ( \
|
||||
__FLT(x) ? fun ## f (x) : \
|
||||
__LDBL(x) ? fun ## l (x) : \
|
||||
fun(x) ))
|
||||
fun(x) )
|
||||
|
||||
#define __tg_real(fun, x) (__RETCAST(x)__tg_real_nocast(fun, x))
|
||||
|
||||
#define __tg_real_2_1(fun, x, y) (__RETCAST(x)( \
|
||||
__FLT(x) ? fun ## f (x, y) : \
|
||||
|
|
@ -217,18 +219,18 @@ sizeof(double) == sizeof(long double)
|
|||
#define fmod(x,y) __tg_real_2(fmod, (x), (y))
|
||||
#define frexp(x,y) __tg_real_2_1(frexp, (x), (y))
|
||||
#define hypot(x,y) __tg_real_2(hypot, (x), (y))
|
||||
#define ilogb(x) __tg_real(ilogb, (x))
|
||||
#define ilogb(x) __tg_real_nocast(ilogb, (x))
|
||||
#define ldexp(x,y) __tg_real_2_1(ldexp, (x), (y))
|
||||
#define lgamma(x) __tg_real(lgamma, (x))
|
||||
#define llrint(x) __tg_real(llrint, (x))
|
||||
#define llround(x) __tg_real(llround, (x))
|
||||
#define llrint(x) __tg_real_nocast(llrint, (x))
|
||||
#define llround(x) __tg_real_nocast(llround, (x))
|
||||
#define log(x) __tg_real_complex(log, (x))
|
||||
#define log10(x) __tg_real(log10, (x))
|
||||
#define log1p(x) __tg_real(log1p, (x))
|
||||
#define log2(x) __tg_real(log2, (x))
|
||||
#define logb(x) __tg_real(logb, (x))
|
||||
#define lrint(x) __tg_real(lrint, (x))
|
||||
#define lround(x) __tg_real(lround, (x))
|
||||
#define lrint(x) __tg_real_nocast(lrint, (x))
|
||||
#define lround(x) __tg_real_nocast(lround, (x))
|
||||
#define nearbyint(x) __tg_real(nearbyint, (x))
|
||||
#define nextafter(x,y) __tg_real_2(nextafter, (x), (y))
|
||||
#define nexttoward(x,y) __tg_real_2(nexttoward, (x), (y))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue