411   PetscReal   hx, hy, dhx, dhy, sc;  in FormFunctionLocal()  local
418   sc  = hx * hy * user->lambda;  in FormFunctionLocal()
431         if (sc) eu = PetscExpScalar(u);  in FormFunctionLocal()
437         f[j][i] = uxx + uyy - sc * eu;  in FormFunctionLocal()
452   PetscReal hx, hy, sc;  in FormFunctionPicardLocal()  local
458   sc = hx * hy * user->lambda;  in FormFunctionPicardLocal()
466         f[j][i]             = sc * PetscExpScalar(u);  in FormFunctionPicardLocal()
484   PetscReal   hx, hy, hxdhy, hydhx, dhx, dhy, sc;  in FormJacobianLocal()  local
490   sc    = hx * hy * user->lambda;  in FormJacobianLocal()
527           v[2]     = 2.0 * (hydhx + hxdhy) - sc * PetscExpScalar(u);  in FormJacobianLocal()
571           v[2]     = hxdhy * (newt_N + newt_S) + hydhx * (newt_E + newt_W) - sc * PetscExpScalar(u);  in FormJacobianLocal()
604           v[4]     = hxdhy * (newt_N + newt_S) + hydhx * (newt_E + newt_W) - sc * PetscExpScalar(u);  in FormJacobianLocal()
729   PetscReal     hx, hy, hxdhy, hydhx, dhx, dhy, sc;  in NonlinearGS()  local
743   sc    = hx * hy * user->lambda;  in NonlinearGS()
786               if (sc) eu = PetscExpScalar(u);  in NonlinearGS()
789               F = uxx + uyy - sc * eu - bij;  in NonlinearGS()
791               J = hxdhy * (newt_N + newt_S) + hydhx * (newt_E + newt_W) - sc * eu;  in NonlinearGS()