__H0
__H0(a) = hx & is;
__H0(a) = hx & is;
__H0(a) = sx | (x0 - iu) | ((iy + 16383) << 16);
__H0(a) = x0 | sx;
hx = __H0(x);
y0 = __H0(y);
__H0(a) = hx & is;
__H0(a) = hx & is;
__H0(a) = sx | (x0 - iu) | ((iy + 16383) << 16);
__H0(a) = x0 | sx;
hx = __H0(x); /* high word of x */
hy = __H0(y); /* high word of y */
hx = __H0(x);
y0 = __H0(y);