fact: Record isubgraph (F G : diGraph) := ISubgraph { isubgraph_fun :> F -> G ; isubgraph_inj : injective isubgraph_fun ; isubgraph_mono : {mono isubgraph_fun : x y / x -- y} }.
imports: HB(structures) Coq(Setoid CMorphisms) mathcomp(all_ssreflect) GraphTheory(edone preliminaries bij)