| 0 ≤ # int2bytes(i) - i→n(i1) ∧ # int2bytes(i) - i→n(i1) < # int2bytes(i), 0 ≤ i1, i1 ≤ n→i(# int2bytes(i)), i1 ≤ 4, 0 < i1 ⊦ i2b(i >> 8 * (n→i(# int2bytes(i)) - n→i(# int2bytes(i) - i→n(i1)) + 1)) = i2b(i >> 8 * (i1 - 1)) |
0 < i1, i1 ≤ 4, i1 ≤ n→i(# int2bytes(i)), 0 ≤ i1, # int2bytes(i) - i→n(i1) < # int2bytes(i) ⊦ i2b(i >> 8 * (n→i(# int2bytes(i)) - n→i(# int2bytes(i) - i→n(i1)) + 1)) = i2b(i >> 8 * (i1 - 1))
Used simplifier rules: int2bytes-empty: ⊦ int2bytes(i) ≠ [];% ⊦ # bytes = 0 ↔ bytes = [];% ⊦ m < n → n ≠ 0; (forward)% ⊦ 0 ≤ m;