Actual source code: dcoor.c
petsc-3.13.6 2020-09-29
Report Typos and Errors

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

      7: /*@
      8:    PetscDrawSetCoordinates - Sets the Section 1.5 Writing Application Codes with PETSc coordinates of the corners of
      9:    the window (or page).

     11:    Not collective

     13:    Input Parameters:
     14: +  draw - the drawing object
     15: -  xl,yl,xr,yr - the coordinates of the lower left corner and upper
     16:                  right corner of the drawing region.

     18:    Level: advanced

     21: .seealso: PetscDrawGetCoordinates()

     23: @*/
     24: PetscErrorCode  PetscDrawSetCoordinates(PetscDraw draw,PetscReal xl,PetscReal yl,PetscReal xr,PetscReal yr)
     25: {

     30:   draw->coor_xl = xl; draw->coor_yl = yl;
     31:   draw->coor_xr = xr; draw->coor_yr = yr;
     32:   if (draw->ops->setcoordinates) {
     33:     (*draw->ops->setcoordinates)(draw,xl,yl,xr,yr);
     34:   }
     35:   return(0);
     36: }

     38: /*@
     39:    PetscDrawGetCoordinates - Gets the Section 1.5 Writing Application Codes with PETSc coordinates of the corners of
     40:    the window (or page).

     42:    Not Collective

     44:    Input Parameter:
     45: .  draw - the drawing object

     47:    Level: advanced

     49:    Ouput Parameters:
     50: .  xl,yl,xr,yr - the coordinates of the lower left corner and upper
     51:                  right corner of the drawing region.

     54: .seealso: PetscDrawSetCoordinates()

     56: @*/
     57: PetscErrorCode  PetscDrawGetCoordinates(PetscDraw draw,PetscReal *xl,PetscReal *yl,PetscReal *xr,PetscReal *yr)
     58: {
     65:   *xl = draw->coor_xl; *yl = draw->coor_yl;
     66:   *xr = draw->coor_xr; *yr = draw->coor_yr;
     67:   return(0);
     68: }