15c6c1daeSBarry Smith 25c6c1daeSBarry Smith /* 35c6c1daeSBarry Smith Provides the calling sequences for all the basic PetscDraw routines. 45c6c1daeSBarry Smith */ 5*af0996ceSBarry Smith #include <petsc/private/drawimpl.h> /*I "petscdraw.h" I*/ 65c6c1daeSBarry Smith 75c6c1daeSBarry Smith #undef __FUNCT__ 85c6c1daeSBarry Smith #define __FUNCT__ "PetscDrawSetCoordinates" 95c6c1daeSBarry Smith /*@ 105c6c1daeSBarry Smith PetscDrawSetCoordinates - Sets the application coordinates of the corners of 115c6c1daeSBarry Smith the window (or page). 125c6c1daeSBarry Smith 135c6c1daeSBarry Smith Not collective 145c6c1daeSBarry Smith 155c6c1daeSBarry Smith Input Parameters: 165c6c1daeSBarry Smith + draw - the drawing object 175c6c1daeSBarry Smith - xl,yl,xr,yr - the coordinates of the lower left corner and upper 185c6c1daeSBarry Smith right corner of the drawing region. 195c6c1daeSBarry Smith 205c6c1daeSBarry Smith Level: advanced 215c6c1daeSBarry Smith 225c6c1daeSBarry Smith Concepts: drawing^coordinates 235c6c1daeSBarry Smith Concepts: graphics^coordinates 245c6c1daeSBarry Smith 255c6c1daeSBarry Smith .seealso: PetscDrawGetCoordinates() 265c6c1daeSBarry Smith 275c6c1daeSBarry Smith @*/ 285c6c1daeSBarry Smith PetscErrorCode PetscDrawSetCoordinates(PetscDraw draw,PetscReal xl,PetscReal yl,PetscReal xr,PetscReal yr) 295c6c1daeSBarry Smith { 305c6c1daeSBarry Smith PetscErrorCode ierr; 315c6c1daeSBarry Smith 325c6c1daeSBarry Smith PetscFunctionBegin; 335c6c1daeSBarry Smith PetscValidHeaderSpecific(draw,PETSC_DRAW_CLASSID,1); 345c6c1daeSBarry Smith draw->coor_xl = xl; draw->coor_yl = yl; 355c6c1daeSBarry Smith draw->coor_xr = xr; draw->coor_yr = yr; 365c6c1daeSBarry Smith if (draw->ops->setcoordinates) { 375c6c1daeSBarry Smith ierr = (*draw->ops->setcoordinates)(draw,xl,yl,xr,yr);CHKERRQ(ierr); 385c6c1daeSBarry Smith } 395c6c1daeSBarry Smith PetscFunctionReturn(0); 405c6c1daeSBarry Smith } 415c6c1daeSBarry Smith 42