/* barrier.c 
 *
 */

#include <stdio.h>
#include <math.h>
#include "mpi.h"
#define NMAX 1000
int main(int argc, char * argv[])
{
     int i, nproc, rank;
     double sum;
     MPI_Init(&argc, &argv);
     MPI_Comm_rank(MPI_COMM_WORLD, &rank);
     MPI_Comm_size(MPI_COMM_WORLD, &nproc);
     if (rank == 0) {
          sum=0.0;
          for (i=0; i<NMAX; i++)
               sum += sin(i/10.0);
     } 
     MPI_Barrier(MPI_COMM_WORLD);
     MPI_Finalize();
     return 0;
}