| indices-erasing(wlar, nx) ⊦ indices-erasing(wlar[m, wl-entry(n, erasing)], nx) |
indices-erasing(wlar, m0 + nx0), ∀ wlar, m, n. indices-erasing(wlar, nx0) → indices-erasing(wlar[m, wl-entry(n, erasing)], nx0) ⊦ indices-erasing(wlar[m, wl-entry(n, erasing)], m0 + nx0)
Used simplifier rules: indices-erasing-base: ⊦ indices-erasing(wlar, []);%nat-list freely generated by [], +;;