| ecs(wlar).max = n0 + m0, wlar[n] = wl-entry(m0, stat0), n < # wlar, m ≤ n0 + m0 ⊦ (n0 + m0) + (sum-of-differences(n0 + m0, ecs(wlar)) - n0) = m + (((ecs(wlar) -- m0) ++ m).max - m) + sum-of-differences(((ecs(wlar) -- m0) ++ m).max, ecs(wlar) -- m0), n0 = 0 |
⊦ (bag ++ n).max = (bag = ∅ ⊃ n;(bag.max > n ⊃ bag.max;n))
ecs(wlar).max = n0 + m0, wlar[n] = wl-entry(m0, stat0), n < # wlar, m ≤ n0 + m0 ⊦ (n0 + m0) + (sum-of-differences(n0 + m0, ecs(wlar)) - n0) = m + ((ecs(wlar) -- m0 = ∅ ⊃ m;((ecs(wlar) -- m0).max > m ⊃ (ecs(wlar) -- m0).max;m)) - m) + sum-of-differences((ecs(wlar) -- m0 = ∅ ⊃ m;((ecs(wlar) -- m0).max > m ⊃ (ecs(wlar) -- m0).max;m)), ecs(wlar) -- m0), n0 = 0
Used terms: m, ecs(wlar) -- m0