RPN_COMM

(RPN_COMM_init)



subroutine RPN_COMM_init(Userinit,Pelocal,Petotal,Pex,Pey)



ARGUMENTS

IN


OUT

  • Pelocal: rank of local process
  • Petotal: total number of processes
  • Pex: number of processes along X
  • Pey: number of processes along Y

  • DESCRIPTION

    If not already started, initialize MPI mode and some common blocks (internal use for RPN_COMM routines) and return the topology. If pex and pey are greater than 0, those values will be used and Userinit will not be called.




    EXAMPLE

           subroutine maroutine(pex,pey)
           integer pex,pey
           pex=1
           pey=2
           return
           end

           program test
           .....
           pex=0
           pey=0
          
           call rpn_comm_init(maroutine,Pelocal,Petotal,pex,pey)




    SEE ALSO

    RPN_COMM_* 

    Return to RPN Libraries home page