module type LabeledGraph =sig
..end
include Sig.Graph
type
label
val add_edge : t -> node -> label -> node -> unit
val iter_labeled_succ : (label -> vertex -> unit) -> t -> vertex -> unit
val iter_edges : (node -> label -> node -> unit) -> t -> unit