libpetsc3.1-dev 3.1.dfsg-11ubuntu1 / usr / lib / petscdir / 3.1 / include / finclude / ftn-auto / petscsnes.h90

This file is indexed.

/usr/lib/petscdir/3.1/include/finclude/ftn-auto/petscsnes.h90 is in libpetsc3.1-dev 3.1.dfsg-11ubuntu1.

This file is owned by root:root, with mode 0o644.

The actual contents of the file can be viewed below. 

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
        subroutine SNESSetFunctionDomainError(snes ,ierr)
       SNES snes ! SNES
       integer ierr
       end subroutine
        subroutine SNESSetFromOptions(snes ,ierr)
       SNES snes ! SNES
       integer ierr
       end subroutine
        subroutine SNESSetApplicationContext(snes, usrP ,ierr)
       SNES snes ! SNES
       PetscVoid usrP ! void
       integer ierr
       end subroutine
        subroutine SNESGetIterationNumber(snes, iter ,ierr)
       SNES snes ! SNES
       PetscInt iter ! PetscInt
       integer ierr
       end subroutine
        subroutine SNESGetFunctionNorm(snes, fnorm ,ierr)
       SNES snes ! SNES
       PetscReal fnorm ! PetscReal
       integer ierr
       end subroutine
        subroutine SNESGetNonlinearStepFailures(snes, nfails ,ierr)
       SNES snes ! SNES
       PetscInt nfails ! PetscInt
       integer ierr
       end subroutine
        subroutine SNESSetMaxNonlinearStepFailures(snes, maxFails ,ierr)&
     &
       SNES snes ! SNES
       PetscInt maxFails ! PetscInt
       integer ierr
       end subroutine
        subroutine SNESGetMaxNonlinearStepFailures(snes, maxFails ,ierr)&
     &
       SNES snes ! SNES
       PetscInt maxFails ! PetscInt
       integer ierr
       end subroutine
        subroutine SNESGetNumberFunctionEvals(snes, nfuncs ,ierr)
       SNES snes ! SNES
       PetscInt nfuncs ! PetscInt
       integer ierr
       end subroutine
        subroutine SNESGetLinearSolveFailures(snes, nfails ,ierr)
       SNES snes ! SNES
       PetscInt nfails ! PetscInt
       integer ierr
       end subroutine
        subroutine SNESSetMaxLinearSolveFailures(snes, maxFails ,ierr)
       SNES snes ! SNES
       PetscInt maxFails ! PetscInt
       integer ierr
       end subroutine
        subroutine SNESGetMaxLinearSolveFailures(snes, maxFails ,ierr)
       SNES snes ! SNES
       PetscInt maxFails ! PetscInt
       integer ierr
       end subroutine
        subroutine SNESGetLinearSolveIterations(snes, lits ,ierr)
       SNES snes ! SNES
       PetscInt lits ! PetscInt
       integer ierr
       end subroutine
        subroutine SNESGetKSP(snes, ksp ,ierr)
       SNES snes ! SNES
       KSP ksp ! KSP
       integer ierr
       end subroutine
        subroutine SNESSetKSP(snes, ksp ,ierr)
       SNES snes ! SNES
       KSP ksp ! KSP
       integer ierr
       end subroutine
        subroutine SNESCreate(comm, outsnes ,ierr)
       integer comm ! MPI_Comm
       SNES outsnes ! SNES
       integer ierr
       end subroutine
        subroutine SNESComputeFunction(snes, x, y ,ierr)
       SNES snes ! SNES
       Vec x ! Vec
       Vec y ! Vec
       integer ierr
       end subroutine
        subroutine SNESComputeJacobian(snes, X, A, B, flg ,ierr)
       SNES snes ! SNES
       Vec X ! Vec
       Mat A ! Mat
       Mat B ! Mat
       MatStructure flg ! MatStructure
       integer ierr
       end subroutine
        subroutine SNESSetUp(snes ,ierr)
       SNES snes ! SNES
       integer ierr
       end subroutine
        subroutine SNESDestroy(snes ,ierr)
       SNES snes ! SNES
       integer ierr
       end subroutine
        subroutine SNESSetLagPreconditioner(snes, lag ,ierr)
       SNES snes ! SNES
       PetscInt lag ! PetscInt
       integer ierr
       end subroutine
        subroutine SNESGetLagPreconditioner(snes, lag ,ierr)
       SNES snes ! SNES
       PetscInt lag ! PetscInt
       integer ierr
       end subroutine
        subroutine SNESSetLagJacobian(snes, lag ,ierr)
       SNES snes ! SNES
       PetscInt lag ! PetscInt
       integer ierr
       end subroutine
        subroutine SNESGetLagJacobian(snes, lag ,ierr)
       SNES snes ! SNES
       PetscInt lag ! PetscInt
       integer ierr
       end subroutine
        subroutine SNESSetTolerances(snes, abstol, rtol, stol, maxit,   &
     &maxf ,ierr)
       SNES snes ! SNES
       PetscReal abstol ! PetscReal
       PetscReal rtol ! PetscReal
       PetscReal stol ! PetscReal
       PetscInt maxit ! PetscInt
       PetscInt maxf ! PetscInt
       integer ierr
       end subroutine
        subroutine SNESGetTolerances(snes, atol, rtol, stol, maxit, maxf&
     & ,ierr)
       SNES snes ! SNES
       PetscReal atol ! PetscReal
       PetscReal rtol ! PetscReal
       PetscReal stol ! PetscReal
       PetscInt maxit ! PetscInt
       PetscInt maxf ! PetscInt
       integer ierr
       end subroutine
        subroutine SNESSetTrustRegionTolerance(snes, tol ,ierr)
       SNES snes ! SNES
       PetscReal tol ! PetscReal
       integer ierr
       end subroutine
        subroutine SNESGetConvergedReason(snes, reason ,ierr)
       SNES snes ! SNES
       SNESConvergedReason reason ! SNESConvergedReason
       integer ierr
       end subroutine
        subroutine SNESSetConvergenceHistory(snes, a, its, na, reset ,  &
     &ierr)
       SNES snes ! SNES
       PetscReal a (*) ! PetscReal
       PetscInt its (*) ! PetscInt
       PetscInt na ! PetscInt
       PetscTruth reset ! PetscTruth
       integer ierr
       end subroutine
        subroutine SNESDefaultUpdate(snes, step ,ierr)
       SNES snes ! SNES
       PetscInt step ! PetscInt
       integer ierr
       end subroutine
        subroutine SNESRegisterDestroy(ierr)
       integer ierr
       end subroutine
        subroutine SNESGetSolution(snes, x ,ierr)
       SNES snes ! SNES
       Vec x ! Vec
       integer ierr
       end subroutine
        subroutine SNESGetSolutionUpdate(snes, x ,ierr)
       SNES snes ! SNES
       Vec x ! Vec
       integer ierr
       end subroutine
        subroutine SNESKSPSetUseEW(snes, flag ,ierr)
       SNES snes ! SNES
       PetscTruth flag ! PetscTruth
       integer ierr
       end subroutine
        subroutine SNESKSPGetUseEW(snes, flag ,ierr)
       SNES snes ! SNES
       PetscTruth flag ! PetscTruth
       integer ierr
       end subroutine
        subroutine SNESKSPSetParametersEW(snes, version, rtol_0,        &
     &rtol_max, gamma, alpha, alpha2, threshold ,ierr)
       SNES snes ! SNES
       PetscInt version ! PetscInt
       PetscReal rtol_0 ! PetscReal
       PetscReal rtol_max ! PetscReal
       PetscReal gamma ! PetscReal
       PetscReal alpha ! PetscReal
       PetscReal alpha2 ! PetscReal
       PetscReal threshold ! PetscReal
       integer ierr
       end subroutine
        subroutine SNESKSPGetParametersEW(snes, version, rtol_0,        &
     &rtol_max, gamma, alpha, alpha2, threshold ,ierr)
       SNES snes ! SNES
       PetscInt version ! PetscInt
       PetscReal rtol_0 ! PetscReal
       PetscReal rtol_max ! PetscReal
       PetscReal gamma ! PetscReal
       PetscReal alpha ! PetscReal
       PetscReal alpha2 ! PetscReal
       PetscReal threshold ! PetscReal
       integer ierr
       end subroutine
        subroutine SNESLineSearchSetParams(snes, alpha, maxstep ,ierr)
       SNES snes ! SNES
       PetscReal alpha ! PetscReal
       PetscReal maxstep ! PetscReal
       integer ierr
       end subroutine
        subroutine SNESDAComputeJacobianWithAdic(snes, X, J, B, flag,   &
     &ptr ,ierr)
       SNES snes ! SNES
       Vec X ! Vec
       Mat J ! Mat
       Mat B ! Mat
       MatStructure flag ! MatStructure
       PetscVoid ptr ! void
       integer ierr
       end subroutine
        subroutine MatCreateSNESMF(snes, J ,ierr)
       SNES snes ! SNES
       Mat J ! Mat
       integer ierr
       end subroutine

APT Browse - Built by Thomas Orozco.