Home
last modified time | relevance | path

Searched refs:f0 (Results 1 – 25 of 69) sorted by relevance

123

/petsc/src/dm/dt/fe/tests/
H A Dex3.c12 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in constant() argument
15 for (PetscInt c = 0; c < Nc; ++c) f0[c] += 5.; in constant()
18 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in linear() argument
21 for (PetscInt c = 0; c < Nc; ++c) f0[c] += 5. * x[c]; in linear()
24 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in quadratic() argument
27 for (PetscInt c = 0; c < Nc; ++c) f0[c] += 5. * x[c] * x[c]; in quadratic()
30 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in trig() argument
33 for (PetscInt c = 0; c < Nc; ++c) f0[c] += PetscCosReal(2. * PETSC_PI * x[c]); in trig()
39 …eal t, const PetscReal X[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in prime() argument
42 f0[0] += b + 2.0 * x * z + 2.0 * y * z + x * y + x * x; in prime()
[all …]
/petsc/src/snes/tutorials/
H A Dex24.c46 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_u() argument
49 for (d = 0; d < dim; ++d) f0[0] += u_x[uOff_x[0] + d * dim + d]; in f0_u()
72 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_linear_u() argument
74 f0[0] = 0.0; in f0_linear_u()
75 …f, NfAux, uOff, uOff_x, u, u_t, u_x, aOff, aOff_x, a, a_t, a_x, t, x, numConstants, constants, f0); in f0_linear_u()
77 …l x[], const PetscReal n[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_bd_linear_q() argument
83 for (d = 0; d < dim; ++d) f0[d] = -potential * n[d]; in f0_bd_linear_q()
109 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_quadratic_u() argument
111 f0[0] = -4.0; in f0_quadratic_u()
112 …f, NfAux, uOff, uOff_x, u, u_t, u_x, aOff, aOff_x, a, a_t, a_x, t, x, numConstants, constants, f0); in f0_quadratic_u()
[all …]
H A Dex26.c54 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_trig_u() argument
57 f0[0] += u[0]; in f0_trig_u()
58 …for (d = 0; d < dim; ++d) f0[0] -= 4.0 * PetscSqr(PETSC_PI) * PetscSinReal(2.0 * PETSC_PI * x[d]) … in f0_trig_u()
61 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_quad_u() argument
66 f0[0] = 1.0; in f0_quad_u()
69 f0[0] = 5.0; in f0_quad_u()
72 f0[0] = 11.0; in f0_quad_u()
75 f0[0] = 5.0; in f0_quad_u()
78 f0[0] += u[0]; in f0_quad_u()
79 for (d = 0; d < dim; ++d) f0[0] -= (d + 1) * PetscSqr(x[d]); in f0_quad_u()
H A Dex27.c191 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_quadratic_primal() argument
193 f0[0] = 4.0; in f0_quadratic_primal()
196 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_trig_primal() argument
200 …f0[0] = -2.0 * PetscSqr(n * PETSC_PI) * PetscSinReal(n * PETSC_PI * x[0]) * PetscSinReal(n * PETSC… in f0_trig_primal()
203 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_sensor_primal() argument
209 f0[0] = -2500.0 * PetscSinReal(50. * xy) * (xref * xref + yref * yref) * 4.0; in f0_sensor_primal()
210 if (PetscAbsReal(xy) > 2. * PETSC_PI / 50.) f0[0] *= 0.01; in f0_sensor_primal()
220 …l x[], const PetscReal n[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_quadratic_bd_primal() argument
226 for (PetscInt d = 0; d < dim; ++d) f0[d] = -k * flux * n[d]; in f0_quadratic_bd_primal()
229 …l x[], const PetscReal n[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_trig_bd_primal() argument
[all …]
H A Dex17.c99 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_vlap_quadratic_u() argument
102 for (d = 0; d < dim; ++d) f0[d] += 2.0; in f0_vlap_quadratic_u()
126 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_elas_quadratic_u() argument
131 for (PetscInt d = 0; d < dim - 1; ++d) f0[d] += 2.0 * mu; in f0_elas_quadratic_u()
132 f0[dim - 1] += 2.0 * lambda + 4.0 * mu; in f0_elas_quadratic_u()
135 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_mass_quadratic_u() argument
138 f0[0] -= x[0] * x[0]; in f0_mass_quadratic_u()
139 f0[1] -= x[1] * x[1] - 2.0 * x[0] * x[1]; in f0_mass_quadratic_u()
141 f0[0] -= x[0] * x[0]; in f0_mass_quadratic_u()
142 f0[1] -= x[1] * x[1] - 2.0 * x[0] * x[1]; in f0_mass_quadratic_u()
[all …]
H A Dex76.c101 …eal t, const PetscReal X[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_quadratic_v() argument
108 for (d = 0; d < dim; ++d) f0[c] += u[d] * u_x[c * dim + d]; in f0_quadratic_v()
110 …f0[0] -= (2 * X[0] * X[0] * X[0] + 4 * X[0] * X[0] * X[1] - 2 * X[0] * X[1] * X[1] - 4.0 * nu + 1); in f0_quadratic_v()
111 …f0[1] -= (4 * X[0] * X[1] * X[1] + 2 * X[0] * X[0] * X[1] - 2 * X[1] * X[1] * X[1] - 4.0 * nu + 1); in f0_quadratic_v()
114 …eal t, const PetscReal X[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_quadratic_w() argument
117 for (d = 0, f0[0] = 0; d < dim; ++d) f0[0] += u[uOff[0] + d] * u_x[uOff_x[2] + d]; in f0_quadratic_w()
118 f0[0] -= (3 * X[0] * X[0] + X[1] * X[1] - 2 * X[0] * X[1]); in f0_quadratic_w()
161 …eal t, const PetscReal X[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_cubic_v() argument
168 for (d = 0; d < dim; ++d) f0[c] += u[d] * u_x[c * dim + d]; in f0_cubic_v()
170 …f0[0] -= (3 * X[0] * X[0] * X[0] * X[0] * X[0] + 6 * X[0] * X[0] * X[0] * X[1] * X[1] - 6 * X[0] *… in f0_cubic_v()
[all …]
H A Dex62.c65 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_p() argument
68 for (d = 0, f0[0] = 0.0; d < dim; ++d) f0[0] -= u_x[d * dim + d]; in f0_p()
156 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_quadratic_u() argument
161 f0[0] = (dim - 1) * 4.0 * mu - 1.0; in f0_quadratic_u()
162 for (d = 1; d < dim; ++d) f0[d] = 4.0 * mu - 1.0; in f0_quadratic_u()
216 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_trig_u() argument
221 …f0[0] = -2.0 * PETSC_PI * PetscCosReal(2.0 * PETSC_PI * x[0]) - (dim - 1) * mu * PetscSqr(PETSC_PI… in f0_trig_u()
223 f0[0] -= mu * PetscSqr(PETSC_PI) * PetscSinReal(PETSC_PI * x[d]); in f0_trig_u()
224 …f0[d] = -2.0 * PETSC_PI * PetscCosReal(2.0 * PETSC_PI * x[d]) + mu * PetscPowRealInt(PETSC_PI, 3) … in f0_trig_u()
H A Dex12.c134 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_u() argument
136 f0[0] = 4.0; in f0_u()
139 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_ball_u() argument
147 …f0[0] = (-2.0 * dim * alpha - 8.0 * PetscSqr(alpha) * r2 * PetscTanhReal(xi)) * PetscSqr(1.0 / Pet… in f0_ball_u()
150 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_cross_u_2d() argument
155 f0[0] = PetscSinReal(alpha * xy) * (alpha * PetscAbsReal(xy) < 2 * PETSC_PI ? 1 : 0.01); in f0_cross_u_2d()
158 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_checkerboard_0_u() argument
160 f0[0] = -20.0 * PetscExpReal(-(PetscSqr(x[0] - 0.5) + PetscSqr(x[1] - 0.5))); in f0_checkerboard_0_u()
163 …l x[], const PetscReal n[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_bd_u() argument
166 for (d = 0, f0[0] = 0.0; d < dim; ++d) f0[0] += -n[d] * 2.0 * x[d]; in f0_bd_u()
[all …]
H A Dex13.c50 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_trig_inhomogeneous_u() argument
53 …for (d = 0; d < dim; ++d) f0[0] += -4.0 * PetscSqr(PETSC_PI) * PetscSinReal(2.0 * PETSC_PI * x[d]); in f0_trig_inhomogeneous_u()
56 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_trig_homogeneous_u() argument
68 f0[0] += v; in f0_trig_homogeneous_u()
72 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_unity_u() argument
74 f0[0] = 1.0; in f0_unity_u()
77 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_identityaux_u() argument
79 f0[0] = a[0]; in f0_identityaux_u()
170 …PetscPointFn *f0 = us… in SetupPrimalProblem() local
175 PetscCall(PetscDSSetResidual(ds, 0, f0, f1_u)); in SetupPrimalProblem()
/petsc/src/ts/tutorials/
H A Dex46.c73 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_mms1_u() argument
80 for (d = 0; d < dim; ++d) f0[c] += u[d] * u_x[c * dim + d]; in f0_mms1_u()
82 f0[0] += u_t[0]; in f0_mms1_u()
83 f0[1] += u_t[1]; in f0_mms1_u()
85 …f0[0] += -2.0 * t * (x[0] + x[1]) + 2.0 * x[0] * x[1] * x[1] - 4.0 * x[0] * x[0] * x[1] - 2.0 * x[… in f0_mms1_u()
86 …f0[1] += -2.0 * t * x[0] + 2.0 * x[1] * x[1] * x[1] - 4.0 * x[0] * x[1] * x[1] - 2.0 * x[0] * x[0]… in f0_mms1_u()
89 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_mms2_u() argument
96 for (d = 0; d < dim; ++d) f0[c] += u[d] * u_x[c * dim + d]; in f0_mms2_u()
98 f0[0] += u_t[0]; in f0_mms2_u()
99 f0[1] += u_t[1]; in f0_mms2_u()
[all …]
H A Dex76.c175 …eal t, const PetscReal X[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_quadratic_v() argument
179 …f0[0] -= t * (2 * X[0] + 2 * X[1]) + 2 * X[0] * X[0] * X[0] + 4 * X[0] * X[0] * X[1] - 2 * X[0] * … in f0_quadratic_v()
180 …f0[1] -= t * (2 * X[0] - 2 * X[1]) + 4 * X[0] * X[1] * X[1] + 2 * X[0] * X[0] * X[1] - 2 * X[1] * … in f0_quadratic_v()
183 …eal t, const PetscReal X[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_quadratic_w() argument
185 f0[0] -= 2 * t + 1 + 3 * X[0] * X[0] - 2 * X[0] * X[1] + X[1] * X[1]; in f0_quadratic_w()
219 …eal t, const PetscReal X[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_conduct_quadratic_v() argument
229 …f0[0] -= rho * S + rho * (2. * t * (X[0] + X[1]) + 2. * X[0] * X[0] * X[0] + 4. * X[0] * X[0] * X[… in f0_conduct_quadratic_v()
230 …f0[1] -= rho * S + rho * (2. * t * (X[0] - X[1]) + 2. * X[0] * X[0] * X[1] + 4. * X[0] * X[1] * X[… in f0_conduct_quadratic_v()
231 f0[gd] -= rho / PetscSqr(F); in f0_conduct_quadratic_v()
234 …eal t, const PetscReal X[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_conduct_quadratic_q() argument
[all …]
H A Dex45.c61 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_quad_lin_exp() argument
63 f0[0] = -(PetscScalar)dim; in f0_quad_lin_exp()
65 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_quad_lin() argument
69 f0[0] = u_t[0] - exp[0]; in f0_quad_lin()
96 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_quad_trig_exp() argument
98 f0[0] = -dim * (PetscSinReal(t) + 2.0); in f0_quad_trig_exp()
100 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_quad_trig() argument
104 f0[0] = u_t[0] - exp[0]; in f0_quad_trig()
131 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_trig_lin() argument
134 f0[0] = u_t[0]; in f0_trig_lin()
[all …]
H A Dex48.c202 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_Omega() argument
209 f0[0] += poissonBracket(dim, omegaDer, phiDer) - poissonBracket(dim, jzDer, psiDer); in f0_Omega()
211 if (u_t) f0[0] += u_t[OMEGA]; in f0_Omega()
223 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_psi_4f() argument
229 f0[0] = -eta * u[uOff[JZ]]; in f0_psi_4f()
230 f0[0] += poissonBracket(dim, psiDer, phiDer); in f0_psi_4f()
232 if (u_t) f0[0] += u_t[PSI]; in f0_psi_4f()
237 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_psi_2f() argument
241 f0[0] = -eta * u[uOff[JZ]]; in f0_psi_2f()
243 if (u_t) f0[0] += u_t[PSI]; in f0_psi_2f()
[all …]
H A Dex53.c147 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_quadratic_linear_u() argument
157 for (d = 0; d < dim - 1; ++d) f0[d] -= 2.0 * G - alpha * t; in f0_quadratic_linear_u()
158 f0[dim - 1] -= 2.0 * lambda + 4.0 * G - alpha * t; in f0_quadratic_linear_u()
161 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_quadratic_linear_p() argument
169 f0[0] += u_t ? alpha * u_t[uOff[1]] : 0.0; in f0_quadratic_linear_p()
170 f0[0] += u_t ? u_t[uOff[2]] / M : 0.0; in f0_quadratic_linear_p()
171 f0[0] -= sum / M; in f0_quadratic_linear_p()
229 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_quadratic_trig_u() argument
239 for (d = 0; d < dim - 1; ++d) f0[d] -= 2.0 * G - alpha * PetscCosReal(t); in f0_quadratic_trig_u()
240 f0[dim - 1] -= 2.0 * lambda + 4.0 * G - alpha * PetscCosReal(t); in f0_quadratic_trig_u()
[all …]
/petsc/systems/Apple/OSX/examples/PETSc cocoa example/PETSc cocoa example/en.lproj/
H A DCredits.rtf1 {\rtf0\ansi{\fonttbl\f0\fswiss Helvetica;}
6 \f0\b\fs24 \cf0 Engineering:
/petsc/src/ts/utils/dmplexlandau/tutorials/
H A Dex1.c43 …Real t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar *f0) in f0_vz() argument
45 if (dim == 2) f0[0] = u[0] * (2. * PETSC_PI * x[0]) * x[1]; /* n r v_|| */ in f0_vz()
46 else f0[0] = u[0] * x[2]; in f0_vz()
49 …Real t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar *f0) in f0_v2_par_shift() argument
52 …if (dim == 2) *f0 = u[0] * (2. * PETSC_PI * x[0]) * (x[1] - vz) * (x[1] - vz); /* n r v^2_par|perp… in f0_v2_par_shift()
53 else *f0 = u[0] * (x[2] - vz) * (x[2] - vz); in f0_v2_par_shift()
55 …Real t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar *f0) in f0_v2_perp() argument
57 if (dim == 2) *f0 = u[0] * (2. * PETSC_PI * x[0]) * x[0] * x[0]; /* n r v^2_perp */ in f0_v2_perp()
58 else *f0 = u[0] * (x[0] * x[0] + x[1] * x[1]); in f0_v2_perp()
61 …Real t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar *f0) in f0_n() argument
[all …]
H A Dex2.c49 …Real t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar *f0) in f0_j_re() argument
54 *f0 = n_e * 2. * PETSC_PI * x[0] * x[1] * constants[0]; /* n * r * v_|| * q */ in f0_j_re()
56 *f0 = 0; in f0_j_re()
60 *f0 = n_e * x[2] * constants[0]; in f0_j_re()
62 *f0 = 0; in f0_j_re()
68 …], PetscReal t, const PetscReal x[], PetscInt numConstants, const PetscScalar q[], PetscScalar *f0) in f0_jz_sum() argument
71 f0[0] = 0; in f0_jz_sum()
73 …for (ii = 0; ii < Nf; ii++) f0[0] += u[ii] * 2. * PETSC_PI * x[0] * x[1] * q[ii]; /* n * r * v_|| … in f0_jz_sum()
75 for (ii = 0; ii < Nf; ii++) f0[0] += u[ii] * x[2] * q[ii]; /* n * v_|| * q * v_0 */ in f0_jz_sum()
80 …Real t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar *f0) in f0_n() argument
[all …]
/petsc/src/dm/impls/plex/tests/
H A Dex73.c65 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in identity() argument
72 for (PetscInt c = 0; c < dim; ++c) f0[c] = -u[c] + p[c]; in identity()
75 …l x[], const PetscReal n[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in zero_bd() argument
77 for (PetscInt d = 0; d < dim; ++d) f0[0] = 0.; in zero_bd()
80 …l x[], const PetscReal n[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in flux() argument
82 for (PetscInt d = 0; d < dim; ++d) f0[0] -= u[d] * n[d]; in flux()
85 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in divergence() argument
87 for (PetscInt d = 0; d < dim; ++d) f0[0] += u_x[d * dim + d]; in divergence()
H A Dex39.c66 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_v_linear() argument
73 for (i = 0; i < dim; ++i) f0[i] = u[uOff[0] + i] - u_rhs[i]; in f0_v_linear()
77 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_v_sinusoid() argument
84 for (i = 0; i < dim; ++i) f0[i] = u[uOff[0] + i] - u_rhs[i]; in f0_v_sinusoid()
89 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_q() argument
96 f0[0] = u[uOff[1]] - divu; in f0_q()
100 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_w() argument
107 f0[0] = u[uOff[2]] - u[uOff[1]] + divu; in f0_w()
112 …l x[], const PetscReal n[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_bd_u_sinusoid() argument
119 for (d = 0; d < dim; ++d) f0[d] = u_rhs[d]; in f0_bd_u_sinusoid()
[all …]
H A Dex72.c11 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in identity() argument
13 f0[0] = 1.0; in identity()
/petsc/src/dm/dt/tests/
H A Dex12.c5 …f0(PetscInt dim, PetscInt Nf, PetscInt NfAux, const PetscInt uOff[], const PetscInt uOff_x[], cons… in f0() argument
7 f0[0] = 0.0; in f0()
10 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f1() argument
12 f0[0] = 0.0; in f1()
15 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f2() argument
17 f0[0] = 0.0; in f2()
20 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f3() argument
22 f0[0] = 0.0; in f3()
27 PetscPointFn **f0, **f1; in CheckResidual() local
31 …PetscCall(PetscWeakFormGetResidual(wf, key.label, key.value, key.field, key.part, &n0, &f0, &n1, &… in CheckResidual()
[all …]
H A Dex10.c41 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_v() argument
45 for (i = 0; i < dim; ++i) f0[i] = u[uOff[0] + i]; in f0_v()
61 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_q_linear() argument
68 f0[0] = divu - rhs; in f0_q_linear()
72 …l x[], const PetscReal n[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_bd_u_linear() argument
78 for (d = 0; d < dim; ++d) f0[d] = pressure * n[d]; in f0_bd_u_linear()
/petsc/src/snes/tests/
H A Dex15.c94 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_quadratic_phi() argument
96 for (PetscInt d = 0; d < dim; ++d) f0[0] -= -2.0; in f0_quadratic_phi()
119 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_trig_phi() argument
121 f0[0] += PetscSinReal(x[0]) + 2.; in f0_trig_phi()
144 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_trigx_phi() argument
146 f0[0] += PetscSinReal(x[0]); in f0_trigx_phi()
149 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_q() argument
151 for (PetscInt d = 0; d < dim; ++d) f0[d] += u[uOff[0] + d]; in f0_q()
159 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_phi() argument
161 for (PetscInt d = 0; d < dim; ++d) f0[0] += u_x[uOff_x[0] + d * dim + d]; in f0_phi()
[all …]
H A Dex13.c26 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_trig_u() argument
29 …for (d = 0; d < dim; ++d) f0[0] += -4.0 * PetscSqr(PETSC_PI) * PetscSinReal(2.0 * PETSC_PI * x[d]); in f0_trig_u()
50 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_strong_u() argument
53 for (d = 0; d < dim; ++d) f0[0] -= u_x[dim + d * dim + d]; in f0_strong_u()
54 f0[0] += 4.0; in f0_strong_u()
/petsc/src/tao/tutorials/
H A Dex2.c62 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_u() argument
64 f0[0] = (u[0] - (x[0] * x[0] + x[1] * x[1])); in f0_u()
66 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_u_full() argument
68 …f0[0] = (u[0] - (x[0] * x[0] + x[1] * x[1])) * PetscSqr(u[0] - (sin(2.0 * PETSC_PI * x[0]) * sin(2… in f0_u_full()
89 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_a() argument
91 f0[0] = u[1] - 4.0 /* 0.0 */ + u[2]; in f0_a()
102 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f0[]) in f0_l() argument
104 f0[0] = u[1]; in f0_l()

123