let get_group_project_team_name = 
  do_something_group_project_team (fun t -> 
                                     let name = get_team_name t in 
                                     let tnum = get_team_num t in 
                                   if (name = ""&& (tnum > 0) then (
                                     Printf.sprintf "Equipe n\176%d" (get_team_num t)) 
                                else name) (fun () -> "")