__ieee754_expf
t = __ieee754_expf(fabsf(x));
if (ix < 0x42b17180) return half*__ieee754_expf(fabsf(x));
w = __ieee754_expf(half*fabsf(x));
if (ix < 0x42b17180) return h*__ieee754_expf(fabsf(x));
w = __ieee754_expf((float)0.5*fabsf(x));
extern float __ieee754_expf __P((float));
r = __ieee754_expf(-z*z-(float)0.5625)*__ieee754_expf((z-x)*(z+x)+R/S);
r = __ieee754_expf(-z*z-(float)0.5625)*
__ieee754_expf((z-x)*(z+x)+R/S);
return __ieee754_expf(x);
z = __ieee754_expf(x);