1 ! 2 ! 3 ! Include file for Fortran use of the Vec package in PETSc 4 ! 5 #if !defined (PETSCVECDEF_H) 6 #define PETSCVECDEF_H 7 8 #include "petsc/finclude/petscao.h" 9 10 #define Vec type(tVec) 11 #define VecScatter type(tVecScatter) 12 #define VecTagger type(tVecTagger) 13 14 #define NormType PetscEnum 15 #define InsertMode PetscEnum 16 #define ScatterMode PetscEnum 17 #define VecOption PetscEnum 18 #define VecType character*(80) 19 #define VecOperation PetscEnum 20 #define VecTaggerCDFMethod PetscEnum 21 #define PetscOffloadMask PetscEnum 22 23 #define VECSEQ 'seq' 24 #define VECMPI 'mpi' 25 #define VECSTANDARD 'standard' 26 #define VECSHARED 'shared' 27 #define VECSEQVIENNACL 'seqviennacl' 28 #define VECMPIVIENNACL 'mpiviennacl' 29 #define VECVIENNACL 'viennacl' 30 #define VECNEST 'nest' 31 #define VECSEQCUDA 'seqcuda' 32 #define VECMPICUDA 'mpicuda' 33 #define VECCUDA 'cuda' 34 #define VECNODE 'node' 35 36 #define VecScatterType character*(80) 37 38 #endif 39