13   Vec         yg = NULL; /* global vectors on PETSC_COMM_WORLD */  in main()  local
93         PetscCall(VecCreateMPICUDAWithArray(PETSC_COMM_WORLD, 1, n, N, yvalue, &yg));  in main()
96         PetscCall(VecCreateMPIWithArray(PETSC_COMM_WORLD, 1, n, N, yvalue, &yg));  in main()
100       PetscCall(VecGetOwnershipRange(yg, &low, &high)); /* low, high are global indices */  in main()
105       PetscCall(VecScatterCreate(x, ix, yg, iy, &vscat));  in main()
106       PetscCall(VecScatterBegin(vscat, x, yg, INSERT_VALUES, SCATTER_FORWARD));  in main()
107       PetscCall(VecScatterEnd(vscat, x, yg, INSERT_VALUES, SCATTER_FORWARD));  in main()
127       PetscCall(VecPlaceArray(yg, yvalue));  in main()
128       PetscCall(VecScatterBegin(vscat, yg, x, INSERT_VALUES, SCATTER_REVERSE));  in main()
129       PetscCall(VecScatterEnd(vscat, yg, x, INSERT_VALUES, SCATTER_REVERSE));  in main()
130       PetscCall(VecResetArray(yg));  in main()
137         PetscCall(VecCreateMPICUDAWithArray(PETSC_COMM_WORLD, 1, 0 /*n*/, N, NULL, &yg));  in main()
140         PetscCall(VecCreateMPIWithArray(PETSC_COMM_WORLD, 1, 0 /*n*/, N, NULL, &yg));  in main()
149       PetscCall(VecScatterCreate(x, ix, yg, iy, &vscat));  in main()
150       PetscCall(VecScatterBegin(vscat, x, yg, INSERT_VALUES, SCATTER_FORWARD));  in main()
151       PetscCall(VecScatterEnd(vscat, x, yg, INSERT_VALUES, SCATTER_FORWARD));  in main()
156       PetscCall(VecScatterBegin(vscat, yg, x, INSERT_VALUES, SCATTER_REVERSE));  in main()
157       PetscCall(VecScatterEnd(vscat, yg, x, INSERT_VALUES, SCATTER_REVERSE));  in main()
164     PetscCall(VecDestroy(&yg));  in main()
177       Vec                x, xg, yg;  in main()  local
229         PetscCall(VecCreateMPICUDAWithArray(parentcomm, 1, 0 /*n*/, N, NULL /*array*/, &yg));  in main()
232         PetscCall(VecCreateMPIWithArray(parentcomm, 1, 0 /*n*/, N, NULL /*array*/, &yg));  in main()
239       PetscCall(VecScatterCreate(xg, ix, yg, iy, &vscat));  in main()
242       PetscCall(VecScatterBegin(vscat, xg, yg, INSERT_VALUES, SCATTER_FORWARD));  in main()
243       PetscCall(VecScatterEnd(vscat, xg, yg, INSERT_VALUES, SCATTER_FORWARD));  in main()
257       PetscCall(VecDestroy(&yg));  in main()
263       Vec          y, xg, yg;  in main()  local
314         PetscCall(VecCreateMPICUDAWithArray(parentcomm, 1 /*bs*/, n, N, yvalue, &yg));  in main()
317         PetscCall(VecCreateMPIWithArray(parentcomm, 1 /*bs*/, n, N, yvalue, &yg));  in main()
325       PetscCall(VecScatterCreate(xg, ix, yg, iy, &vscat));  in main()
328       PetscCall(VecScatterBegin(vscat, xg, yg, INSERT_VALUES, SCATTER_FORWARD));  in main()
329       PetscCall(VecScatterEnd(vscat, xg, yg, INSERT_VALUES, SCATTER_FORWARD));  in main()
347       PetscCall(VecDestroy(&yg));  in main()
400       PetscCall(VecCreateMPICUDAWithArray(PETSC_COMM_WORLD, 1, n, PETSC_DECIDE, yvalue, &yg));  in main()
404       PetscCall(VecCreateMPIWithArray(PETSC_COMM_WORLD, 1, n, PETSC_DECIDE, yvalue, &yg));  in main()
406 …PetscCall(PetscObjectSetName((PetscObject)yg, "yg_on_subcomms")); /* Give a name to view yg clearl…  in main()
412     PetscCall(VecGetOwnershipRange(yg, &ystart, NULL));  in main()
416     PetscCall(VecScatterCreate(x, ix, yg, iy, &vscat));  in main()
417     PetscCall(VecScatterBegin(vscat, x, yg, INSERT_VALUES, SCATTER_FORWARD));  in main()
418     PetscCall(VecScatterEnd(vscat, x, yg, INSERT_VALUES, SCATTER_FORWARD));  in main()
421     PetscCall(VecView(yg, PETSC_VIEWER_STDOUT_WORLD));  in main()
422     PetscCall(VecDestroy(&yg));  in main()