| int2bytes(i).first = i2b(0), 0 ≤ i, ¬ 0 ≤ b2i(int2bytes(i).rest.first) → bytes2int(i2b(0) ' + int2bytes(i).rest.first ' + int2bytes(i).rest.rest) < 2 ^ ((n→i(# int2bytes(i).rest.rest) + 1) * 8) ⊦ # int2bytes(i) = n ↔ ¬ i < 2 ^ ((n→i(n) - 1) * 8 - 1) ∧ ¬ 2 ^ ((n→i(n) - 1) * 8) ≤ i ∧ n ≠ 0 |
int2bytes(i).first = i2b(0), 0 ≤ i ⊦ ¬ 0 ≤ b2i(int2bytes(i).rest.first), # int2bytes(i) = n ↔ ¬ i < 2 ^ ((n→i(n) - 1) * 8 - 1) ∧ ¬ 2 ^ ((n→i(n) - 1) * 8) ≤ i ∧ n ≠ 0
bytes2int(i2b(0) ' + int2bytes(i).rest.first ' + int2bytes(i).rest.rest) < 2 ^ ((n→i(# int2bytes(i).rest.rest) + 1) * 8), int2bytes(i).first = i2b(0), 0 ≤ i ⊦ # int2bytes(i) = n ↔ ¬ i < 2 ^ ((n→i(n) - 1) * 8 - 1) ∧ ¬ 2 ^ ((n→i(n) - 1) * 8) ≤ i ∧ n ≠ 0