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