| ordered≤(a0 ' + x), ∀ a1. ins≤(a1, x) = x + a1 ' ∨ a1 < max(x) ⊦ a ' + a0 ' + x = (a0 ' + x) + a ', x = [], a0 < (max(x) < a0 ⊃ a0;max(x)), a0 < a, a < (max(x) < a0 ⊃ a0;max(x)), max(x) < a0 |
ordered≤(max(x) ' + x), ∀ a1. ins≤(a1, x) = x + a1 ' ∨ a1 < max(x) ⊦ max(x) ' + x = x + max(x) ', x = []
Used simplifier rules: ⊦ ¬ a < a; (s)%a: ⊦ (x + y) + z = x + y + z; from specification list% ⊦ a ' + x = b ' + y ↔ a = b ∧ x = y; (ws)%nen: ⊦ ¬ b < a ∧ a = c → ¬ b < c; (forward) from specification oelem%nnn: ⊦ ¬ c < b ∧ ¬ a < c → ¬ a < b; (forward) from specification oelem% ⊦ ¬ b < a → (a < b ↔ a ≠ b); (ss)