| y[m1] < a0, m1 < # y, a < a0, ordered<(a0 ' + y), ∀ m0, n0. m0 < n0 ∧ ¬ # y < n0 → (a0 ' + y)[m0] < (a0 ' + y)[n0] ⊦ y = [], a < y[m1] |
⊦ b < a ∧ b ∈ x → ¬ ordered<(a ' + x)
Used simplifier rules: get-in: ⊦ m < # x → (¬ x[m] ∈ x ↔ false); from specification list-del Used terms: y[m1], y, a0