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