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