fact: Definition Dbrack : M -> CProp := fun m => {l: (list M)| (forall (a:M) , member a l -> (D a)) and (cm_Sum l)[=]m}.
imports: Coq.Arith.Euclid CoRN.model.Zmod.Cmod CoRN.algebra.CSemiGroups CoRN.tactics.csetoid_rewrite CoRN.model.structures.Nsec CoRN.util.SetoidPermutation Coq.Setoids.Setoid Coq.Classes.Morphisms