172   ULong xi, z;  local
191     z = (xi >> 16) * m + (y >> 16);
192     carry = z >> 16;
193     *x++ = (z << 16) + (y & 0xffff);
285   ULLong carry, z;  local
287   ULong carry, z;  local
321         z = *x++ * (ULLong)y + *xc + carry;
322         carry = z >> 32;
324         *xc++ = (uint32_t)(z & 0xffffffffUL);
339         z = (*x & 0xffff) * y + (*xc & 0xffff) + carry;
340         carry = z >> 16;
343         Storeinc(xc, z2, z);
354         z = (*x & 0xffff) * y + (*xc >> 16) + carry;
355         carry = z >> 16;
356         Storeinc(xc, z, z2);
371         z = *x++ * y + *xc + carry;
372         carry = z >> 16;
373         *xc++ = z & 0xffff;
467   ULong *x, *x1, *xe, z;  local
485     z = 0;
487       *x1++ = *x << k | z;
488       z = *x++ >> k1;
491     if ((*x1 = z) !=0)
495     z = 0;
497       *x1++ = *x << k  & 0xffff | z;
498       z = *x++ >> k1;
501     if (*x1 = z)
563   ULong z;  local
615     z = (*xa++ >> 16) - (*xb++ >> 16) - borrow;
616     borrow = (z & 0x10000) >> 16;
617     Storeinc(xc, z, y);
623     z = (*xa++ >> 16) - borrow;
624     borrow = (z & 0x10000) >> 16;
625     Storeinc(xc, z, y);
655   ULong *xa, *xa0, w, y, z;  local
680   z = xa > xa0 ? *--xa : 0;
682     d0 = (UINT32)(Exp_1 | y << k | z >> (32 - k));
684     d1 = (UINT32)(z << k | y >> (32 - k));
688     d1 = (UINT32)z;
692     z = xa > xa0 ? *--xa : 0;
693     d0 = Exp_1 | y << k - Ebits | z >> Ebits + 16 - k;
696     d1 = z << k + 16 - Ebits | w << k - Ebits | y >> 16 + Ebits - k;
699   z = xa > xa0 ? *--xa : 0;
702   d0 = Exp_1 | y << k + 16 | z << k | w >> 16 - k;
729   ULong *x, y, z;  local
748   z = d0 & Frac_mask;
753   z |= Exp_msk11;
757     z |= Exp_msk1;
762       x[0] = y | z << (32 - k);
763       z >>= k;
770          b->wds = (x[1] = z) !=0 ? 2 : 1;
774     if (!z)
777     k = lo0bits(&z);
778     x[0] = z;
789         x[0] = y | z << 32 - k & 0xffff;
790         x[1] = z >> k - 16 & 0xffff;
791         x[2] = z >> k;
796         x[1] = y >> 16 | z << 16 - k & 0xffff;
797         x[2] = z >> k & 0xffff;
798         x[3] = z >> k+16;
804       x[2] = z & 0xffff;
805       x[3] = z >> 16;
811     if (!z)
814     k = lo0bits(&z);
816       x[0] = z;
820       x[0] = z & 0xffff;
821       x[1] = z >> 16;