| /netbsd-src/lib/libm/src/ |
| H A D | e_fmodf.c | 35 int32_t n,hx,hy,hz,ix,iy,sx,i; in __ieee754_fmodf() local 38 GET_FLOAT_WORD(hy,y); in __ieee754_fmodf() 41 hy &= 0x7fffffff; /* |y| */ in __ieee754_fmodf() 44 if(hy==0||(hx>=0x7f800000)|| /* y=0,or x not finite */ in __ieee754_fmodf() 45 (hy>0x7f800000)) /* or y is NaN */ in __ieee754_fmodf() 47 if(hx<hy) return x; /* |x|<|y| return x */ in __ieee754_fmodf() 48 if(hx==hy) in __ieee754_fmodf() 57 if(hy<0x00800000) { /* subnormal y */ in __ieee754_fmodf() 58 for (iy = -126,i=(hy<<8); i>=0; i<<=1) iy -=1; in __ieee754_fmodf() 59 } else iy = (hy>>23)-127; in __ieee754_fmodf() [all …]
|
| H A D | s_remquof.c | 37 int32_t n,hx,hy,hz,ix,iy,sx,i; in remquof() local 41 GET_FLOAT_WORD(hy,y); in remquof() 42 sxy = (hx ^ hy) & 0x80000000; in remquof() 45 hy &= 0x7fffffff; /* |y| */ in remquof() 48 if(hy==0||hx>=0x7f800000||hy>0x7f800000) /* y=0,NaN;or x not finite */ in remquof() 50 if(hx<hy) { in remquof() 53 } else if(hx==hy) { in remquof() 64 if(hy<0x00800000) { /* subnormal y */ in remquof() 65 for (iy = -126,i=(hy<<8); i>0; i<<=1) iy -=1; in remquof() 66 } else iy = (hy>>23)-127; in remquof() [all …]
|
| H A D | e_fmod.c | 36 int32_t n,hx,hy,hz,ix,iy,sx,i; in __strong_alias() local 40 EXTRACT_WORDS(hy,ly,y); in __strong_alias() 43 hy &= 0x7fffffff; /* |y| */ in __strong_alias() 46 if((hy|ly)==0||(hx>=0x7ff00000)|| /* y=0,or x not finite */ in __strong_alias() 47 ((hy|((ly|-ly)>>31))>0x7ff00000)) /* or y is NaN */ in __strong_alias() 49 if(hx<=hy) { in __strong_alias() 50 if((hx<hy)||(lx<ly)) return x; /* |x|<|y| return x */ in __strong_alias() 65 if(hy<0x00100000) { /* subnormal y */ in __strong_alias() 66 if(hy==0) { in __strong_alias() 69 for (iy = -1022,i=(hy<<11); i>0; i<<=1) iy -=1; in __strong_alias() [all …]
|
| H A D | s_remquo.c | 39 int32_t n,hx,hy,hz,ix,iy,sx,i; in remquo() local 43 EXTRACT_WORDS(hy,ly,y); in remquo() 44 sxy = (hx ^ hy) & 0x80000000; in remquo() 47 hy &= 0x7fffffff; /* |y| */ in remquo() 50 if((hy|ly)==0||(hx>=0x7ff00000)|| /* y=0,or x not finite */ in remquo() 51 ((hy|((ly|-ly)>>31))>0x7ff00000)) /* or y is NaN */ in remquo() 53 if(hx<=hy) { in remquo() 54 if((hx<hy)||(lx<ly)) { in remquo() 74 if(hy<0x00100000) { /* subnormal y */ in remquo() 75 if(hy in remquo() [all...] |
| H A D | s_nextafter.c | 37 int32_t hx,hy,ix,iy; in __strong_alias() local 41 EXTRACT_WORDS(hy,ly,y); in __strong_alias() 43 iy = hy&0x7fffffff; /* |y| */ in __strong_alias() 50 INSERT_WORDS(x,hy&0x80000000,1); /* return +-minsubnormal */ in __strong_alias() 55 if(hx>hy||((hx==hy)&&(lx>ly))) { /* x > y, x -= ulp */ in __strong_alias() 63 if(hy>=0||hx>hy||((hx==hy)&&(lx>ly))){/* x < y, x -= ulp */ in __strong_alias() 71 hy = hx&0x7ff00000; in __strong_alias() 72 if(hy>=0x7ff00000) return x+x; /* overflow */ in __strong_alias() 73 if(hy<0x00100000) { /* underflow */ in __strong_alias()
|
| H A D | s_nextafterf.c | 27 int32_t hx,hy,ix,iy; in nextafterf() local 30 GET_FLOAT_WORD(hy,y); in nextafterf() 32 iy = hy&0x7fffffff; /* |y| */ in nextafterf() 39 SET_FLOAT_WORD(x,(hy&0x80000000)|1);/* return +-minsubnormal */ in nextafterf() 44 if(hx>hy) { /* x > y, x -= ulp */ in nextafterf() 50 if(hy>=0||hx>hy){ /* x < y, x -= ulp */ in nextafterf() 56 hy = hx&0x7f800000; in nextafterf() 57 if(hy>=0x7f800000) return x+x; /* overflow */ in nextafterf() 58 if(hy<0x00800000) { /* underflow */ in nextafterf()
|
| H A D | e_pow.c | 105 int32_t hx,hy,ix,iy; in __ieee754_pow() local 109 EXTRACT_WORDS(hy,ly,y); in __ieee754_pow() 110 ix = hx&0x7fffffff; iy = hy&0x7fffffff; in __ieee754_pow() 149 return (hy>=0)? y: zero; in __ieee754_pow() 151 return (hy<0)?-y: zero; in __ieee754_pow() 154 if(hy<0) return one/x; else return x; in __ieee754_pow() 156 if(hy==0x40000000) return x*x; /* y is 2 */ in __ieee754_pow() 157 if(hy==0x3fe00000) { /* y is 0.5 */ in __ieee754_pow() 168 if(hy<0) z = one/z; /* z = (1/|x|) */ in __ieee754_pow() 194 if(ix<=0x3fefffff) return (hy<0)? huge*huge:tiny*tiny; in __ieee754_pow() [all …]
|
| H A D | e_atan2f.c | 36 int32_t k,m,hx,hy,ix,iy; in __ieee754_atan2f() local 40 GET_FLOAT_WORD(hy,y); in __ieee754_atan2f() 41 iy = hy&0x7fffffff; in __ieee754_atan2f() 46 m = ((hy>>31)&1)|((hx>>30)&2); /* 2*sign(x)+sign(y) */ in __ieee754_atan2f() 58 if(ix==0) return (hy<0)? -pi_o_2-tiny: pi_o_2+tiny; in __ieee754_atan2f() 79 if(iy==0x7f800000) return (hy<0)? -pi_o_2-tiny: pi_o_2+tiny; in __ieee754_atan2f()
|
| H A D | e_powf.c | 64 int32_t hx,hy,ix,iy,is; in __ieee754_powf() local 67 GET_FLOAT_WORD(hy,y); in __ieee754_powf() 68 ix = hx&0x7fffffff; iy = hy&0x7fffffff; in __ieee754_powf() 101 return (hy>=0)? y: zero; in __ieee754_powf() 103 return (hy<0)?-y: zero; in __ieee754_powf() 106 if(hy<0) return one/x; else return x; in __ieee754_powf() 108 if(hy==0x40000000) return x*x; /* y is 2 */ in __ieee754_powf() 109 if(hy==0x3f000000) { /* y is 0.5 */ in __ieee754_powf() 118 if(hy<0) z = one/z; /* z = (1/|x|) */ in __ieee754_powf() 139 if(ix<0x3f7ffff8) return (hy<0)? sn*huge*huge:sn*tiny*tiny; in __ieee754_powf() [all …]
|
| H A D | e_atan2.c | 60 int32_t k,m,hx,hy,ix,iy; in __ieee754_atan2() local 65 EXTRACT_WORDS(hy,ly,y); in __ieee754_atan2() 66 iy = hy&0x7fffffff; in __ieee754_atan2() 71 m = ((hy>>31)&1)|((hx>>30)&2); /* 2*sign(x)+sign(y) */ in __ieee754_atan2() 83 if((ix|lx)==0) return (hy<0)? -pi_o_2-tiny: pi_o_2+tiny; in __ieee754_atan2() 104 if(iy==0x7ff00000) return (hy<0)? -pi_o_2-tiny: pi_o_2+tiny; in __ieee754_atan2()
|
| H A D | e_expf.c | 89 u_int32_t hy; in __ieee754_expf() local 90 GET_FLOAT_WORD(hy,y); in __ieee754_expf() 91 SET_FLOAT_WORD(y,hy+(k<<23)); /* add k to y's exponent */ in __ieee754_expf() 94 u_int32_t hy; in __ieee754_expf() local 95 GET_FLOAT_WORD(hy,y); in __ieee754_expf() 96 SET_FLOAT_WORD(y,hy+((k+100)<<23)); /* add k to y's exponent */ in __ieee754_expf()
|
| H A D | e_exp.c | 152 u_int32_t hy; in __ieee754_exp() local 153 GET_HIGH_WORD(hy,y); in __ieee754_exp() 154 SET_HIGH_WORD(y,hy+(k<<20)); /* add k to y's exponent */ in __ieee754_exp() 157 u_int32_t hy; in __ieee754_exp() local 158 GET_HIGH_WORD(hy,y); in __ieee754_exp() 159 SET_HIGH_WORD(y,hy+((k+1000)<<20)); /* add k to y's exponent */ in __ieee754_exp()
|
| /netbsd-src/external/gpl3/gcc.old/dist/libquadmath/math/ |
| H A D | fmodq.c | 28 int64_t n,hx,hy,hz,ix,iy,sx,i; in fmodq() local 32 GET_FLT128_WORDS64(hy,ly,y); in fmodq() 35 hy &= 0x7fffffffffffffffLL; /* |y| */ in fmodq() 38 if((hy|ly)==0||(hx>=0x7fff000000000000LL)|| /* y=0,or x not finite */ in fmodq() 39 ((hy|((ly|-ly)>>63))>0x7fff000000000000LL)) /* or y is NaN */ in fmodq() 41 if(hx<=hy) { in fmodq() 42 if((hx<hy)||(lx<ly)) return x; /* |x|<|y| return x */ in fmodq() 57 if(hy<0x0001000000000000LL) { /* subnormal y */ in fmodq() 58 if(hy==0) { in fmodq() 61 for (iy = -16382, i=hy<<15; i>0; i<<=1) iy -=1; in fmodq() [all …]
|
| H A D | nextafterq.c | 31 int64_t hx,hy,ix,iy; in nextafterq() local 35 GET_FLT128_WORDS64(hy,ly,y); in nextafterq() 37 iy = hy&0x7fffffffffffffffLL; /* |y| */ in nextafterq() 45 SET_FLT128_WORDS64(x,hy&0x8000000000000000ULL,1);/* return +-minsubnormal */ in nextafterq() 52 if(hx>hy||((hx==hy)&&(lx>ly))) { /* x > y, x -= ulp */ in nextafterq() 60 if(hy>=0||hx>hy||((hx==hy)&&(lx>ly))){/* x < y, x -= ulp */ in nextafterq() 68 hy = hx&0x7fff000000000000LL; in nextafterq() 69 if(hy==0x7fff000000000000LL) { in nextafterq() 74 if(hy==0) { in nextafterq()
|
| H A D | remquoq.c | 29 int64_t hx,hy; in remquoq() local 34 GET_FLT128_WORDS64 (hy, ly, y); in remquoq() 36 qs = sx ^ (hy & 0x8000000000000000ULL); in remquoq() 37 hy &= 0x7fffffffffffffffLL; in remquoq() 41 if ((hy | ly) == 0) in remquoq() 44 || ((hy >= 0x7fff000000000000LL) /* y is NaN */ in remquoq() 45 && (((hy - 0x7fff000000000000LL) | ly) != 0))) in remquoq() 48 if (hy <= 0x7ffbffffffffffffLL) in remquoq() 51 if (((hx - hy) | (lx - ly)) == 0) in remquoq() 61 if (hy <= 0x7ffcffffffffffffLL && x >= 4 * y) in remquoq() [all …]
|
| H A D | atan2q.c | 57 int64_t k,m,hx,hy,ix,iy; in atan2q() local 62 GET_FLT128_WORDS64(hy,ly,y); in atan2q() 63 iy = hy&0x7fffffffffffffffLL; in atan2q() 68 m = ((hy>>63)&1)|((hx>>62)&2); /* 2*sign(x)+sign(y) */ in atan2q() 80 if((ix|lx)==0) return (hy<0)? -pi_o_2-tiny: pi_o_2+tiny; in atan2q() 101 if(iy==0x7fff000000000000LL) return (hy<0)? -pi_o_2-tiny: pi_o_2+tiny; in atan2q()
|
| H A D | powq.c | 154 int32_t hx, hy; in powq() local 162 hy = q.words32.w0; in powq() 163 iy = hy & 0x7fffffff; in powq() 219 return (hy >= 0) ? y : zero; in powq() 221 return (hy < 0) ? -y : zero; in powq() 225 if (hy < 0) in powq() 230 if (hy == 0x40000000) in powq() 232 if (hy == 0x3ffe0000) in powq() 246 if (hy < 0) in powq() 279 return (hy < 0) ? huge * huge : tiny * tiny; in powq() [all …]
|
| /netbsd-src/external/gpl3/gcc/dist/libquadmath/math/ |
| H A D | fmodq.c | 28 int64_t n,hx,hy,hz,ix,iy,sx,i; in fmodq() local 32 GET_FLT128_WORDS64(hy,ly,y); in fmodq() 35 hy &= 0x7fffffffffffffffLL; /* |y| */ in fmodq() 38 if((hy|ly)==0||(hx>=0x7fff000000000000LL)|| /* y=0,or x not finite */ in fmodq() 39 ((hy|((ly|-ly)>>63))>0x7fff000000000000LL)) /* or y is NaN */ in fmodq() 41 if(hx<=hy) { in fmodq() 42 if((hx<hy)||(lx<ly)) return x; /* |x|<|y| return x */ in fmodq() 57 if(hy<0x0001000000000000LL) { /* subnormal y */ in fmodq() 58 if(hy==0) { in fmodq() 61 for (iy = -16382, i=hy<<15; i>0; i<<=1) iy -=1; in fmodq() [all …]
|
| H A D | nextafterq.c | 31 int64_t hx,hy,ix,iy; in nextafterq() local 35 GET_FLT128_WORDS64(hy,ly,y); in nextafterq() 37 iy = hy&0x7fffffffffffffffLL; /* |y| */ in nextafterq() 45 SET_FLT128_WORDS64(x,hy&0x8000000000000000ULL,1);/* return +-minsubnormal */ in nextafterq() 52 if(hx>hy||((hx==hy)&&(lx>ly))) { /* x > y, x -= ulp */ in nextafterq() 60 if(hy>=0||hx>hy||((hx==hy)&&(lx>ly))){/* x < y, x -= ulp */ in nextafterq() 68 hy = hx&0x7fff000000000000LL; in nextafterq() 69 if(hy==0x7fff000000000000LL) { in nextafterq() 74 if(hy==0) { in nextafterq()
|
| H A D | remquoq.c | 29 int64_t hx,hy; in remquoq() local 34 GET_FLT128_WORDS64 (hy, ly, y); in remquoq() 36 qs = sx ^ (hy & 0x8000000000000000ULL); in remquoq() 37 hy &= 0x7fffffffffffffffLL; in remquoq() 41 if ((hy | ly) == 0) in remquoq() 44 || ((hy >= 0x7fff000000000000LL) /* y is NaN */ in remquoq() 45 && (((hy - 0x7fff000000000000LL) | ly) != 0))) in remquoq() 48 if (hy <= 0x7ffbffffffffffffLL) in remquoq() 51 if (((hx - hy) | (lx - ly)) == 0) in remquoq() 61 if (hy <= 0x7ffcffffffffffffLL && x >= 4 * y) in remquoq() [all …]
|
| H A D | atan2q.c | 57 int64_t k,m,hx,hy,ix,iy; in atan2q() local 62 GET_FLT128_WORDS64(hy,ly,y); in atan2q() 63 iy = hy&0x7fffffffffffffffLL; in atan2q() 68 m = ((hy>>63)&1)|((hx>>62)&2); /* 2*sign(x)+sign(y) */ in atan2q() 80 if((ix|lx)==0) return (hy<0)? -pi_o_2-tiny: pi_o_2+tiny; in atan2q() 101 if(iy==0x7fff000000000000LL) return (hy<0)? -pi_o_2-tiny: pi_o_2+tiny; in atan2q()
|
| H A D | powq.c | 154 int32_t hx, hy; in powq() local 162 hy = q.words32.w0; in powq() 163 iy = hy & 0x7fffffff; in powq() 219 return (hy >= 0) ? y : zero; in powq() 221 return (hy < 0) ? -y : zero; in powq() 225 if (hy < 0) in powq() 230 if (hy == 0x40000000) in powq() 232 if (hy == 0x3ffe0000) in powq() 246 if (hy < 0) in powq() 279 return (hy < 0) ? huge * huge : tiny * tiny; in powq() [all …]
|
| /netbsd-src/lib/libm/ld128/ |
| H A D | e_powl.c | 153 int32_t hx, hy; in powl() local 161 hy = q.parts32.mswhi; in powl() 162 iy = hy & 0x7fffffff; in powl() 217 return (hy >= 0) ? y : zero; in powl() 219 return (hy < 0) ? -y : zero; in powl() 223 if (hy < 0) in powl() 228 if (hy == 0x40000000) in powl() 230 if (hy == 0x3ffe0000) in powl() 244 if (hy < 0) in powl() 272 return (hy < 0) ? huge * huge : tiny * tiny; in powl() [all …]
|
| /netbsd-src/games/hack/ |
| H A D | hack.mklev.c | 75 #define somey() ((random()%(croom->hy-croom->ly+1))+croom->ly) 203 for (y = troom->ly; y <= troom->hy; y++) in makelevel() 232 int lx, ly, hx, hy, lowx, lowy, hix, hiy, dx, dy; in makerooms() local 256 hy = rsp->rhy; in makerooms() 271 if (hx - lx < dx + dx / 2 + 2 * xlim || hy - ly < dy + dy / 3 + 2 * ylim) { in makerooms() 285 lowy = ly + ylim + rn2(hy - ly - dy - 2 * ylim + 1); in makerooms() 304 int lx, ly, hx, hy, xlim, ylim; in addrs() local 314 (hx = rsp->rhx) < lowx || (hy = rsp->rhy) < lowy) in addrs() 328 addrsx(lx, ly, lowx - 2, hy, discarded); in addrs() 329 if (hy - hiy > 2 * ylim + 4) in addrs() [all …]
|
| /netbsd-src/lib/libm/ld80/ |
| H A D | s_cexpl.c | 45 uint16_t hx, hy; in cexpl() local 52 EXTRACT_LDBL80_WORDS(hy, ly, y); in cexpl() 53 hy &= 0x7fff; in cexpl() 56 if ((hy | ly) == 0) in cexpl() 65 if (hy >= 0x7fff) { in cexpl()
|