M_BITS
if (i == M_BITS)
flot = NZ | (i << M_BITS) | (cr & M_MASK);
else if (i < M_BITS)
flot = NZ | (i << M_BITS) | ((cr << (M_BITS - i)) & M_MASK);
flot = NZ | (i << M_BITS) | ((cr >> (i - M_BITS)) & M_MASK);
exp = (rate >> M_BITS) & E_MASK;
cps = (1 << M_BITS) | mantissa;
if (exp == M_BITS)
else if (exp > M_BITS)
cps <<= (exp - M_BITS);
cps >>= (M_BITS - exp);