I don't think you can declare a function with a fortran parameter: subroutine testsubr(MPI_COMM_WORLD,ireadok)
1) If you've already included mpif.h with in testsubr(), you don't need the 1st argument above. 2) If you don't have mpif.h in testsubr(), the 1st argument could be MPI_comm. In that case, replace MPI_COMM_WORLD in MPI_Bcast by MPI_comm. This is basic fortran programming issue, you may want to consult some fortran programming book. A.Chan ----- "Mihaly Mezei" <mihaly.me...@mssm.edu> wrote: > Hi, > > The previous example I posted shows that using a different integer > does not work, Attached is a case where I tired to pass the > MPI_COMM_WORLD to the subroutine as one of it arguments, resulting in > an invalid datatype error. > > Mihaly Mezei > > Department of Structural and Chemical Biology, Mount Sinai School of > Medicine > Voice: (212) 659-5475 Fax: (212) 849-2456 > WWW (MSSM home): > http://www.mountsinai.org/Find%20A%20Faculty/profile.do?id=0000072500001497192632 > WWW (Lab home - software, publications): http://inka.mssm.edu/~mezei > WWW (Department): http://atlas.physbio.mssm.edu
