Actual source code: dtextv.c

  1: /*$Id: dtextv.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: /*@C
  8:    PetscDrawStringVertical - PetscDraws text onto a drawable.

 10:    Not Collective

 12:    Input Parameters:
 13: +  draw - the drawing context
 14: .  xl,yl - the coordinates of upper left corner of text
 15: .  cl - the color of the text
 16: -  text - the text to draw

 18:    Level: beginner

 20:    Concepts: string^drawing vertical

 22: .seealso: PetscDrawString()

 24: @*/
 25: int PetscDrawStringVertical(PetscDraw draw,PetscReal xl,PetscReal yl,int cl,char *text)
 26: {
 27:   int        ierr;
 28:   PetscTruth isnull;

 32:   PetscTypeCompare((PetscObject)draw,PETSC_DRAW_NULL,&isnull);
 33:   if (isnull) return(0);
 34:   (*draw->ops->stringvertical)(draw,xl,yl,cl,text);
 35:   return(0);
 36: }