MPIリクエストの完了を待つ
res = MPI_Wait(request)
MPIリクエスト.
MPI_Isendにより送信され, MPI_Irecvにより宣言されたMPIリクエストに一致する変数
TODO.
MPI_Init(); rnk = MPI_Comm_rank(); sizeNodes = MPI_Comm_size(); SLV = rnk; Master = ~ SLV; assert_checkequal(MPI_Comm_size(), 2); if Master for slaveId = 1:sizeNodes-1 value = slaveId*2 MPI_Isend(value, slaveId, 42); end else rankSource=0; tag=0; MPI_Irecv(rankSource, tag, 42); // MPI_Irecv は値を返しません value=MPI_Wait(42) // 値はMPI_Waitにより返されます assert_checkequal(value,2); end MPI_Finalize(); exit() | ![]() | ![]() |