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