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

extern int My_Comm_size(MPI_Comm comm, int *size);


int
main(int argc, char *argv[])
{

int my_rank, nproc;
int size;


    MPI_Init(&argc, &argv);
    MPI_Comm_size(MPI_COMM_WORLD, &nproc);
    MPI_Comm_rank(MPI_COMM_WORLD, &my_rank);

    My_Comm_size(MPI_COMM_WORLD, &size);

    if (my_rank == 0)   {
	printf("Rank %3d: this program is running with %d processes\n",
	    my_rank, nproc);
	printf("Rank %3d: Student My_Comm_Size() reports %d processes\n",
	    my_rank, size);
    }

    printf("Rank %3d: initialized and ready\n", my_rank);

    MPI_Finalize();
    return 0;

}  /* end of main() */