1c4762a1bSJed Brown static char help[] = "Tests repeatedly setting a window type.\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));
139566063dSJacob Faibussowitsch PetscCall(PetscDrawCreate(PETSC_COMM_WORLD, 0, "Title", x, y, width, height, &draw));
14c4762a1bSJed Brown #if defined(PETSC_HAVE_X)
159566063dSJacob Faibussowitsch PetscCall(PetscDrawSetType(draw, "x"));
169566063dSJacob Faibussowitsch PetscCall(PetscDrawSetType(draw, "null"));
179566063dSJacob Faibussowitsch PetscCall(PetscDrawSetType(draw, "x"));
18c4762a1bSJed Brown #else
199566063dSJacob Faibussowitsch PetscCall(PetscDrawSetType(draw, "null"));
20c4762a1bSJed Brown #endif
219566063dSJacob Faibussowitsch PetscCall(PetscDrawSetFromOptions(draw));
229566063dSJacob Faibussowitsch PetscCall(PetscDrawSetViewPort(draw, .25, .25, .75, .75));
239566063dSJacob Faibussowitsch PetscCall(PetscDrawClear(draw));
249566063dSJacob Faibussowitsch PetscCall(PetscDrawLine(draw, 0.0, 0.0, 1.0, 1.0, PETSC_DRAW_BLACK));
259566063dSJacob Faibussowitsch PetscCall(PetscDrawString(draw, .2, .2, PETSC_DRAW_RED, "Some Text"));
269566063dSJacob Faibussowitsch PetscCall(PetscDrawStringSetSize(draw, .5, .5));
279566063dSJacob Faibussowitsch PetscCall(PetscDrawString(draw, .2, .2, PETSC_DRAW_BLUE, "Some Text"));
289566063dSJacob Faibussowitsch PetscCall(PetscDrawFlush(draw));
299566063dSJacob Faibussowitsch PetscCall(PetscSleep(2));
309566063dSJacob Faibussowitsch PetscCall(PetscDrawResizeWindow(draw, 600, 600));
319566063dSJacob Faibussowitsch PetscCall(PetscDrawClear(draw));
329566063dSJacob Faibussowitsch PetscCall(PetscSleep(2));
339566063dSJacob Faibussowitsch PetscCall(PetscDrawLine(draw, 0.0, 1.0, 1.0, 0.0, PETSC_DRAW_BLUE));
349566063dSJacob Faibussowitsch PetscCall(PetscDrawFlush(draw));
359566063dSJacob Faibussowitsch PetscCall(PetscSleep(2));
369566063dSJacob Faibussowitsch PetscCall(PetscDrawDestroy(&draw));
379566063dSJacob Faibussowitsch PetscCall(PetscFinalize());
38b122ec5aSJacob Faibussowitsch return 0;
39c4762a1bSJed Brown }
40c4762a1bSJed Brown
41c4762a1bSJed Brown /*TEST
42c4762a1bSJed Brown
43c4762a1bSJed Brown build:
44c4762a1bSJed Brown requires: x
45c4762a1bSJed Brown
46c4762a1bSJed Brown test:
47*3886731fSPierre Jolivet output_file: output/empty.out
48c4762a1bSJed Brown
49c4762a1bSJed Brown TEST*/
50