examples/smpi/split.c

   1 #include <stdio.h>
   2 #include <mpi.h>
   3
   4 int main(int argc, char *argv[])
   5 {
   6   int worldrank;
   7 //  int localrank;
   8 //  MPI_Comm localcomm;
   9   MPI_Init(&argc, &argv);
  10   MPI_Comm_rank(MPI_COMM_WORLD, &worldrank);
  11   printf("MPI_Comm_split is not implemented\n");
  12   //MPI_Comm_split(MPI_COMM_WORLD, worldrank % 2, worldrank, &localcomm);
  13   //MPI_Comm_rank(localcomm, &localrank);
  14   //printf("node with world rank %d has local rank %d\n", worldrank, localrank);
  15   MPI_Finalize();
  16   return 0;
  17 }