Changeset 1384 for XIOS/dev/branch_openmp/extern/ep_dev/main.cpp

Timestamp:

12/19/17 17:29:21 (6 years ago)

Author:

yushan

Message:

dev EP-RMA : MPI_Accumulate

File:

• XIOS/dev/branch_openmp/extern/ep_dev/main.cpp (modified) (1 diff)

XIOS/dev/branch_openmp/extern/ep_dev/main.cpp

@@ -709 +709 @@
     }
 
+    MPI_Win_fence(0, ep_win);
+
+    if(rank == 0)
+    {
+      MPI_Aint displs(0);
+      MPI_Accumulate(&local_buf, 1, MPI_INT, size-1, displs, 1, MPI_INT, MPI_SUM, ep_win);
+    }
+
 
     MPI_Barrier(comm);