64   PetscReal     *centroid, *coords, *xi0, *v0, *J, *invJ, detJ, *vals;  in SetInitialCoordinates()  local
82   PetscCall(DMSwarmGetField(sw, DMSwarmPICField_coor, NULL, NULL, (void **)&coords));  in SetInitialCoordinates()
88         coords[c * dim + d] = centroid[d];  in SetInitialCoordinates()
89         if ((coords[c * dim + d] >= -1) && (coords[c * dim + d] <= 1)) {  in SetInitialCoordinates()
108         PetscCall(DMPlexReferenceToCoordinates(dm, c, 1, refcoords, &coords[n * dim]));  in SetInitialCoordinates()
112   PetscCall(DMSwarmRestoreField(sw, DMSwarmPICField_coor, NULL, NULL, (void **)&coords));  in SetInitialCoordinates()
278   PetscScalar       *r, *coords;  in RHSFunctionParticles()  local
296   PetscCall(DMSwarmGetField(dmSw, DMSwarmPICField_coor, NULL, NULL, (void **)&coords));  in RHSFunctionParticles()
301       m1 += PetscRealPart(coords[p * dim + d]);  in RHSFunctionParticles()
302       m2 += PetscSqr(PetscRealPart(coords[p * dim + d]));  in RHSFunctionParticles()
333       m1 += PetscRealPart(coords[p * dim + d]);  in RHSFunctionParticles()
334       m2 += PetscSqr(PetscRealPart(coords[p * dim + d]));  in RHSFunctionParticles()
345   PetscCall(DMSwarmRestoreField(dmSw, DMSwarmPICField_coor, NULL, NULL, (void **)&coords));  in RHSFunctionParticles()
386   PetscReal         *v, *coords;  in SPMonitor()  local
404     PetscCall(DMSwarmGetField(dmSw, DMSwarmPICField_coor, NULL, NULL, (void **)&coords));  in SPMonitor()
405     for (p = 0; p < Np - 1; ++p) PetscCall(PetscDrawSPAddPoint(user->drawsp, &coords[p], &v[p]));  in SPMonitor()
408     PetscCall(DMSwarmRestoreField(dmSw, DMSwarmPICField_coor, NULL, NULL, (void **)&coords));  in SPMonitor()
419   PetscReal         *v, *coords, T = 0., vel = 0., step_cast, w_sum;  in KSConv()  local
439     PetscCall(DMSwarmGetField(sw, DMSwarmPICField_coor, NULL, NULL, (void **)&coords));  in KSConv()
443       T += u[p] * coords[p] * coords[p];  in KSConv()
444       vel += u[p] * coords[p];  in KSConv()
451       tmp           = PetscAbs(u[p] - ComputePDF(1.0, w_sum, T, &coords[p * dim]));  in KSConv()
458     PetscCall(DMSwarmRestoreField(sw, DMSwarmPICField_coor, NULL, NULL, (void **)&coords));  in KSConv()