Exemplo de Programa (cont.)

if (my_rank != 0) {

/* Create message */

sprintf(message, "Greetings from process %d!",

my_rank);

dest = 0;

/* Use strlen+1 so that '\0' gets transmitted */

MPI_Send(message, strlen(message)+1, MPI_CHAR,

dest, tag, MPI_COMM_WORLD);

} else { /* my_rank == 0 */

for (source = 1; source < p; source++) {

MPI_Recv(message, 100, MPI_CHAR, source, tag,

MPI_COMM_WORLD, &status);

printf("%s\n", message);

}

}

/* Shut down MPI */

MPI_Finalize();

} /* main */

Slide anterior

Slide seguinte

Voltar para o primeiro slide

Exibir versão do elemento gráfico