屏障

MPI_Barrier 操作在属于给定通信器的进程之间执行同步。也就是说,来自给定通信器的所有进程将在 MPI_Barrier 内等待,直到所有进程都在内部,并且在那时,它们将离开操作。

int res;

res = MPI_Barrier (MPI_COMM_WORLD); /* all processes will wait */
if (res != MPI_SUCCESS)
{
    fprintf (stderr, "MPI_Barrier failed\n");
    exit (0);
}