可以用下面回答
integer coords(2) call MPI_COMM_RANK( comm1d, myrank, ierr ) call MPI_CART_COORDS( comm1d, myrank, 2, $ coords, ierr )
在coords中返回调用进程的笛卡尔坐标。