proposition: Lemma cdot_correct: forall x a, equal (cdot a x) (dot a x).
proof: Proof. intros. unfold cdot. destruct_tests; auto. Qed.
imports: ATBR(MyFSets MyFSetProperties) ATBR(Common) ATBR(Classes) ATBR(Graph) ATBR(Monoid) ATBR(SemiLattice) ATBR(Numbers) ATBR(Reification)