2: static char help[] = "Tests dynamic loading of viewer.\n\n"; 4: #include <petscsys.h> 5: #include <petscviewer.h> 7: int main(int argc, char **args) 8: { 9: PetscViewer viewer; 11: PetscFunctionBeginUser; 12: PetscCall(PetscInitialize(&argc, &args, (char *)0, help)); 13: PetscCall(PetscViewerCreate(PETSC_COMM_WORLD, &viewer)); 14: PetscCall(PetscViewerSetFromOptions(viewer)); 15: PetscCall(PetscViewerDestroy(&viewer)); 17: PetscCall(PetscViewerASCIIOpen(PETSC_COMM_WORLD, "stdout", &viewer)); 18: PetscCall(PetscViewerDestroy(&viewer)); 19: PetscCall(PetscFinalize()); 20: return 0; 21: } 23: /*TEST 25: test: 27: TEST*/