| /petsc/src/tao/complementarity/tutorials/ |
| H A D | minsurf1.c | 142 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
223 f5 = PetscSqrtScalar(1.0 + d2 * d2 + d5 * d5); in FormConstraints()
230 df5dxc /= f5; 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
332 f5 = PetscSqrtScalar(1.0 + d2 * d2 + d5 * d5); in FormJacobian()
336 …hr = (-hydhx * (1.0 + d5 * d5) + d2 * d5) / (f5 * f5 * f5) + (-hydhx * (1.0 + d3 * d3) + d2 * d3) … in FormJacobian()
340 hbr = -d2 * d5 / (f5 * f5 * f5) - d4 * d6 / (f6 * f6 * f6); in FormJacobian()
343 …hxdhy * (1.0 + d8 * d8) / (f3 * f3 * f3) + hydhx * (1.0 + d5 * d5) / (f5 * f5 * f5) + hxdhy * (1.0… in FormJacobian()
|
| /petsc/src/vec/pf/impls/string/ |
| H A D | cstringbase.template | 9 PetscScalar f1 = NOTLIKELY, f2 = 0,f3 = 0,f4 = 0,f5 = 0;
24 (void)f5;
55 out[_NOUT_*i+4] = f5;
|
| /petsc/src/tao/unconstrained/tutorials/ |
| H A D | minsurf1.c | 131 …PetscReal f1, f2, f3, f4, f5, f6, d1, d2, d3, d4, d5, d6, d7, d8, xc, xl, xr, xt, xb, xlt… in FormFunctionGradient() local
209 f5 = PetscSqrtScalar(1.0 + d2 * d2 + d5 * d5); in FormFunctionGradient()
218 df5dxc /= f5; 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
378 f5 = PetscSqrtScalar(1.0 + d2 * d2 + d5 * d5); in QuadraticH()
382 …hr = (-hydhx * (1.0 + d5 * d5) + d2 * d5) / (f5 * f5 * f5) + (-hydhx * (1.0 + d3 * d3) + d2 * d3) … in QuadraticH()
386 hbr = -d2 * d5 / (f5 * f5 * f5) - d4 * d6 / (f6 * f6 * f6); in QuadraticH()
389 …hxdhy * (1.0 + d8 * d8) / (f3 * f3 * f3) + hydhx * (1.0 + d5 * d5) / (f5 * f5 * f5) + hxdhy * (1.0… in QuadraticH()
|
| H A D | minsurf2.c | 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
389 f5 = PetscSqrtReal(1.0 + d2 * d2 + d5 * d5); in FormFunctionGradient()
398 df5dxc /= f5; 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
587 f5 = PetscSqrtReal(1.0 + d2 * d2 + d5 * d5); in QuadraticH()
591 …hr = (-hydhx * (1.0 + d5 * d5) + d2 * d5) / (f5 * f5 * f5) + (-hydhx * (1.0 + d3 * d3) + d2 * d3) … in QuadraticH()
595 hbr = -d2 * d5 / (f5 * f5 * f5) - d4 * d6 / (f6 * f6 * f6); in QuadraticH()
598 …hxdhy * (1.0 + d8 * d8) / (f3 * f3 * f3) + hydhx * (1.0 + d5 * d5) / (f5 * f5 * f5) + hxdhy * (1.0… in QuadraticH()
|
| /petsc/src/snes/tutorials/ |
| H A D | ex58.c | 149 …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
235 f5 = PetscSqrtScalar(1.0 + d2 * d2 + d5 * d5); in FormGradient()
242 df5dxc /= f5; 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
357 f5 = PetscSqrtScalar(1.0 + d2 * d2 + d5 * d5); in FormJacobian()
361 …hr = (-hydhx * (1.0 + d5 * d5) + d2 * d5) / (f5 * f5 * f5) + (-hydhx * (1.0 + d3 * d3) + d2 * d3) … in FormJacobian()
365 hbr = -d2 * d5 / (f5 * f5 * f5) - d4 * d6 / (f6 * f6 * f6); in FormJacobian()
368 …hxdhy * (1.0 + d8 * d8) / (f3 * f3 * f3) + hydhx * (1.0 + d5 * d5) / (f5 * f5 * f5) + hxdhy * (1.0… in FormJacobian()
|
| H A D | ex4.c | 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
284 f5 = PetscSqrtScalar(1.0 + d2 * d2 + d5 * d5); in FormFunctionLocal()
291 df5dxc /= f5; 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
368 f5 = PetscSqrtScalar(1.0 + d2 * d2 + d5 * d5); in FormJacobianLocal()
372 …hr = (-hydhx * (1.0 + d5 * d5) + d2 * d5) / (f5 * f5 * f5) + (-hydhx * (1.0 + d3 * d3) + d2 * d3) … in FormJacobianLocal()
376 hbr = -d2 * d5 / (f5 * f5 * f5) - d4 * d6 / (f6 * f6 * f6); in FormJacobianLocal()
379 …hxdhy * (1.0 + d8 * d8) / (f3 * f3 * f3) + hydhx * (1.0 + d5 * d5) / (f5 * f5 * f5) + hxdhy * (1.0… in FormJacobianLocal()
|
| /petsc/src/tao/bound/tutorials/ |
| H A D | plate2f.F90 | 72 PetscReal f1, f2, f3, f4, f5, f6, d1, d2, d3
188 f5 = sqrt(1.0 + d2*d2 + d5*d5)
197 df5dxc = df5dxc/f5
306 PetscReal f1, f2, f3, f4, f5, f6, d1, d2, d3
411 f5 = sqrt(1.0 + d2*d2 + d5*d5)
416 hr = (-hydhx*(1.0 + d5*d5) + d2*d5)/(f5*f5*f5) + (-hydhx*(1.0 + d3*d3) + d2*d3)/(f4*f4*f4)
422 hbr = -d2*d5/(f5*f5*f5) - d4*d6/(f6*f6*f6)
425 …*d7)/(f1*f1*f1) + hxdhy*(1.0 + d8*d8)/(f3*f3*f3) + hydhx*(1.0 + d5*d5)/(f5*f5*f5) + …
|
| H A D | plate2.c | 207 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
300 f5 = PetscSqrtScalar(1.0 + d2 * d2 + d5 * d5); in FormFunctionGradient()
309 df5dxc /= f5; 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
507 f5 = PetscSqrtScalar(1.0 + d2 * d2 + d5 * d5); in FormHessian()
511 …hr = (-hydhx * (1.0 + d5 * d5) + d2 * d5) / (f5 * f5 * f5) + (-hydhx * (1.0 + d3 * d3) + d2 * d3) … in FormHessian()
515 hbr = -d2 * d5 / (f5 * f5 * f5) - d4 * d6 / (f6 * f6 * f6); in FormHessian()
518 …hxdhy * (1.0 + d8 * d8) / (f3 * f3 * f3) + hydhx * (1.0 + d5 * d5) / (f5 * f5 * f5) + hxdhy * (1.0… in FormHessian()
|