| n ≤ # wlar ⊦ m ∈ ecs(wlar, n) ↔ (∃ n0. n0 < n ∧ wlar[n0].ec = m) |
n0 +1 ≤ # wlar, ∀ wlar, m. n0 ≤ # wlar → (m ∈ ecs(wlar, n0) ↔ (∃ n1. n1 < n0 ∧ wlar[n1].ec = m)) ⊦ m ∈ ecs(wlar, n0 +1) ↔ (∃ n1. n1 < n0 +1 ∧ wlar[n1].ec = m)
Used simplifier rules: ecs-n-base: ⊦ ecs(wlar, 0) = ∅;%nat freely generated by 0, +1;;% ⊦ ¬ n ∈ ∅; (s)% ⊦ ¬ m < 0; (s)