frexp
double frexp(double, int *);
#define frexp(x, y) __tg_simplev(x, frexp, x, y)
__strong_alias(frexpl, frexp);
xs = frexp(x, &ex);
ys = frexp(y, &ey);
zs = frexp(z, &ez);
double frexp (double, int *);