| bits = bits1 + boolvar ', ∀ bits0. # bits0 < # bits → true → bits0 = [] ∨ 2 ^ n→i(# bits0) = bits2uint(bitsinvert(bits0)) + bits2uint(bits0) + 1 ∨ bits0.first ⊦ bits = [], 2 ^ n→i(# bits) = bits2uint(bitsinvert(bits)) + bits2uint(bits1) * 2 + 1, boolvar, bits.first |
∀ bits0. # bits0 < #(bits1 + false ') → true → bits0 = [] ∨ 2 ^ n→i(# bits0) = bits2uint(bitsinvert(bits0)) + bits2uint(bits0) + 1 ∨ bits0.first ⊦ 2 ^ (n→i(# bits1) + 1) = 2 * ((bits2uint(bitsinvert(bits1)) + bits2uint(bits1)) + 1), (bits1 + false ').first
Used simplifier rules: bits2uint-one: ⊦ bits2uint(bits + true ') = bits2uint(bits) * 2 + 1;% ⊦ i + j = j + i;% ⊦ i + j + i0 = (i + j) + i0;% ⊦ i * j = j * i;% ⊦ i * j * j0 = (i * j) * j0;% ⊦ i * j + i = i * (j + 1);% ⊦ i * j + i * j0 = i * (j + j0);% ⊦ bitsinvert(false ') = true ';% ⊦ bitsinvert(bits + bits0) = bitsinvert(bits) + bitsinvert(bits0);% ⊦ m + n = n + m;% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ n→i(m + n) = n→i(m) + n→i(n);% ⊦ # boolvar ' = 0 +1;% ⊦ #(bits + bits0) = # bits + # bits0;% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ bits + boolvar ' ≠ [];