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 PetscFortranAddr 10: #define PetscDrawLG PetscFortranAddr 11: #define PetscDrawAxis PetscFortranAddr 12: #define PetscDrawSP PetscFortranAddr 13: #define PetscDrawHG PetscFortranAddr 14: #define PetscDrawMesh PetscFortranAddr 15: #define PetscDrawButton PetscEnum 16: #define PetscDrawType character*(80) 17: #define PetscDrawMarkerType PetscEnum 18: #define PetscDrawBar PetscFortranAddr 19: ! 20: ! types of draw context 21: ! 22: #define PETSC_DRAW_X 'x' 23: #define PETSC_DRAW_NULL 'null' 24: #define PETSC_DRAW_PS 'ps' 25: #define PETSC_DRAW_WIN32 'win32' 27: #endif