| ¬(# uint2bits(~(j % 2 ^ i)) ≤ i→n(i) + 1 ∧ uint2bits(~(j % 2 ^ i)) ≠ []), 0 ≤ i, j < 0, j + 2 ^ i < i, j + 2 ^ i ≤ 0, 0 < i, # uint2bits(~(j % 2 ^ i)) ≤ i→n(i) ⊦ j % 2 ^ i = 0, sgn(bitsinvert(uint2bits(~(j / 2 ^ i))) +1 + fillsgn(i→n(i) + 1, uint2bits(~(j % 2 ^ i))).rest) = int2bits(j / 2 ^ i - 1) + fillsgn(i→n(i) + 1, int2bits(j % 2 ^ i)).rest, true ∈ fillsgn(i→n(i) + 1, uint2bits(~(j % 2 ^ i))).rest |
uint2bits(~(j % 2 ^ i)) = [], 0 < i, j + 2 ^ i ≤ 0, j + 2 ^ i < i, j < 0, 0 ≤ i ⊦ j % 2 ^ i = 0, sgn(bitsinvert(uint2bits(~(j / 2 ^ i))) +1 + mklist(false, i→n(i))) = int2bits(j / 2 ^ i - 1) + fillsgn(i→n(i) + 1, int2bits(j % 2 ^ i)).rest
Used simplifier rules: ⊦ ¬ true ∈ mklist(false, n);% ⊦ 0 ≤ m;% ⊦ # [] = 0;% ⊦ (boolvar ' + bits).rest = bits;% ⊦ mklist(boolvar, n) + boolvar ' = boolvar ' + mklist(boolvar, n);% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ bits + [] = bits;% ⊦ mklist(boolvar, 0) = [];%n ≠ 0 ⊦ mklist(false, (* n)) = false ' + mklist(false, n -1);% ⊦ mklist(boolvar, m + n) = mklist(boolvar, m) + mklist(boolvar, n);% ⊦ fillsgn(n, []) = mklist(false, n);% ⊦ ¬ m < n ↔ n ≤ m;% ⊦ m + n = n + m;% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ ¬ m + n < m;% ⊦ # bits = 0 ↔ bits = [];% ⊦ m < n → n ≠ 0; (forward)% ⊦ m < n ∧ n ≤ n0 → m < n0; (forward)% ⊦ ¬ m ≤ n ↔ n < m;