count(a, bag) ≠ 0 ⊦ #(bag -- a) = # bag - 1
Used simplifier rules: del-notin: ⊦ count(a, bag) = 0 → bag -- a = bag;%sub-base: ⊦ m - 0 = m; from specification nat