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