Actual source code: dcoor.c

      1: /*
      2:        Provides the calling sequences for all the basic PetscDraw routines.
      3: */
      4: #include <petsc/private/drawimpl.h>

      6: /*@
      7:   PetscDrawSetCoordinates - Sets the application coordinates of the corners of
      8:   the window (or page).

     10:   Not Collective

     12:   Input Parameters:
     13: + draw - the drawing object
     14: . xl   - the lower left x coordinate
     15: . yl   - the lower left y coordinate
     16: . xr   - the upper right x coordinate
     17: - yr   - the upper right y coordinate

     19:   Level: advanced

     21: .seealso: `PetscDraw`, `PetscDrawGetCoordinates()`
     22: @*/
     23: PetscErrorCode PetscDrawSetCoordinates(PetscDraw draw, PetscReal xl, PetscReal yl, PetscReal xr, PetscReal yr)
     24: {
     25:   PetscFunctionBegin;
     27:   draw->coor_xl = xl;
     28:   draw->coor_yl = yl;
     29:   draw->coor_xr = xr;
     30:   draw->coor_yr = yr;
     31:   PetscTryTypeMethod(draw, setcoordinates, xl, yl, xr, yr);
     32:   PetscFunctionReturn(PETSC_SUCCESS);
     33: }

     35: /*@
     36:   PetscDrawGetCoordinates - Gets the application coordinates of the corners of
     37:   the window (or page).

     39:   Not Collective

     41:   Input Parameter:
     42: . draw - the drawing object

     44:   Output Parameters:
     45: + xl - the horizontal coordinate of the lower left corner of the drawing region.
     46: . yl - the vertical coordinate of the lower left corner of the drawing region.
     47: . xr - the horizontal coordinate of the upper right corner of the drawing region.
     48: - yr - the vertical coordinate of the upper right corner of the drawing region.

     50:   Level: advanced

     52: .seealso: `PetscDraw`, `PetscDrawSetCoordinates()`
     53: @*/
     54: PetscErrorCode PetscDrawGetCoordinates(PetscDraw draw, PetscReal *xl, PetscReal *yl, PetscReal *xr, PetscReal *yr)
     55: {
     56:   PetscFunctionBegin;
     58:   PetscAssertPointer(xl, 2);
     59:   PetscAssertPointer(yl, 3);
     60:   PetscAssertPointer(xr, 4);
     61:   PetscAssertPointer(yr, 5);
     62:   *xl = draw->coor_xl;
     63:   *yl = draw->coor_yl;
     64:   *xr = draw->coor_xr;
     65:   *yr = draw->coor_yr;
     66:   PetscFunctionReturn(PETSC_SUCCESS);
     67: }