| # nextli0(lf(n0)) = 0, ii(0) = 0, ii(n0 + 1) = ii(n0) + # nextli0(lf(n0)), lf(0) = [], (σ from ii(n0)) to # nextli0(lf(n0)) = ⌜nextli0(lf(n0))⌝ , ii(n0 + 1) ≤ ii(n0), (finp(σ) ⊃ # σ = ⌜ii(n)⌝ ∧ (∀ m. n ≤ m → nextli0(lf(m)) = [] ∧ ii(m) = ii(n));∀ n. ∃ m. ii(m) ≤ n ∧ n < ii(m + 1)), ∀ x. nextli(x) = x + nextli0(x), ∀ n. lf(n + 1) = nextli(lf(n)), ∀ m, n. m ≤ n → ii(m) ≤ ii(n), ∀ n. ii(n + 1) = ii(n) + # nextli0(lf(n)) ∧ ¬ # σ < ⌜ii(n + 1)⌝ ∧ (σ from ii(n)) to # nextli0(lf(n)) = ⌜nextli0(lf(n))⌝ , ∀ n0. lf(n0) = (σ to ii(n0)).l ⊦ # σ = ⌜ii(n0)⌝ , # σ < ⌜ii(n0 + 1)⌝ |
ii(0) = 0, ii(n0 + 1) = ii(n0), lf(0) = [], nextli0(lf(n0)) = [], (finp(σ) ⊃ # σ = ⌜ii(n)⌝ ∧ (∀ m. n ≤ m → nextli0(lf(m)) = [] ∧ ii(m) = ii(n));∀ n. ∃ m. ii(m) ≤ n ∧ n < ii(m + 1)), ∀ x. nextli(x) = x + nextli0(x), ∀ n. lf(n + 1) = nextli(lf(n)), ∀ m, n. m ≤ n → ii(m) ≤ ii(n), ∀ n. ii(n + 1) = ii(n) + # nextli0(lf(n)) ∧ ¬ # σ < ⌜ii(n + 1)⌝ ∧ (σ from ii(n)) to # nextli0(lf(n)) = ⌜nextli0(lf(n))⌝ , ∀ n0. lf(n0) = (σ to ii(n0)).l ⊦ # σ = ⌜ii(n0)⌝ , # σ < ⌜ii(n0)⌝
Used simplifier rules: ⊦ m ≤ m; (s)% ⊦ ⌜[]⌝ = []; (s)% ⊦ σ to 0 = []; (s)%c: ⊦ m + n = n + m; from specification nat-basic%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic% ⊦ n + 0 = n; (s)% ⊦ # [] = 0; (s)% ⊦ # x = 0 ↔ x = []; (s)