let update_groups_project_name pnum name = List.iter (fun g -> update_group_project_name g pnum name) !num_groups