vc.net平台下的mpi程序例子

#include <mpi.h>
#include <stdlib.h>
#include <stdio.h>
#include <conio.h>
#pragma comment (lib, "mpichd.lib")
int main(int argc, char* argv[])
{
int myid,numprocs;
int namelen;
char processor_name[MPI_MAX_PROCESSOR_NAME];
MPI_Init(&argc,&argv);
MPI_Comm_rank(MPI_COMM_WORLD,&myid);
MPI_Comm_size(MPI_COMM_WORLD,&numprocs);
MPI_Get_processor_name(processor_name,&namelen);
fprintf(stderr,
"Hello World!Process %d of %d on %s/n",
myid,numprocs,processor_name);

MPI_Finalize();

if (myid == 0)
{
printf("/nPress a key and exit./n");
getch();
}
return 0;
}