Can you try adding MPI_Win_sync after the array updates. It should insure ordering and visibility of the load/store operations. --Halim www.mcs.anl.gov/~aamer On 4/13/16 10:43 AM, C.Friedrich wrote:

Sorry, there was a typo: a(*) should be integer rather than real(8). (ifort accepts it, gfortran does not.)

...

subroutine mpe_win_fence(a,assert,win,err) implicit none integer, intent(inout) :: a(*) integer, intent(in) :: assert,win integer, intent(out) :: err call mpi_win_fence(assert,win,err) end

------------------------------------------------------------------------------------------------

------------------------------------------------------------------------------------------------

Forschungszentrum Juelich GmbH 52425 Juelich Sitz der Gesellschaft: Juelich Eingetragen im Handelsregister des Amtsgerichts Dueren Nr. HR B 3498 Vorsitzender des Aufsichtsrats: MinDir Dr. Karl Eugen Huthmacher Geschaeftsfuehrung: Prof. Dr.-Ing. Wolfgang Marquardt (Vorsitzender), Karsten Beneke (stellv. Vorsitzender), Prof. Dr.-Ing. Harald Bolt, Prof. Dr. Sebastian M. Schmidt ------------------------------------------------------------------------------------------------

------------------------------------------------------------------------------------------------

_______________________________________________ discuss mailing list [email protected] To manage subscription options or unsubscribe: https://lists.mpich.org/mailman/listinfo/discuss

discuss mailing list [email protected] To manage subscription options or unsubscribe: https://lists.mpich.org/mailman/listinfo/discuss