| uint2bits(bits2uint(true ' + bits)) = false ' + true ' + bits, 0 ≤ bits2uint(true ' + bits) ⊦ 2 ^ (n→i(# bits) + 1) = bits2uint(true ' + bits) + 1, false ∈ bits |
⊦ ¬ false ∈ bits ∧ bits ≠ [] → bits2uint(bits) = 2 ^ n→i(# bits) - 1
Used simplifier rules: uint2bits-2pot-02: 0 < i ⊦ uint2bits(2 ^ i - 1) = false ' + mklist(true, i→n(i));% ⊦ boolvar ' ≠ [];% ⊦ ¬ bits + bits0 ≠ [] ↔ bits = [] ∧ bits0 = [];%⊦ ¬ boolvar ∈ bits → (boolvar ∈ boolvar0 ' + bits ↔ boolvar ↔ boolvar0);% ⊦ i + j = j + i;% ⊦ #(bits + bits0) = # bits + # bits0;% ⊦ # boolvar ' = 0 +1;% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ n→i(m + n) = n→i(m) + n→i(n);% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ m + n = n + m;% ⊦ i + j + i0 = (i + j) + i0;% ⊦ 0 ≤ n→i(n);% ⊦ ~1 < i ↔ 0 ≤ i;% ⊦ (* j) < i0 + (* j0) ↔ j - j0 < i0;% ⊦ i→n(n→i(n) + 1) = n + 1;% ⊦ mklist(boolvar, m + n) = mklist(boolvar, m) + mklist(boolvar, n);% ⊦ ¬ false ∈ bits → mklist(true, # bits) = bits;% ⊦ mklist(boolvar, 1) = boolvar ';% ⊦ bits + bits0 = bits + bits1 ↔ bits0 = bits1;% ⊦ ¬ false ∈ bits → (bits + true ' = true ' + bits ↔ true);% ⊦ i + (j - i) = j;% ⊦ boolvar ' + bits ≠ []; Used terms: true ' + bits