Traverse.Eventtype ('v, 'e) t = [ | | `Enter of 'v * int * ('v, 'e) path | 
| | `Exit of 'v | 
| | `Edge of 'v * 'e * 'v * edge_kind | 
 ]A traversal is a sequence of such events
val get_vertex : ('v, 'e) t -> ('v * [ `Enter | `Exit ]) optionval get_enter : ('v, 'e) t -> 'v optionval get_exit : ('v, 'e) t -> 'v optionval get_edge : ('v, 'e) t -> ('v * 'e * 'v) option