| m < #(mklist(false, i→n(i0)) + int2bits(i / 2)), # int2bits(i / 2) = m + 1, 0 < i, 1 < i, 0 ≤ i0, 0 ≤ i, i0 < 31 ⊦ bits2uint(sublist(0, m, mklist(false, i→n(i0)) + int2bits(i / 2)) + (mklist(false, i→n(i0)) + int2bits(i / 2) + (i % 2 = 1)')[m] ') = bits2int(sublist(0, m, mklist(false, i→n(i0)) + int2bits(i / 2)) + (mklist(false, i→n(i0)) + int2bits(i / 2))[m]) |
# int2bits(i / 2) = m + 1, 0 < i, 1 < i, 0 ≤ i0, 0 ≤ i, i0 < 31 ⊦ bits2uint(sublist(0, m, mklist(false, i→n(i0)) + int2bits(i / 2)) + (mklist(false, i→n(i0)) + int2bits(i / 2))[m] ') = bits2int(sublist(0, m, mklist(false, i→n(i0)) + int2bits(i / 2)) + (mklist(false, i→n(i0)) + int2bits(i / 2))[m] ')
Used simplifier rules: ⊦ m ≤ m + n;% ⊦ m + n ≤ m + n0 ↔ n ≤ n0;% ⊦ ¬ m + n < m;% ⊦ m < n + 1 ↔ ¬ n < m;% ⊦ m + 1 ≠ 0;% ⊦ m < n → n ≠ 0; (forward)% ⊦ m + n = n + m;% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ m = n + 1 ∧ n < n0 → m ≤ n0; (forward)% ⊦ # mklist(boolvar, n) = n;% ⊦ #(bits + bits0) = # bits + # bits0;% ⊦ bits + boolvar = bits + boolvar ';% ⊦ (bits + bits0) + bits1 = bits + bits0 + bits1;% ⊦ n < # bits → ((bits + boolvar ')[n] ↔ bits[n]);