| max(sort(x0)) = max(x0), max(sort(x0)) < a, a < sort(x0).last, max(sort(x0)) < sort(x0).last ⊦ x0 = [], max(sort(x0) + a ') = a, ordered≤(sort(x0) + a ') |
⊦ x ≠ [] ∧ ordered≤(x) → max(x) = x.last
Used simplifier rules: emptyp: ⊦ sort(x) = [] ↔ x = []; from specification olist-sort%Ordered: ⊦ ordered≤(sort(x)); from specification olist-sort%irreflexivity: ⊦ ¬ a < a; from specification oelem Used terms: sort(x0)