| ¬ int2bytes(i).rest ≠ [], int2bytes(i).first = i2b(~1), 2 ^ (8 * (n→i(# int2bytes(i).rest.rest) + 1) - 1) + i < 0, 0 ≤ i + 2 ^ ((n→i(# int2bytes(i).rest.rest) + 1) * 8), 0 ≤ b2i(int2bytes(i).rest.first) ⊦ n ≤ # int2bytes(i) ↔ ¬ 0 ≤ i + 2 ^ (8 * (n→i(n) - 1) - 1) |
int2bytes(i).first = i2b(~1), int2bytes(i).rest = [], 0 ≤ b2i([].first), 0 ≤ i + 2 ^ ((n→i(# [].rest) + 1) * 8), 2 ^ (8 * (n→i(# [].rest) + 1) - 1) + i < 0 ⊦ n ≤ # int2bytes(i) ↔ ¬ 0 ≤ i + 2 ^ (8 * (n→i(n) - 1) - 1)
Used simplifier rules: ⊦ i * j * j0 = (i * j) * j0;%i < 0 ⊦ (* i) ≤ n→i(n);% ⊦ (* j) ≤ i0 + (* j0) ↔ j - j0 ≤ i0;% ⊦ 0 < i → (0 ≤ i * j ↔ 0 ≤ j);% ⊦ 2 ^ (i - 1) < 2 ^ i ↔ 0 ≤ i;% ⊦ i + j < i + i0 ↔ j < i0;% ⊦ i < 0 ∧ 0 ≤ j → i < j;% ⊦ i + j + i0 = (i + j) + i0;% ⊦ j < i ∧ i ≤ 0 → j < 0; (forward)% ⊦ i < j ∧ j ≤ j0 → i < j0; (forward)% ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j; (forward)% ⊦ i * j = j * i;% ⊦ i + j = j + i;