int main(int argc, char *argv[]) {
mat_mul_specs * mms = getMatMulSpecs(argc, argv);
int rank = 0;
int np = 0;
char hostname[MPI_MAX_PROCESSOR_NAME + 1];
int namelen = 0;
MPI_Init(&argc, &argv);
MPI_Comm_rank(MPI_COMM_WORLD, &rank);
MPI_Comm_size(MPI_COMM_WORLD, &np);
MPI_Get_processor_name(hostname, &namelen);
if (rank == 0) {
random_multiply(mms);
}
MPI_Finalize();
return 0;
}
int
main (int argc, char *argv[])
{
int rank = 0;
int np = 0;
char hostname[MPI_MAX_PROCESSOR_NAME + 1];
int namelen = 0;
MPI_Init (&argc, &argv); /* starts MPI */
MPI_Comm_rank (MPI_COMM_WORLD, &rank); /* Get process id */
MPI_Comm_size (MPI_COMM_WORLD, &np); /* Get number of processes */
MPI_Get_processor_name (hostname, &namelen); /* Get hostname of node */
printf ("[Using Host:%s -- Rank %d out of %d]\n", hostname, rank, np);
if (rank == 0)
{
random_multiply (512, 512, 512, NUM_TRIALS);
}
MPI_Finalize ();
return 0;
}
