xref: /petsc/src/sys/classes/draw/tests/ex12.c (revision 11486bccf1aeea1ca5536228f99d437b39bdaca6)
1 
2 static char help[] = "Makes a simple bar graph.\n";
3 
4 #include <petscsys.h>
5 #include <petscdraw.h>
6 
7 int main(int argc,char **argv)
8 {
9   PetscDraw         draw;
10   PetscDrawBar      bar;
11   PetscDrawAxis     axis;
12   int               color = PETSC_DRAW_ROTATE;
13   const char        *xlabel,*ylabel,*toplabel;
14   const PetscReal   values[] = {.3, .5, .05, .11};
15   const char *const labels[] = {"A","B","C","D",NULL};
16   PetscReal         limits[2] = {0,0.55}; PetscInt nlimits = 2;
17   PetscBool         nolabels,setlimits;
18 
19   xlabel = "X-axis Label"; toplabel = "Top Label"; ylabel = "Y-axis Label";
20 
21   PetscFunctionBeginUser;
22   PetscCall(PetscInitialize(&argc,&argv,NULL,help));
23   PetscCall(PetscOptionsHasName(NULL,NULL,"-nolabels",&nolabels));
24   if (nolabels) { xlabel = NULL; ylabel = NULL; toplabel = NULL; }
25   PetscCall(PetscOptionsGetRealArray(NULL,NULL,"-limits",limits,&nlimits,&setlimits));
26 
27   PetscCall(PetscDrawCreate(PETSC_COMM_WORLD,NULL,"Title",PETSC_DECIDE,PETSC_DECIDE,400,300,&draw));
28   PetscCall(PetscDrawSetFromOptions(draw));
29   PetscCall(PetscDrawBarCreate(draw,&bar));
30 
31   PetscCall(PetscDrawBarGetAxis(bar,&axis));
32   PetscCall(PetscDrawAxisSetColors(axis,PETSC_DRAW_BLACK,PETSC_DRAW_RED,PETSC_DRAW_BLUE));
33   PetscCall(PetscDrawAxisSetLabels(axis,toplabel,xlabel,ylabel));
34   PetscCall(PetscDrawBarSetColor(bar,color));
35   PetscCall(PetscDrawBarSetFromOptions(bar));
36 
37   if (setlimits) PetscCall(PetscDrawBarSetLimits(bar,limits[0],limits[1]));
38   PetscCall(PetscDrawBarSetData(bar,4,values,labels));
39   PetscCall(PetscDrawBarDraw(bar));
40   PetscCall(PetscDrawBarSave(bar));
41 
42   PetscCall(PetscDrawBarDestroy(&bar));
43   PetscCall(PetscDrawDestroy(&draw));
44   PetscCall(PetscFinalize());
45   return 0;
46 }
47 
48 /*TEST
49 
50    build:
51      requires: x
52 
53    test:
54      output_file: output/ex1_1.out
55 
56 TEST*/
57