- int csize;
- MPI_Comm_size( comm, &csize );
- if (csize != dims[0]) {
- errs++;
- fprintf( stderr,
- "Sizes is wrong in cart communicator. Is %d, should be %d\n",
- csize, dims[0] );
- }
- MPI_Barrier( comm );
-
- MPI_Comm_free( &comm );
- }
+ int csize;
+ MPI_Comm_size(comm, &csize);
+ if (csize != dims[0]) {
+ errs++;
+ fprintf(stderr,
+ "Sizes is wrong in cart communicator. Is %d, should be %d\n", csize, dims[0]);
+ }
+ MPI_Barrier(comm);
+
+ MPI_Comm_free(&comm);
+ }