xref: /petsc/src/sys/classes/draw/interface/dpause.c (revision e6e75211d226c622f451867f53ce5d558649ff4f)
1 
2 /*
3        Provides the calling sequences for all the basic PetscDraw routines.
4 */
5 #include <petsc/private/drawimpl.h>  /*I "petscdraw.h" I*/
6 
7 #undef __FUNCT__
8 #define __FUNCT__ "PetscDrawPause"
9 /*@
10    PetscDrawPause - Waits n seconds or until user input, depending on input
11                to PetscDrawSetPause().
12 
13    Collective operation on PetscDraw object.
14 
15    Input Parameter:
16 .  draw - the drawing context
17 
18    Level: beginner
19 
20    Concepts: waiting^for user input
21    Concepts: drawing^waiting
22    Concepts: graphics^waiting
23 
24 .seealso: PetscDrawSetPause(), PetscDrawGetPause()
25 @*/
26 PetscErrorCode  PetscDrawPause(PetscDraw draw)
27 {
28   PetscErrorCode ierr;
29 
30   PetscFunctionBegin;
31   PetscValidHeaderSpecific(draw,PETSC_DRAW_CLASSID,1);
32   if (draw->ops->pause) {
33     ierr = (*draw->ops->pause)(draw);CHKERRQ(ierr);
34   }
35   PetscFunctionReturn(0);
36 }
37