scalbnl
long double scalbnl(long double, int);
extern long double scalbnl(long double, int);
z = scalbnl(z, -e0);
y = scalbnl(x, -m3);
t = scalbnl(t, m);
return (scalbnl(expl((w - lnovft) - lnovlo), 16383));
extern long double scalbnl(long double, int);
z = scalbnl(x, 65000);
z = scalbnl(x, -65000);
z = scalbnl(x, n);
return (scalbnl(x, -ilogbl(x)));
r = scalbnl(r, 16383);
z = scalbnl(z, -e0);
y = scalbnl(x, -m3);
t = scalbnl(t, m);
return (scalbnl(expl((w - MEP1 * ln2hi) - MEP1 * ln2lo), ME));
return (scalbnl(one, 50000)); /* overflow */
return (scalbnl(expl(ln10 * ((x - t * logt2hi) -
return (scalbnl(one, -50000)); /* underflow */
return (scalbnl(expl(ln2 * (x - t)), (int) t));
return (scalbnl(one, unflexp)); /* underflow */
return (scalbnl(one, ovflexp)); /* overflow */
return (scalbnl(x, 20000));
return (scalbnl(-x, -40000));
return (scalbnl(x, m));
return (scalbnl(x, m) - one);
t1 = scalbnl(one, 16381);
return (scalbnl(one, -16381) * hypotl(x, y));
x = scalbnl(x, -n);
x = scalbnl(x, -n);
extern long double scalbnl(long double, int);
return (scalbnl(-one, 20000));
return (scalbnl(one, 20000));
return (scalbnl(-one, -20000));
return (scalbnl(one, -20000));
z = scalbnl(z, m);
z = scalbnl(x, 65000);
z = scalbnl(x, -65000);
z = scalbnl(x, n);
return (scalbnl(x, -ilogbl(x)));
r = scalbnl(r, ME);
LD_RE(ans) = scalbnl(C * t, n - 1);
LD_IM(ans) = scalbnl(S * t, n - 1);
LD_RE(ans) = scalbnl(t * c, n);
LD_IM(ans) = scalbnl(t * s, n);
c = scalbnl(c, k);
s = scalbnl(s, k);
LD_RE(ans) = scalbnl(C * t, n - 1);
LD_IM(ans) = scalbnl(S * t, n - 1);
return (scalbnl(x, n));
return (scalbnl(w, m));
return (scalbnl(z, -m));
y = scalbnl(x, -n2); /* y = scale x to [1,2] */