Changeset 1384 for XIOS


Ignore:
Timestamp:
12/19/17 17:29:21 (3 years ago)
Author:
yushan
Message:

dev EP-RMA : MPI_Accumulate

Location:
XIOS/dev/branch_openmp/extern/ep_dev
Files:
3 added
2 edited

Legend:

Unmodified
Added
Removed
  • XIOS/dev/branch_openmp/extern/ep_dev/ep_lib_win.hpp

    r1383 r1384  
    1616  int MPI_Get(void *origin_addr, int origin_count, MPI_Datatype origin_datatype,  
    1717                  int target_rank, MPI_Aint target_disp, int target_count, MPI_Datatype target_datatype, MPI_Win win); 
     18 
     19  int MPI_Accumulate(const void *origin_addr, int origin_count, MPI_Datatype origin_datatype,  
     20                         int target_rank, MPI_Aint target_disp, int target_count, MPI_Datatype target_datatype, MPI_Op op, MPI_Win win); 
    1821} 
    1922 
  • XIOS/dev/branch_openmp/extern/ep_dev/main.cpp

    r1383 r1384  
    709709    } 
    710710 
     711    MPI_Win_fence(0, ep_win); 
     712 
     713    if(rank == 0) 
     714    { 
     715      MPI_Aint displs(0); 
     716      MPI_Accumulate(&local_buf, 1, MPI_INT, size-1, displs, 1, MPI_INT, MPI_SUM, ep_win); 
     717    } 
     718 
    711719 
    712720    MPI_Barrier(comm); 
Note: See TracChangeset for help on using the changeset viewer.