...
edit: I found this gem in diwrgrid_mod.F90: F90 
| Code Block |
|---|
! Should really make a version of MPL_GATHERV accepting 2D fields ALLOCATE(ZBUF(ILEN)) ZBUF(:) = RESHAPE(PREAL,SHAPE(ZBUF)) CALL MPL_GATHERV(ZBUF,NPRCIDS(KIOPROC),CDSTRING='DIWRGRID_MOD:DIWRGRID_SEND') |
I guess that confirms it. I ended up using MPL_MPIF and the regular MPI_ALLREDUCE.
...