Skeleton code for migration

Skeleton Code

int ierr, status, errcode=21;

ierr = MPI_Topo_test (comm3d, &status);
if (status != MPI_CART) 
    ierr = MPI_Abort (comm3d, errcode);

CREATE PARTICLE DATATYPE

CREATE SEND/RECV DATATYPES

COMMUNICATE DATA