2012-09-29 46 views
2

你好,我希望有人能帮助我。float fmodf(float_x,float_y)function,math.h,C++

我使用math.h中的float fmodf(float_x,float_y)函数。

我能够用它正确的代码,但我只是想知道有没有人知道的功能确切的代码,这样我就可以更好地理解它

+0

你可以在gnu libc的源代码中找到该函数的实现。在某处可能有一个版本在线。 – pg1989

+1

不要从C++程序中'#include ',并且不要使用C++的'namespace std'以外的C数学函数。或者也许这个问题被错误地标记了(应该是'C'而不是'C++') – Walter

+0

你可以在[FreeBSD repository]中找到一个广泛使用的实现(http://svn.freebsd.org/base/user/eri /pf45/head/lib/msun/src/e_fmodf.c)。 –

回答

5

确切代码取决于你的数学库(可能包含在与C库相同的软件包)。如果你想看到一个实现,你可以看看glibc的实现。这是在glibc中使用的函数(来自sysdeps/ieee754/flt-32/e_fmodf.c)。

float 
__ieee754_fmodf (float x, float y) 
{ 
    int32_t n,hx,hy,hz,ix,iy,sx,i; 

    GET_FLOAT_WORD(hx,x); 
    GET_FLOAT_WORD(hy,y); 
    sx = hx&0x80000000;  /* sign of x */ 
    hx ^=sx;  /* |x| */ 
    hy &= 0x7fffffff; /* |y| */ 

    /* purge off exception values */ 
    if(hy==0||(hx>=0x7f800000)||  /* y=0,or x not finite */ 
     (hy>0x7f800000))   /* or y is NaN */ 
     return (x*y)/(x*y); 
    if(hx<hy) return x;   /* |x|<|y| return x */ 
    if(hx==hy) 
     return Zero[(u_int32_t)sx>>31]; /* |x|=|y| return x*0*/ 

    /* determine ix = ilogb(x) */ 
    if(hx<0x00800000) { /* subnormal x */ 
     for (ix = -126,i=(hx<<8); i>0; i<<=1) ix -=1; 
    } else ix = (hx>>23)-127; 

    /* determine iy = ilogb(y) */ 
    if(hy<0x00800000) { /* subnormal y */ 
     for (iy = -126,i=(hy<<8); i>=0; i<<=1) iy -=1; 
    } else iy = (hy>>23)-127; 

    /* set up {hx,lx}, {hy,ly} and align y to x */ 
    if(ix >= -126) 
     hx = 0x00800000|(0x007fffff&hx); 
    else {  /* subnormal x, shift x to normal */ 
     n = -126-ix; 
     hx = hx<<n; 
    } 
    if(iy >= -126) 
     hy = 0x00800000|(0x007fffff&hy); 
    else {  /* subnormal y, shift y to normal */ 
     n = -126-iy; 
     hy = hy<<n; 
    } 

    /* fix point fmod */ 
    n = ix - iy; 
    while(n--) { 
     hz=hx-hy; 
     if(hz<0){hx = hx+hx;} 
     else { 
     if(hz==0)  /* return sign(x)*0 */ 
      return Zero[(u_int32_t)sx>>31]; 
     hx = hz+hz; 
     } 
    } 
    hz=hx-hy; 
    if(hz>=0) {hx=hz;} 

    /* convert back to floating value and restore the sign */ 
    if(hx==0)   /* return sign(x)*0 */ 
     return Zero[(u_int32_t)sx>>31]; 
    while(hx<0x00800000) {  /* normalize x */ 
     hx = hx+hx; 
     iy -= 1; 
    } 
    if(iy>= -126) {  /* normalize output */ 
     hx = ((hx-0x00800000)|((iy+127)<<23)); 
     SET_FLOAT_WORD(x,hx|sx); 
    } else {  /* subnormal output */ 
     n = -126 - iy; 
     hx >>= n; 
     SET_FLOAT_WORD(x,hx|sx); 
     x *= one;  /* create necessary signal */ 
    } 
    return x;  /* exact output */ 
}