| s.min < a, s.min ∈ s, s.max ∈ s ⊦ s = ∅, (s ++ a).butmin = (s -- s.min) ++ a, # s = 0 |
⊦ s ≠ ∅ → s.butmin = s -- s.min
s ++ a ≠ ∅, s.min < a, s.min ∈ s, s.max ∈ s ⊦ s = ∅, (s ++ a) -- (s ++ a).min = (s -- s.min) ++ a, # s = 0
Used simplifier rules: ne: ⊦ ∅ ≠ s ++ a; from specification set-basic Used terms: s ++ a