| ⊦ ascsubseq(ix, x) ∧ # ixs < # ix ∧ covers(ixs, ix) → (∃ n0, n1, n. n0 ∈ ix ∧ n1 ∈ ix ∧ precedes(n0, n1, x) ∧ n < # ixs ∧ n0 ∈ ixs[n] ∧ n1 ∈ ixs[n]) |
covers(ixs, ix), # ixs < # ix, ascsubseq(ix, x) ⊦ ix = [], ∃ n0, n1, n. n0 ∈ ix ∧ n1 ∈ ix ∧ precedes(n0, n1, x) ∧ n < # ixs ∧ n0 ∈ ixs[n] ∧ n1 ∈ ixs[n]
[Concretesimprules((Csimpnamedseq(list-data,indexseq,l, ⊦ # ix = 0 ↔ ix = []) Csimpnamedforward(nat-basic1,,f, ⊦ m < n → n ≠ 0)))]