| precedes∃([] + ix0 ' + ix1 ', x) ⊦ precedes∃([] + ix0 ', x) ∧ (n ∈ ix1 → (∃ n0. n0 ∈ ix0 ∧ precedes(n0, n, x))) |
[Concretesimprules((Csimpnamedseq(precedesex-2,,, ⊦ precedes∃(ix0 ' + ix1 ', x) ↔ (∀ n1. n1 ∈ ix1 → (∃ n0. n0 ∈ ix0 ∧ precedes(n0, n1, x)))) Csimpnamedseq(precedesex-rec0,,, ⊦ precedes∃(ix ', x)) Csimpnamedseq(list,indexseq-stackseq,a, ⊦ (ixs + ixs0) + ixs1 = ixs + ixs0 + ixs1) Csimpnamedseq(list,indexseq-stackseq,Nil, ⊦ [] + ixs = ixs)))]