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: }