528   const PetscScalar *ptr_X, *ptr_Y;  in SolutionErrorNorms_2WaySplit()  local
537   PetscCall(VecGetArrayRead(X, &ptr_X));  in SolutionErrorNorms_2WaySplit()
540     if (i < ctx->sf || i > ctx->fs - 1) *nrm1 += hs * PetscAbs(ptr_X[i] - ptr_Y[i]);  in SolutionErrorNorms_2WaySplit()
541     else *nrm1 += hf * PetscAbs(ptr_X[i] - ptr_Y[i]);  in SolutionErrorNorms_2WaySplit()
543   PetscCall(VecRestoreArrayRead(X, &ptr_X));  in SolutionErrorNorms_2WaySplit()
1322     const PetscScalar *ptr_X, *ptr_X0;  in main()  local
1333     PetscCall(DMDAVecGetArrayRead(da, X, (void *)&ptr_X));  in main()
1338           mass_final   = mass_final + hs * ptr_X[i * dof + k];  in main()
1343           mass_final   = mass_final + hf * ptr_X[i * dof + k];  in main()
1348     PetscCall(DMDAVecRestoreArrayRead(da, X, (void *)&ptr_X));  in main()
1372       PetscCall(VecGetArrayRead(X, &ptr_X));  in main()
1376 …   for (k = 0; k < dof; k++) nrm1 = nrm1 + hs * PetscAbs(ptr_X[i * dof + k] - ptr_XR[i * dof + k]);  in main()
1378 …   for (k = 0; k < dof; k++) nrm1 = nrm1 + hf * PetscAbs(ptr_X[i * dof + k] - ptr_XR[i * dof + k]);  in main()
1380       PetscCall(VecRestoreArrayRead(X, &ptr_X));  in main()