1c4762a1bSJed Brown 2c4762a1bSJed Brown static char help[] = "Tests repeatedly setting a window type.\n"; 3c4762a1bSJed Brown 4c4762a1bSJed Brown #include <petscsys.h> 5c4762a1bSJed Brown #include <petscdraw.h> 6c4762a1bSJed Brown 7c4762a1bSJed Brown int main(int argc,char **argv) 8c4762a1bSJed Brown { 9c4762a1bSJed Brown PetscDraw draw; 10c4762a1bSJed Brown PetscErrorCode ierr; 11c4762a1bSJed Brown int x = 0,y = 0,width = 300,height = 300; 12c4762a1bSJed Brown 13c4762a1bSJed Brown ierr = PetscInitialize(&argc,&argv,NULL,help);if (ierr) return ierr; 14*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscDrawCreate(PETSC_COMM_WORLD,0,"Title",x,y,width,height,&draw)); 15c4762a1bSJed Brown #if defined(PETSC_HAVE_X) 16*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscDrawSetType(draw,"x")); 17*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscDrawSetType(draw,"null")); 18*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscDrawSetType(draw,"x")); 19c4762a1bSJed Brown #else 20*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscDrawSetType(draw,"null")); 21c4762a1bSJed Brown #endif 22*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscDrawSetFromOptions(draw)); 23*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscDrawSetViewPort(draw,.25,.25,.75,.75)); 24*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscDrawClear(draw)); 25*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscDrawLine(draw,0.0,0.0,1.0,1.0,PETSC_DRAW_BLACK)); 26*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscDrawString(draw,.2,.2,PETSC_DRAW_RED,"Some Text")); 27*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscDrawStringSetSize(draw,.5,.5)); 28*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscDrawString(draw,.2,.2,PETSC_DRAW_BLUE,"Some Text")); 29*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscDrawFlush(draw)); 30*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscSleep(2)); 31*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscDrawResizeWindow(draw,600,600)); 32*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscDrawClear(draw)); 33*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscSleep(2)); 34*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscDrawLine(draw,0.0,1.0,1.0,0.0,PETSC_DRAW_BLUE)); 35*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscDrawFlush(draw)); 36*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscSleep(2)); 37*5f80ce2aSJacob Faibussowitsch CHKERRQ(PetscDrawDestroy(&draw)); 38c4762a1bSJed Brown ierr = PetscFinalize(); 39c4762a1bSJed Brown return ierr; 40c4762a1bSJed Brown } 41c4762a1bSJed Brown 42c4762a1bSJed Brown /*TEST 43c4762a1bSJed Brown 44c4762a1bSJed Brown build: 45c4762a1bSJed Brown requires: x 46c4762a1bSJed Brown 47c4762a1bSJed Brown test: 48c4762a1bSJed Brown output_file: output/ex1_1.out 49c4762a1bSJed Brown 50c4762a1bSJed Brown TEST*/ 51