| 1 < # bits0 ∧ 1 < #(false ' + true '), bitsxor(bits0 + bits, (false ' + true ') + mklist(false, i→n(j))) = (bitsxor(bits0.butlast, (false ' + true ').butlast) + (¬(bits0.last ↔ (false ' + true ').last))) + bitsxor(bits, mklist(false, i→n(j))), int2bits(i) = bits0 + bits, # bits = i→n(j), 2 ^ j * 2 < i, 0 ≤ i, 0 ≤ j ⊦ (bitsxor(bits0.butlast, (false ' + true ').butlast) + (¬(bits0.last ↔ (false ' + true ').last))) + bitsxor(bits, mklist(false, i→n(j))) = [], bits0 = [], bits = [], ( sgn((bitsxor(bits0.butlast, (false ' + true ').butlast) + (¬(bits0.last ↔ (false ' + true ').last))) + bitsxor(bits, mklist(false, i→n(j)))) [# bits0 - 1 ] ↔ ¬ bits0.last) ∧ sgn((bitsxor(bits0.butlast, (false ' + true ').butlast) + (¬(bits0.last ↔ (false ' + true ').last))) + bitsxor(bits, mklist(false, i→n(j)))) [# bits0 - 1, bits0.last ] = bits0 + bits |
int2bits(i) = bits0 + bits, # bits = i→n(j), bitsxor(bits0 + bits, (false ' + true ') + mklist(false, i→n(j))) = (bitsxor(bits0.butlast, false ') + (¬ bits0.last)') + bitsxor(bits, mklist(false, i→n(j))), 2 ^ j * 2 < i, 0 ≤ i, 0 ≤ j ⊦ bits0 = [], bits = [], # bits0 = 1, (sgn(bitsxor(bits0 + bits, (false ' + true ') + mklist(false, i→n(j))))[# bits0 - 1] ↔ ¬ bits0.last) ∧ sgn(bitsxor(bits0 + bits, (false ' + true ') + mklist(false, i→n(j))))[# bits0 - 1, bits0.last] = bits0 + bits
Used simplifier rules: ⊦ # boolvar ' = 0 +1;% ⊦ #(bits + bits0) = # bits + # bits0;% ⊦ # bits = 0 ↔ bits = [];% ⊦ 1 < m ↔ ¬(m = 0 ∨ m = 1);% ⊦ bits + boolvar ' + bits0 ≠ [];% ⊦ bits + boolvar = bits + boolvar ';% ⊦ (bits + boolvar ').last ↔ boolvar;% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ (bits + boolvar ').butlast = bits;