| # (i < 256 ⊃ i2b(0) ' + i2b(i - 256) ';int2bytes(i / 256) + i2b(i % 256) ') = 1, 128 ≤ i, 0 < i, 0 ≤ i ⊦ |
Used simplifier rules: int2bytes-empty: ⊦ int2bytes(i) ≠ [];% ⊦ #(bytes + bytes0) = # bytes + # bytes0;% ⊦ # by ' = 0 +1;% ⊦ (bytes + bytes0) + bytes1 = bytes + bytes0 + bytes1;% ⊦ 1 = m + 1 ↔ m = 0;% ⊦ # bytes = 0 ↔ bytes = [];% ⊦ (m + n0) + n1 = m + n0 + n1;% ⊦ m + n = n + m;