| 0 < i ∧ 0 ≤ 8 * i0 - 1, # int2bits(i) / 8 = i→n(i0), i < 2 ^ (8 * i0), ¬ # int2bits(i) ≤ i→n(8 * i0 - 1) + 1, 0 < i, 0 < i0 ⊦ i0 = 0, n ≤ i→n(i0) ↔ ¬ i < 2 ^ (n→i(n) * 8 - 1), i = 0, # int2bits(i) % 8 = 0 |
# int2bits(i) / 8 = i→n(i0), i→n(8 * i0 - 1) + 1 < # int2bits(i), 0 < i0, 0 < i, i < 2 ^ (8 * i0) ⊦ # int2bits(i) % 8 = 0, i = 0, n ≤ i→n(i0) ↔ ¬ i < 2 ^ (n→i(n) * 8 - 1), i0 = 0
Used simplifier rules: ⊦ int2bits(j) ≠ [];% ⊦ # bits = 0 ↔ bits = [];% ⊦ m < n → n ≠ 0; (forward)% ⊦ ¬ m ≤ n ↔ n < m;% ⊦ i * j = j * i;% ⊦ i * j * j0 = (i * j) * j0;% ⊦ 0 < i → (0 < i * j ↔ 0 < j);% ⊦ 1 ≤ i ↔ 0 < i;% ⊦ i ≤ j - i0 ↔ i + i0 ≤ j;