X-Git-Url: http://nsz.repo.hu/git/?p=musl;a=blobdiff_plain;f=src%2Fmath%2Flog1pf.c;h=39832d2857ab453af5626b9d9d99e68b49b58de3;hp=5c718152e9535ccbea2591766f44c9f0124f1dba;hb=0cbb65479147ecdaa664e88cc2a5a925f3de502f;hpb=b69f695acedd4ce2798ef9ea28d834ceccc789bd diff --git a/src/math/log1pf.c b/src/math/log1pf.c index 5c718152..39832d28 100644 --- a/src/math/log1pf.c +++ b/src/math/log1pf.c @@ -27,8 +27,6 @@ Lp5 = 1.8183572590e-01, /* 3E3A3325 */ Lp6 = 1.5313838422e-01, /* 3E1CD04F */ Lp7 = 1.4798198640e-01; /* 3E178897 */ -static const float zero = 0.0; - float log1pf(float x) { float hfsq,f,c,s,z,R,u; @@ -40,15 +38,15 @@ float log1pf(float x) k = 1; if (hx < 0x3ed413d0) { /* 1+x < sqrt(2)+ */ if (ax >= 0x3f800000) { /* x <= -1.0 */ - if (x == (float)-1.0) - return -two25/zero; /* log1p(-1)=+inf */ + if (x == -1.0f) + return -two25/0.0f; /* log1p(-1)=+inf */ return (x-x)/(x-x); /* log1p(x<-1)=NaN */ } if (ax < 0x38000000) { /* |x| < 2**-15 */ /* raise inexact */ - if (two25 + x > zero && ax < 0x33800000) /* |x| < 2**-24 */ + if (two25 + x > 0.0f && ax < 0x33800000) /* |x| < 2**-24 */ return x; - return x - x*x*(float)0.5; + return x - x*x*0.5f; } if (hx > 0 || hx <= (int32_t)0xbe95f619) { /* sqrt(2)/2- <= 1+x < sqrt(2)+ */ k = 0; @@ -60,11 +58,11 @@ float log1pf(float x) return x+x; if (k != 0) { if (hx < 0x5a000000) { - STRICT_ASSIGN(float, u, (float)1.0 + x); + STRICT_ASSIGN(float, u, 1.0f + x); GET_FLOAT_WORD(hu, u); k = (hu>>23) - 127; /* correction term */ - c = k > 0 ? (float)1.0-(u-x) : x-(u-(float)1.0); + c = k > 0 ? 1.0f-(u-x) : x-(u-1.0f); c /= u; } else { u = x; @@ -87,22 +85,22 @@ float log1pf(float x) SET_FLOAT_WORD(u, hu|0x3f000000); /* normalize u/2 */ hu = (0x00800000-hu)>>2; } - f = u - (float)1.0; + f = u - 1.0f; } - hfsq = (float)0.5*f*f; + hfsq = 0.5f * f * f; if (hu == 0) { /* |f| < 2**-20 */ - if (f == zero) { + if (f == 0.0f) { if (k == 0) - return zero; + return 0.0f; c += k*ln2_lo; return k*ln2_hi+c; } - R = hfsq*((float)1.0-(float)0.66666666666666666*f); + R = hfsq*(1.0f - 0.66666666666666666f * f); if (k == 0) return f - R; return k*ln2_hi - ((R-(k*ln2_lo+c))-f); } - s = f/((float)2.0+f); + s = f/(2.0f + f); z = s*s; R = z*(Lp1+z*(Lp2+z*(Lp3+z*(Lp4+z*(Lp5+z*(Lp6+z*Lp7)))))); if (k == 0)