MODULE transfert_mod #ifdef CPP_USING_MPI USE transfert_mpi_mod, ONLY : init_transfert, transfert_request=>transfert_request_mpi, req_i1,req_e1_vect, & req_e1_scal, req_i0, req_e0_vect, req_e0_scal, request_add_point, create_request, gather_field, & t_message,init_message=>init_message_mpi,transfert_message=>transfert_message_mpi, & send_message=>send_message_mpi,test_message=>test_message_mpi,wait_message=>wait_message_mpi,barrier #else USE transfert_mpi_mod, ONLY : init_transfert, transfert_request=>transfert_request_seq, req_i1,req_e1_vect, & req_e1_scal,req_i0, req_e0_vect, req_e0_scal, request_add_point, create_request, gather_field, & t_message,init_message=>init_message_seq,transfert_message=>transfert_message_seq, & send_message=>send_message_seq,test_message=>test_message_seq,wait_message=>wait_message_seq,barrier #endif END MODULE transfert_mod