ULbits
i = ULbits;
i = ((s5 ? hi0bits(S->x[S->wds-1]) : ULbits - 1) - s2 - 4) & kmask;
*bbits = i*ULbits + 32 - hi0bits(b->x[i]);
b->x[j] = ULbits >> (ULbits - (nbits & kmask));
if (n == ULbits) {
n = ULbits*n - hi0bits(L);
n = ULbits - k;
n += ULbits;
if ( (i = nbits & (ULbits-1)) !=0)
*xe &= ((ULong)0xffffffff) >> (ULbits - i);
j = ULbits - i;
k = ka - kb + ULbits*(a->wds - b->wds);
x[-1] >>= ULbits - n;
j = ULbits - j;
for(i = 0, j = nbits; j >= ULbits;
i++, j -= ULbits) {
j = kmask & (ULbits - (rvbits & kmask));