| ¬(# int2bits(j % 2 ^ (i * 8)) % 8 ≠ 0 ∧ 8 < # int2bits(j % 2 ^ (i * 8))), i→n(i * 8) % 8 = 0, b2i(bits2bytes(int2bits(j % 2 ^ (i * 8))).first) < 0, # int2bits(j % 2 ^ (i * 8)) < i→n(i * 8), 0 < i, 2 ^ (i * 8) ≤ j, 0 ≤ j % 2 ^ (i * 8) ⊦ bits2bytes(mklist(false, i→n(i * 8) - # int2bits(j % 2 ^ (i * 8))) + int2bits(j % 2 ^ (i * 8))) = fix(i→n(i) + 1, bits2bytes(int2bits(j % 2 ^ (i * 8)))).rest, mklist(false, i→n(i * 8) - # int2bits(j % 2 ^ (i * 8))) + int2bits(j % 2 ^ (i * 8)) = [], i→n(i * 8) + 1 = # int2bits(j % 2 ^ (i * 8)), # int2bits(j % 2 ^ (i * 8)) = i→n(i * 8), i = 0, # int2bits(j % 2 ^ (i * 8)) % 8 = 0 |
i→n(i * 8) % 8 = 0, b2i(i2b(j % 2 ^ (i * 8))) < 0, # int2bits(j % 2 ^ (i * 8)) ≤ 8, 0 ≤ j % 2 ^ (i * 8), 2 ^ (i * 8) ≤ j, 0 < i, # int2bits(j % 2 ^ (i * 8)) < i→n(i * 8) ⊦ bits2bytes(mklist(false, i→n(i * 8) - # int2bits(j % 2 ^ (i * 8))) + int2bits(j % 2 ^ (i * 8))) = fix(i→n(i) + 1, i2b(j % 2 ^ (i * 8)) ').rest, # int2bits(j % 2 ^ (i * 8)) % 8 = 0, i = 0, # int2bits(j % 2 ^ (i * 8)) = i→n(i * 8), i→n(i * 8) + 1 = # int2bits(j % 2 ^ (i * 8)), mklist(false, i→n(i * 8) - # int2bits(j % 2 ^ (i * 8))) + int2bits(j % 2 ^ (i * 8)) = []
Used simplifier rules: bits2bytes-base: ⊦ # bits ≤ 8 → bits2bytes(bits) = i2b(bits2int(bits)) ';% ⊦ i < 0 ∧ 0 ≤ j → i < j;% ⊦ j < i ∧ i ≤ 0 → j < 0; (forward)% ⊦ i < j ∧ j ≤ j0 → i < j0; (forward)% ⊦ by '.first = by;% ⊦ bits2int(int2bits(i)) = i;% ⊦ ¬ m < n ↔ n ≤ m;% ⊦ i * j = j * i;