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