Digraph.Mark
type graph = t
type vertex = V.t
val clear : t -> unit
val get : V.t -> int
val set : V.t -> int -> unit