if(hy>=0x7ff00000) return x+x;
if(hy>=0x7ff00000) { x = x+x;	  asm ("" : "=m"(x) : "m"(x)); return x; }
	double __nexttoward(double x, long double y)#else	double __nexttoward(x,y)	double x;	long double y;#endif{	int32_t hx,ix,iy;	u_int32_t lx,hy,ly,esy;	EXTRACT_WORDS(hx,lx,x);	GET_LDOUBLE_WORDS(esy,hy,ly,y);	ix = hx&0x7fffffff;		/* |x| */	iy = esy&0x7fff;		/* |y| */	/* Intel's extended format has the normally implicit 1 explicit	   present.  Sigh!  */	if(((ix>=0x7ff00000)&&((ix-0x7ff00000)|lx)!=0) ||   /* x is nan */	   ((iy>=0x7fff)&&((hy&0x7fffffff)|ly)!=0))        /* y is nan */	   return x+y;	if((long double) x==y) return y;	/* x=y, return y */	if((ix|lx)==0) {			/* x == 0 */	    double x2;	    INSERT_WORDS(x,(esy&0x8000)<<16,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>>20)&0x7ff)>iy-0x3c00		|| (((ix>>20)&0x7ff)==iy-0x3c00		    && (((hx<<11)|(lx>>21))>(hy&0x7fffffff)			|| (((hx<<11)|(lx>>21))==(hy&0x7fffffff)			    && (lx<<11)>ly)))) {	/* x > y, x -= ulp */		if(lx==0) hx -= 1;		lx -= 1;	    } else {				/* x < y, x += ulp */		lx += 1;		if(lx==0) hx += 1;	    }	} else {				/* x < 0 */	    if (esy<0x8000||((ix>>20)&0x7ff)>iy-0x3c00		|| (((ix>>20)&0x7ff)==iy-0x3c00		    && (((hx<<11)|(lx>>21))>(hy&0x7fffffff)			|| (((hx<<11)|(lx>>21))==(hy&0x7fffffff)			    && (lx<<11)>ly))))	{/* x < y, x -= ulp */		if(lx==0) hx -= 1;		lx -= 1;	    } else {				/* x > y, x += ulp */		lx += 1;		if(lx==0) hx += 1;	    }	}	hy = hx&0x7ff00000;	if(hy>=0x7ff00000) return x+x;	/* overflow  */	if(hy<0x00100000) {		/* underflow */	    double x2 = x*x;	    if(x2!=x) {		/* raise underflow flag */	        INSERT_WORDS(x2,hx,lx);		return x2;	    }	}	INSERT_WORDS(x,hx,lx);	return x;}