2: /*
  3:        Provides the calling sequences for all the basic PetscDraw routines.
  4: */
  5: #include <../src/sys/draw/drawimpl.h>  /*I "petscdraw.h" I*/

  9: /*@
 10:    PetscDrawLineGetWidth - Gets the line width for future draws.  The width is
 11:    relative to the user coordinates of the window; 0.0 denotes the natural
 12:    width; 1.0 denotes the interior viewport. 

 14:    Not collective

 16:    Input Parameter:
 17: .  draw - the drawing context

 19:    Output Parameter:
 20: .  width - the width in user coordinates

 22:    Level: advanced

 24:    Notes:
 25:    Not currently implemented.

 27:    Concepts: line^width

 29: .seealso:  PetscDrawLineSetWidth()
 30: @*/
 31: PetscErrorCode  PetscDrawLineGetWidth(PetscDraw draw,PetscReal *width)
 32: {
 34:   PetscBool  isdrawnull;

 39:   PetscObjectTypeCompare((PetscObject)draw,PETSC_DRAW_NULL,&isdrawnull);
 40:   if (isdrawnull) return(0);
 41:   if (!draw->ops->linegetwidth) SETERRQ1(PETSC_COMM_SELF,PETSC_ERR_SUP,"This draw object %s does not support getting line width",((PetscObject)draw)->type_name);
 42:   (*draw->ops->linegetwidth)(draw,width);
 43:   return(0);
 44: }