/src/games/trek/ |
visual.c | 73 int ix, iy; local in function:visual 83 iy = Ship.secty + v->y; 84 if (ix < 0 || ix >= NSECTS || iy < 0 || iy >= NSECTS) 87 co = Sect[ix][iy]; 88 printf("%d,%d %c ", ix, iy, co); 91 iy = Ship.secty + v->y; 92 if (ix < 0 || ix >= NSECTS || iy < 0 || iy >= NSECTS) 95 co = Sect[ix][iy]; [all...] |
ram.c | 57 ram(int ix, int iy) 63 c = Sect[ix][iy]; 67 printf("%s rams Klingon at %d,%d\n", Ship.shipname, ix, iy); 68 killk(ix, iy); 80 printf("You ran into the starbase at %d,%d\n", ix, iy);
|
snova.c | 49 ** otherwise, the current quadrant is taken, and (ix, iy) give 70 int ix, iy = 0; local in function:snova 91 for (iy = 0; iy < NSECTS; iy++) 92 if (Sect[ix][iy] == STAR || 93 Sect[ix][iy] == INHABIT) 103 iy = y; 111 printf("\a\nRED ALERT: supernova occurring at %d,%d\n", ix, iy); 113 dy = iy - Ship.secty [all...] |
move.c | 86 int ix = 0, iy = 0; local in function:move 150 iy = (y += dy); 153 printf("ix = %d, x = %.2f, iy = %d, y = %.2f\n", 154 ix, x, iy, y); 165 iy = -1; 167 iy = dy + 0.5; 170 printf("New quad: ix = %d, iy = %d\n", ix, iy); 179 Ship.quady = iy / NSECTS; 181 Ship.secty = iy % NSECTS [all...] |
events.c | 68 int ix, iy; local in function:events 152 for (iy = 0; iy < NQUADS; iy++) { 153 q = &Quad[ix][iy]; 164 if (Ship.quadx == ix && Ship.quady == iy) 169 Ship.quady = iy; 193 iy = Now.base[i].y; 195 q = &Quad[ix][iy]; 204 if (e->x == ix && e->y == iy) [all...] |
torped.c | 72 int ix, iy; local in function:torped 153 iy = y += dy; 160 switch (Sect[ix][iy]) { 172 Etc.klingon[k].y != iy) 179 ix, iy); 182 killk(ix, iy); 188 nova(ix, iy); 192 kills(ix, iy, -1); 202 Sect[ix][iy], ix, iy); [all...] |
/src/lib/libm/src/ |
s_copysignf.c | 33 u_int32_t ix,iy; local in function:copysignf 35 GET_FLOAT_WORD(iy,y); 36 SET_FLOAT_WORD(x,(ix&0x7fffffff)|(iy&0x80000000));
|
e_fmodf.c | 35 int32_t n,hx,hy,hz,ix,iy,sx,i; local in function:__ieee754_fmodf 56 /* determine iy = ilogb(y) */ 58 for (iy = -126,i=(hy<<8); i>=0; i<<=1) iy -=1; 59 } else iy = (hy>>23)-127; 68 if(iy >= -126) 71 n = -126-iy; 76 n = ix - iy; 94 iy -= 1; 96 if(iy>= -126) { /* normalize output * [all...] |
e_atan2f.c | 36 int32_t k,m,hx,hy,ix,iy; local in function:__ieee754_atan2f 41 iy = hy&0x7fffffff; 43 (iy>0x7f800000)) /* x or y is NaN */ 49 if(iy==0) { 62 if(iy==0x7f800000) { 79 if(iy==0x7f800000) return (hy<0)? -pi_o_2-tiny: pi_o_2+tiny; 82 k = (iy-ix)>>23;
|
s_remquof.c | 37 int32_t n,hx,hy,hz,ix,iy,sx,i; local in function:remquof 63 /* determine iy = ilogb(y) */ 65 for (iy = -126,i=(hy<<8); i>0; i<<=1) iy -=1; 66 } else iy = (hy>>23)-127; 75 if(iy >= -126) 78 n = -126-iy; 83 n = ix - iy; 101 iy -= 1; 103 if(iy>= -126) { /* normalize output * [all...] |
e_atan2.c | 22 * ARG (x+iy) = arctan(y/x) ... if x > 0, 23 * ARG (x+iy) = pi - arctan[y/(-x)] ... if x < 0, 60 int32_t k,m,hx,hy,ix,iy; local in function:__ieee754_atan2 66 iy = hy&0x7fffffff; 68 ((iy|((ly|-ly)>>31))>0x7ff00000)) /* x or y is NaN */ 74 if((iy|ly)==0) { 87 if(iy==0x7ff00000) { 104 if(iy==0x7ff00000) return (hy<0)? -pi_o_2-tiny: pi_o_2+tiny; 107 k = (iy-ix)>>20;
|
e_fmod.c | 36 int32_t n,hx,hy,hz,ix,iy,sx,i; local in function:__strong_alias 64 /* determine iy = ilogb(y) */ 67 for (iy = -1043, i=ly; i>0; i<<=1) iy -=1; 69 for (iy = -1022,i=(hy<<11); i>0; i<<=1) iy -=1; 71 } else iy = (hy>>20)-1023; 86 if(iy >= -1022) 89 n = -1022-iy; 100 n = ix - iy; [all...] |
s_remquo.c | 39 int32_t n,hx,hy,hz,ix,iy,sx,i; local in function:remquo 73 /* determine iy = ilogb(y) */ 76 for (iy = -1043, i=ly; i>0; i<<=1) iy -=1; 78 for (iy = -1022,i=(hy<<11); i>0; i<<=1) iy -=1; 80 } else iy = (hy>>20)-1023; 95 if(iy >= -1022) 98 n = -1022-iy; 109 n = ix - iy; [all...] |
s_nextafterf.c | 27 int32_t hx,hy,ix,iy; local in function:nextafterf 32 iy = hy&0x7fffffff; /* |y| */ 35 (iy>0x7f800000)) /* y is nan */
|
s_nextafter.c | 37 int32_t hx,hy,ix,iy; local in function:__strong_alias 43 iy = hy&0x7fffffff; /* |y| */ 46 ((iy>=0x7ff00000)&&((iy-0x7ff00000)|ly)!=0)) /* y is nan */
|
k_sin.c | 18 /* __kernel_sin( x, y, iy) 22 * Input iy indicates whether y is 0. (if iy=0, y assume to be 0). 59 __kernel_sin(double x, double y, int iy) 70 if(iy==0) return x+v*(S1+z*r);
|
k_sinf.c | 34 __kernel_sinf(float x, float y, int iy) 45 if(iy==0) return x+v*(S1+z*r);
|
k_tandf.c | 38 __kernel_tandf(double x, int iy) 63 if(iy==1) return r;
|
e_fmodl.c | 80 int ix,iy,n,sx; local in function:__ieee754_fmodl 110 /* determine iy = ilogb(y) */ 113 iy = uy.extu_exp - (BIAS + 512); 115 iy = uy.extu_exp - BIAS; 125 n = ix - iy; 144 iy -= 1; 148 if (iy < LDBL_MIN_EXP) { 149 ux.extu_exp = iy + (BIAS + 512); 152 ux.extu_exp = iy + BIAS;
|
s_remquol.c | 84 int ix,iy,n,q,sx,sxy; local in function:remquol 121 /* determine iy = ilogb(y) */ 124 iy = uy.extu_exp - (BIAS + 512); 126 iy = uy.extu_exp - BIAS; 136 n = ix - iy; 155 iy -= 1; 159 if (iy < LDBL_MIN_EXP) { 160 ux.extu_exp = iy + (BIAS + 512); 163 ux.extu_exp = iy + BIAS;
|
k_tan.c | 79 __kernel_tan(double x, double y, int iy) 90 if(((ix | low) | (iy + 1)) == 0) 93 if (iy == 1) 135 v = (double) iy; 139 if (iy == 1)
|
k_tanf.c | 44 __kernel_tanf(float x, float y, int iy) 52 if((ix|(iy+1))==0) return one/fabsf(x); 53 else return (iy==1)? x: -one/x; 75 v = (float)iy; 78 if(iy==1) return w;
|
e_pow.c | 105 int32_t hx,hy,ix,iy; local in function:__ieee754_pow 110 ix = hx&0x7fffffff; iy = hy&0x7fffffff; 113 if((iy|ly)==0) return one; 120 iy > 0x7ff00000 || ((iy==0x7ff00000)&&(ly!=0))) 130 if(iy>=0x43400000) yisint = 2; /* even integer y */ 131 else if(iy>=0x3ff00000) { 132 k = (iy>>20)-0x3ff; /* exponent */ 137 j = iy>>(20-k); 138 if((j<<(20-k))==iy) yisint = 2-(j&1) [all...] |
/src/lib/libm/ld80/ |
k_sinl.c | 51 __kernel_sinl(long double x, long double y, int iy) 58 if(iy==0) return x+v*(S1+z*r);
|
k_tanl.c | 71 __kernel_tanl(long double x, long double y, int iy) { 76 iy = (iy == 1 ? -1 : 1); /* XXX recover original interface */ 101 v = (long double) iy; 105 if (iy == 1)
|