| m < n, n ≤ # y, m < # y, ∀ m, n. m < n ∧ ¬ 1 + # y < n → (a ' + a0 ' + y)[m] < (a ' + a0 ' + y)[n] ⊦ y = [], ordered<(a0 ' + y), (a0 ' + y)[m] < (a0 ' + y)[n] |
Used simplifier rules: l: ⊦ m + n < m + n0 ↔ n < n0; from specification nat-basic2%a: ⊦ (m + n0) + n1 = m + n0 + n1; from specification nat-basic2%c: ⊦ m + n = n + m; from specification nat-basic2%le-ls-simp: ⊦ m ≤ n → (n < m ↔ false); from specification nat%get-succ: ⊦ (a ' + x)[n + 1] = x[n]; from specification list-del%a: ⊦ (x + y) + z = x + y + z; from specification list Used terms: m + 1, n + 1