RPN_COMM

(RPN_COMM_swapns)


SUBROUTINE RPN_COMM_swapns (nwen,wden,nwes,wdes,
     %          nwin,nwrn,wdin,nwis,nwrs,wdis,periody,
     %          status)

ARGUMENTS

IN
nwen,nwes Number of words to send to north/south integerI
wden,wdes Array of words to send to north/south integerI
nwin,nwis Number of words to receive from north/south integerI
wdin,wdis Array of words to receive from north/south integerO
periodyN-S periodicity logicalI
nwrn,nwrs Number of words received from north/south integerO
statusError flag integerO

DESCRIPTION

North/south exchange of data: wden is sent to his north neighbor and received in wdin. Exchanges are made using non-blocking MPI_ISEND and MPI_IRECV. When the exchange is terminated (checked with MPI_WAIT), it exits immediately.

Note: the number of received words can be different of what was expected. One can check with nwrn/s values after the call. They are obtained with MPI_GET_COUNT.


EXAMPLE


call RPN_COMM_swapns (nwen,wden,nwes,wdes,
     %          nwin,nwrn,wdin,nwis,nwrs,wdis,periody,
     %          status)


SEE ALSO

RPN_COMM_* 

Return to RPN Libraries home page