Home
last modified time | relevance | path

Searched refs:f1 (Results 1 – 25 of 71) sorted by relevance

123

/petsc/src/tao/complementarity/tutorials/
H A Dminsurf1.c142 PetscReal f1, f2, f3, f4, f5, f6, d1, d2, d3, d4, d5, d6, d7, d8, xc, xl, xr, xt, xb, xlt, xrb; in FormConstraints() local
219 f1 = PetscSqrtScalar(1.0 + d1 * d1 + d7 * d7); in FormConstraints()
226 df1dxc /= f1; in FormConstraints()
264 …PetscReal f1, f2, f3, f4, f5, f6, d1, d2, d3, d4, d5, d6, d7, d8, xc, xl, xr, xt, xb, xlt… in FormJacobian() local
328 f1 = PetscSqrtScalar(1.0 + d1 * d1 + d7 * d7); in FormJacobian()
335 …hl = (-hydhx * (1.0 + d7 * d7) + d1 * d7) / (f1 * f1 * f1) + (-hydhx * (1.0 + d4 * d4) + d1 * d4) … in FormJacobian()
341 htl = -d1 * d7 / (f1 * f1 * f1) - d3 * d8 / (f3 * f3 * f3); in FormJacobian()
343 …hc = hydhx * (1.0 + d7 * d7) / (f1 * f1 * f1) + hxdhy * (1.0 + d8 * d8) / (f3 * f3 * f3) + hydhx *… in FormJacobian()
/petsc/src/vec/pf/impls/string/
H A Dcstringbase.template9 PetscScalar f1 = NOTLIKELY, f2 = 0,f3 = 0,f4 = 0,f5 = 0;
20 (void)f1;
41 out[_NOUT_*i] = f1;
/petsc/src/snes/tutorials/
H A Dex58.c149 …PetscScalar f1, f2, f3, f4, f5, f6, d1, d2, d3, d4, d5, d6, d7, d8, xc, xl, xr, xt, xb, xlt, xrb; in FormGradient() local
231 f1 = PetscSqrtScalar(1.0 + d1 * d1 + d7 * d7); in FormGradient()
238 df1dxc /= f1; in FormGradient()
277 …PetscScalar f1, f2, f3, f4, f5, f6, d1, d2, d3, d4, d5, d6, d7, d8, xc, xl, xr, xt, xb, xlt, xrb; in FormJacobian() local
353 f1 = PetscSqrtScalar(1.0 + d1 * d1 + d7 * d7); in FormJacobian()
360 …hl = (-hydhx * (1.0 + d7 * d7) + d1 * d7) / (f1 * f1 * f1) + (-hydhx * (1.0 + d4 * d4) + d1 * d4) … in FormJacobian()
366 htl = -d1 * d7 / (f1 * f1 * f1) - d3 * d8 / (f3 * f3 * f3); in FormJacobian()
368 …hc = hydhx * (1.0 + d7 * d7) / (f1 * f1 * f1) + hxdhy * (1.0 + d8 * d8) / (f3 * f3 * f3) + hydhx *… in FormJacobian()
H A Dex4.c217 PetscScalar f1, f2, f3, f4, f5, f6, d1, d2, d3, d4, d5, d6, d7, d8, xc, xl, xr, xt, xb, xlt, xrb; in FormFunctionLocal() local
280 f1 = PetscSqrtScalar(1.0 + d1 * d1 + d7 * d7); in FormFunctionLocal()
287 df1dxc /= f1; in FormFunctionLocal()
309 PetscScalar f1, f2, f3, f4, f5, f6, d1, d2, d3, d4, d5, d6, d7, d8, xc, xl, xr, xt, xb, xlt, xrb; in FormJacobianLocal() local
364 f1 = PetscSqrtScalar(1.0 + d1 * d1 + d7 * d7); in FormJacobianLocal()
371 …hl = (-hydhx * (1.0 + d7 * d7) + d1 * d7) / (f1 * f1 * f1) + (-hydhx * (1.0 + d4 * d4) + d1 * d4) … in FormJacobianLocal()
377 htl = -d1 * d7 / (f1 * f1 * f1) - d3 * d8 / (f3 * f3 * f3); in FormJacobianLocal()
379 …hc = hydhx * (1.0 + d7 * d7) / (f1 * f1 * f1) + hxdhy * (1.0 + d8 * d8) / (f3 * f3 * f3) + hydhx *… in FormJacobianLocal()
H A Dex56.c24 …l x[], const PetscReal n[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f1[]) in f1_bd_u() argument
29 for (d = 0; d < dim; ++d) f1[comp * dim + d] = 0.0; in f1_bd_u()
34 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f1[]) in f1_u_3d_alpha() argument
49 for (j = 0; j < dim; ++j) f1[i * dim + j] = mu * (u_x[i * dim + j] + u_x[j * dim + i]); in f1_u_3d_alpha()
50 f1[i * dim + i] += lambda * trace; in f1_u_3d_alpha()
55 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f1[]) in f1_u_3d() argument
61 for (j = 0; j < dim; ++j) f1[i * dim + j] = mu * (u_x[i * dim + j] + u_x[j * dim + i]); in f1_u_3d()
62 f1[i * dim + i] += lambda * trace; in f1_u_3d()
66 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f1[]) in f1_u_lap() argument
69 for (d = 0; d < dim; ++d) f1[d] = u_x[d]; in f1_u_lap()
H A Dex20.c48 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f1[]) in f1_u() argument
51 for (d = 0; d < dim; ++d) f1[d] = u_x[d]; in f1_u()
H A Dex12.c170 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f1[]) in f1_u() argument
173 for (d = 0; d < dim; ++d) f1[d] = u_x[d]; in f1_u()
269 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f1[]) in f1_analytic_u() argument
272 for (d = 0; d < dim; ++d) f1[d] = (x[0] + x[1]) * u_x[d]; in f1_analytic_u()
275 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f1[]) in f1_field_u() argument
278 for (d = 0; d < dim; ++d) f1[d] = a[0] * u_x[d]; in f1_field_u()
312 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f1[]) in f1_analytic_nonlinear_u() argument
317 for (d = 0; d < dim; ++d) f1[d] = 0.5 * nu * u_x[d]; in f1_analytic_nonlinear_u()
H A Dex71.c105 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f1[]) in f1_u() argument
114 f1[c * dim + d] = nu * u_x[c * dim + d]; in f1_u()
116 f1[c * dim + c] -= u[uOff[1]]; in f1_u()
/petsc/src/tao/unconstrained/tutorials/
H A Dminsurf1.c131 …PetscReal f1, f2, f3, f4, f5, f6, d1, d2, d3, d4, d5, d6, d7, d8, xc, xl, xr, xt, xb, xlt… in FormFunctionGradient() local
205 f1 = PetscSqrtScalar(1.0 + d1 * d1 + d7 * d7); in FormFunctionGradient()
214 df1dxc /= f1; in FormFunctionGradient()
310 …PetscReal f1, f2, f3, f4, f5, f6, d1, d2, d3, d4, d5, d6, d7, d8, xc, xl, xr, xt, xb, xlt… in QuadraticH() local
374 f1 = PetscSqrtScalar(1.0 + d1 * d1 + d7 * d7); in QuadraticH()
381 …hl = (-hydhx * (1.0 + d7 * d7) + d1 * d7) / (f1 * f1 * f1) + (-hydhx * (1.0 + d4 * d4) + d1 * d4) … in QuadraticH()
387 htl = -d1 * d7 / (f1 * f1 * f1) - d3 * d8 / (f3 * f3 * f3); in QuadraticH()
389 …hc = hydhx * (1.0 + d7 * d7) / (f1 * f1 * f1) + hxdhy * (1.0 + d8 * d8) / (f3 * f3 * f3) + hydhx *… in QuadraticH()
H A Dminsurf2.c304 PetscReal f1, f2, f3, f4, f5, f6, d1, d2, d3, d4, d5, d6, d7, d8, xc, xl, xr, xt, xb, xlt, xrb; in FormFunctionGradient() local
385 f1 = PetscSqrtReal(1.0 + d1 * d1 + d7 * d7); in FormFunctionGradient()
394 df1dxc /= f1; in FormFunctionGradient()
508 PetscReal f1, f2, f3, f4, f5, f6, d1, d2, d3, d4, d5, d6, d7, d8, xc, xl, xr, xt, xb, xlt, xrb; in QuadraticH() local
583 f1 = PetscSqrtReal(1.0 + d1 * d1 + d7 * d7); in QuadraticH()
590 …hl = (-hydhx * (1.0 + d7 * d7) + d1 * d7) / (f1 * f1 * f1) + (-hydhx * (1.0 + d4 * d4) + d1 * d4) … in QuadraticH()
596 htl = -d1 * d7 / (f1 * f1 * f1) - d3 * d8 / (f3 * f3 * f3); in QuadraticH()
598 …hc = hydhx * (1.0 + d7 * d7) / (f1 * f1 * f1) + hxdhy * (1.0 + d8 * d8) / (f3 * f3 * f3) + hydhx *… in QuadraticH()
/petsc/include/
H A Dpetscfe.h194 PetscScalar f1[Nc * cdim]; \
197 for (PetscInt k = 0; k < Nc * cdim; ++k) f1[k] = 0; \
199 … f1_name(2, 1, 0, uOff, uOff_x, u, NULL, u_x, NULL, NULL, NULL, NULL, NULL, 0.0, x, 0, NULL, f1); \
201 dv[i + Q * 0] = qdata[i + Q * 0] * (invJ[0][0] * f1[0] + invJ[0][1] * f1[1]); \
202 dv[i + Q * 1] = qdata[i + Q * 0] * (invJ[1][0] * f1[0] + invJ[1][1] * f1[1]); \
/petsc/src/tao/bound/tutorials/
H A Dplate2f.F9072 PetscReal f1, f2, f3, f4, f5, f6, d1, d2, d3
184 f1 = sqrt(1.0 + d1*d1 + d7*d7)
193 df1dxc = df1dxc/f1
306 PetscReal f1, f2, f3, f4, f5, f6, d1, d2, d3
407 f1 = sqrt(1.0 + d1*d1 + d7*d7)
414 hl = (-hydhx*(1.0 + d7*d7) + d1*d7)/(f1*f1*f1) + (-hydhx*(1.0 + d4*d4) + d1*d4)/(f2*f2*f2)
423 htl = -d1*d7/(f1*f1*f1) - d3*d8/(f3*f3*f3)
425 …hc = hydhx*(1.0 + d7*d7)/(f1*f1*f1) + hxdhy*(1.0 + d8*d8)/(f3*f3*f3) + hydhx*(1.0 + d5*d5)/(f5*f5*…
H A Dplate2.c207 PetscReal f1, f2, f3, f4, f5, f6, d1, d2, d3, d4, d5, d6, d7, d8, xc, xl, xr, xt, xb, xlt, xrb; in FormFunctionGradient() local
296 f1 = PetscSqrtScalar(1.0 + d1 * d1 + d7 * d7); in FormFunctionGradient()
305 df1dxc /= f1; in FormFunctionGradient()
423 PetscReal f1, f2, f3, f4, f5, f6, d1, d2, d3, d4, d5, d6, d7, d8, xc, xl, xr, xt, xb, xlt, xrb; in FormHessian() local
503 f1 = PetscSqrtScalar(1.0 + d1 * d1 + d7 * d7); in FormHessian()
510 …hl = (-hydhx * (1.0 + d7 * d7) + d1 * d7) / (f1 * f1 * f1) + (-hydhx * (1.0 + d4 * d4) + d1 * d4) … in FormHessian()
516 htl = -d1 * d7 / (f1 * f1 * f1) - d3 * d8 / (f3 * f3 * f3); in FormHessian()
518 …hc = hydhx * (1.0 + d7 * d7) / (f1 * f1 * f1) + hxdhy * (1.0 + d8 * d8) / (f3 * f3 * f3) + hydhx *… in FormHessian()
/petsc/systems/Apple/OSX/bin/
H A Dmakedmg26 let size=`du -c tempsource | tail -1 | cut -f1`
31 device=`hdiutil attach -readwrite -noverify -noautoopen "pack.temp.dmg" | head -1 | cut -f1`
/petsc/systems/Apple/iOS/bin/
H A Dmakedmg31 let size=`du -c tempsource | tail -1 | cut -f1`
36 device=`hdiutil attach -readwrite -noverify -noautoopen "pack.temp.dmg" | head -1 | cut -f1`
/petsc/src/tao/tutorials/
H A Dex1.c65 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f1[]) in f1_u() argument
68 for (d = 0; d < dim; ++d) f1[d] = u[1] * u_x[dim * 2 + d]; in f1_u()
93 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f1[]) in f1_a() argument
96 for (d = 0; d < dim; ++d) f1[d] = u[2] * u_x[d]; in f1_a()
109 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f1[]) in f1_l() argument
112 for (d = 0; d < dim; ++d) f1[d] = u[1] * u_x[d]; in f1_l()
H A Dex2.c70 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f1[]) in f1_u() argument
73 for (d = 0; d < dim; ++d) f1[d] = u_x[dim * 2 + d]; in f1_u()
106 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f1[]) in f1_l() argument
109 for (d = 0; d < dim; ++d) f1[d] = u_x[d]; in f1_l()
/petsc/src/snes/tutorials/network/power/
H A Dpower.h95 PetscScalar f1; /* Fraction of ownership */ member
124 PetscScalar f1; /* Fraction of ownership */ member
/petsc/lib/petsc/bin/
H A Dpetscnagfor126 f1 = last.find('.') variable
128 last = last[0:f1] + last[f2:]
/petsc/src/dm/dt/interface/
H A Ddtds.c518 …NsMax * NqMax * NcMax, &prob->f0, NsMax * NqMax * NcMax * dimEmbed, &prob->f1, NsMax * NsMax * NqM… in PetscDSSetUp()
534 PetscCall(PetscFree6(prob->f0, prob->f1, prob->g0, prob->g1, prob->g2, prob->g3)); in PetscDSDestroyStructs_Static()
1351 PetscErrorCode PetscDSGetResidual(PetscDS ds, PetscInt f, PetscPointFn **f0, PetscPointFn **f1) in PetscDSGetResidual() argument
1361 *f1 = tmp1 ? tmp1[0] : NULL; in PetscDSGetResidual()
1383 PetscErrorCode PetscDSSetResidual(PetscDS ds, PetscInt f, PetscPointFn *f0, PetscPointFn *f1) in PetscDSSetResidual() argument
1388 if (f1) PetscValidFunction(f1, 4); in PetscDSSetResidual()
1390 PetscCall(PetscWeakFormSetIndexResidual(ds->wf, NULL, 0, f, 0, 0, f0, 0, f1)); in PetscDSSetResidual()
1414 PetscErrorCode PetscDSGetRHSResidual(PetscDS ds, PetscInt f, PetscPointFn **f0, PetscPointFn **f1) in PetscDSGetRHSResidual() argument
1424 *f1 = tmp1 ? tmp1[0] : NULL; in PetscDSGetRHSResidual()
1446 PetscErrorCode PetscDSSetRHSResidual(PetscDS ds, PetscInt f, PetscPointFn *f0, PetscPointFn *f1) in PetscDSSetRHSResidual() argument
[all …]
/petsc/src/dm/dt/tests/
H A Dex12.c10 static void f1(PetscInt dim, PetscInt Nf, PetscInt NfAux, const PetscInt uOff[], const PetscInt uOf… in f1() function
27 PetscPointFn **f0, **f1; in CheckResidual() local
31 …cCall(PetscWeakFormGetResidual(wf, key.label, key.value, key.field, key.part, &n0, &f0, &n1, &f1)); in CheckResidual()
35 …for (i = 0; i < n1; ++i) PetscCheck(f1[i] == if1[i], PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "f1[%" Pe… in CheckResidual()
41 PetscPointFn *f[4] = {f0, f1, f2, f3}; in TestSetIndex()
131 PetscPointFn *f[4] = {f0, f1, f2, f3}, *fp[4]; in TestAdd()
215 PetscPointFn *f[4] = {f0, f1, f2, f3}; in TestSetIndexAdd()
/petsc/src/ts/tutorials/
H A Dex46.c105 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f1[]) in f1_u() argument
112 for (d = 0; d < dim; ++d) f1[comp * dim + d] = 1.0 / Re * u_x[comp * dim + d]; in f1_u()
113 f1[comp * dim + comp] -= u[Ncomp]; in f1_u()
123 …eal t, const PetscReal x[], PetscInt numConstants, const PetscScalar constants[], PetscScalar f1[]) in f1_p() argument
126 for (d = 0; d < dim; ++d) f1[d] = 0.0; in f1_p()
/petsc/src/dm/dt/fe/impls/basic/
H A Dfebasic.c399 PetscScalar *f0, *f1, *u, *u_t = NULL, *u_x, *a, *a_x, *basisReal, *basisDerReal; in PetscFEIntegrateResidual_Basic() local
422 PetscCall(PetscDSGetWeakFormArrays(ds, &f0, &f1, NULL, NULL, NULL, NULL)); in PetscFEIntegrateResidual_Basic()
444 PetscCall(PetscArrayzero(f1, Nq * T[field]->Nc * dE)); in PetscFEIntegrateResidual_Basic()
462 …t, u_x, aOff, aOff_x, a, NULL, a_x, t, fegeom.v, numConstants, constants, &f1[q * T[field]->Nc * d… in PetscFEIntegrateResidual_Basic()
464 for (d = 0; d < dE; ++d) f1[(q * T[field]->Nc + c) * dE + d] *= w; in PetscFEIntegrateResidual_Basic()
482 …; ++d) PetscCall(PetscPrintf(PETSC_COMM_SELF, " %g", (double)PetscRealPart(f1[(q * T[field]->Nc + … in PetscFEIntegrateResidual_Basic()
489 …lementVec_Internal(fe, T[field], 0, basisReal, basisDerReal, e, cgeom, f0, f1, &elemVec[cOffset + … in PetscFEIntegrateResidual_Basic()
505 PetscScalar *f0, *f1, *u, *u_t = NULL, *u_x, *a, *a_x, *basisReal, *basisDerReal; in PetscFEIntegrateBdResidual_Basic() local
528 PetscCall(PetscDSGetWeakFormArrays(ds, &f0, &f1, NULL, NULL, NULL, NULL)); in PetscFEIntegrateBdResidual_Basic()
557 PetscCall(PetscArrayzero(f1, Nq * NcI * dE)); in PetscFEIntegrateBdResidual_Basic()
[all …]
/petsc/share/petsc/datafiles/meshes/
H A Dsquare.cas8 (13 (0 1 f1 0))
143 (13 (3 21 f1 2 2)
/petsc/src/dm/impls/stag/
H A Dstag.c12 PetscInt f0, f1, f2, f3, dof0, dof1, dof2, dof3, n_entries, k, d, cnt, n_fields, dim; in DMCreateFieldDecomposition_Stag() local
21 f1 = f2 = f3 = 0; in DMCreateFieldDecomposition_Stag()
23 f1 = 1; in DMCreateFieldDecomposition_Stag()
25 f1 = 2; in DMCreateFieldDecomposition_Stag()
28 f1 = 3; in DMCreateFieldDecomposition_Stag()
34 PetscCall(PetscCalloc1(f1 * dof1, &stencil1)); in DMCreateFieldDecomposition_Stag()
44 for (k = 0; k < f1; ++k) { in DMCreateFieldDecomposition_Stag()
166 PetscCall(DMStagCreateISFromStencils(dm, f1 * dof1, stencil1, &(*islist)[cnt])); in DMCreateFieldDecomposition_Stag()

123