#include <stdio.h>
#include <mpi.h>
# define N 5
 
int main( int argc, char *argv[ ] ){
	int rank, size,b [N], next,prev,count;
  MPI_Status status;
  MPI_Init( &argc, &argv );
  MPI_Comm_rank( MPI_COMM_WORLD, &rank );
  MPI_Comm_size( MPI_COMM_WORLD, &size );
  next=rank+1;
  prev=rank-1;
  if (rank==0) 
		prev=size-1;
  if (rank==size-1)
		next=0;
  if (rank==0){ 
	b[0]=0;
	MPI_Send(b,1,MPI_INT,next,1,MPI_COMM_WORLD);
	MPI_Probe( prev, 1, MPI_COMM_WORLD, &status ); 
	MPI_Get_count( &status, MPI_INT, &count );
	MPI_Recv(b,count, MPI_INT,prev,1,MPI_COMM_WORLD,&status);}
 
  else {
	 {
	MPI_Probe( prev, 1, MPI_COMM_WORLD, &status ); 
	MPI_Get_count( &status, MPI_INT, &count );
	MPI_Recv(b,count, MPI_INT,prev,1,MPI_COMM_WORLD,&status);
	b[rank]=b[prev]+1;
 
	MPI_Send(b,rank+1,MPI_INT,next,1,MPI_COMM_WORLD);}
	if (rank==0) 
		for (int i=0; i<size;i++) printf( "Number %d on proc: %d ! \n",b[i],rank );
 
  MPI_Finalize();
  return(0);
 
}