- MPI_Init( 0, 0 );
- MPI_Comm_rank( MPI_COMM_WORLD, &rank );
- MPI_Comm_size( MPI_COMM_WORLD, &size );
- MPI_Barrier( MPI_COMM_WORLD );
- if (rank == size-1) {
- /* Cause some processes to exit */
- int *p =0 ;
- *p = rank;
+ MPI_Init(&argc, &argv);
+ MPI_Comm_rank(MPI_COMM_WORLD, &rank);
+ MPI_Comm_size(MPI_COMM_WORLD, &size);
+ MPI_Barrier(MPI_COMM_WORLD);
+ if (rank == size - 1) {
+ /* Cause some processes to exit */
+ int *p = 0;
+ *p = rank;