proposition: Lemma same_relation_list_refl: forall {A} (rs: list (relation A)), same_relation_list rs rs.
proof: Proof. intros. induction rs; constructor; auto. reflexivity. Qed.
imports: Coq.Classes.Morphisms Coq.Lists.List CertiGraph.lib.Coqlib CertiGraph.lib.List_ext CertiGraph.lib.List_Func_ext CertiGraph.lib.Relation_ext