| i = bits2uint(lastn(m, int2bits(i))) + 2 ^ n→i(m) * bits2uint(bits), int2bits(i) = bits + lastn(m, int2bits(i)), # bits = # int2bits(i) - m, 0 < i, lastn(m, int2bits(i)).first, m ≤ # int2bits(i) ⊦ m = 0, i % 2 ^ n→i(m) = bits2int(lastn(m, int2bits(i))) + 2 ^ n→i(m), bits = [], bits.first |
bits = boolvar + bits0, i = bits2uint(lastn(m, int2bits(i))) + 2 ^ n→i(m) * bits2uint(bits), int2bits(i) = bits + lastn(m, int2bits(i)), # bits = # int2bits(i) - m, 0 < i, lastn(m, int2bits(i)).first, m ≤ # int2bits(i) ⊦ m = 0, i % 2 ^ n→i(m) = bits2int(lastn(m, int2bits(i))) + 2 ^ n→i(m), bits = [], boolvar
Used simplifier rules: bits ≠ [] ⊦ (boolvar ↔ bits.first) ∧ bits0 = bits.rest ↔ bits = boolvar + bits0; (elim) Used terms: bits, boolvar, bits0