comm_isend_real_dp_array_2d_n Subroutine

public subroutine comm_isend_real_dp_array_2d_n(comm, data, count, dest, tag, request)

Non-blocking send of a contiguous 2D dp array with explicit count. No dim-prefix protocol; pairs with comm_recv_real_dp_array_2d_n on the receive side.

Arguments

Type IntentOptional Attributes Name
type(comm_t), intent(in) :: comm
real(kind=dp), intent(in) :: data(:,:)
integer(kind=int32), intent(in) :: count
integer(kind=int32), intent(in) :: dest
integer(kind=int32), intent(in) :: tag
type(request_t), intent(out) :: request

Calls

proc~~comm_isend_real_dp_array_2d_n~2~~CallsGraph proc~comm_isend_real_dp_array_2d_n~2 comm_isend_real_dp_array_2d_n mpi_isend mpi_isend proc~comm_isend_real_dp_array_2d_n~2->mpi_isend

Called by

proc~~comm_isend_real_dp_array_2d_n~2~~CalledByGraph proc~comm_isend_real_dp_array_2d_n~2 comm_isend_real_dp_array_2d_n interface~isend~2 isend interface~isend~2->proc~comm_isend_real_dp_array_2d_n~2

Variables

Type Visibility Attributes Name Initial
integer(kind=int32), private :: ierr

Source Code

   subroutine comm_isend_real_dp_array_2d_n(comm, data, count, dest, tag, request)
      !! Non-blocking send of a contiguous 2D dp array with explicit
      !! count.  No dim-prefix protocol; pairs with
      !! `comm_recv_real_dp_array_2d_n` on the receive side.
      type(comm_t), intent(in)  :: comm
      real(dp), intent(in)  :: data(:, :)
      integer(int32), intent(in)  :: count
      integer(int32), intent(in)  :: dest
      integer(int32), intent(in)  :: tag
      type(request_t), intent(out) :: request
      integer(int32) :: ierr

      call MPI_Isend(data, count, MPI_DOUBLE_PRECISION, dest, tag, &
                     comm%m_comm, request%m_request, ierr)
      request%is_valid = .true.
   end subroutine comm_isend_real_dp_array_2d_n