<meta http-equiv="Content-Type" content="text/html; charset=utf-8"><div dir="ltr">Hi, <span style="font-size:13px">Michael,</span><div><span style="font-size:13px">  I checked and found </span><span style="font-size:13px">MPI_FINALIZE did have an explicit interface, at least in MPICH-3.1.3. </span><span style="font-size:13px">You can search the file </span>mpi_base.f90 in your MPICH build.</div><div>  We recently fixed the explicit interface problem in  MPI Fortran 2008 bindings.  You need to "use mpi_f08" in your code.  A paper on that is at <a href="http://dl.acm.org/citation.cfm?id=2642777">http://dl.acm.org/citation.cfm?id=2642777</a></div><div>  The new bindings are already included in MPICH-3.2a1. It requires Fortran2008 + TS29113 capable compilers, such as Cray ftn 8.3.3+ or gfortran-dev. If you'd like to have a try, I can instruct you how to do that.</div><div><br></div><div>  Thanks. </div><div>  </div><div>  </div><div>  </div><div><br></div><div><span style="font-size:13px"> </span></div></div><div class="gmail_extra"><br clear="all"><div><div class="gmail_signature"><div dir="ltr">--Junchao Zhang</div></div></div>
<br><div class="gmail_quote">On Fri, Dec 12, 2014 at 5:55 AM,  <span dir="ltr"><<a href="mailto:Michael.Rachner@dlr.de" target="_blank">Michael.Rachner@dlr.de</a>></span> wrote:<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Dear developers of MPICH,<br>
<br>
For your convenience, I forward the emails in mvapich-discuss  concerning the missing Fortran bindings.<br>
Possibly this I can encourage you  a bit, adding (as OPENMPI did it successfully)  the missing explicit Ftn-interfaces in the mpi-module<br>
for those MPI-routines with parameters of "Choice"-type?<br>
<br>
At least:  You may add the explicit Ftn-interface for the sbr  MPI_FINALIZE . It is missing in MPICH-3.0.4 too.<br>
<br>
Greetings<br>
  Michael Rachner<br>
<br>
<br>
<br>
<br>
<br>
<br>
-----Ursprüngliche Nachricht-----<br>
Von: mvapich-discuss [mailto:<a href="mailto:mvapich-discuss-bounces@cse.ohio-state.edu">mvapich-discuss-bounces@cse.ohio-state.edu</a>] Im Auftrag von <a href="mailto:Michael.Rachner@dlr.de">Michael.Rachner@dlr.de</a><br>
Gesendet: Freitag, 12. Dezember 2014 12:38<br>
An: <a href="mailto:mvapich-discuss@cse.ohio-state.edu">mvapich-discuss@cse.ohio-state.edu</a><br>
Betreff: [mvapich-discuss] WG: WG: missing Fortran bindings in MVAPICH2-2.1a<br>
<br>
Sorry, I wanted to send my email not to Jonathan alone, but to the mvapich-discuss.<br>
  Michael<br>
<br>
<br>
<br>
-----Ursprüngliche Nachricht-----<br>
Von: Rachner, Michael<br>
Gesendet: Freitag, 12. Dezember 2014 10:03<br>
An: 'Jonathan Perkins'<br>
Betreff: AW: [mvapich-discuss] WG: missing Fortran bindings in MVAPICH2-2.1a<br>
<br>
Thank You, Jonathan, for this hint.<br>
Indeed, the problem with the missing explicit Ftn-interfaces in the mpi-module are  the arguments of "choice"-type.  Fortran 95 don't like them.<br>
So the MPI-3.0  Standard document contains a complicated chapter 17.1  with these things.<br>
As a consequence, MPICH seems to have chosen the slim way omitting in the mpi-module ("use mpi") the explicit Ftn-interfaces for MPI-routines with choice-type arguments, whereas OPENMPI has chosen the cumbercome way providing  the explicit Ftn-interfaces even for these MPI-routines. They succeeded.<br>
For details: In November there were some emails discussing this issue in the OPENMPI-forum.<br>
<br>
Greetings<br>
Michael Rachner<br>
<br>
<br>
-----Ursprüngliche Nachricht-----<br>
Von: Jonathan Perkins [mailto:<a href="mailto:perkinjo@cse.ohio-state.edu">perkinjo@cse.ohio-state.edu</a>]<br>
Gesendet: Donnerstag, 11. Dezember 2014 16:17<br>
An: Rachner, Michael<br>
Cc: <a href="mailto:mvapich-discuss@cse.ohio-state.edu">mvapich-discuss@cse.ohio-state.edu</a><br>
Betreff: Re: [mvapich-discuss] WG: missing Fortran bindings in MVAPICH2-2.1a<br>
<br>
Hello Michael.  My investigation turned up the same issue in MPICH-3.1.3.  MVAPICH2-2.1a is based on MPICH-3.1.2 so it inherits the same behavior.<br>
<br>
Here is a snippet from MPICH's user guide:<br>
<br>
    4.2 Special Issues for Fortran<br>
