| wlar[n0] = wl-entry(m0, stat), n0 < # wlar, n0 < m, ∀ wlar, m, wle. n0 ≤ # wlar → ecs(wlar[m, wle], n0) = (m < n0 ⊃ (ecs(wlar, n0) -- wlar[m].ec) ++ wle.ec;ecs(wlar, n0)) ⊦ ecs(wlar[m, wle], n0) = ecs(wlar, n0) |
Used simplifier rules: ⊦ m < n → m ≤ n; (s)% ⊦ m < n → ¬ n < m; (s) Used terms: wlar, m, wle