fact: Fixpoint listToGraph' (g: PreGraph Vertex Edge) (v: Vertex) (l: list (Edge * Vertex)) : PreGraph Vertex Edge := match l with | nil => g | (e, v') :: l' => listToGraph' (pregraph_add_whole_edge g e v v') v' l' end.
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.FiniteGraph