<br>
    MPICH provides two kinds of support for Fortran programs. For<br>
    Fortran 77 programmers, the file mpif.h provides the definitions of<br>
    the MPI constants such as MPI COMM WORLD. Fortran 90 programmers<br>
    should use the MPI module instead; this provides all of the<br>
    definitions as well as interface definitions for many of the MPI<br>
    functions. However, this MPI module does not provide full Fortran 90<br>
    support; in particular, interfaces for the routines, such as MPI<br>
    Send, that take “choice” arguments are not provided.<br>
<br>
It sounds like these are routines with ``choice'' arguments.<br>
<br>
On Thu, Dec 11, 2014 at 01:29:03PM +0000, <a href="mailto:Michael.Rachner@dlr.de">Michael.Rachner@dlr.de</a> wrote:<br>
> Dear developers,<br>
><br>
> I have just found, that exactly the same 11 missing Ftn-interfaces  are also missing in MPICH-3.0.4, MSMPI-5.0, IMPI-5.0.0  .<br>
> So that looks, as if you all have inherited these missing interfaces from MPICH.<br>
><br>
> In contrast, with OPENMPI-1.8.2 all explicit Ftn-interfaces for MPI-routines needed by our CFD-code are present. Compliment!<br>
><br>
> Greetings<br>
> Michael Rachner<br>
><br>
><br>
> Von: mvapich-discuss<br>
> [mailto:<a href="mailto:mvapich-discuss-bounces@cse.ohio-state.edu">mvapich-discuss-bounces@cse.ohio-state.edu</a>] Im Auftrag von<br>
> <a href="mailto:Michael.Rachner@dlr.de">Michael.Rachner@dlr.de</a><br>
> Gesendet: Donnerstag, 11. Dezember 2014 13:12<br>
> An: <a href="mailto:mvapich-discuss@cse.ohio-state.edu">mvapich-discuss@cse.ohio-state.edu</a><br>
> Betreff: [mvapich-discuss] missing Fortran bindings in MVAPICH2-2.1a<br>
><br>
> Dear developers of MVAPICH2,<br>
><br>
> I found, that the explicit interfaces in the mpi-module are still missing in MVAPICH2-2.1a  (with INTEL-14.0.4) for these 11 MPI-routines:<br>
>   MPI_BCAST<br>
>   MPI_GATHER , MPI_GATHERV<br>
>   MPI_REDUCE , MPI_ALLREDUCE<br>
>   MPI_SCATTER, MPI_SCATTERV<br>
>   MPI_SSEND  , MPI_RECV<br>
>   MPI_WIN_ALLOCATE_SHARED, MPI_WIN_SHARED_QUERY<br>
><br>
> Greetings<br>
>   Michael Rachner<br>
><br>
<br>
> _______________________________________________<br>
> mvapich-discuss mailing list<br>
> <a href="mailto:mvapich-discuss@cse.ohio-state.edu">mvapich-discuss@cse.ohio-state.edu</a><br>
> <a href="http://mailman.cse.ohio-state.edu/mailman/listinfo/mvapich-discuss" target="_blank">http://mailman.cse.ohio-state.edu/mailman/listinfo/mvapich-discuss</a><br>
<br>
_______________________________________________<br>
discuss mailing list     <a href="mailto:discuss@mpich.org">discuss@mpich.org</a><br>
To manage subscription options or unsubscribe:<br>
<a href="https://lists.mpich.org/mailman/listinfo/discuss" target="_blank">https://lists.mpich.org/mailman/listinfo/discuss</a></blockquote></div></div>