- if (A) {}
- MPI_Barrier (MPI_COMM_WORLD);
- if (B) {}
- MPI_Barrier (MPI_COMM_WORLD);
- if (C) {}
- MPI_Barrier (MPI_COMM_WORLD);
- if (D) {}
- MPI_Barrier (MPI_COMM_WORLD);
- if (E) {}
- MPI_Barrier (MPI_COMM_WORLD);
- if (F) {}
- MPI_Barrier (MPI_COMM_WORLD);
- if (G) {}
- MPI_Barrier (MPI_COMM_WORLD);
- if (H) {}
- MPI_Barrier (MPI_COMM_WORLD);
- if (I){
- for (i = 0; i < N; i++){
- MPI_Irecv(&r, 1, MPI_INT, 0, tag, MPI_COMM_WORLD, &req[i]);
+ if (A) {
+ }
+ MPI_Barrier(MPI_COMM_WORLD);
+ if (B) {
+ }
+ MPI_Barrier(MPI_COMM_WORLD);
+ if (C) {
+ }
+ MPI_Barrier(MPI_COMM_WORLD);
+ if (D) {
+ }
+ MPI_Barrier(MPI_COMM_WORLD);
+ if (E) {
+ }
+ MPI_Barrier(MPI_COMM_WORLD);
+ if (F) {
+ }
+ MPI_Barrier(MPI_COMM_WORLD);
+ if (G) {
+ }
+ MPI_Barrier(MPI_COMM_WORLD);
+ if (H) {
+ }
+ MPI_Barrier(MPI_COMM_WORLD);
+ if (I) {
+ TRACE_smpi_set_category("I");
+ for (i = 0; i < N; i++) {
+ MPI_Irecv(r, DATATOSENT, MPI_INT, 0, tag, MPI_COMM_WORLD, &req[i]);