Used simplifier rules: min-del: ⊦ s ≠ ∅ ∧ a ≠ s.min → (s -- a).min = s.min;% ⊦ s -- a = ∅ ↔ s = ∅ ∨ s = ∅ ++ a; (ws)