Actual source code: petscvec.h
petsc-3.9.4 2018-09-11
1: !
2: !
3: ! Include file for Fortran use of the Vec package in PETSc
4: !
5: #include "petsc/finclude/petscvec.h"
7: type tVec
8: sequence
9: PetscFortranAddr:: v PETSC_FORTRAN_TYPE_INITIALIZE
10: end type tVec
11: type tVecScatter
12: sequence
13: PetscFortranAddr:: v PETSC_FORTRAN_TYPE_INITIALIZE
14: end type tVecScatter
15: type tVecTagger
16: sequence
17: PetscFortranAddr:: v PETSC_FORTRAN_TYPE_INITIALIZE
18: end type tVecTagger
20: Vec, parameter :: PETSC_NULL_VEC = tVec(-1)
21: VecScatter, parameter :: PETSC_NULL_VECSCATTER = &
22: & tVecScatter(-1)
23: VecTagger, parameter :: PETSC_NULL_VECTAGGER = &
24: & tVecTagger(-1)
25: !
26: !
27: ! Types of vector and matrix norms
28: !
29: PetscEnum NORM_1
30: PetscEnum NORM_2
31: PetscEnum NORM_FROBENIUS
32: PetscEnum NORM_INFINITY
33: PetscEnum NORM_MAX
34: PetscEnum NORM_1_AND_2
36: parameter (NORM_1=0,NORM_2=1,NORM_FROBENIUS=2,NORM_INFINITY=3)
37: parameter (NORM_MAX=3,NORM_1_AND_2=4)
38: !
39: ! Flags for VecSetValues() and MatSetValues()
40: !
41: PetscEnum NOT_SET_VALUES
42: PetscEnum INSERT_VALUES
43: PetscEnum ADD_VALUES
44: PetscEnum MAX_VALUES
45: PetscEnum INSERT_ALL_VALUES
46: PetscEnum ADD_ALL_VALUES
47: PetscEnum INSERT_BC_VALUES
48: PetscEnum ADD_BC_VALUES
50: parameter (NOT_SET_VALUES=0,INSERT_VALUES=1,ADD_VALUES=2)
51: parameter (MAX_VALUES=3)
52: parameter (INSERT_ALL_VALUES=4,ADD_ALL_VALUES=5)
53: parameter (INSERT_BC_VALUES=6,ADD_BC_VALUES=7)
54: !
55: ! Types of vector scatters
56: !
57: PetscEnum SCATTER_FORWARD
58: PetscEnum SCATTER_REVERSE
59: PetscEnum SCATTER_FORWARD_LOCAL
60: PetscEnum SCATTER_REVERSE_LOCAL
61: PetscEnum SCATTER_LOCAL
63: parameter (SCATTER_FORWARD=0,SCATTER_REVERSE=1)
64: parameter (SCATTER_FORWARD_LOCAL=2,SCATTER_REVERSE_LOCAL=3)
65: parameter (SCATTER_LOCAL=2)
66: !
67: ! VecOption
68: !
69: PetscEnum VEC_IGNORE_OFF_PROC_ENTRIES
70: PetscEnum VEC_IGNORE_NEGATIVE_INDICES
71: PetscEnum VEC_SUBSET_OFF_PROC_ENTRIES
73: parameter (VEC_IGNORE_OFF_PROC_ENTRIES=0)
74: parameter (VEC_IGNORE_NEGATIVE_INDICES=1)
75: parameter (VEC_SUBSET_OFF_PROC_ENTRIES=2)
77: !
78: ! VecOperation
79: !
80: PetscEnum VECOP_DUPLICATE
81: PetscEnum VECOP_VIEW
82: PetscEnum VECOP_LOAD
83: PetscEnum VECOP_VIEWNATIVE
84: PetscEnum VECOP_LOADNATIVE
86: parameter (VECOP_DUPLICATE=0,VECOP_VIEW=33,VECOP_LOAD=41)
87: parameter (VECOP_VIEWNATIVE=68,VECOP_LOADNATIVE=69)
88: !
89: ! End of Fortran include file for the Vec package in PETSc