「Message Passing Interface」の版間の差分
削除された内容 追加された内容
→プログラムの例: コメントを日本語に翻訳 |
|||
124行目:
<source lang="c">
/*
"Hello World" MPI
*/
#include <mpi.h>
141行目:
int i;
MPI_Status stat;
/* MPI
MPI_Init(&argc,&argv);
/*
MPI_Comm_size(MPI_COMM_WORLD,&numprocs);
/* そしてこのプロセスのランク(番号)は */
MPI_Comm_rank(MPI_COMM_WORLD,&myid);
/* この時点で全プログラムは同等に走っており、SPMDモデルの中でこれらを区別する場合には
ランクで見分ける。ただしランク0のプログラムは特別な処理をしていることもある。... */
if(myid == 0)
{
167 ⟶ 166行目:
else
{
/*
MPI_Recv(buff, BUFSIZE, MPI_CHAR, 0, TAG, MPI_COMM_WORLD, &stat);
sprintf(idstr, "Processor %d ", myid);
strncat(buff, idstr, BUFSIZE-1);
strncat(buff, "reporting for duty", BUFSIZE-1);
/*
MPI_Send(buff, BUFSIZE, MPI_CHAR, 0, TAG, MPI_COMM_WORLD);
}
/* MPI FinalizeでMPIのプログラムは終了する; ここは弱い同期ポイント */
MPI_Finalize();
return 0;
|