2012-09-29 5 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 저장소] (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 */ 
}