| int2bytes(i) = by + bytes ∧ int2bytes(i) ≠ [], int2bytes(i) = by ', i < 0, i < ~128 ⊦ i >> 8 = bytes2int(i2b(~1) ' + int2bytes(i).butlast) |
int2bytes(i) = by ', i < 0, i < ~128 ⊦ i >> 8 = ~1
Used simplifier rules: int2bytes-empty: ⊦ int2bytes(i) ≠ [];%bytes2int-one: ⊦ bytes2int(by ') = b2i(by);% ⊦ by ∈ by0 ' ↔ by = by0;%~128 ≤ i, i ≤ 127 ⊦ b2i(i2b((* i))) = i;% ⊦ bytes + [] = bytes;% ⊦ by '.butlast = [];% ⊦ by ' = by0 ' + bytes ↔ by = by0 ∧ bytes = [];% ⊦ (bytes + bytes0) + bytes1 = bytes + bytes0 + bytes1;% ⊦ by ' + bytes = bytes0 → by ∈ bytes0; (forward)% ⊦ by + bytes = by ' + bytes;