| uint2bits(i / 2) ≠ [], 0 < i, ∀ i0. i→n(i0) < i→n(i) → 0 < i0 → uint2bits(i0).rest.first ⊦ i = 1, (uint2bits(i / 2).rest + (i % 2 = 1)').first |
0 < i, ∀ i0. i→n(i0) < i→n(i) → 0 < i0 → uint2bits(i0).rest.first ⊦ i = 1, (uint2bits(i / 2).rest + (i % 2 = 1)').first
Used simplifier rules: uint2bits-empty: 0 ≤ i ⊦ uint2bits(i) ≠ [];% ⊦ 0 ≤ i / 2 ↔ ~1 ≤ i;% ⊦ ¬ i ≤ j ↔ j < i;% ⊦ ¬ i < j ↔ j ≤ i;% ⊦ i < j ∧ ¬ i0 < j → ¬ i0 < i;