| max(a0 ' + x0) < a, a ∈ x0, ∀ a1. ¬ a1 ∈ x0 ∨ ¬ max(x0) < a1 ⊦ a = a0 |
⊦ x ≠ [] → max(a ' + x) = (max(x) < a ⊃ a;max(x))
x0 ≠ [], (max(x0) < a0 ⊃ a0;max(x0)) < a, a ∈ x0, ∀ a1. ¬ a1 ∈ x0 ∨ ¬ max(x0) < a1 ⊦ a = a0
Used simplifier rules: max-base: ⊦ max(a ') = a;%app: ⊦ x + [] = x; from specification list%a: ⊦ (x + y) + z = x + y + z; from specification list%in-empty: ⊦ ¬ a ∈ []; from specification list Used terms: x0, a0