let test_validity_address = 
  do_something_group_project (fun p -> p) (fun () -> raise Not_found)