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

  9: /*@
 10:    PetscDrawGetPause - Gets the amount of time that program pauses after
 11:    a PetscDrawPause() is called.

 13:    Not collective

 15:    Input Parameters:
 16: +  draw   - the drawing object
 17: -  lpause - number of seconds to pause, -1 implies until user input

 19:    Level: intermediate

 21:    Note:
 22:    By default the pause time is zero unless the -draw_pause option is given

 24:    Concepts: waiting^for user input
 25:    Concepts: drawing^waiting
 26:    Concepts: graphics^waiting

 28: .seealso: PetscDrawSetPause(), PetscDrawPause()
 29: @*/
 30: PetscErrorCode  PetscDrawGetPause(PetscDraw draw,PetscReal *lpause)
 31: {
 35:   *lpause = draw->pause;
 36:   return(0);
 37: }