proposition: Lemma vvalid_src_evalid: forall x, vvalid g x -> src g (out_edge x) = x /\ evalid g (out_edge x).
proof: Proof. intros. assert ((out_edge x) = (out_edge x)) by auto. pose proof (only_one_edge x (out_edge x) H). rewrite <- H1 in H0. auto. Qed.
imports: Coq.Classes.Morphisms Coq.micromega.Lia Coq.Logic.FunctionalExtensionality CertiGraph.lib.Coqlib CertiGraph.lib.EquivDec_ext CertiGraph.lib.EnumEnsembles CertiGraph.lib.List_ext CertiGraph.graph.graph_model CertiGraph.graph.path_lemmas CertiGraph.graph.graph_gen CertiGraph.graph.MathGraph CertiGraph.graph.FiniteGraph