source: CIVL/examples/mpi/mpiFeature/data_depend_good.c@ aaa9c8d

1.23 2.0 main test-branch
Last change on this file since aaa9c8d was 056aaa8, checked in by Ziqing Luo <ziqing@…>, 9 years ago

Add MPI feature examples into CIVL

git-svn-id: svn://vsl.cis.udel.edu/civl/trunk@4215 fb995dde-84ed-4084-dfe6-e5aef3e2452c

  • Property mode set to 100644
File size: 462 bytes
Line 
1#include<mpi.h>
2#include"data_depend_good.h"
3
4int main(int argc, char** argvs){
5 int rank;
6
7 MPI_Init(&argc, &argv);
8 MPI_Comm_rank(MPI_COMM_WORLD, &rank);
9 if (rank==0) {
10 int x = 0;
11
12 MPI_Send(&x, 1, MPI_INT, 1, 0, MPI_COMM_WORLD);
13 }
14 if (rank==1) {
15 int x = 1;
16
17 MPI_Recv(&x, 1, MPI_INT, 0, 0, MPI_COMM_WORLD, MPI_STATUS_IGNORE);
18 if (x == 1)
19 MPI_Recv(&x, 1, MPI_INT, 0, 0, MPI_COMM_WORLD, MPI_STATUS_IGNORE);
20 }
21 MPI_Finalize();
22}
Note: See TracBrowser for help on using the repository browser.