RPN_COMM |
(RPN_COMM_coll) |
SUBROUTINE RPN_COMM_coll (garr,gmini,gmaxi,gminj, % gmaxj,nig,njg,nk,ghalox,ghaloy,size, % larr,mini,maxi,minj,maxj,halox,haloy, % status)
garr | Tableau global de réception | integer, real ou real*8 | O |
gmini,gmaxi,gminj,gmaxj | Dimensions de garr | integer | I |
nig,njg | Taille du domaine global de calcul | integer | I |
nk | Taille de l'axe Z | integer | I |
ghalox,ghaloy | Taille du halo du tableau garr | integer | I |
size | 1 pour integer et real, 2 pour real*8, etc. | integer | I |
larr | Tableaux locaux à rapailler... | integer, real ou real*8 | I |
mini,maxi,minj,maxj | Taille de larr | integer | I |
halox,haloy | Taille du halo de larr | integer | I |
ierr | ierr (0 if ok, non-0 if error) | integer | I |
+-+ +-+ +-+ +---------+
|3| |4| |5| |
|
+-+ +-+ +-+ -> | Sur P0 |
+-+ +-+ +-+ |
|
|0| |1| |2| |
|
+-+ +-+ +-+ +---------+
Si ghalox/y >0 et si halox/y >0, on remplira aussi le halo du tableau global.
ATTENTION: ce module doit être compilé avec les flags -O2 ou -O3 en mode n32 sur SGI, sinon il retourne des résultats erronés (pas de problème si on utilise la librairie rpn_comm puisque le module y est compilé correctement)