fact: Parameter cf_eq_ac : forall t1 t2, well_formed t1 -> well_formed t2 -> canonical_form t1 = canonical_form t2 -> ac t1 t2.
imports: Coq(Setoid Arith List Morphisms) CoLoR(closure more_list weaved_relation list_sort term_spec ac)