MPI通信域划分及新通信域各进程间的点对点阻塞式通信

/*
通信域划分及新通信域各进程间的点对点阻塞式通信
*/
#include <stdio.h>   
#include <mpi.h>
 #define MAX_STRING 100
main (int argc, char **argv)  
{  
    int oldrank,oldsize;            //旧进程标识，旧通信域进程总数目
    int newrank,newsize;            //新进程标识，新通信域进程总数目
    MPI_Comm newcomm;               //新通信域
    char greeting[MAX_STRING];      //消息缓存

    MPI_Init(&argc, &argv);                     //初始化操作
    MPI_Comm_rank(MPI_COMM_WORLD, &oldrank)