fact: Definition list_repr_impl (E:multiset A) (l:list (A*nat)) := noduplicates (LibList.map (@fst _ _) l) /\ forall n x, mem (x,n) l <-> (n = E x /\ n > 0).
imports: TLC(LibTactics LibLogic LibReflect LibRelation LibList LibInt LibNat LibOperation LibEpsilon LibSet LibMonoid)