204   PetscInt       i, j, k, Mx, My, Mz, xs, ys, zs, xm, ym, zm;  in FormInitialGuess()  local
209 …PetscCall(DMDAGetInfo(user->da, PETSC_IGNORE, &Mx, &My, &Mz, PETSC_IGNORE, PETSC_IGNORE, PETSC_IGN…  in FormInitialGuess()
212   hx     = 1.0 / (PetscReal)(Mx - 1);  in FormInitialGuess()
242         if (i == 0 || j == 0 || k == 0 || i == Mx - 1 || j == My - 1 || k == Mz - 1) {  in FormInitialGuess()
246 …    x[k][j][i] = temp1 * PetscSqrtReal(PetscMin((PetscReal)(PetscMin(i, Mx - i - 1)) * hx, tempj));  in FormInitialGuess()
273   PetscInt    i, j, k, Mx, My, Mz, xs, ys, zs, xm, ym, zm;  in FormFunctionLocal()  local
280 …PetscCall(DMDAGetInfo(da, PETSC_IGNORE, &Mx, &My, &Mz, PETSC_IGNORE, PETSC_IGNORE, PETSC_IGNORE, P…  in FormFunctionLocal()
283   hx      = 1.0 / (PetscReal)(Mx - 1);  in FormFunctionLocal()
308         if (i == 0 || j == 0 || k == 0 || i == Mx - 1 || j == My - 1 || k == Mz - 1) {  in FormFunctionLocal()
387   PetscInt    i, j, k, Mx, My, Mz;  in FormJacobian()  local
396 …PetscCall(DMDAGetInfo(da, PETSC_IGNORE, &Mx, &My, &Mz, PETSC_IGNORE, PETSC_IGNORE, PETSC_IGNORE, P…  in FormJacobian()
399   hx      = 1.0 / (PetscReal)(Mx - 1);  in FormJacobian()
444         if (i == 0 || j == 0 || k == 0 || i == Mx - 1 || j == My - 1 || k == Mz - 1) {  in FormJacobian()