| ⊦ (m < # wlar ⊃ (ecs(wlar, # wlar) -- wlar[m].ec) ++ wle.ec;ecs(wlar, # wlar)) = (m < # wlar ⊃ (ecs(wlar) -- wlar[m].ec) ++ wle.ec;ecs(wlar)) |
m < # wlar ⊦ (ecs(wlar, # wlar) -- wlar[m].ec) ++ wle.ec = (m < # wlar ⊃ (ecs(wlar) -- wlar[m].ec) ++ wle.ec;ecs(wlar))
⊦ ecs(wlar, # wlar) = (m < # wlar ⊃ (ecs(wlar) -- wlar[m].ec) ++ wle.ec;ecs(wlar)), m < # wlar