X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/6e250f85a054d8939078c3e5573171a39f4aa855..0278aef76566372fe71c66c9cf4381dde2666722:/examples/smpi/first.c diff --git a/examples/smpi/first.c b/examples/smpi/first.c deleted file mode 100644 index 8ff6e4c581..0000000000 --- a/examples/smpi/first.c +++ /dev/null @@ -1,32 +0,0 @@ -#include -#include - -int main(int argc, char *argv[]) -{ - int rank, size, err; - - err = MPI_Init(&argc, &argv); /* Initialize MPI */ - if (err != MPI_SUCCESS) { - printf("MPI initialization failed!\n"); - exit(1); - } - - err = MPI_Comm_size(MPI_COMM_WORLD, &size); - if (err != MPI_SUCCESS) { - printf("MPI Get Communicator Size Failed!\n"); - } - - err = MPI_Comm_rank(MPI_COMM_WORLD, &rank); - if (err != MPI_SUCCESS) { - printf("MPI Get Communicator Rank Failed!\n"); - } - - if (0 == rank) { - printf("root node believes there are %d nodes in world.\n", size); - } - - sleep(20); - - err = MPI_Finalize(); /* Terminate MPI */ - return 0; -}