183   PetscReal    temp1, temp, hx, hy;  in FormInitialGuess()  local
192   hy = one / (PetscReal)(my - 1);  in FormInitialGuess()
197     temp = (PetscReal)(PetscMin(j, my - j - 1)) * hy;  in FormInitialGuess()
217   PetscReal          hx, hy, hxdhy, hydhx;  in FormFunction()  local
227   hy    = one / (PetscReal)(my - 1);  in FormFunction()
228   sc    = hx * hy;  in FormFunction()
229   hxdhy = hx / hy;  in FormFunction()
230   hydhx = hy / hx;  in FormFunction()
271   PetscReal          hx, hy, hxdhy, hydhx;  in FormJacobian()  local
279   hy    = 1.0 / (PetscReal)(my - 1);  in FormJacobian()
280   sc    = hx * hy;  in FormJacobian()
281   hxdhy = hx / hy;  in FormJacobian()
282   hydhx = hy / hx;  in FormJacobian()