let iosh_filter_dead iosh vs = IH.iter (fun vid _ -> if not(UD.VS.exists (fun vi -> vid = vi.vid) vs) then IH.remove iosh vid) iosh