RPN_COMM |
(RPN_COMM_swapns) |
SUBROUTINE RPN_COMM_swapns (nwen,wden,nwes,wdes, % nwin,nwrn,wdin,nwis,nwrs,wdis,periody, % status)
nwen,nwes | Number of words to send to north/south | integer | I |
wden,wdes | Array of words to send to north/south | integer | I | nwin,nwis | Number of words to receive from north/south | integer | I |
wdin,wdis | Array of words to receive from north/south | integer | O |
periody | N-S periodicity | logical | I | nwrn,nwrs | Number of words received from north/south | integer | O |
status | Error flag | integer | O |
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.
call RPN_COMM_swapns (nwen,wden,nwes,wdes,
%
nwin,nwrn,wdin,nwis,nwrs,wdis,periody,
%
status)