Lines Matching refs:d1
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
194 d1 = (xc - xl); in FormConstraints()
203 df1dxc = d1 * hydhx; in FormConstraints()
204 df2dxc = (d1 * hydhx + d4 * hxdhy); in FormConstraints()
210 d1 /= hx; in FormConstraints()
219 f1 = PetscSqrtScalar(1.0 + d1 * d1 + d7 * d7); in FormConstraints()
220 f2 = PetscSqrtScalar(1.0 + d1 * d1 + d4 * d4); 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
319 d1 = (xc - xl) / hx; in FormJacobian()
328 f1 = PetscSqrtScalar(1.0 + d1 * d1 + d7 * d7); in FormJacobian()
329 f2 = PetscSqrtScalar(1.0 + d1 * d1 + d4 * d4); in FormJacobian()
335 …hl = (-hydhx * (1.0 + d7 * d7) + d1 * d7) / (f1 * f1 * f1) + (-hydhx * (1.0 + d4 * d4) + d1 * d4) … in FormJacobian()
338 …hb = (-hxdhy * (1.0 + d6 * d6) + d4 * d6) / (f6 * f6 * f6) + (-hxdhy * (1.0 + d1 * d1) + d1 * d4) … in FormJacobian()
341 htl = -d1 * d7 / (f1 * f1 * f1) - d3 * d8 / (f3 * f3 * f3); in FormJacobian()
343 …y * (1.0 + d6 * d6) / (f6 * f6 * f6) + (hxdhy * (1.0 + d1 * d1) + hydhx * (1.0 + d4 * d4) - 2 * d1… in FormJacobian()