Lines Matching refs:hx
33 int32_t n,hx,hy,hz,ix,iy,sx,i; in fmod() local
36 EXTRACT_WORDS(hx,lx,x); in fmod()
38 sx = hx&0x80000000; /* sign of x */ in fmod()
39 hx ^=sx; /* |x| */ in fmod()
43 if((hy|ly)==0||(hx>=0x7ff00000)|| /* y=0,or x not finite */ in fmod()
46 if(hx<=hy) { in fmod()
47 if((hx<hy)||(lx<ly)) return x; /* |x|<|y| return x */ in fmod()
53 if(hx<0x00100000) { /* subnormal x */ in fmod()
54 if(hx==0) { in fmod()
57 for (ix = -1022,i=(hx<<11); i>0; i<<=1) ix -=1; in fmod()
59 } else ix = (hx>>20)-1023; in fmod()
72 hx = 0x00100000|(0x000fffff&hx); in fmod()
76 hx = (hx<<n)|(lx>>(32-n)); in fmod()
79 hx = lx<<(n-32); in fmod()
99 hz=hx-hy;lz=lx-ly; if(lx<ly) hz -= 1; in fmod()
100 if(hz<0){hx = hx+hx+(lx>>31); lx = lx+lx;} in fmod()
104 hx = hz+hz+(lz>>31); lx = lz+lz; in fmod()
107 hz=hx-hy;lz=lx-ly; if(lx<ly) hz -= 1; in fmod()
108 if(hz>=0) {hx=hz;lx=lz;} in fmod()
111 if((hx|lx)==0) /* return sign(x)*0 */ in fmod()
113 while(hx<0x00100000) { /* normalize x */ in fmod()
114 hx = hx+hx+(lx>>31); lx = lx+lx; in fmod()
118 hx = ((hx-0x00100000)|((iy+1023)<<20)); in fmod()
119 INSERT_WORDS(x,hx|sx,lx); in fmod()
123 lx = (lx>>n)|((u_int32_t)hx<<(32-n)); in fmod()
124 hx >>= n; in fmod()
126 lx = (hx<<(32-n))|(lx>>n); hx = sx; in fmod()
128 lx = hx>>(n-32); hx = sx; in fmod()
130 INSERT_WORDS(x,hx|sx,lx); in fmod()