|
nsz |
6a2161 |
#include <tgmath.h>
|
|
nsz |
6a2161 |
static void f()
|
|
nsz |
6a2161 |
{
|
|
nsz |
6a2161 |
double x=0, y=0, z=0;
|
|
nsz |
6a2161 |
int i;
|
|
nsz |
6a2161 |
#ifdef acos
|
|
nsz |
6a2161 |
{double r = acos(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no acos(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef acosh
|
|
nsz |
6a2161 |
{double r = acosh(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no acosh(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef asin
|
|
nsz |
6a2161 |
{double r = asin(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no asin(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef asinh
|
|
nsz |
6a2161 |
{double r = asinh(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no asinh(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef atan
|
|
nsz |
6a2161 |
{double r = atan(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no atan(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef atan2
|
|
nsz |
6a2161 |
{double r = atan2(x,y);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no atan2(x,y)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef atanh
|
|
nsz |
6a2161 |
{double r = atanh(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no atanh(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef carg
|
|
nsz |
6a2161 |
{double r = carg(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no carg(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef cbrt
|
|
nsz |
6a2161 |
{double r = cbrt(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no cbrt(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef ceil
|
|
nsz |
6a2161 |
{double r = ceil(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no ceil(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef cimag
|
|
nsz |
6a2161 |
{double r = cimag(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no cimag(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef conj
|
|
nsz |
6a2161 |
{double r = conj(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no conj(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef copysign
|
|
nsz |
6a2161 |
{double r = copysign(x,y);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no copysign(x,y)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef cos
|
|
nsz |
6a2161 |
{double r = cos(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no cos(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef cosh
|
|
nsz |
6a2161 |
{double r = cosh(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no cosh(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef cproj
|
|
nsz |
6a2161 |
{double r = cproj(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no cproj(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef creal
|
|
nsz |
6a2161 |
{double r = creal(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no creal(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef erf
|
|
nsz |
6a2161 |
{double r = erf(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no erf(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef erfc
|
|
nsz |
6a2161 |
{double r = erfc(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no erfc(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef exp
|
|
nsz |
6a2161 |
{double r = exp(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no exp(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef exp2
|
|
nsz |
6a2161 |
{double r = exp2(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no exp2(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef expm1
|
|
nsz |
6a2161 |
{double r = expm1(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no expm1(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef fabs
|
|
nsz |
6a2161 |
{double r = fabs(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no fabs(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef fdim
|
|
nsz |
6a2161 |
{double r = fdim(x,y);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no fdim(x,y)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef floor
|
|
nsz |
6a2161 |
{double r = floor(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no floor(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef fma
|
|
nsz |
6a2161 |
{double r = fma(x,y,z);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no fma(x,y,z)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef fmax
|
|
nsz |
6a2161 |
{double r = fmax(x,y);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no fmax(x,y)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef fmin
|
|
nsz |
6a2161 |
{double r = fmin(x,y);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no fmin(x,y)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef fmod
|
|
nsz |
6a2161 |
{double r = fmod(x,y);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no fmod(x,y)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef frexp
|
|
nsz |
6a2161 |
{double r = frexp(x,&i);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no frexp(x,y)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef hypot
|
|
nsz |
6a2161 |
{double r = hypot(x,y);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no hypot(x,y)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef ilogb
|
|
nsz |
6a2161 |
{double r = ilogb(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no ilogb(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef ldexp
|
|
nsz |
6a2161 |
{double r = ldexp(x,y);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no ldexp(x,y)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef lgamma
|
|
nsz |
6a2161 |
{double r = lgamma(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no lgamma(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef llrint
|
|
nsz |
6a2161 |
{double r = llrint(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no llrint(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef llround
|
|
nsz |
6a2161 |
{double r = llround(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no llround(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef log
|
|
nsz |
6a2161 |
{double r = log(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no log(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef log10
|
|
nsz |
6a2161 |
{double r = log10(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no log10(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef log1p
|
|
nsz |
6a2161 |
{double r = log1p(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no log1p(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef log2
|
|
nsz |
6a2161 |
{double r = log2(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no log2(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef logb
|
|
nsz |
6a2161 |
{double r = logb(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no logb(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef lrint
|
|
nsz |
6a2161 |
{double r = lrint(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no lrint(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef lround
|
|
nsz |
6a2161 |
{double r = lround(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no lround(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef nearbyint
|
|
nsz |
6a2161 |
{double r = nearbyint(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no nearbyint(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef nextafter
|
|
nsz |
6a2161 |
{double r = nextafter(x,y);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no nextafter(x,y)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef nexttoward
|
|
nsz |
6a2161 |
{double r = nexttoward(x,y);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no nexttoward(x,y)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef pow
|
|
nsz |
6a2161 |
{double r = pow(x,y);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no pow(x,y)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef remainder
|
|
nsz |
6a2161 |
{double r = remainder(x,y);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no remainder(x,y)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef remquo
|
|
nsz |
6a2161 |
{double r = remquo(x,y,&i);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no remquo(x,y,z)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef rint
|
|
nsz |
6a2161 |
{double r = rint(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no rint(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef round
|
|
nsz |
6a2161 |
{double r = round(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no round(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef scalbln
|
|
nsz |
6a2161 |
{double r = scalbln(x,y);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no scalbln(x,y)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef scalbn
|
|
nsz |
6a2161 |
{double r = scalbn(x,y);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no scalbn(x,y)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef sin
|
|
nsz |
6a2161 |
{double r = sin(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no sin(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef sinh
|
|
nsz |
6a2161 |
{double r = sinh(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no sinh(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef sqrt
|
|
nsz |
6a2161 |
{double r = sqrt(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no sqrt(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef tan
|
|
nsz |
6a2161 |
{double r = tan(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no tan(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef tanh
|
|
nsz |
6a2161 |
{double r = tanh(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no tanh(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef tgamma
|
|
nsz |
6a2161 |
{double r = tgamma(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no tgamma(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
#ifdef trunc
|
|
nsz |
6a2161 |
{double r = trunc(x);}
|
|
nsz |
6a2161 |
#else
|
|
nsz |
6a2161 |
#error no trunc(x)
|
|
nsz |
6a2161 |
#endif
|
|
nsz |
6a2161 |
}
|
|
nsz |
6a2161 |
|