2012-09-29 47 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 */ 
}