Actual source code: ex11.c
1: static char help[] = "Tests PetscSynchronizedPrintf() and PetscSynchronizedFPrintf().\n\n";
3: #include <petscsys.h>
5: int main(int argc, char **argv)
6: {
7: PetscMPIInt rank;
9: PetscFunctionBeginUser;
10: PetscCall(PetscInitialize(&argc, &argv, NULL, help));
11: PetscCallMPI(MPI_Comm_rank(PETSC_COMM_WORLD, &rank));
13: PetscCall(PetscSynchronizedPrintf(PETSC_COMM_WORLD, "Greetings from %d\n", rank));
14: PetscCall(PetscSynchronizedFlush(PETSC_COMM_WORLD, PETSC_STDOUT));
16: PetscCall(PetscSynchronizedFPrintf(PETSC_COMM_WORLD, PETSC_STDOUT, "Greetings again from %d\n", rank));
17: PetscCall(PetscSynchronizedFlush(PETSC_COMM_WORLD, PETSC_STDOUT));
19: PetscCall(PetscFinalize());
20: return 0;
21: }
23: /*TEST
25: test:
26: nsize: 3
28: TEST*/