| # int2bits(i) = m + 1, mklist(i < 0, i→n(j)) + int2bits(i) = true ' + bits, j < 32, 0 ≤ j ⊦ ~ bits2uint(bitsinvert(true + sublist(0, m, bits)) +1) < 0 ↔ ¬ 0 < i, mklist(¬ 0 < i, i→n(j)) + int2bits(i) = [], i = 0 |
# int2bits(i) = m + 1, mklist(i < 0, i→n(j)) + int2bits(i) = true ' + bits, j < 32, 0 ≤ j ⊦ mklist(¬ 0 < i, i→n(j)) + int2bits(i) = [], i = 0, 0 < bits2uint((false ' + bitsinvert(sublist(0, m, bits)))+1) ↔ ¬ 0 < i
Used simplifier rules: ⊦ ~ i < 0 ↔ 0 < i;% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ bitsinvert(true ' + bits) = false + bitsinvert(bits);% ⊦ boolvar + bits = boolvar ' + bits;