| 0 ≤ i1, i1 ≤ n→i(# int2bytes(i)), i1 ≤ 4, 0 < i1 ⊦ int2bytes(i)[# int2bytes(i) - i→n(i1)] = i2b(i i>> 8 * (i1 - 1)) |
⊦ j i>> i = j >> band(i, 31)
0 ≤ i1, i1 ≤ n→i(# int2bytes(i)), i1 ≤ 4, 0 < i1 ⊦ int2bytes(i)[# int2bytes(i) - i→n(i1)] = i2b(i >> band(8 * (i1 - 1), 31))
Used terms: 8 * (i1 - 1), i