38   PetscScalar      *xx;  in main()  local
102   PetscCall(VecGetArray(x, &xx));  in main()
104     v2 = xx[i] * sperturb;  in main()
107   PetscCall(VecRestoreArray(x, &xx));  in main()
129   const PetscScalar *xx;  in FormFunction()  local
134   PetscCall(VecGetArrayRead(x, &xx));  in FormFunction()
141   if (second_order) ff[0] = d * (0.5 * d * (-xx[2] + 4. * xx[1] - 3. * xx[0]) - X0DOT);  in FormFunction()
142   else ff[0] = d * (d * (xx[1] - xx[0]) - X0DOT);  in FormFunction()
144 …for (i = 1; i < n - 1; i++) ff[i] = d2 * (xx[i - 1] - 2. * xx[i] + xx[i + 1]) + xx[i] * xx[i] - FF…  in FormFunction()
146   ff[n - 1] = d * d * (xx[n - 1] - X1);  in FormFunction()
147   PetscCall(VecRestoreArrayRead(x, &xx));  in FormFunction()
155   const PetscScalar *xx;  in FormJacobian()  local
161   PetscCall(VecGetArrayRead(x, &xx));  in FormJacobian()
186     A[1] = -2. * d2 + 2. * xx[i];  in FormJacobian()
200   PetscCall(VecRestoreArrayRead(x, &xx));  in FormJacobian()