Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(mp_request_type), | intent(in) | :: | request |
ELEMENTAL INTEGER FUNCTION mp_get_request_handle(request) CLASS(mp_request_type), INTENT(IN) :: request #if defined(__parallel) && defined(__USE_MPI_F08) mp_get_request_handle = request%handle%mpi_val #else mp_get_request_handle = request%handle #endif END FUNCTION mp_get_request_handle