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.Mezei_at_[hidden]> 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
|
![[Flag]](../../../../../community/mirrors/flag-us.gif){kind=small}