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