| # wlar ≤ # wlar ⊦ (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;ecs(wlar, # wlar)) = (m < # wlar ⊃ (ecs(wlar) -- wlar[m].ec) ++ wle.ec;ecs(wlar))
Used simplifier rules: ⊦ m ≤ m; (s)