SET_FLOAT_WORD(x,(esy&0x8000?0x80000000:0)|1);
SET_FLOAT_WORD(x,((esy&0x8000)<<16)|1);
	float __nexttowardf(float x, long double y)#else	float __nexttowardf(x,y)	float x;	long double y;#endif{	int32_t hx,ix,iy;	u_int32_t hy,ly,esy;	GET_FLOAT_WORD(hx,x);	GET_LDOUBLE_WORDS(esy,hy,ly,y);	ix = hx&0x7fffffff;		/* |x| */	iy = esy&0x7fff;		/* |y| */	if((ix>0x7f800000) ||   /* x is nan */	   (iy>=0x7fff&&((hy|ly)|-(hy|ly))!=0))     /* y is nan */	   return x+y;	if((long double) x==y) return y;	/* x=y, return y */	if(ix==0) {				/* x == 0 */	    float x2;	    SET_FLOAT_WORD(x,(esy&0x8000?0x80000000:0)|1);/* return +-minsub*/	    x2 = x*x;	    if(x2==x) return x2; else return x;	/* raise underflow flag */	}	if(hx>=0) {				/* x > 0 */	    if(esy>=0x8000||((ix>>23)&0xff)>iy-0x3f80	       || (((ix>>23)&0xff)==iy-0x3f80		   && ((ix&0x7fffff)<<8)>(hy&0x7fffffff))) {/* x > y, x -= ulp */		hx -= 1;	    } else {				/* x < y, x += ulp */		hx += 1;	    }	} else {				/* x < 0 */	    if(esy<0x8000||((ix>>23)&0xff)>iy-0x3f80	       || (((ix>>23)&0xff)==iy-0x3f80		   && ((ix&0x7fffff)<<8)>(hy&0x7fffffff))) {/* x < y, x -= ulp */		hx -= 1;	    } else {				/* x > y, x += ulp */		hx += 1;	    }	}	hy = hx&0x7f800000;	if(hy>=0x7f800000) return x+x;	/* overflow  */	if(hy<0x00800000) {		/* underflow */	    float x2 = x*x;	    if(x2!=x) {		/* raise underflow flag */	        SET_FLOAT_WORD(x2,hx);		return x2;	    }	}	SET_FLOAT_WORD(x,hx);	return x;}