include/math.h

284

double scalb(double, double);

lib/libm/noieee_src/n_atan2.c

217

else { t = y/x ; y = scalb(y,-k); x=scalb(x,-k); }

lib/libm/noieee_src/n_cabs.c

207

x=scalb(x,-exp);

lib/libm/noieee_src/n_cabs.c

210

{ one+small; return(scalb(x,exp)); }

lib/libm/noieee_src/n_cabs.c

211

else y=scalb(y,-exp);

lib/libm/noieee_src/n_cabs.c

212

return(scalb(sqrt(x*x+y*y),exp));

lib/libm/noieee_src/n_cosh.c

137

return(scalb(exp((x-mln2hi)-mln2lo), EXPMAX));

lib/libm/noieee_src/n_exp.c

148

return scalb(1.0+(hi-(lo-(x*c)/(2.0-c))),k);

lib/libm/noieee_src/n_exp.c

155

if(finite(x)) return(scalb(1.0,-5000));

lib/libm/noieee_src/n_exp.c

164

return( finite(x) ? scalb(1.0,5000) : x);

lib/libm/noieee_src/n_exp.c

200

return scalb(1.+(hi-(lo - c)), k);

lib/libm/noieee_src/n_exp.c

206

if(finite(x)) return(scalb(1.0,-5000));

lib/libm/noieee_src/n_exp.c

215

return( finite(x) ? scalb(1.0,5000) : x);

lib/libm/noieee_src/n_expm1.c

150

{ x=one-scalb(one,-k); z += __exp__E(z,c);}

lib/libm/noieee_src/n_expm1.c

152

{ x = __exp__E(z,c)-scalb(one,-k); x+=z; z=one;}

lib/libm/noieee_src/n_expm1.c

156

return (scalb(x+z,k));

lib/libm/noieee_src/n_expm1.c

173

return( finite(x) ? scalb(one,5000) : x);

lib/libm/noieee_src/n_log1p.c

140

k=logb(one+x); z=scalb(x,-k); t=scalb(one,-k);

lib/libm/noieee_src/n_sinh.c

124

return(copysign(scalb(one+expm1((x-mln2hi)-mln2lo),max),sign));

lib/libm/noieee_src/n_support.c

111

x *= scalb(1.0,(int)prep1); N -= prep1; return(scalb(x,N));}

lib/libm/noieee_src/n_support.c

120

{*px=(*px&~mexp)|(short)(1<<gap); x *= scalb(1.0,k-1);}

lib/libm/noieee_src/n_support.c

233

{ double b; b=scalb(1.0,(int)prep1);

lib/libm/noieee_src/n_support.c

298

x=scalb(x,-n);

lib/libm/noieee_src/n_support.c

299

if((m=logb(x))!=0) x=scalb(x,-m); /* subnormal number */

lib/libm/noieee_src/n_support.c

330

end: return(scalb(q,n));

lib/libm/src/b_exp.c

121

return scalb(1.+(hi-(lo - c)), k);

lib/libm/src/b_exp.c

127

if(finite(x)) return(scalb(1.0,-5000));

lib/libm/src/b_exp.c

136

return( finite(x) ? scalb(1.0,5000) : x);

lib/libm/src/w_scalb.c

34

scalb(double x, double fn) /* wrapper scalb */