119   PetscScalar f2, f4, d1, d2, d3, d4, xc, xl, xr, xt, xb;  in FormObjectiveLocal()  local
151       d4 = (xc - xb);  in FormObjectiveLocal()
156       d4 /= hy;  in FormObjectiveLocal()
158       f2 = PetscSqrtScalar(1.0 + d1 * d1 + d4 * d4);  in FormObjectiveLocal()
183       d4 = (user->right[j] - user->right[j + 1]) / hy;  in FormObjectiveLocal()
184       ft += PetscSqrtReal(1.0 + d1 * d1 + d4 * d4);  in FormObjectiveLocal()
190       d4 = (user->top[i + 1] - user->top[i]) / hx;  in FormObjectiveLocal()
191       ft += PetscSqrtReal(1.0 + d1 * d1 + d4 * d4);  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
258       d4 = (xc - xb);  in FormFunctionLocal()
265       df2dxc = (d1 * hydhx + d4 * hxdhy);  in FormFunctionLocal()
269       df6dxc = d4 * hxdhy;  in FormFunctionLocal()
274       d4 /= hy;  in FormFunctionLocal()
281       f2 = PetscSqrtScalar(1.0 + d1 * d1 + d4 * d4);  in FormFunctionLocal()
285       f6 = PetscSqrtScalar(1.0 + d4 * d4 + d6 * d6);  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
358       d4 = (xc - xb) / hy;  in FormJacobianLocal()
365       f2 = PetscSqrtScalar(1.0 + d1 * d1 + d4 * d4);  in FormJacobianLocal()
369       f6 = PetscSqrtScalar(1.0 + d4 * d4 + d6 * d6);  in FormJacobianLocal()
371 …x * (1.0 + d7 * d7) + d1 * d7) / (f1 * f1 * f1) + (-hydhx * (1.0 + d4 * d4) + d1 * d4) / (f2 * f2 …  in FormJacobianLocal()
374 …hb = (-hxdhy * (1.0 + d6 * d6) + d4 * d6) / (f6 * f6 * f6) + (-hxdhy * (1.0 + d1 * d1) + d1 * d4) …  in FormJacobianLocal()
376       hbr = -d2 * d5 / (f5 * f5 * f5) - d4 * d6 / (f6 * f6 * f6);  in FormJacobianLocal()
379 …6) / (f6 * f6 * f6) + (hxdhy * (1.0 + d1 * d1) + hydhx * (1.0 + d4 * d4) - 2.0 * d1 * d4) / (f2 * …  in FormJacobianLocal()