13   PetscInt        i, n, *ix, *iy, *tomap, start;  in main()  local
33   n = 64; /* long enough to trigger memcpy optimizations both in local scatter and remote scatter */  in main()
36   PetscCall(VecCreateFromOptions(PETSC_COMM_WORLD, NULL, 1, n, PETSC_DECIDE, &x));  in main()
49   PetscCall(PetscMalloc2(n, &ix, n, &iy));  in main()
52   PetscCall(ISCreateGeneral(PETSC_COMM_WORLD, n, ix, PETSC_COPY_VALUES, &isx));  in main()
55     for (i = 0; i < n; i++) iy[i] = i + 32;  in main()
57     for (i = 0; i < n / 2; i++) {  in main()
59       iy[i + n / 2] = i;  in main()
62   PetscCall(ISCreateGeneral(PETSC_COMM_WORLD, n, iy, PETSC_COPY_VALUES, &isy));  in main()
80   PetscCall(PetscMalloc1(n, &tomap));  in main()
81   for (i = 0; i < n / 2; i++) {  in main()
82     tomap[i]         = i + n / 2;  in main()
83     tomap[i + n / 2] = i;  in main()
106   n = 64; /* long enough to trigger memcpy optimizations in local scatter */  in main()
109   PetscCall(VecCreateFromOptions(PETSC_COMM_SELF, NULL, 1, n, n, &x));  in main()
113   for (i = 0; i < n; i++) PetscCall(VecSetValue(x, i, (PetscScalar)i, INSERT_VALUES));  in main()
119   PetscCall(PetscMalloc2(n, &ix, n, &iy));  in main()
120   for (i = 0; i < n; i++) ix[i] = i;  in main()
121   PetscCall(ISCreateGeneral(PETSC_COMM_SELF, n, ix, PETSC_COPY_VALUES, &isx));  in main()
138   PetscCall(PetscMalloc1(n, &tomap));  in main()
139   for (i = 0; i < n / 2; i++) {  in main()
140     tomap[i]         = i + n / 2;  in main()
141     tomap[i + n / 2] = i;  in main()
164   n = 64; /* long enough to trigger memcpy optimizations in local scatter */  in main()
167   PetscCall(VecCreateFromOptions(PETSC_COMM_SELF, NULL, 1, n, n, &x));  in main()
168   PetscCall(VecCreateFromOptions(PETSC_COMM_SELF, NULL, 1, n / 2, n / 2, &y));  in main()
171   for (i = 0; i < n; i++) PetscCall(VecSetValue(x, i, (PetscScalar)i, INSERT_VALUES));  in main()
177   PetscCall(PetscMalloc2(n / 2, &ix, n / 2, &iy));  in main()
178   for (i = 0; i < n / 2; i++) ix[i] = i * 2;  in main()
179   PetscCall(ISCreateGeneral(PETSC_COMM_SELF, n / 2, ix, PETSC_COPY_VALUES, &isx));  in main()
198   PetscCall(PetscMalloc1(n, &tomap));  in main()
199   for (i = 0; i < n / 2; i++) {  in main()
200     tomap[i]         = i + n / 2;  in main()
201     tomap[i + n / 2] = i;  in main()