xref: /petsc/src/sys/classes/draw/tests/ex4.c (revision 5f80ce2ab25dff0f4601e710601cbbcecf323266)
1c4762a1bSJed Brown 
2c4762a1bSJed Brown static char help[] = "Demonstrates use of PetscDrawZoom()\n";
3c4762a1bSJed Brown 
4c4762a1bSJed Brown #if defined(PETSC_APPLE_FRAMEWORK)
5c4762a1bSJed Brown 
6c4762a1bSJed Brown #include <PETSc/petscsys.h>
7c4762a1bSJed Brown #include <PETSc/petscdraw.h>
8c4762a1bSJed Brown #else
9c4762a1bSJed Brown #include <petscsys.h>
10c4762a1bSJed Brown #include <petscdraw.h>
11c4762a1bSJed Brown #endif
12c4762a1bSJed Brown 
13c4762a1bSJed Brown PetscErrorCode zoomfunction(PetscDraw draw,void *dummy)
14c4762a1bSJed Brown {
15c4762a1bSJed Brown   int         i;
16c4762a1bSJed Brown   MPI_Comm    comm = PetscObjectComm((PetscObject)draw);
17c4762a1bSJed Brown   PetscMPIInt size,rank;
18c4762a1bSJed Brown 
19*5f80ce2aSJacob Faibussowitsch   CHKERRMPI(MPI_Comm_size(comm,&size));
20*5f80ce2aSJacob Faibussowitsch   CHKERRMPI(MPI_Comm_rank(comm,&rank));
21c4762a1bSJed Brown   for (i=rank; i<256; i+=size) {
22c4762a1bSJed Brown     PetscReal y = ((PetscReal)i)/(256-1);
23*5f80ce2aSJacob Faibussowitsch     CHKERRQ(PetscDrawLine(draw,0.0,y,1.0,y,i));
24c4762a1bSJed Brown   }
25c4762a1bSJed Brown   return 0;
26c4762a1bSJed Brown }
27c4762a1bSJed Brown 
28c4762a1bSJed Brown int main(int argc,char **argv)
29c4762a1bSJed Brown {
30c4762a1bSJed Brown   int            x = 0,y = 0,width = 256,height = 256;
31c4762a1bSJed Brown   PetscDraw      draw;
32c4762a1bSJed Brown   PetscErrorCode ierr;
33c4762a1bSJed Brown 
34c4762a1bSJed Brown   ierr = PetscInitialize(&argc,&argv,NULL,help);if (ierr) return ierr;
35*5f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawCreate(PETSC_COMM_WORLD,NULL,"Title",x,y,width,height,&draw));
36*5f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawSetFromOptions(draw));
37*5f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawZoom(draw,zoomfunction,NULL));
38*5f80ce2aSJacob Faibussowitsch   CHKERRQ(PetscDrawDestroy(&draw));
39c4762a1bSJed Brown   ierr = PetscFinalize();
40c4762a1bSJed Brown   return ierr;
41c4762a1bSJed Brown }
42c4762a1bSJed Brown 
43c4762a1bSJed Brown /*TEST
44c4762a1bSJed Brown 
45c4762a1bSJed Brown    build:
46c4762a1bSJed Brown      requires: x
47c4762a1bSJed Brown 
48c4762a1bSJed Brown    test:
49c4762a1bSJed Brown      output_file: output/ex1_1.out
50c4762a1bSJed Brown 
51c4762a1bSJed Brown    test:
52c4762a1bSJed Brown      suffix: db
53c4762a1bSJed Brown      args: -draw_double_buffer 0
54c4762a1bSJed Brown      output_file: output/ex1_1.out
55c4762a1bSJed Brown 
56c4762a1bSJed Brown    test:
57c4762a1bSJed Brown      suffix: df
58c4762a1bSJed Brown      args: -draw_fast
59c4762a1bSJed Brown      output_file: output/ex1_1.out
60c4762a1bSJed Brown 
61c4762a1bSJed Brown    test:
62c4762a1bSJed Brown      suffix: dv
63c4762a1bSJed Brown      args: -draw_virtual
64c4762a1bSJed Brown      output_file: output/ex1_1.out
65c4762a1bSJed Brown 
66c4762a1bSJed Brown TEST*/
67