131. Current Practice #2

   main(int argc, char **argv) 
   { 
     int me, count; 
     void *data; 
     ... 
 
     MPI_Init(&argc, &argv); 
     MPI_Comm_rank(MPI_COMM_WORLD, &me); 
 
     if(me == 0) 
     { 
         /* get input, create buffer ``data'' */ 
         ... 
     } 
 
     MPI_Bcast(data, count, MPI_BYTE, 0, MPI_COMM_WORLD); 
 
     ... 
 
     MPI_Finalize(); 
   }