1: /*$Id: dtext.c,v 1.32 2001/03/23 23:20:08 balay Exp $*/
  2: /*
  3:        Provides the calling sequences for all the basic PetscDraw routines.
  4: */
 5:  #include src/sys/src/draw/drawimpl.h

  7: #undef __FUNCT__  
  9: /*@C
 10:    PetscDrawString - PetscDraws text onto a drawable.

 12:    Not Collective

 14:    Input Parameters:
 15: +  draw - the drawing context
 16: .  xl - the coordinates of lower left corner of text
 17: .  yl - the coordinates of lower left corner of text
 18: .  cl - the color of the text
 19: -  text - the text to draw

 21:    Level: beginner

 23:    Concepts: drawing^string
 24:    Concepts: string^drawing

 26: .seealso: PetscDrawStringVertical()

 28: @*/
 29: int PetscDrawString(PetscDraw draw,PetscReal xl,PetscReal yl,int cl,char *text)
 30: {
 31:   int        ierr ;
 32:   PetscTruth isnull;

 36:   PetscTypeCompare((PetscObject)draw,PETSC_DRAW_NULL,&isnull);
 37:   if (isnull) return(0);
 38:   (*draw->ops->string)(draw,xl,yl,cl,text);
 39:   return(0);
 40: }