- /* printf( "freeing groups\n" ); fflush( stdout ); */
- MPI_Group_free( &basegroup );
- MPI_Group_free( &g1 );
- MPI_Group_free( &g2 );
- MPI_Group_free( &g3 );
- MPI_Group_free( &g3a );
- MPI_Group_free( &g3b );
- MPI_Group_free( &g4 );
- MPI_Group_free( &g5 );
- MPI_Group_free( &g6 );
- MPI_Group_free( &g7 );
- MPI_Group_free( &g8 );
- MPI_Group_free( &g9 );
- MPI_Group_free( &g10 );
- MPI_Comm_free( &dupcomm );
- MPI_Comm_free( &splitcomm );
- MPI_Comm_free( &newcomm );
-
- MPI_Allreduce( &errs, &toterr, 1, MPI_INT, MPI_SUM, MPI_COMM_WORLD );
+ /* printf("freeing groups\n"); fflush(stdout); */
+ MPI_Group_free(&basegroup);
+ MPI_Group_free(&g1);
+ MPI_Group_free(&g2);
+ MPI_Group_free(&g3);
+ MPI_Group_free(&g3a);
+ MPI_Group_free(&g3b);
+ MPI_Group_free(&g4);
+ MPI_Group_free(&g5);
+ MPI_Group_free(&g6);
+ MPI_Group_free(&g7);
+ MPI_Group_free(&g8);
+ MPI_Group_free(&g9);
+ MPI_Group_free(&g10);
+ MPI_Comm_free(&dupcomm);
+ MPI_Comm_free(&splitcomm);
+ MPI_Comm_free(&newcomm);
+
+ MPI_Allreduce(&errs, &toterr, 1, MPI_INT, MPI_SUM, MPI_COMM_WORLD);