Actual source code: dtextv.c

      1: #define PETSC_DLL
      2: /*
      3:        Provides the calling sequences for all the basic PetscDraw routines.
      4: */
     5:  #include src/sys/src/draw/drawimpl.h

      9: /*@C
     10:    PetscDrawStringVertical - PetscDraws text onto a drawable.

     12:    Not Collective

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

     20:    Level: beginner

     22:    Concepts: string^drawing vertical

     24: .seealso: PetscDrawString()

     26: @*/
     27: PetscErrorCode PETSC_DLLEXPORT PetscDrawStringVertical(PetscDraw draw,PetscReal xl,PetscReal yl,int cl,const char text[])
     28: {
     30:   PetscTruth isnull;

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