| valid-indices(wlar1.mapIndices(nx4, λ wle. wle.ec:= n), nx4), valid-indices(wlar1, nx4), valid-indices(wlar1, nx0), # wlar1.mapIndices(nx4, λ wle. wle.ec:= n) ≤ nx0.head ⊦ nx0 = [], dups(nx4 + nx0), dups(nx4), dups(nx0) |
nx0 = n0 + nx1, valid-indices(wlar1, nx0), valid-indices(wlar1, nx4), valid-indices(wlar1.mapIndices(nx4, λ wle. wle.ec:= n), nx4), # wlar1.mapIndices(nx4, λ wle. wle.ec:= n) ≤ n0 ⊦ nx0 = [], dups(nx0), dups(nx4), dups(nx4 + nx0)
Used simplifier rules: nx ≠ [] ⊦ n = nx.head ∧ nx0 = nx.tail ↔ nx = n + nx0; (elim) Used terms: nx0, n0, nx