181       MPI_Comm           intercomm, parentcomm;  in main()  local
212       PetscCallMPI(MPI_Intercomm_merge(intercomm, 0 /*low*/, &parentcomm));  in main()
219         PetscCall(VecCreateMPICUDAWithArray(parentcomm, 1, n, N, xvalue, &xg));  in main()
223         PetscCall(VecCreateMPIWithArray(parentcomm, 1, n, N, xvalue, &xg));  in main()
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()
260       PetscCallMPI(MPI_Comm_free(&parentcomm));  in main()
267       MPI_Comm     intercomm, parentcomm;  in main()  local
279       PetscCallMPI(MPI_Intercomm_merge(intercomm, 1 /*high*/, &parentcomm));  in main()
284         PetscCall(VecCreateMPICUDAWithArray(parentcomm, 1 /*bs*/, 0 /*n*/, N, NULL /*array*/, &xg));  in main()
287         PetscCall(VecCreateMPIWithArray(parentcomm, 1 /*bs*/, 0 /*n*/, N, NULL /*array*/, &xg));  in main()
314         PetscCall(VecCreateMPICUDAWithArray(parentcomm, 1 /*bs*/, n, N, yvalue, &yg));  in main()
317         PetscCall(VecCreateMPIWithArray(parentcomm, 1 /*bs*/, n, N, yvalue, &yg));  in main()
350       PetscCallMPI(MPI_Comm_free(&parentcomm));  in main()