let
iter_vertex f =
Hashtbl
.iter (
fun
_
->
f)