1c4762a1bSJed Brown static char help[] = "Demonstrates opening and drawing in a window\n";
2c4762a1bSJed Brown
3c4762a1bSJed Brown #include <petscsys.h>
4c4762a1bSJed Brown #include <petscdraw.h>
5c4762a1bSJed Brown
main(int argc,char ** argv)6d71ae5a4SJacob Faibussowitsch int main(int argc, char **argv)
7d71ae5a4SJacob Faibussowitsch {
8c4762a1bSJed Brown PetscDraw draw;
9c4762a1bSJed Brown int x = 0, y = 0, width = 300, height = 300;
10c4762a1bSJed Brown
11327415f7SBarry Smith PetscFunctionBeginUser;
129566063dSJacob Faibussowitsch PetscCall(PetscInitialize(&argc, &argv, NULL, help));
13c4762a1bSJed Brown
149566063dSJacob Faibussowitsch PetscCall(PetscDrawCreate(PETSC_COMM_WORLD, 0, "Title", x, y, width, height, &draw));
159566063dSJacob Faibussowitsch PetscCall(PetscDrawSetPause(draw, 2.0));
169566063dSJacob Faibussowitsch PetscCall(PetscDrawSetFromOptions(draw));
179566063dSJacob Faibussowitsch PetscCall(PetscDrawSetViewPort(draw, .25, .25, .75, .75));
18c4762a1bSJed Brown
199566063dSJacob Faibussowitsch PetscCall(PetscDrawLine(draw, 0.0, 0.0, 1.0, 1.0, PETSC_DRAW_BLACK));
209566063dSJacob Faibussowitsch PetscCall(PetscDrawString(draw, .2, .2, PETSC_DRAW_RED, "Some Text"));
219566063dSJacob Faibussowitsch PetscCall(PetscDrawString(draw, .5, .5, PETSC_DRAW_GREEN, "Some Text"));
229566063dSJacob Faibussowitsch PetscCall(PetscDrawString(draw, .2, .8, PETSC_DRAW_BLUE, "Some Text"));
239566063dSJacob Faibussowitsch PetscCall(PetscDrawFlush(draw));
249566063dSJacob Faibussowitsch PetscCall(PetscDrawPause(draw));
259566063dSJacob Faibussowitsch PetscCall(PetscDrawSave(draw));
26c4762a1bSJed Brown
279566063dSJacob Faibussowitsch PetscCall(PetscDrawClear(draw));
289566063dSJacob Faibussowitsch /* PetscCall(PetscDrawStringSetSize(draw,.5,.5)); */
299566063dSJacob Faibussowitsch PetscCall(PetscDrawString(draw, .2, .2, PETSC_DRAW_RED, "Some Text"));
309566063dSJacob Faibussowitsch PetscCall(PetscDrawString(draw, .5, .5, PETSC_DRAW_GREEN, "Some Text"));
319566063dSJacob Faibussowitsch PetscCall(PetscDrawString(draw, .2, .8, PETSC_DRAW_BLUE, "Some Text"));
329566063dSJacob Faibussowitsch PetscCall(PetscDrawFlush(draw));
339566063dSJacob Faibussowitsch PetscCall(PetscDrawPause(draw));
349566063dSJacob Faibussowitsch PetscCall(PetscDrawSave(draw));
35c4762a1bSJed Brown
369566063dSJacob Faibussowitsch PetscCall(PetscDrawResizeWindow(draw, 600, 600));
379566063dSJacob Faibussowitsch PetscCall(PetscDrawGetWindowSize(draw, &width, &height));
389566063dSJacob Faibussowitsch PetscCall(PetscDrawSetViewPort(draw, 0, 0, 1, 1));
399566063dSJacob Faibussowitsch PetscCall(PetscDrawClear(draw));
409566063dSJacob Faibussowitsch /* PetscCall(PetscDrawLine(draw,0.0,0.0,1.0,1.0,PETSC_DRAW_RED)); */
419566063dSJacob Faibussowitsch /* PetscCall(PetscDrawLine(draw,0.0,1.0,1.0,0.0,PETSC_DRAW_BLUE)); */
429566063dSJacob Faibussowitsch PetscCall(PetscDrawString(draw, .2, .2, PETSC_DRAW_RED, "Some Text\n Some Other Text"));
439566063dSJacob Faibussowitsch PetscCall(PetscDrawString(draw, .5, .5, PETSC_DRAW_RED, "ABCygj\n()[]F$"));
449566063dSJacob Faibussowitsch PetscCall(PetscDrawString(draw, 0, 0, PETSC_DRAW_RED, "Horizontal Text (ABCygj)"));
459566063dSJacob Faibussowitsch PetscCall(PetscDrawStringVertical(draw, 0, 1, PETSC_DRAW_RED, "Vertical Text"));
469566063dSJacob Faibussowitsch PetscCall(PetscDrawFlush(draw));
479566063dSJacob Faibussowitsch PetscCall(PetscDrawPause(draw));
489566063dSJacob Faibussowitsch PetscCall(PetscDrawSave(draw));
49c4762a1bSJed Brown
509566063dSJacob Faibussowitsch PetscCall(PetscDrawDestroy(&draw));
519566063dSJacob Faibussowitsch PetscCall(PetscFinalize());
52b122ec5aSJacob Faibussowitsch return 0;
53c4762a1bSJed Brown }
54c4762a1bSJed Brown
55c4762a1bSJed Brown /*TEST
56c4762a1bSJed Brown
57c4762a1bSJed Brown build:
58c4762a1bSJed Brown requires: x
59c4762a1bSJed Brown
60c4762a1bSJed Brown test:
61*3886731fSPierre Jolivet output_file: output/empty.out
62c4762a1bSJed Brown
63c4762a1bSJed Brown TEST*/
64