}
int PMPI_Type_create_darray(int size, int rank, int ndims, int* array_of_gsizes,
int* array_of_distribs, int* array_of_dargs, int* array_of_psizes,
int order, MPI_Datatype oldtype, MPI_Datatype *newtype) {
}
int PMPI_Type_create_darray(int size, int rank, int ndims, int* array_of_gsizes,
int* array_of_distribs, int* array_of_dargs, int* array_of_psizes,
int order, MPI_Datatype oldtype, MPI_Datatype *newtype) {