| int2bytes(i) = by + bytes ∧ int2bytes(i) ≠ [], by = i2b(0), i < 2 ^ (8 * n→i(# int2bytes(i) - 1)), 2 ≤ # int2bytes(i), 0 ≤ i, 0 ≤ b2i(bytes.first) ⊦ bytes = [], # int2bytes(i) = n ↔ ¬ i < 2 ^ ((n→i(n) - 1) * 8 - 1) ∧ ¬ 2 ^ ((n→i(n) - 1) * 8) ≤ i ∧ n ≠ 0 |
int2bytes(i) = i2b(0) ' + bytes, i < 2 ^ (8 * n→i(# int2bytes(i) - 1)), 2 ≤ # int2bytes(i), 0 ≤ i, 0 ≤ b2i(bytes.first), i2b(0) ∈ int2bytes(i) ⊦ bytes = [], # int2bytes(i) = n ↔ ¬ i < 2 ^ ((n→i(n) - 1) * 8 - 1) ∧ ¬ 2 ^ ((n→i(n) - 1) * 8) ≤ i ∧ n ≠ 0
Used simplifier rules: int2bytes-empty: ⊦ int2bytes(i) ≠ [];% ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j; (forward)% ⊦ (bytes + bytes0) + bytes1 = bytes + bytes0 + bytes1;% ⊦ by ' + bytes = bytes0 → by ∈ bytes0; (forward)% ⊦ by + bytes = by ' + bytes;