23   Vec             fin, fout, fout1;  in main()  local
58   PetscCall(VecCreateMPIWithArray(PETSC_COMM_WORLD, 1, n, N, (PetscScalar *)in1, &fin));  in main()
63   PetscCall(VecSet(fin, zero));  in main()
71   PetscCall(VecSetValues(fin, 1, &i, &one, INSERT_VALUES));  in main()
73   PetscCall(VecSetValues(fin, 1, &i, &two, INSERT_VALUES));  in main()
75   PetscCall(VecSetValues(fin, 1, &i, &three, INSERT_VALUES));  in main()
77   PetscCall(VecSetValues(fin, 1, &i, &four, INSERT_VALUES));  in main()
78   PetscCall(VecAssemblyBegin(fin));  in main()
79   PetscCall(VecAssemblyEnd(fin));  in main()
85   PetscCall(VecGetArray(fin, &x_arr));  in main()
95   PetscCall(VecRestoreArray(fin, &x_arr));  in main()
113   PetscCall(VecGetOwnershipRange(fin, &low, NULL));  in main()
130   PetscCall(VecGetValues(fin, local_n0 * N1, indx4, (PetscScalar *)x_arr));  in main()
173   PetscCall(VecDestroy(&fin));  in main()