type t
val compare : t -> t -> int
type vertex
= V.t
val src : t -> vertex
Edge origin.
val dst : t -> vertex
Edge destination.
type label
= unit
val create : vertex -> label -> vertex -> t
create v1 l v2
creates an edge from v1
to v2
with label l
val label : t -> label
Get the label of an edge.