let
iter_pred f _g v =
Inthash
.iter (
fun
_
->
f) v.cnCallers