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
182       d3 = (xc - xt);  in FormFunctionGradient()
191       df3dxc = d3 * hxdhy;  in FormFunctionGradient()
192       df4dxc = (d2 * hydhx + d3 * hxdhy);  in FormFunctionGradient()
198       d3 *= rhy;  in FormFunctionGradient()
207       f3 = PetscSqrtScalar(1.0 + d3 * d3 + d8 * d8);  in FormFunctionGradient()
208       f4 = PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2);  in FormFunctionGradient()
226     d3 = (user->left[j + 1] - user->left[j + 2]) * rhy;  in FormFunctionGradient()
228     ft = ft + PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2);  in FormFunctionGradient()
233     d3 = (user->bottom[i + 1] - x[i]) * rhy;  in FormFunctionGradient()
234     ft = ft + PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2);  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
367       d3 = (xc - xt) * rhy;  in QuadraticH()
376       f3 = PetscSqrtScalar(1.0 + d3 * d3 + d8 * d8);  in QuadraticH()
377       f4 = PetscSqrtScalar(1.0 + d3 * d3 + d2 * d2);  in QuadraticH()
382 …x * (1.0 + d5 * d5) + d2 * d5) / (f5 * f5 * f5) + (-hydhx * (1.0 + d3 * d3) + d2 * d3) / (f4 * f4 …  in QuadraticH()
383 …ht = (-hxdhy * (1.0 + d8 * d8) + d3 * d8) / (f3 * f3 * f3) + (-hxdhy * (1.0 + d2 * d2) + d2 * d3) …  in QuadraticH()
387       htl = -d1 * d7 / (f1 * f1 * f1) - d3 * d8 / (f3 * f3 * f3);  in QuadraticH()
389 …d4) / (f2 * f2 * f2) + (hxdhy * (1.0 + d2 * d2) + hydhx * (1.0 + d3 * d3) - 2 * d2 * d3) / (f4 * f…  in QuadraticH()