#include <stdio.h>
#include <mpi.h>

int main(int argc, char **argv)
{
    int size;
    int rank;
    int value=34567;
    int root=0;

    MPI_Init(&argc, &argv);
    MPI_Comm_size(MPI_COMM_WORLD, &size);
    MPI_Comm_rank(MPI_COMM_WORLD, &rank);
    MPI_Bcast(&value, 1, MPI_INT, 0, MPI_COMM_WORLD);

    printf("Hello from process %d out of %d, Received: %d\n", 
	                   rank, size, value);

    MPI_Finalize();
    return 0;
}

/*

To check connections: recon -v lamhosts

lamboot -v lamhosts 

LAM 6.5.6/MPI 2 C++/ROMIO - University of Notre Dame

Executing hboot on n0 (deadend.tjhsst.edu - 1 CPU)...
Executing hboot on n1 (helium.tjhsst.edu - 1 CPU)...
Executing hboot on n2 (silicon.tjhsst.edu - 1 CPU)...
Executing hboot on n3 (phosphorus.tjhsst.edu - 1 CPU)...
Executing hboot on n4 (magnesium.tjhsst.edu - 1 CPU)...
topology done      

mpicc -o bcastMPI bcastMPI.c 

mpirun N bcastMPI
Hello from process 0 out of 5, Received: 34567
Hello from process 3 out of 5, Received: 34567
Hello from process 1 out of 5, Received: 34567
Hello from process 4 out of 5, Received: 34567
Hello from process 2 out of 5, Received: 34567

lamclean

lamhalt

*/