| n - 8 = 0 ∨ bits2bytes(mklist(false, n - 8)) = mklist(i2b(0), (n - 8) / 8), n % 8 = 0, 8 < n, ∀ n0. n0 < n → n0 % 8 = 0 → n0 = 0 ∨ bits2bytes(mklist(false, n0)) = mklist(i2b(0), n0 / 8) ⊦ bits2bytes(mklist(false, n - 8)) + i2b(0) ' = mklist(i2b(0), n / 8) |
bits2bytes(mklist(false, n - 8)) = mklist(i2b(0), (n - 8) / 8), n % 8 = 0, 8 < n, ∀ n0. n0 < n → n0 % 8 = 0 → n0 = 0 ∨ bits2bytes(mklist(false, n0)) = mklist(i2b(0), n0 / 8) ⊦ i2b(0) ' + mklist(i2b(0), (n - 8) / 8) = mklist(i2b(0), n / 8)
Used simplifier rules: ⊦ (bytes + bytes0) + bytes1 = bytes + bytes0 + bytes1;% ⊦ mklist(by, n) + by ' = by ' + mklist(by, n);% ⊦ n < m → m - n ≠ 0;