int main(int argc,char **argv) { PetscInt cycle; MPI_Init(&argc,&argv); for (cycle=0; cycle<4; cycle++) { Brusselator(argc,argv,cycle); } MPI_Finalize(); return 0; }
int main(int argc,char **argv) { PetscInt cycle; PetscErrorCode ierr; ierr = MPI_Init(&argc,&argv);if (ierr) return ierr; for (cycle=0; cycle<4; cycle++) { ierr = Brusselator(argc,argv,cycle); if (ierr) return 1; } ierr = MPI_Finalize(); return ierr; }