| n0 < # wlar, ∀ 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 + 1) = (¬ n0 < m ⊃ (wlar[n0].ec = wlar[m].ec ⊃ ecs(wlar, n0);(ecs(wlar, n0) -- wlar[m].ec) ++ wlar[n0].ec) ++ wle.ec;ecs(wlar, n0) ++ wlar[n0].ec) |
n0 < # wlar, ∀ 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 + 1) = (wlar[n0].ec = wlar[m].ec ⊃ ecs(wlar, n0);(ecs(wlar, n0) -- wlar[m].ec) ++ wlar[n0].ec) ++ wle.ec, n0 < m
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 + 1) = ecs(wlar, n0) ++ wlar[n0].ec