Searched refs:normGradZ (Results 1 – 1 of 1) sorted by relevance
167 PetscReal normGradZ; in FormJacobianLocal() local201 normGradZ = PetscRealPart(PetscSqrtScalar(ux * ux + uy * uy)); in FormJacobianLocal()202 if (normGradZ < 1.0e-8) normGradZ = 1.0e-8; in FormJacobianLocal()211 … = D * 2.0 * (hydhx + hxdhy) + K * (funcADer(x[j][i], user) * normGradZ - A / normGradZ) * hx * … in FormJacobianLocal()214 v[3] = -D * hydhx + K * A * hx * hy / (2.0 * normGradZ); in FormJacobianLocal()217 v[4] = -D * hxdhy + K * A * hx * hy / (2.0 * normGradZ); in FormJacobianLocal()