| 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))), bits1.first ↔ ¬ (bits1.rest + (¬ boolvar)').first, 2 ^ j * 2 < i, 0 ≤ i, 0 ≤ j ⊦ bits = [], bits1 = [], (bits1 + boolvar ') + bitsxor(bits, mklist(false, i→n(j))) = int2bits(i) |
⊦ n ≤ # bits ∧ bits ≠ [] ∧ n ≠ 0 → bitsxor(bits, mklist(false, n)) = bits
Used simplifier rules: ⊦ ¬ m ≤ n ↔ n < m;% ⊦ i→n(i) = 0 ↔ i = 0;% ⊦ m < n ∧ m = n0 → n0 < n; (forward)% ⊦ m < n ∧ n = n0 → m < n0; (forward)% ⊦ m < n → n ≠ 0; (forward)% ⊦ i→n(i) < i→n(j) ↔ abs(i) < abs(j);% ⊦ 0 ≤ i → abs(i) = i;% ⊦ ¬ i < i;% ⊦ mklist(boolvar, 0) = [];% ⊦ bits + [] = bits;% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ # bits = 0 ↔ bits = []; Used terms: i→n(j), bits