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