RPN_COMM

(RPN_COMM_defo)

subroutine RPN_COMM_defo(comm)

ARGUMENTS

comm

Nom du communicateur

character*(*)

DESCRIPTION

Fixe le communicateur de default "DEFO" au communicateur spécifié. Ce communicateur sera utilisé pour la plupart des routines de haut-niveau de RPN_COMM.

EXEMPLE

!
! Ici, la somme est faite sur le domaine (defaut de DEFO...)
!
call RPN_COMM_globalsum(array,minx,maxx,miny,maxy, &
           nptsz,nil,njl,njlmax,gnj,sum)
!
! On change le communicateur de defaut de "DOMM" a "BLOC"
!
call RPN_COMM_defo("BLOC")
!
! Ici, la somme est faite pour chaque bloc individuellement
!
call RPN_COMM_globalsum(array,minx,maxx,miny,maxy, &
           nptsz,nil,njl,njlmax,gnj,sum)
!
! Retour au defaut du defaut...
! 
call RPN_COMM_defo("DOMM")

VOIR AUSSI

RPN_COMM_*