proposition: Lemma WF_red_mod_lab : WF (red_mod E R) <-> WF (red_mod (lab_rules E) (lab_rules R)).
proof: Proof. rewrite WF_red_mod_lab. 2: apply bge_compatE. 2: apply bge_compatR. rewrite enum_Decr_empty. refl. Qed.
imports: CoLoR(ATrs AInterpretation BoolUtil LogicUtil EqUtil VecUtil SN RelUtil AWFMInterpretation NaryFunction NatUtil ARelation ARules SetUtil FunUtil VecMax AMorphism) Coq(List)