| ins≤(a, x0) ≠ [], a0 < a, ∀ a. max(ins≤(a, x0)) = a ∨ a < max(x0) ⊦ (max(ins≤(a, x0)) < a0 ⊃ a0;max(ins≤(a, x0))) = a, a < max(a0 ' + x0) |
a0 < a, ∀ a. max(ins≤(a, x0)) = a ∨ a < max(x0) ⊦ (max(ins≤(a, x0)) < a0 ⊃ a0;max(ins≤(a, x0))) = a, a < max(a0 ' + x0)
Used simplifier rules: empty: ⊦ ins≤(a, x) ≠ []; from specification olist