25   PetscReal      lambda,temp1,hx,hy,hz,tempk,tempj;  in FormInitGuess()  local
33   hy     = 1.0/(PetscReal)(My-1);  in FormInitGuess()
64       tempj = PetscMin((PetscReal)(PetscMin(j,My-j-1))*hy,tempk);  in FormInitGuess()
86   PetscReal      two = 2.0,lambda,hx,hy,hz,hxhzdhy,hyhzdhx,hxhydhz,sc;  in FormFunction()  local
94   hy     = 1.0/(PetscReal)(My-1);  in FormFunction()
96   sc     = hx*hy*hz*lambda;  in FormFunction()
97   hxhzdhy = hx*hz/hy;  in FormFunction()
98   hyhzdhx = hy*hz/hx;  in FormFunction()
99   hxhydhz = hx*hy/hz;  in FormFunction()
166   PetscReal      lambda,hx,hy,hz,hxhzdhy,hyhzdhx,hxhydhz,sc;  in FormJacobian()  local
175   hy     = 1.0/(PetscReal)(My-1);  in FormJacobian()
177   sc     = hx*hy*hz*lambda;  in FormJacobian()
178   hxhzdhy = hx*hz/hy;  in FormJacobian()
179   hyhzdhx = hy*hz/hx;  in FormJacobian()
180   hxhydhz = hx*hy/hz;  in FormJacobian()