Lines Matching defs:px
101 unsigned short *px=(unsigned short *) &x + 3;
103 unsigned short *px=(unsigned short *) &x;
109 if( (k= *px & mexp ) != ~msign ) {
116 if( (k= *px & mexp ) != mexp ) {
123 if( k < (mexp>>gap) ) *px = (*px&~mexp) | (k<<gap);
128 {*px=(*px&~mexp)|(short)(1<<gap); x *= scalb(1.0,k-1);}
153 unsigned short *px=(unsigned short *) &x+3,
156 unsigned short *px=(unsigned short *) &x,
161 if ( (*px & mexp) == 0 ) return(x);
164 *px = ( *px & msign ) | ( *py & ~msign );
187 short *px=(short *) &x+3, k;
189 short *px=(short *) &x, k;
193 return (int)(((*px&mexp)>>gap)-bias);
195 if( (k= *px & mexp ) != mexp )
205 {*px &= msign; return(x);}
252 *px=(unsigned short *) &x +3,
258 *px=(unsigned short *) &x ,
267 if( ( *px & mexp ) == ~msign ) /* is x a reserved operand? */
269 if( ( *px & mexp ) == mexp )
296 sign= *px & ~msign ;
297 *px &= msign ;
300 k=(*px & mexp) - (*pd & mexp) ;
318 *px ^= sign;
437 unsigned short xexp,yexp, *px =(unsigned short *) &x ,
442 xexp = px[n0] & mexp ; /* exponent of x */
444 sign = px[n0] &0x8000; /* sign of x */
465 px[n0] &= 0x7fff;
476 xexp=px[n0]&mexp; /* exponent of x */
490 px[n0] ^= sign;
532 *px=(unsigned long *) &x ;
551 if((mx=px[n0]&mexp)==mexp) return(x); /* sqrt(+INF) is +INF */
564 if(mx>0x5ff00000) {px[n0] -= 0x20000000; scalx+= 0x10000000;}
565 if(mx<0x1ff00000) {px[n0] += 0x20000000; scalx-= 0x10000000;}
568 py[n0]=(px[n0]>>1)+0x1ff80000;