xref: /petsc/src/sys/tutorials/ex19.c (revision 362febeeeb69b91ebadcb4b2dc0a22cb6dfc4097)
1c4762a1bSJed Brown 
2c4762a1bSJed Brown static char help[] = "Illustrates creating an options database.\n\n";
3c4762a1bSJed Brown 
4c4762a1bSJed Brown /*T
5c4762a1bSJed Brown    Concepts: introduction to PETSc;
6c4762a1bSJed Brown    Concepts: printing^in parallel
7c4762a1bSJed Brown    Processors: n
8c4762a1bSJed Brown T*/
9c4762a1bSJed Brown 
10c4762a1bSJed Brown #include <petscsys.h>
11c4762a1bSJed Brown #include <petscviewer.h>
12c4762a1bSJed Brown int main(int argc,char **argv)
13c4762a1bSJed Brown {
14c4762a1bSJed Brown   PetscErrorCode ierr;
15c4762a1bSJed Brown   PetscOptions   options;
16c4762a1bSJed Brown 
17c4762a1bSJed Brown   ierr = PetscInitialize(&argc,&argv,(char*)0,help);if (ierr) return ierr;
18c4762a1bSJed Brown   CHKERRQ(PetscOptionsCreate(&options));
19c4762a1bSJed Brown   CHKERRQ(PetscOptionsInsert(options,&argc,&argv,"optionsfile"));
20c4762a1bSJed Brown   CHKERRQ(PetscOptionsInsertString(options,"-option1 value1 -option2 -option3 value3"));
21c4762a1bSJed Brown   CHKERRQ(PetscOptionsView(options,PETSC_VIEWER_STDOUT_WORLD));
22c4762a1bSJed Brown   CHKERRQ(PetscOptionsDestroy(&options));
23c4762a1bSJed Brown   ierr = PetscFinalize();
24c4762a1bSJed Brown   return ierr;
25c4762a1bSJed Brown }
26c4762a1bSJed Brown 
27c4762a1bSJed Brown /*TEST
28c4762a1bSJed Brown 
29c4762a1bSJed Brown    test:
30c4762a1bSJed Brown      localrunfiles: optionsfile
31*362febeeSStefano Zampini      filter: egrep -v "(malloc|nox|display|saws_port|vecscatter|options_left|check_pointer_intensity|cuda_initialize|error_output_stdout|use_gpu_aware_mpi|checkstack)"
32c4762a1bSJed Brown 
33c4762a1bSJed Brown TEST*/
34