let get_group_project_dgrad = 
  do_something_group_project get_project_dgrad (fun () -> !default_grade)