1: !
  2: !
  3: !  Include file for Fortran use of the Vec package in PETSc
  4: !
 5:  #include finclude/petscvecdef.h
  6: !
  7: !
  8: !  Types of vector and matrix norms
  9: !
 10:       PetscEnum NORM_1
 11:       PetscEnum NORM_2
 12:       PetscEnum NORM_FROBENIUS
 13:       PetscEnum NORM_INFINITY
 14:       PetscEnum NORM_MAX
 15:       PetscEnum NORM_1_AND_2

 17:       parameter (NORM_1=0,NORM_2=1,NORM_FROBENIUS=2,NORM_INFINITY=3)
 18:       parameter (NORM_MAX=3,NORM_1_AND_2=4)
 19: !
 20: !  Flags for VecSetValues() and MatSetValues()
 21: !
 22:       PetscEnum NOT_SET_VALUES
 23:       PetscEnum INSERT_VALUES
 24:       PetscEnum ADD_VALUES
 25:       PetscEnum MAX_VALUES

 27:       parameter (NOT_SET_VALUES=0,INSERT_VALUES=1,ADD_VALUES=2)
 28:       parameter (MAX_VALUES=3)
 29: !
 30: !  Types of vector scatters
 31: !
 32:       PetscEnum SCATTER_FORWARD
 33:       PetscEnum SCATTER_REVERSE
 34:       PetscEnum SCATTER_FORWARD_LOCAL
 35:       PetscEnum SCATTER_REVERSE_LOCAL
 36:       PetscEnum SCATTER_LOCAL

 38:       parameter (SCATTER_FORWARD=0,SCATTER_REVERSE=1)
 39:       parameter (SCATTER_FORWARD_LOCAL=2,SCATTER_REVERSE_LOCAL=3)
 40:       parameter (SCATTER_LOCAL=2)
 41: !
 42: !  VecOption
 43: !
 44:       PetscEnum VEC_IGNORE_OFF_PROC_ENTRIES
 45:       PetscEnum VEC_IGNORE_NEGATIVE_INDICES

 47:       parameter (VEC_IGNORE_OFF_PROC_ENTRIES=0)
 48:       parameter (VEC_IGNORE_NEGATIVE_INDICES=1)

 50: !
 51: !  VecOperation
 52: !
 53:       PetscEnum VECOP_VIEW
 54:       PetscEnum VECOP_LOADINTOVECTOR

 56:       parameter (VECOP_VIEW=33,VECOP_LOADINTOVECTOR=41)
 57: !
 58: !  End of Fortran include file for the Vec package in PETSc