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