119   PetscScalar f2, f4, d1, d2, d3, d4, xc, xl, xr, xt, xb;  in FormObjectiveLocal()  local
149       d2 = (xc - xr);  in FormObjectiveLocal()
154       d2 /= hx;  in FormObjectiveLocal()
159       f4 = PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2);  in FormObjectiveLocal()
169       d2 = (user->left[j + 1] - x[j][0]) / hx;  in FormObjectiveLocal()
170       ft += PetscSqrtReal(1.0 + d3 * d3 + d2 * d2);  in FormObjectiveLocal()
175       d2 = (user->bottom[i + 1] - user->bottom[i + 2]) / hx;  in FormObjectiveLocal()
177       ft += PetscSqrtReal(1.0 + d3 * d3 + d2 * d2);  in FormObjectiveLocal()
196     d2 = (user->bottom[0] - user->bottom[1]) / hx;  in FormObjectiveLocal()
197     ft += PetscSqrtReal(1.0 + d1 * d1 + d2 * d2);  in FormObjectiveLocal()
201     d2 = (user->top[xm + 1] - user->top[xm]) / hx;  in FormObjectiveLocal()
202     ft += PetscSqrtReal(1.0 + d1 * d1 + d2 * d2);  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
256       d2 = (xc - xr);  in FormFunctionLocal()
267       df4dxc = (d2 * hydhx + d3 * hxdhy);  in FormFunctionLocal()
268       df5dxc = d2 * hydhx;  in FormFunctionLocal()
272       d2 /= hx;  in FormFunctionLocal()
283       f4 = PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2);  in FormFunctionLocal()
284       f5 = PetscSqrtScalar(1.0 + d2 * d2 + d5 * d5);  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
356       d2 = (xc - xr) / hx;  in FormJacobianLocal()
367       f4 = PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2);  in FormJacobianLocal()
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()
373 …ht = (-hxdhy * (1.0 + d8 * d8) + d3 * d8) / (f3 * f3 * f3) + (-hxdhy * (1.0 + d2 * d2) + d2 * d3) …  in FormJacobianLocal()
376       hbr = -d2 * d5 / (f5 * f5 * f5) - d4 * d6 / (f6 * f6 * f6);  in FormJacobianLocal()
379 …) - 2.0 * d1 * d4) / (f2 * f2 * f2) + (hxdhy * (1.0 + d2 * d2) + hydhx * (1.0 + d3 * d3) - 2.0 * d…  in FormJacobianLocal()