209     PetscReal   *array_x, *array_y;  in ex1_3()  local
219     PetscCall(DMSwarmGetField(dms, "coorx", NULL, NULL, (void **)&array_x));  in ex1_3()
227         array_x[4 * cnt + 0] = xp - 0.05;  in ex1_3()
228         if (array_x[4 * cnt + 0] < -1.0) array_x[4 * cnt + 0] = -1.0 + 1.0e-12;  in ex1_3()
229         array_x[4 * cnt + 1] = xp + 0.05;  in ex1_3()
230         if (array_x[4 * cnt + 1] > 1.0) array_x[4 * cnt + 1] = 1.0 - 1.0e-12;  in ex1_3()
231         array_x[4 * cnt + 2] = xp - 0.05;  in ex1_3()
232         if (array_x[4 * cnt + 2] < -1.0) array_x[4 * cnt + 2] = -1.0 + 1.0e-12;  in ex1_3()
233         array_x[4 * cnt + 3] = xp + 0.05;  in ex1_3()
234         if (array_x[4 * cnt + 3] > 1.0) array_x[4 * cnt + 3] = 1.0 - 1.0e-12;  in ex1_3()
248     PetscCall(DMSwarmRestoreField(dms, "coorx", NULL, NULL, (void **)&array_x));  in ex1_3()
270     PetscReal *array_x, *array_y;  in ex1_3()  local
279     PetscCall(DMSwarmGetField(dms, "coorx", NULL, NULL, (void **)&array_x));  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()
283     PetscCall(DMSwarmRestoreField(dms, "coorx", NULL, NULL, (void **)&array_x));  in ex1_3()
300   PetscReal      *array_x, *array_y, r2;  in collect_zone()  local
307   PetscCall(DMSwarmGetField(dm, "coorx", NULL, NULL, (void **)&array_x));  in collect_zone()
315     sep2 = (array_x[p] - zone->cx[0]) * (array_x[p] - zone->cx[0]);  in collect_zone()
325     sep2 = (array_x[p] - zone->cx[0]) * (array_x[p] - zone->cx[0]);  in collect_zone()
333   PetscCall(DMSwarmRestoreField(dm, "coorx", NULL, NULL, (void **)&array_x));  in collect_zone()
375     PetscReal   *array_x, *array_y;  in ex1_4()  local
385     PetscCall(DMSwarmGetField(dms, "coorx", NULL, NULL, (void **)&array_x));  in ex1_4()
394 …array_x[4 * cnt + 0] = xp - dx * 0.1; /*if (array_x[4*cnt+0] < -1.0) array_x[4*cnt+0] = -1.0+1.0e-…  in ex1_4()
395 …array_x[4 * cnt + 1] = xp + dx * 0.1; /*if (array_x[4*cnt+1] > 1.0)  { array_x[4*cnt+1] =  1.0-1.0…  in ex1_4()
396 …array_x[4 * cnt + 2] = xp - dx * 0.1; /*if (array_x[4*cnt+2] < -1.0) array_x[4*cnt+2] = -1.0+1.0e-…  in ex1_4()
397 …array_x[4 * cnt + 3] = xp + dx * 0.1; /*if (array_x[4*cnt+3] > 1.0)  { array_x[4*cnt+3] =  1.0-1.0…  in ex1_4()
406     PetscCall(DMSwarmRestoreField(dms, "coorx", NULL, NULL, (void **)&array_x));  in ex1_4()
460     PetscReal *array_x, *array_y;  in ex1_4()  local
469     PetscCall(DMSwarmGetField(dms, "coorx", NULL, NULL, (void **)&array_x));  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()
473     PetscCall(DMSwarmRestoreField(dms, "coorx", NULL, NULL, (void **)&array_x));  in ex1_4()