14  *	nexttoward(x,y)
16  *	direction toward y.
23 nexttoward(__float64 x, long double y)  in nexttoward()  argument
29 	GET_LDOUBLE_WORDS(esy,hy,ly,y);  in nexttoward()
31 	iy = esy&0x7fff;		/* |y| */  in nexttoward()
35 	   ((iy>=0x7fff)&&(hy|ly)!=0))		/* y is nan */  in nexttoward()
36 	   return (long double)x+y;  in nexttoward()
37 	if((long double) x==y) return y;	/* x=y, return y */  in nexttoward()
44 	    if ((long double) x > y) {	        /* x > y, x -= ulp */  in nexttoward()
47 	    } else {				/* x < y, x += ulp */  in nexttoward()
52 	    if ((long double) x < y) {          /* x < y, x -= ulp */  in nexttoward()
55 	    } else {				/* x > y, x += ulp */  in nexttoward()