/* Program:
 *   每個 node 將自己的 id 送給下一個 node。
 * History:
 *   2008-06-05 BETA
 */

#include <mpi.h>
#include <stdio.h>

int main(int argc,char *argv[])
{
  int n=0, myid, numprocs, i=0;
  MPI_Status status;
  MPI_Init(&argc,&argv);
  MPI_Comm_size(MPI_COMM_WORLD,&numprocs);
  MPI_Comm_rank(MPI_COMM_WORLD,&myid);
  if(myid==0)
  {
    MPI_Send(&n, 1, MPI_INT, 1, 99, MPI_COMM_WORLD);
  }
  if(myid!=0)
  {
    MPI_Recv(&n, 1, MPI_INT, myid-1, 99, MPI_COMM_WORLD, &status);
    n++;

    if(myid<numprocs-1)

    {

      MPI_Send(&n, 1, MPI_INT, myid+1, 99, MPI_COMM_WORLD);

      printf("I am node %d\nI recive number %d from %d\n", myid, n, myid-1);
      printf("I send number %d to %d\n\n", n, myid+1);

    }

  }

  MPI_Finalize();

 return 0;

}