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