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