HIWORD
#define HIQNAN(X) ((HIWORD(X)) = 0x7ff80000)
#define __HI(x) ((unsigned *)&x)[HIWORD]
iy = ((int *)&y)[HIWORD];
hx = ((int *)&x)[HIWORD];
i = j - ((((int *)y)[HIWORD] >> 20) & 0x7ff);
i = j - ((((int *)y)[HIWORD] >> 20) & 0x7ff);
hx = ((int *)&x)[HIWORD];
hx = ((int *)&x)[HIWORD];
hx = ((int *)&x)[HIWORD];
hx = ((int *) &x)[HIWORD];
((int *) &t)[HIWORD] = j;
hx = ((int *) &x)[HIWORD];
hx = ((int *) &x)[HIWORD];
hx = ((int *) &x)[HIWORD];
hx = ((int *) &x)[HIWORD];
hx = ((int *) &x)[HIWORD];
hy = ((int *)&oy)[HIWORD];
hx = ((int *)&ox)[HIWORD];
hy = ((int *)&y)[HIWORD];
hx = ((int *)&x)[HIWORD];
ix = ((int *)&x)[HIWORD];
iy = ((int *)&y)[HIWORD];
hx = xx.i[HIWORD] & ~0x80000000;
sx = xx.i[HIWORD] & 0x80000000;
hx = xx.i[HIWORD] & ~0x80000000;
xx.i[HIWORD] = 0x3ff00000 + hx;
yy.i[HIWORD] = sx | (j + offset);
hx = ((int *)&x)[HIWORD];
hx = ((int *) &x)[HIWORD];
hy = ((int *) &y)[HIWORD];
hx = ((int *)&x)[HIWORD];
hx = ((int *) &x)[HIWORD];
hx = ((int *) &x)[HIWORD];
ix = ((int *)&x)[HIWORD];
((int *)&y)[HIWORD] += (m + 54) << 20;
((int *)&y)[HIWORD] += m << 20;
ix = ((int *)&x)[HIWORD];
ix = ((int *)&x)[HIWORD];
hx = ((unsigned *) &x)[HIWORD]; /* high word of x */
((int *) &y)[HIWORD] += k << 20;
((int *) &t)[HIWORD] = 0x3ff00000 - (0x200000 >> k);
((int *) &y)[HIWORD] += k << 20;
((int *) &t)[HIWORD] = (0x3ff - k) << 20; /* 2^-k */
((int *) &y)[HIWORD] += k << 20;
px[HIWORD] &= ~0x80000000;
hx = ((int *)&x)[HIWORD];
if (((int *) &ax)[HIWORD] == 0x7ff00000)
ix = ((int *) &ax)[HIWORD];
iy = ((int *) &ay)[HIWORD];
((int *) &xh)[HIWORD] = ix;
((int *) &xh)[HIWORD] = ix + 0x00100000;
((int *) &yh)[HIWORD] = iy;
if (((int *) &ax)[HIWORD] == 0x7ff00000)
ix = ((int *) &x)[HIWORD] & ~0x80000000;
iy = ((int *) &y)[HIWORD] & ~0x80000000;
int *px = (int *) &x, k = px[HIWORD] & ~0x80000000;
return (((px[HIWORD] & 0x7ff00000) >> 20) - 1075);
hx = ((int *)&x)[HIWORD];
ix = ((int *)&x)[HIWORD];
((int *)&x)[HIWORD] = i;
hx = ((int *)&x)[HIWORD];
ix = ((int *)&x)[HIWORD];
((int *)&x)[HIWORD] = i;
hx = ((int *)&x)[HIWORD]; /* high word of x */
hu = ((int *)&u)[HIWORD]; /* high word of u */
hu = ((int *)&u)[HIWORD]; /* high word of u */
((int *)&u)[HIWORD] = hu | 0x3ff00000;
((int *)&u)[HIWORD] = hu | 0x3fe00000;
hx = ((int *) &x)[HIWORD]; ix = hx & 0x7fffffff;
hx = ((int *) &x)[HIWORD]; ix = hx & 0x7fffffff;
((int *) &x)[HIWORD] = i;
int *px = (int *) &x, k = px[HIWORD] & ~0x80000000;
return ((double) (((px[HIWORD] & 0x7ff00000) >> 20)
hx = ((int *)&x)[HIWORD];
hy = ((int *)&y)[HIWORD];
((int *)&ans)[HIWORD] = k;
((int *)&ans)[HIWORD] = k;
((int *)&ans)[HIWORD] = k;
((int *)&ans)[HIWORD] = k;
((int *)&ans)[HIWORD] = k;
ix = px[HIWORD];
ix = px[HIWORD];
px[HIWORD] = ix;
pz[HIWORD] = i & 0xffffe000;
hx = ((int *) &x)[HIWORD];
hy = ((int *) &y)[HIWORD];
j = pz[HIWORD];
pz[HIWORD] += k << 20;
ix = ((int *)&x)[HIWORD];
hp = ((int *)&p)[HIWORD] & ~0x80000000;
ix = ((int *)&x)[HIWORD];
in = ((int *)&fn)[HIWORD];
px[HIWORD] = (ix & ~0x7ff00000) | (k << 20);
px[HIWORD] = (ix & ~0x7ff00000) | (k << 20);
unsigned v = px[HIWORD] & ~0x80000000, w = px[LOWORD], t = v;
px[HIWORD] = (px[HIWORD] & 0x80000000) | v;
ix = px[HIWORD];
ix = px[HIWORD];
ix = px[HIWORD];
int ix = ((int *) &x)[HIWORD] & ~0x80000000;
hx = ((int *)&x)[HIWORD];
hx = ((int *)&x)[HIWORD];
((int *)&z)[HIWORD] = ix;
int hx = ((int *)&x)[HIWORD];
ix = ((int *) &x)[HIWORD];
u.l[HIWORD] = 0x42300000;
u.l[HIWORD] = 0x40300000;
u.l[HIWORD] = 0x3e300000;
u.l[HIWORD] |= w[0] & 0xff;
u.l[HIWORD] = 0x3c300000;
u.l[HIWORD] |= w[1] & 0xffff;
u.l[HIWORD] = 0x3c300000;
hx = ((int *) &x)[HIWORD]; /* hx = leading x */
hx = ((int *) &x)[HIWORD]; /* hx = leading x */
hx = ((int *) &x)[HIWORD]; /* hx = leading x */
ix = ((int *) &x)[HIWORD] & ~0x80000000; /* ix = leading |x| */
hy = ((int *)&y)[HIWORD];
((int *)&w)[HIWORD] = (hy & 0xfffff) | 0x41600000;
i = px[HIWORD] + 0x4000;
pz[HIWORD] = i & 0xffff8000;
i = pz[HIWORD];
px[HIWORD] += m << 20;
hy = ((int *)&y)[HIWORD];
((int *)&w)[HIWORD] = (hy & 0xfffff) | 0x41600000;
hy = ((int *)&y)[HIWORD];
((int *)&w)[HIWORD] = (hy & 0xfffff) | 0x41600000;
hy = ((int *)&y)[HIWORD] & ~0x80000000;
hy = ((int *)&y)[HIWORD];
((int *)&w)[HIWORD] = (hy & 0xfffff) | 0x41600000;
hy = ((int *)&y)[HIWORD] & ~0x80000000;
ix = ((int *)&ax)[HIWORD];
iy = ((int *)&ay)[HIWORD];
((int *)&xh)[HIWORD] = ix;
((int *)&xh)[HIWORD] = ix + 0x00100000;
((int *)&yh)[HIWORD] = iy;
ix = ((int *)&x)[HIWORD] & ~0x80000000;
iy = ((int *)&y)[HIWORD] & ~0x80000000;
ix = ((int *)&(D_RE(z)))[HIWORD];
iy = ((int *)&(D_IM(z)))[HIWORD];
#define HI_WORD(x) ((int *) &x)[HIWORD] /* for double */
hx = ((int *) &x)[HIWORD];
hy = ((int *) &y)[HIWORD];
hu = ((int *) &u)[HIWORD];
hv = ((int *) &v)[HIWORD];
hx = ((int *) &w1)[HIWORD];
ix = ((int *) &x)[HIWORD];
((int *) &x)[HIWORD] = ix;
((int *) &y)[HIWORD] = iy;
hy = ((int *) &y)[HIWORD];
hx = ((int *) &x)[HIWORD];
((int *)&zk)[HIWORD] = 0x3ff00000 + (K << 13);
ix = (((int *)&x)[HIWORD]) & ~0x80000000;
iy = (((int *)&y)[HIWORD]) & ~0x80000000;
((int *)&wh)[HIWORD] = iy;
ix = ((int *)&x)[HIWORD];
iy = ((int *)&y)[HIWORD];
iy = ((int *)&y)[HIWORD];
((int *)&x)[HIWORD] = i;
((int *)&zk)[HIWORD] = i & 0xffffe000;
((int *)&x)[HIWORD] = ix; ((int *)&y)[HIWORD] = iy;
((int *)&wh)[HIWORD] = ix + (j >> 5);
((int *)&wh)[HIWORD] = iy + (j >> 5);
iz = ((int *)&z)[HIWORD] + 0x1000;
((int *)&zk)[HIWORD] = iz & 0xffffe000;
((int *)&dzk)[HIWORD] = 0x3ff00000 + (K << 13);
hx = xx.i[HIWORD] & ~0x80000000;
yy.i[HIWORD] = 0x43300000 | hx;
yy.i[HIWORD] = 0x43300000;
xx.d = ((int)xx.i[HIWORD] < 0)? -t : t;
hx = xx.i[HIWORD] & ~0x80000000;
xx.i[HIWORD] = (xx.i[HIWORD] & ~0x7ff00000) | 0x3fe00000;
int *px = (int *) &x, ix = px[HIWORD] & ~0x80000000;
ix = px[HIWORD] & ~0x80000000;
hx = xx.i[HIWORD] & ~0x80000000;
yy.i[HIWORD] = (xx.i[HIWORD] & 0x80000000) | 0x43300000;
yy.i[HIWORD] = (xx.i[HIWORD] & 0x80000000) | 0x43e00000;
hx = xx.i[HIWORD] & ~0x80000000;
sx = xx.i[HIWORD] & 0x80000000;
xx.i[HIWORD] = (xx.i[HIWORD] + i) & ~(i | (i - 1));
xx.i[HIWORD]++;
hx = xx.i[HIWORD] & ~0x80000000;
yy.i[HIWORD] = (xx.i[HIWORD] & 0x80000000) | 0x43300000;
yy.i[HIWORD] = (xx.i[HIWORD] & 0x80000000) | 0x43e00000;
hx = xx.i[HIWORD] & ~0x80000000;
sx = xx.i[HIWORD] & 0x80000000;
xx.i[HIWORD] = (xx.i[HIWORD] + i) & ~(i | (i - 1));
xx.i[HIWORD]++;
hx = xx.i[HIWORD] & ~0x80000000;
xx.i[HIWORD] &= 0x80000000;
xx.i[HIWORD] &= 0x80000000;
s = xx.i[HIWORD] & 0x80000000;
yy.i[HIWORD] = xx.i[HIWORD] & ~((1 << (0x413 - (hx >> 20))) -
yy.i[HIWORD] = xx.i[HIWORD];
xx.i[HIWORD] = (xx.i[HIWORD] & ~0x80000000) | s;
(xx.i[HIWORD] & i)))))
xx.i[HIWORD] += i;
xx.i[HIWORD]++;
sx = xx.i[HIWORD] & 0x80000000;
hx = xx.i[HIWORD] & ~0x80000000;
xx.i[HIWORD] = sx | 0x3ff00000;
xx.i[HIWORD] = sx;
frac = ((xx.i[HIWORD] << 1) << (63 - j)) |
xx.i[HIWORD] &= ~(i - 1);
#define __HI(x) ((int *) &x)[HIWORD]
hx = xx.i[HIWORD] & ~0x80000000;
sx = xx.i[HIWORD] & 0x80000000;
xx.i[HIWORD] = (xx.i[HIWORD] + i) & ~(i | (i - 1));
xx.i[HIWORD]++;
px[HIWORD] = (px[HIWORD] & ~0x7ff00000) | (k << 20);
px[HIWORD] = (px[HIWORD] & ~0x7ff00000) | (k << 20);
unsigned v = px[HIWORD] & ~0x80000000, w = px[LOWORD], t = v;
px[HIWORD] = (px[HIWORD] & 0x80000000) | v;
ix = px[HIWORD] & ~0x80000000;
return ((px[HIWORD] & 0x80000) != 0 ? x : x + x);
k = ((px[HIWORD] & ~0x80000000) >> 20) - 52;
#define __HI(x) ((int *) &x)[HIWORD]
#define __HI(x) ((int *) &x)[HIWORD]
hx = xx.i[HIWORD] & ~0x80000000;
sx = xx.i[HIWORD] & 0x80000000;
xx.i[HIWORD] &= ~(i | (i - 1));
z##N.i[HIWORD] -= e; \
w##N.i[HIWORD] = i##N - e; \
i##N = z##N.i[HIWORD]; \
z0.i[HIWORD] -= e;
w0.i[HIWORD] = i0 - e;
z1.i[HIWORD] -= e;
w1.i[HIWORD] = i1 - e;
z2.i[HIWORD] -= e;
w2.i[HIWORD] = i2 - e;
z3.i[HIWORD] -= e;
w3.i[HIWORD] = i3 - e;
s.i[HIWORD] = (0x3ff + eqnqm1) << 20;