Home
last modified time | relevance | path

Searched refs:f4 (Results 1 – 10 of 10) sorted by relevance

/petsc/src/ksp/ksp/tutorials/
H A Dex54f.F9029 PetscInt ki, kj, nel, ll, j1, i1, ndf, f4
51 f4 = 4
124 call thfx2d(ev, coord, shp, dd, f2, f2, f4, ex54_psi)
144 PetscCallA(MatSetValues(Amat, f4, idx, f4, idx, reshape(ss, [f4*f4]), ADD_VALUES, ierr))
157 PetscCallA(MatSetValues(Amat, f4, idx, f4, idx, reshape(ss, [f4*f4]), ADD_VALUES, ierr))
/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
222 f4 = PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2); in FormConstraints()
229 df4dxc /= f4; 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
331 f4 = PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2); in FormJacobian()
336 …1.0 + d5 * d5) + d2 * d5) / (f5 * f5 * f5) + (-hydhx * (1.0 + d3 * d3) + d2 * d3) / (f4 * f4 * f4); in FormJacobian()
337 …1.0 + d8 * d8) + d3 * d8) / (f3 * f3 * f3) + (-hxdhy * (1.0 + d2 * d2) + d2 * d3) / (f4 * f4 * f4); in FormJacobian()
343 …f2 * f2 * f2) + (hxdhy * (1.0 + d2 * d2) + hydhx * (1.0 + d3 * d3) - 2 * d2 * d3) / (f4 * f4 * f4); in FormJacobian()
/petsc/src/vec/pf/impls/string/
H A Dcstringbase.template9 PetscScalar f1 = NOTLIKELY, f2 = 0,f3 = 0,f4 = 0,f5 = 0;
23 (void)f4;
52 out[_NOUT_*i+3] = f4;
/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
208 f4 = PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2); in FormFunctionGradient()
212 ft = ft + (f2 + f4); in FormFunctionGradient()
217 df4dxc /= f4; 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
377 f4 = PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2); in QuadraticH()
382 …1.0 + d5 * d5) + d2 * d5) / (f5 * f5 * f5) + (-hydhx * (1.0 + d3 * d3) + d2 * d3) / (f4 * f4 * f4); in QuadraticH()
383 …1.0 + d8 * d8) + d3 * d8) / (f3 * f3 * f3) + (-hxdhy * (1.0 + d2 * d2) + d2 * d3) / (f4 * f4 * f4); in QuadraticH()
389 …f2 * f2 * f2) + (hxdhy * (1.0 + d2 * d2) + hydhx * (1.0 + d3 * d3) - 2 * d2 * d3) / (f4 * f4 * f4); in QuadraticH()
H A Dminsurf2.c170 PetscReal f2, f4, d1, d2, d3, d4, xc, xl, xr, xt, xb; in FormFunction() local
227 f4 = PetscSqrtReal(1.0 + d3 * d3 + d2 * d2); in FormFunction()
229 ft = ft + (f2 + f4); in FormFunction()
304 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
388 f4 = PetscSqrtReal(1.0 + d3 * d3 + d2 * d2); in FormFunctionGradient()
392 ft = ft + (f2 + f4); in FormFunctionGradient()
397 df4dxc /= f4; 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
586 f4 = PetscSqrtReal(1.0 + d3 * d3 + d2 * d2); in QuadraticH()
591 …1.0 + d5 * d5) + d2 * d5) / (f5 * f5 * f5) + (-hydhx * (1.0 + d3 * d3) + d2 * d3) / (f4 * f4 * f4); in QuadraticH()
[all …]
/petsc/src/snes/tutorials/
H A Dex4.c119 PetscScalar f2, f4, d1, d2, d3, d4, xc, xl, xr, xt, xb; in FormObjectiveLocal() local
159 f4 = PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2); in FormObjectiveLocal()
161 ft += PetscRealPart(f2 + f4); in FormObjectiveLocal()
217 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
283 f4 = PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2); in FormFunctionLocal()
290 df4dxc /= f4; 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
367 f4 = PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2); in FormJacobianLocal()
372 …1.0 + d5 * d5) + d2 * d5) / (f5 * f5 * f5) + (-hydhx * (1.0 + d3 * d3) + d2 * d3) / (f4 * f4 * f4); in FormJacobianLocal()
373 …1.0 + d8 * d8) + d3 * d8) / (f3 * f3 * f3) + (-hxdhy * (1.0 + d2 * d2) + d2 * d3) / (f4 * f4 * f4); in FormJacobianLocal()
[all …]
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
234 f4 = PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2); in FormGradient()
241 df4dxc /= f4; 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
356 f4 = PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2); in FormJacobian()
361 …1.0 + d5 * d5) + d2 * d5) / (f5 * f5 * f5) + (-hydhx * (1.0 + d3 * d3) + d2 * d3) / (f4 * f4 * f4); in FormJacobian()
362 …1.0 + d8 * d8) + d3 * d8) / (f3 * f3 * f3) + (-hxdhy * (1.0 + d2 * d2) + d2 * d3) / (f4 * f4 * f4); in FormJacobian()
368 … * f2 * f2) + (hxdhy * (1.0 + d2 * d2) + hydhx * (1.0 + d3 * d3) - 2.0 * d2 * d3) / (f4 * f4 * f4); in FormJacobian()
/petsc/src/tao/bound/tutorials/
H A Dplate2f.F9072 PetscReal f1, f2, f3, f4, f5, f6, d1, d2, d3
187 f4 = sqrt(1.0 + d3*d3 + d2*d2)
191 ft = ft + f2 + f4
196 df4dxc = df4dxc/f4
306 PetscReal f1, f2, f3, f4, f5, f6, d1, d2, d3
410 f4 = sqrt(1.0 + d3*d3 + d2*d2)
416 hr = (-hydhx*(1.0 + d5*d5) + d2*d5)/(f5*f5*f5) + (-hydhx*(1.0 + d3*d3) + d2*d3)/(f4*f4*f4)
418 ht = (-hxdhy*(1.0 + d8*d8) + d3*d8)/(f3*f3*f3) + (-hxdhy*(1.0 + d2*d2) + d2*d3)/(f4*f4*f4)
427 & hydhx*(1.0 + d3*d3) - 2*d2*d3)/(f4*f4*f4)
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
299 f4 = PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2); in FormFunctionGradient()
303 ft = ft + (f2 + f4); in FormFunctionGradient()
308 df4dxc /= f4; 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
506 f4 = PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2); in FormHessian()
511 …1.0 + d5 * d5) + d2 * d5) / (f5 * f5 * f5) + (-hydhx * (1.0 + d3 * d3) + d2 * d3) / (f4 * f4 * f4); in FormHessian()
512 …1.0 + d8 * d8) + d3 * d8) / (f3 * f3 * f3) + (-hxdhy * (1.0 + d2 * d2) + d2 * d3) / (f4 * f4 * f4); in FormHessian()
518 …f2 * f2 * f2) + (hxdhy * (1.0 + d2 * d2) + hydhx * (1.0 + d3 * d3) - 2 * d2 * d3) / (f4 * f4 * f4); in FormHessian()
/petsc/lib/petsc/conf/
H A Drules_util.mk56 …n" = "version" ]; then version=`${PETSCCLANGFORMAT} --version | cut -d" " -f4 | cut -d"." -f 1`; f…