| m1 < # y, m ≤ # y, ordered<(a0 ' + y), a < a0, m1 < m, ∀ m0, n0. m0 < n0 ∧ ¬ # y < n0 → (a0 ' + y)[m0] < (a0 ' + y)[n0] ⊦ y = [], (a0 ' + y)[m1] < (a0 ' + y)[m] |
Used simplifier rules: le-ls-simp: ⊦ m ≤ n → (n < m ↔ false); from specification nat Used terms: m1, m