module type MARK = sig .. end
sig
end
type graph
type vertex
val clear : graph -> unit
graph -> unit
clear g
g
val get : vertex -> int
vertex -> int
val set : vertex -> int -> unit
vertex -> int -> unit