1: ! 2: ! 3: ! Include file for Fortran use of the PetscDraw package in PETSc 4: ! 6: #if !defined (PETSCDRAWDEF_H) 7: #define PETSCDRAWDEF_H 9: #define PetscDraw type(tPetscDraw) 10: #define PetscDrawLG type(tPetscDrawLG) 11: #define PetscDrawAxis type(tPetscDrawAxis) 12: #define PetscDrawSP type(tPetscDrawSP) 13: #define PetscDrawHG type(tPetscDrawHG) 14: #define PetscDrawMesh type(tPetscDrawMesh) 15: #define PetscDrawBar type(tPetscDrawBar) 16: #define PetscDrawButton PetscEnum 17: #define PetscDrawType character*(80) 18: #define PetscDrawMarkerType PetscEnum 20: ! 21: ! types of draw context 22: ! 23: #define PETSC_DRAW_X 'x' 24: #define PETSC_DRAW_NULL 'null' 25: #define PETSC_DRAW_PS 'ps' 26: #define PETSC_DRAW_WIN32 'win32' 28: #endif