| int2bytes(i) ≠ [], bytes2int(int2bytes(i)) < 2 ^ ((n→i(# int2bytes(i).rest) + 1) * 8 - 1), 2 ^ ((n→i(n) - 1) * 8) ≤ i, # int2bytes(i) < n, 2 ^ (8 * n→i(# int2bytes(i) - 1)) ≤ i, 0 ≤ i ⊦ int2bytes(i).first = i2b(0) |
i < 2 ^ ((n→i(# int2bytes(i).rest) + 1) * 8 - 1), 0 ≤ i, 2 ^ (8 * n→i(# int2bytes(i) - 1)) ≤ i, # int2bytes(i) < n, 2 ^ ((n→i(n) - 1) * 8) ≤ i, 8 * n→i(# int2bytes(i) - 1) + 1 < (n→i(# int2bytes(i).rest) + 1) * 8, (n→i(n) - 1) * 8 + 1 < (n→i(# int2bytes(i).rest) + 1) * 8 ⊦ int2bytes(i).first = i2b(0)
Used simplifier rules: int2bytes-empty: ⊦ int2bytes(i) ≠ [];%int2int: ⊦ bytes2int(int2bytes(i)) = i;%0 ≤ i ⊦ (* i) < n→i(n) ↔ i→n(i) < n;% ⊦ 0 < n ↔ n ≠ 0;% ⊦ m < n → n ≠ 0;% ⊦ i < j - i0 ↔ i + i0 < j;%0 ≤ j ⊦ 2 ^ j < 2 ^ j0 ↔ j < j0;% ⊦ 0 < i → (0 ≤ i * j ↔ 0 ≤ j);% ⊦ i * j = j * i;% ⊦ i * j * j0 = (i * j) * j0;% ⊦ i + j = j + i;% ⊦ i + j + i0 = (i + j) + i0;% ⊦ 0 ≤ n→i(n);% ⊦ ~1 < i ↔ 0 ≤ i;% ⊦ (* j) < i0 + (* j0) ↔ j - j0 < i0;% ⊦ 0 < i → (0 < i * j ↔ 0 < j);% ⊦ 1 ≤ i ↔ 0 < i;% ⊦ i ≤ j - i0 ↔ i + i0 ≤ j;% ⊦ 0 < 2 ^ i ↔ 0 ≤ i;% ⊦ i ≤ j ∧ j < j0 → i < j0; (forward)% ⊦ i < j ∧ 0 ≤ i → 0 < j; (forward)