Variables (R : Type) (idx : R) (op : Monoid.law idx).
Implicit Types (X : {mset K}) (P : pred K) (F : K -> R).

Lemma mset_0Vmem A : (A = mset0) + {x : K | x \in A}.
Definition size_mset A : size A = \sum_(a <- finsupp A) A a.