| ii(0) = 0, m0 ≤ m, ∀ m0. m0 < m → ii(m0 + 1) = ii(m0) + # lf(m0) ∧ (nf from ii(m0)) to # lf(m0) = lf(m0) ∧ (∀ m1. m1 ≤ m0 → ii(m1) ≤ ii(m0)) ⊦ (m0 = m + 1 ⊃ ii(m) + # lf(m);ii(m0)) ≤ ii(m) |
ii(0) = 0, ii(m) < (m0 = m + 1 ⊃ ii(m) + # lf(m);ii(m0)), m0 ≤ m, ∀ m0. m0 < m → ii(m0 + 1) = ii(m0) + # lf(m0) ∧ (nf from ii(m0)) to # lf(m0) = lf(m0) ∧ (∀ m1. m1 ≤ m0 → ii(m1) ≤ ii(m0)) ⊦
Used simplifier rules: ⊦ m < n → n ≠ 0; (s)%f: ⊦ m < n → n ≠ 0; (forward) from specification nat-basic% ⊦ m ≤ n ↔ ¬ n < m; (ss)