first commit

This commit is contained in:
Carl Pearson
2019-10-16 12:10:12 -05:00
commit ef7879dccf
3 changed files with 34 additions and 0 deletions

6
Makefile Normal file
View File

@@ -0,0 +1,6 @@
TARGETS = main
all: ${TARGETS}
main: main.cpp
mpicxx -Wall -Wextra $< -o $@

1
README.md Normal file
View File

@@ -0,0 +1 @@
# mpi_test

27
main.cpp Normal file
View File

@@ -0,0 +1,27 @@
#include <mpi.h>
#include <stdio.h>
int main(int argc, char **argv) {
// Initialize the MPI environment
MPI_Init(NULL, NULL);
// Get the number of processes
int world_size;
MPI_Comm_size(MPI_COMM_WORLD, &world_size);
// Get the rank of the process
int world_rank;
MPI_Comm_rank(MPI_COMM_WORLD, &world_rank);
// Get the name of the processor
char processor_name[MPI_MAX_PROCESSOR_NAME];
int name_len;
MPI_Get_processor_name(processor_name, &name_len);
// Print off a hello world message
printf("Hello world from %s, rank %d out of %d processors\n", processor_name,
world_rank, world_size);
// Finalize the MPI environment.
MPI_Finalize();
}