let nmap_iter f map = IntMap.iter (fun _ (n, v) -> f n v) map