| # int2bits(j % 2 ^ (i * 8)) = (i→n(i) - 1) * 8 + n, 8 < (i→n(i) - 1) * 8 + n, n < 8 + (i→n(i) - 1) * 8, n < (i→n(i) - 1) * 8 + 7, 2 ^ (i * 8) ≤ j, 0 ≤ j % 2 ^ (i * 8), n < 8, 0 < i, 0 ≤ bytes2int(i2b(bits2int(firstn(n, int2bits(j % 2 ^ (i * 8))))) ' + bits2bytes(restn(n, int2bits(j % 2 ^ (i * 8))))) ⊦ n = 0, i→n(i) - 1 = 0, mklist(false, 8 - n) + int2bits(j % 2 ^ (i * 8)) = [], 1 + 8 * i→n(i) = (i→n(i) - 1) * 8 + n, (i→n(i) - 1) * 8 + n = 8 * i→n(i), i = 0, (i→n(i) - 1) * 8 = 1, i2b(bits2int(firstn(8, mklist(false, 8 - n) + int2bits(j % 2 ^ (i * 8))))) = i2b(bits2int(firstn(n, int2bits(j % 2 ^ (i * 8))))), bits2int(firstn(8, mklist(false, 8 - n) + int2bits(j % 2 ^ (i * 8)))) = bits2int(firstn(n, int2bits(j % 2 ^ (i * 8)))) |
⊦ m ≤ # bits + # bits0 ∧ # bits ≤ m → firstn(m, bits + bits0) = bits + firstn(m - # bits, bits0)
8 ≤ # mklist(false, 8 - n) + # int2bits(j % 2 ^ (i * 8)) ∧ # mklist(false, 8 - n) ≤ 8, # int2bits(j % 2 ^ (i * 8)) = (i→n(i) - 1) * 8 + n, 8 < (i→n(i) - 1) * 8 + n, n < 8 + (i→n(i) - 1) * 8, n < (i→n(i) - 1) * 8 + 7, 2 ^ (i * 8) ≤ j, 0 ≤ j % 2 ^ (i * 8), n < 8, 0 < i, 0 ≤ bytes2int(i2b(bits2int(firstn(n, int2bits(j % 2 ^ (i * 8))))) ' + bits2bytes(restn(n, int2bits(j % 2 ^ (i * 8))))) ⊦ n = 0, i→n(i) - 1 = 0, mklist(false, 8 - n) + int2bits(j % 2 ^ (i * 8)) = [], 1 + 8 * i→n(i) = (i→n(i) - 1) * 8 + n, (i→n(i) - 1) * 8 + n = 8 * i→n(i), i = 0, (i→n(i) - 1) * 8 = 1, i2b(bits2int(mklist(false, 8 - n) + firstn(8 - # mklist(false, 8 - n), int2bits(j % 2 ^ (i * 8))))) = i2b(bits2int(firstn(n, int2bits(j % 2 ^ (i * 8))))), bits2int(mklist(false, 8 - n) + firstn(8 - # mklist(false, 8 - n), int2bits(j % 2 ^ (i * 8)))) = bits2int(firstn(n, int2bits(j % 2 ^ (i * 8))))
Used simplifier rules: ⊦ i * j = j * i;% ⊦ # mklist(boolvar, n) = n;% ⊦ ¬ m ≤ n ↔ n < m;% ⊦ m < n → ¬ n < m;%n0 ≤ n ⊦ n - n0 ≤ m ↔ n ≤ m + n0;% ⊦ ¬ m + n < m;% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ m + n = n + m;% ⊦ n < n0 ∧ n0 < n1 → n +1 < n1; (forward)% ⊦ n < n0 ∧ n0 < n1 → n < n1; (forward)% ⊦ m * n = n * m;% ⊦ n < m → (m - n) + n = m;% ⊦ m +1 = m + 1;% ⊦ m + n < m + n0 ↔ n < n0;% ⊦ m < n → n ≠ 0; Used terms: int2bits(j % 2 ^ (i * 8)), mklist(false, 8 - n), 8