let update_group_project_coeff gnum pnum c = do_something_group_project (fun p -> set_project_coeff p c) (fun () -> ()) gnum pnum