1: ! 2: ! 3: ! Include file for Fortran use of the Vec package in PETSc 4: ! 5: #if !defined (__PETSCVECDEF_H) 8: #include finclude/petscaodef.h 10: #if !defined(PETSC_USE_FORTRAN_DATATYPES) 11: #define Vec PetscFortranAddr 12: #define VecScatter PetscFortranAddr 13: #define PetscSection PetscFortranAddr 14: #endif 16: #define NormType PetscEnum 17: #define InsertMode PetscEnum 18: #define ScatterMode PetscEnum 19: #define VecOption PetscEnum 20: #define VecType character*(80)1 21: #define VecOperation PetscEnum 23: #define VECSEQ 'seq' 24: #define VECMPI 'mpi' 25: #define VECSTANDARD 'standard' 26: #define VECSEQCUSP 'seqcusp' 27: #define VECMPICUSP 'mpicusp' 28: #define VECCUSP 'cusp' 29: #define VECSHARED 'shared' 30: #define VECESI 'esi' 31: #define VECPETSCESI 'petscesi' 33: #endif