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: #undef __FUNCT__
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: int PetscDrawStringVertical(PetscDraw draw,PetscReal xl,PetscReal yl,int cl,char *text)
28: {
29: int ierr;
30: PetscTruth isnull;
34: PetscTypeCompare((PetscObject)draw,PETSC_DRAW_NULL,&isnull);
35: if (isnull) return(0);
36: (*draw->ops->stringvertical)(draw,xl,yl,cl,text);
37: return(0);
38: }