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