expm1
double expm1(double);
#define expm1(x) __tg_simple(x, expm1)
PROTO_NORMAL(expm1);
t = expm1(fabs(x));
t = expm1(fabs(x));
DEF_STD(expm1);
LDBL_MAYBE_CLONE(expm1);
t = expm1(two*fabs(x));
t = expm1(-two*fabs(x));
{"expm1", expm1, &NAN, &NAN, 0},
{"expm1", expm1, &ZERO, &ZERO, 0},
{"expm1", expm1, &MZERO, &MZERO, 0},
{"expm1", expm1, &INF, &INF, 0},
{"expm1", expm1, &MINF, &MONE, 0},
double expm1 (double);
test(expm1, x, result, exceptmask, excepts); \