_XMUL
_XMUL(ax, 0, invpihi, invpilo, hi, lo);
_XMUL(ax, 0, invpihi, invpilo, hi, lo);
_XMUL(ax, 0, xh, xl, hi, lo);
_XMUL(xh, xl, zh, zl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(xh, xl, zh, zl, hi, lo);
_XMUL(ax, 0, invpihi, invpilo, hi, lo);
_XMUL(ax, 0, invpihi, invpilo, hi, lo);
_XMUL(ax, 0, xh, xl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(ax, 0, invpihi, invpilo, hi, lo);
_XMUL(ax, 0, invpihi, invpilo, hi, lo);
_XMUL(ax, 0, xh, xl, hi, lo);
_XMUL(xh, xl, zh, zl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(xh, xl, zh, zl, hi, lo);
_XMUL(ax, 0, invpihi, invpilo, hi, lo);
_XMUL(ax, 0, invpihi, invpilo, hi, lo);
_XMUL(ax, 0, xh, xl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(yh, yl, yh, yl, ph, pl); \
_XMUL(ax, 0, invpihi, invpilo, hi, lo);
_XMUL(ax, 0, invpihi, invpilo, hi, lo);
_XMUL(ax, 0, xh, xl, hi, lo);
_XMUL(xh, xl, zh, zl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(xh, xl, zh, zl, hi, lo);
_XMUL(xh, xl, zh, zl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(xh, xl, zh, zl, hi, lo);
_XMUL(ax, 0, invpihi, invpilo, hi, lo);
_XMUL(ax, 0, invpihi, invpilo, hi, lo);
_XMUL(ax, 0, xh, xl, hi, lo);
_XMUL(ax, 0, invpihi, invpilo, hi, lo);
_XMUL(ax, 0, invpihi, invpilo, hi, lo);
_XMUL(ax, 0, xh, xl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(ax, 0, invpihi, invpilo, hi, lo);
_XMUL(ax, 0, xh, xl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(x, 0, xh, xl, hi, lo);
_XMUL(ax, 0, invpihi, invpilo, hi, lo);
_XMUL(zh, zl, h, 0, ph, pl);
_XMUL(zh, zl, h, 0, ph, pl);
_XMUL(zh, zl, h, 0, ph, pl);
_XMUL(zh, zl, h, 0, ph, pl);
_XMUL(zh, zl, h, 0, ph, pl);
_XMUL(zh, zl, h, 0, ph, pl);
_XMUL(zh, zl, -h, 0, ph, pl);