Lines Matching refs:mpi_rank
26 int mpi_size, mpi_rank; in main() local
38 MPI_Comm_rank(MPI_COMM_WORLD, &mpi_rank); in main()
43 if (!mpi_rank) in main()
46 if (!mpi_rank) in main()
65 if (!mpi_rank) in main()
80 if (data_in != (mpi_rank ? TEST_VAL_42 : MASTS)) ERR; in main()
86 if (!mpi_rank) in main()
89 if (!mpi_rank) in main()
126 if (!mpi_rank) in main()
141 if (data_in != (mpi_rank ? TEST_VAL_42 : 1000000)) ERR; in main()
147 if (!mpi_rank) in main()
149 if (!mpi_rank) in main()
192 if (!mpi_rank) in main()
206 if (!mpi_rank) in main()
221 if (!mpi_rank) in main()
223 if (!mpi_rank) in main()
246 if (!mpi_rank) in main()
275 if (!mpi_rank) in main()
286 if (!mpi_rank) in main()
289 if (!mpi_rank) in main()
311 if (!mpi_rank) in main()
319 if (!mpi_rank) in main()
332 data[i] = mpi_rank + i * 0.1; in main()
342 start[0] = mpi_rank * elements_per_pe; in main()
359 if (!mpi_rank) in main()
367 if (!mpi_rank) in main()