Changeset 1517 for XIOS/dev/branch_openmp/extern/ep_dev/main.cpp
- Timestamp:
- 06/01/18 15:24:53 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
XIOS/dev/branch_openmp/extern/ep_dev/main.cpp
r1515 r1517 19 19 srand (time(NULL)); 20 20 21 printf("Testing ep_lib\n");21 //printf("Testing ep_lib\n"); 22 22 int required=3, provided; 23 23 … … 32 32 MPI_Comm_size(MPI_COMM_WORLD, &mpi_size); 33 33 34 35 34 36 #pragma omp parallel default(shared) 35 37 { … … 858 860 MPI_Comm_free(&split_comm); 859 861 860 MPI_Barrier(comm); 861 MPI_Barrier(comm); 862 862 863 MPI_Barrier(comm); 864 MPI_Barrier(comm); 865 866 MPI_Comm inter_comm_dup; 867 MPI_Comm_dup(inter_comm, &inter_comm_dup); 868 869 MPI_Barrier(comm); 870 MPI_Barrier(comm); 871 872 873 MPI_Comm_free(&inter_comm_dup); 874 875 876 MPI_Barrier(comm); 877 MPI_Barrier(comm); 878 879 MPI_Barrier(inter_comm); 863 880 MPI_Comm_free(&inter_comm); 864 881
Note: See TracChangeset
for help on using the changeset viewer.