Actual source code: petscvec.h

      1: !
      2: !
      3: !  Include file for Fortran use of the Vec package in PETSc
      4: !
      5: #if !defined (PETSCVECDEF_H)
      6: #define PETSCVECDEF_H

      8: #include "petsc/finclude/petscao.h"

     10: #define Vec type(tVec)
     11: #define VecScatter type(tVecScatter)
     12: #define VecTagger type(tVecTagger)

     14: #define NormType PetscEnum
     15: #define ReductionType PetscEnum
     16: #define InsertMode PetscEnum
     17: #define ScatterMode PetscEnum
     18: #define VecOption PetscEnum
     19: #define VecType character*(80)
     20: #define VecOperation PetscEnum
     21: #define VecTaggerCDFMethod PetscEnum
     22: #define PetscOffloadMask PetscEnum

     24: #define VECSEQ 'seq'
     25: #define VECMPI 'mpi'
     26: #define VECSTANDARD 'standard'
     27: #define VECSHARED 'shared'
     28: #define VECSEQVIENNACL 'seqviennacl'
     29: #define VECMPIVIENNACL 'mpiviennacl'
     30: #define VECVIENNACL    'viennacl'
     31: #define VECNEST 'nest'
     32: #define VECSEQCUDA 'seqcuda'
     33: #define VECMPICUDA 'mpicuda'
     34: #define VECCUDA 'cuda'

     36: #define VecScatterType character*(80)

     38: #endif