24   Vec             ini, final;  in main()  local
101   PetscCall(VecCreate(PETSC_COMM_WORLD, &final));  in main()
103   PetscCall(VecSetSizes(final, local_n0 * N1, N0 * N1));  in main()
105   PetscCall(VecSetFromOptions(final));  in main()
137   PetscCall(VecSetValues(final, local_n0 * N1, indx3, y_arr, INSERT_VALUES));  in main()
138   PetscCall(VecAssemblyBegin(final));  in main()
139   PetscCall(VecAssemblyEnd(final));  in main()
160   PetscCall(VecScale(final, a));  in main()
164   PetscCall(VecAXPY(final, -1.0, ini));  in main()
166   PetscCall(VecNorm(final, NORM_1, &enorm));  in main()
180   PetscCall(VecDestroy(&final));  in main()