17   PetscCall(PetscPrintf(PETSC_COMM_SELF, "1st test\n"));  in main()
18   for (i = 0; i < 5; i++) PetscCall(PetscPrintf(PETSC_COMM_SELF, " %g\n", (double)x[i]));  in main()
19   PetscCall(PetscPrintf(PETSC_COMM_SELF, "---------------\n"));  in main()
21   for (i = 0; i < 5; i++) PetscCall(PetscPrintf(PETSC_COMM_SELF, " %g\n", (double)x[i]));  in main()
23   PetscCall(PetscPrintf(PETSC_COMM_SELF, "\n2nd test\n"));  in main()
24   for (i = 0; i < 10; i++) PetscCall(PetscPrintf(PETSC_COMM_SELF, " %g\n", (double)x[i]));  in main()
25   PetscCall(PetscPrintf(PETSC_COMM_SELF, "---------------\n"));  in main()
27   for (i = 0; i < 10; i++) PetscCall(PetscPrintf(PETSC_COMM_SELF, " %g\n", (double)x[i]));  in main()
29   PetscCall(PetscPrintf(PETSC_COMM_SELF, "\n3rd test\n"));  in main()
30 …for (i = 0; i < 5; i++) PetscCall(PetscPrintf(PETSC_COMM_SELF, " %2" PetscInt_FMT "     %g\n", ind…  in main()
31   PetscCall(PetscPrintf(PETSC_COMM_SELF, "---------------\n"));  in main()
33 …for (i = 0; i < 5; i++) PetscCall(PetscPrintf(PETSC_COMM_SELF, " %2" PetscInt_FMT "     %g\n", ind…  in main()
35   PetscCall(PetscPrintf(PETSC_COMM_SELF, "\n4th test\n"));  in main()
36 …for (i = 0; i < 10; i++) PetscCall(PetscPrintf(PETSC_COMM_SELF, " %2" PetscInt_FMT "     %g\n", in…  in main()
37   PetscCall(PetscPrintf(PETSC_COMM_SELF, "---------------\n"));  in main()
39 …for (i = 0; i < 10; i++) PetscCall(PetscPrintf(PETSC_COMM_SELF, " %2" PetscInt_FMT "     %g\n", in…  in main()
41   PetscCall(PetscPrintf(PETSC_COMM_SELF, "\n5th test\n"));  in main()
44 …PetscCall(PetscPrintf(PETSC_COMM_SELF, " %g in array: loc %" PetscInt_FMT "\n", (double)val, loc));  in main()
47 …PetscCall(PetscPrintf(PETSC_COMM_SELF, " %g in array: loc %" PetscInt_FMT "\n", (double)val, loc));  in main()
50 …PetscCall(PetscPrintf(PETSC_COMM_SELF, " %g in array: loc %" PetscInt_FMT "\n", (double)val, loc));  in main()