209     PetscReal   *array_x, *array_y;  in ex1_3()  local
220     PetscCall(DMSwarmGetField(dms, "coory", NULL, NULL, (void **)&array_y));  in ex1_3()
236         array_y[4 * cnt + 0] = yp - 0.05;  in ex1_3()
237         if (array_y[4 * cnt + 0] < -1.0) array_y[4 * cnt + 0] = -1.0 + 1.0e-12;  in ex1_3()
238         array_y[4 * cnt + 1] = yp - 0.05;  in ex1_3()
239         if (array_y[4 * cnt + 1] < -1.0) array_y[4 * cnt + 1] = -1.0 + 1.0e-12;  in ex1_3()
240         array_y[4 * cnt + 2] = yp + 0.05;  in ex1_3()
241         if (array_y[4 * cnt + 2] > 1.0) array_y[4 * cnt + 2] = 1.0 - 1.0e-12;  in ex1_3()
242         array_y[4 * cnt + 3] = yp + 0.05;  in ex1_3()
243         if (array_y[4 * cnt + 3] > 1.0) array_y[4 * cnt + 3] = 1.0 - 1.0e-12;  in ex1_3()
247     PetscCall(DMSwarmRestoreField(dms, "coory", NULL, NULL, (void **)&array_y));  in ex1_3()
270     PetscReal *array_x, *array_y;  in ex1_3()  local
280     PetscCall(DMSwarmGetField(dms, "coory", NULL, NULL, (void **)&array_y));  in ex1_3()
281 …for (p = 0; p < npoints; p++) fprintf(fp, "%+1.4e %+1.4e %1.4e\n", array_x[p], array_y[p], (double…  in ex1_3()
282     PetscCall(DMSwarmRestoreField(dms, "coory", NULL, NULL, (void **)&array_y));  in ex1_3()
300   PetscReal      *array_x, *array_y, r2;  in collect_zone()  local
308   PetscCall(DMSwarmGetField(dm, "coory", NULL, NULL, (void **)&array_y));  in collect_zone()
316     sep2 += (array_y[p] - zone->cx[1]) * (array_y[p] - zone->cx[1]);  in collect_zone()
326     sep2 += (array_y[p] - zone->cx[1]) * (array_y[p] - zone->cx[1]);  in collect_zone()
332   PetscCall(DMSwarmRestoreField(dm, "coory", NULL, NULL, (void **)&array_y));  in collect_zone()
375     PetscReal   *array_x, *array_y;  in ex1_4()  local
386     PetscCall(DMSwarmGetField(dms, "coory", NULL, NULL, (void **)&array_y));  in ex1_4()
398 …array_y[4 * cnt + 0] = yp - dx * 0.1; /*if (array_y[4*cnt+0] < -1.0) array_y[4*cnt+0] = -1.0+1.0e-…  in ex1_4()
399 …array_y[4 * cnt + 1] = yp - dx * 0.1; /*if (array_y[4*cnt+1] < -1.0) array_y[4*cnt+1] = -1.0+1.0e-…  in ex1_4()
400 …array_y[4 * cnt + 2] = yp + dx * 0.1; /*if (array_y[4*cnt+2] > 1.0)  { array_y[4*cnt+2] =  1.0-1.0…  in ex1_4()
401 …array_y[4 * cnt + 3] = yp + dx * 0.1; /*if (array_y[4*cnt+3] > 1.0)  { array_y[4*cnt+3] =  1.0-1.0…  in ex1_4()
405     PetscCall(DMSwarmRestoreField(dms, "coory", NULL, NULL, (void **)&array_y));  in ex1_4()
460     PetscReal *array_x, *array_y;  in ex1_4()  local
470     PetscCall(DMSwarmGetField(dms, "coory", NULL, NULL, (void **)&array_y));  in ex1_4()
471 …for (p = 0; p < npoints; p++) fprintf(fp, "%+1.4e %+1.4e %1.4e\n", array_x[p], array_y[p], (double…  in ex1_4()
472     PetscCall(DMSwarmRestoreField(dms, "coory", NULL, NULL, (void **)&array_y));  in ex1_4()