Sig.MARK
type graph
type vertex
val clear : graph -> unit
val get : vertex -> int
val set : vertex -> int -> unit