3
0
Fork 0
forked from mirrors/nixpkgs

Add missing file for the MPI test.

svn path=/nixos/trunk/; revision=27337
This commit is contained in:
Ludovic Courtès 2011-05-31 15:09:56 +00:00
parent 733917db0f
commit 488fd42041

21
tests/mpich-example.c Normal file
View file

@ -0,0 +1,21 @@
#include <stdio.h>
#include <stdlib.h>
#include <mpi.h>
int
main (int argc, char *argv[])
{
int rank, size, length;
char name[BUFSIZ];
MPI_Init (&argc, &argv);
MPI_Comm_rank (MPI_COMM_WORLD, &rank);
MPI_Comm_size (MPI_COMM_WORLD, &size);
MPI_Get_processor_name (name, &length);
printf ("%s: hello world from process %d of %d\n", name, rank, size);
MPI_Finalize ();
return EXIT_SUCCESS;
}