RPN_COMM_swapns

RPN_COMM

(RPN_COMM_swapns)

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

ARGUMENTS

nwen,nwes	Nombre de mots à envoyer au nord/sud	integer	I
wden,wdes	Vecteur à envoyer au nord/sud	integer	I
nwin,nwis	Nombre de mots à recevoir du nord/sud	integer	I
wdin,wdis	Vecteur à recevoir du nord/sud	integer	O
periody	Périodicité nord-sud	logical	I
nwrn,nwrs	Nombre de mots effectivement reçus du nord/sud	integer	O
status	Statut, erreur	integer	O

DESCRIPTION

Échange nord/sud de données. Le vecteur wden est envoyé au processeur au nord du processeur local, puis reçu dans le vecteur wdin. Les échanges se font a l'aide des routines non-bloquantes MPI_ISEND et MPI_IRECV. Lorsque l'envoi et la reception locale est terminée (vérification avec MPI_WAIT), la sous-routine quitte immédiatement.

À noter: le nombre de mots reçus peut être différent du nombre de mots attendus, d'où la présence des variables nwrn/s. Ces valeurs sont obtenues avec MPI_GET_COUNT.

EXEMPLE

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

VOIR AUSSI

RPN_COMM_*

Return to RPN Libraries home page