- blockcnt[0] = 1;
- offsets[0] = 3;
- MPI_Type_hindexed(1, blockcnt, offsets, MPI_BYTE, &tmp_type);
- blockcnt[0] = 1;
- offsets[0] = 1;
- MPI_Type_hindexed(1, blockcnt, offsets, tmp_type, &newtype);
- MPI_Type_commit(&newtype);
-
- MPI_Type_lb(newtype, &lb);
- MPI_Type_extent(newtype, &extent);
- MPI_Type_ub(newtype, &ub);
-
- /* Check that the results are correct */
+ blockcnt[0] = 1;
+ offsets[0] = 3;
+ MPI_Type_hindexed(1, blockcnt, offsets, MPI_BYTE, &tmp_type);
+ blockcnt[0] = 1;
+ offsets[0] = 1;
+ MPI_Type_hindexed(1, blockcnt, offsets, tmp_type, &newtype);
+ MPI_Type_commit(&newtype);
+
+ MPI_Type_lb(newtype, &lb);
+ MPI_Type_extent(newtype, &extent);
+ MPI_Type_ub(newtype, &ub);
+
+ /* Check that the results are correct */