[FLASH-USERS] Update to mpi_amr_redist_blk.F90 for HVECTOR call.

[Joshua Wall]

Klaus,

   Thanks for the pointer. Corrected version attached. Here I used
something I saw elsewhere in the code:

#ifndef FLASH_MPI1
#define FLASH_MPI2
#endif

to set up some ifdefs that will pick either the MPI 1 version of HVECTOR or
the MPI 2/3 version, depending on if that FLASH_MPI1 preprocessor variable
is defined. Seems to be working okay now.

Cordially,

Joshua Wall

Doctoral Candidate
Department of Physics
Drexel University


On Tue, Mar 5, 2019 at 5:54 PM Klaus Weide <klaus at flash.uchicago.edu> wrote:

>
>
> On Tue, 5 Mar 2019, Joshua Wall wrote:
>
> > Whelp, I spoke too soon, as I've now successfully caused the new version
> to
> > crash. Any chance anyone has successfully updated this for the new MPI
> 3.0
> > call?
>
> Do you get an error (at compile time?) if you replace
>
>   Include 'mpif.h'
>
> with
>
>   USE mpi_f08   ! must be before the implicit; assumes you have that
> module!
>
> ?
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://flash.rochester.edu/pipermail/flash-users/attachments/20190306/9025c9dd/attachment.htm>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: mpi_amr_redist_blk.F90
Type: text/x-fortran
Size: 37861 bytes
Desc: not available
URL: <http://flash.rochester.edu/pipermail/flash-users/attachments/20190306/9025c9dd/attachment.bin>