1 /* -*- Mode: C; c-basic-offset:4 ; indent-tabs-mode:nil ; -*- */
3 * (C) 2003 by Argonne National Laboratory.
4 * See COPYRIGHT in top-level directory.
10 static inline void print_err(int *dims, int ndims)
15 for (i = 0; i < ndims; i++)
16 printf("%d ", dims[i]);
17 printf("] Suboptimal distribution!\n");
20 int main(int argc, char **argv)
23 int dims[4], ndims, nnodes;
25 MTest_Init(&argc, &argv);
27 for (ndims = 3; ndims <= 4; ndims++) {
28 for (nnodes = 2; nnodes <= 4096; nnodes *= 2) {
30 for (i = 0; i < ndims; i++)
33 MPI_Dims_create(nnodes, ndims, dims);
36 for (i = 0; i < ndims - 1; i++)
37 if (dims[i] / 2 > dims[i + 1]) {
38 print_err(dims, ndims);