Digraph.ConcreteBidirectionalmodule V : Sig.COMPARABLEmodule V : sig ... endmodule HM : sig ... endmodule S : sig ... endmodule E : sig ... endtype edge = E.tmodule I : sig ... endmodule PV = I.PVmodule PE = Etype vertex = HM.keyval empty : 'a HM.returnval create : ?size:int -> unit -> 'a HM.tval clear : 'a HM.t -> unitval is_empty : 'a HM.t -> boolval nb_vertex : 'a HM.t -> int