1: static char help[] = "Tests dynamic loading of viewer.\n\n";

  3: #include <petscsys.h>

  5: int main(int argc, char **args)
  6: {
  7:   PetscViewer viewer;

  9:   PetscFunctionBeginUser;
 10:   PetscCall(PetscInitialize(&argc, &args, NULL, help));
 11:   PetscCall(PetscViewerCreate(PETSC_COMM_WORLD, &viewer));
 12:   PetscCall(PetscViewerSetFromOptions(viewer));
 13:   PetscCall(PetscViewerDestroy(&viewer));

 15:   PetscCall(PetscViewerASCIIOpen(PETSC_COMM_WORLD, "stdout", &viewer));
 16:   PetscCall(PetscViewerDestroy(&viewer));
 17:   PetscCall(PetscFinalize());
 18:   return 0;
 19: }

 21: /*TEST

 23:    test:
 24:      output_file: output/empty.out

 26: TEST*/