| i→n(n→i(# int2bytes(i)) - j + 1) < # int2bytes(i), 0 ≤ j, j < n→i(# int2bytes(i)) ⊦ int2bytes(i)[i→n(j)] = i2b(bytes2int(firstn(# int2bytes(i) - i→n(n→i(# int2bytes(i)) - j + 1), int2bytes(i)))) |
j < n→i(# int2bytes(i)), 0 ≤ j, i→n(n→i(# int2bytes(i)) - j + 1) < # int2bytes(i) ⊦ int2bytes(i)[i→n(j)] = i2b(bytes2int(firstn(# int2bytes(i) - i→n(n→i(# int2bytes(i)) - j + 1), int2bytes(i))))
Used simplifier rules: int2bytes-empty: ⊦ int2bytes(i) ≠ [];% ⊦ # bytes = 0 ↔ bytes = [];% ⊦ m < n → n ≠ 0; (forward)