17 PetscErrorCode private_DMSwarmSetPointCoordinatesCellwise_PLEX(DM, DM, PetscInt, PetscReal *xi);
161   PetscReal    *xi, ds, ds2;  in private_DMSwarmInsertPointsUsingCellDM_PLEX2D_Regular()  local
181   PetscCall(PetscMalloc1(dim * npoints * npoints, &xi));  in private_DMSwarmInsertPointsUsingCellDM_PLEX2D_Regular()
187       xi[dim * pcnt + 0] = ii * ds;  in private_DMSwarmInsertPointsUsingCellDM_PLEX2D_Regular()
188       xi[dim * pcnt + 1] = jj * ds;  in private_DMSwarmInsertPointsUsingCellDM_PLEX2D_Regular()
190       xi[dim * pcnt + 0] *= (1.0 - 1.2 * ds2);  in private_DMSwarmInsertPointsUsingCellDM_PLEX2D_Regular()
191       xi[dim * pcnt + 1] *= (1.0 - 1.2 * ds2);  in private_DMSwarmInsertPointsUsingCellDM_PLEX2D_Regular()
193       xi[dim * pcnt + 0] += 0.35 * ds2;  in private_DMSwarmInsertPointsUsingCellDM_PLEX2D_Regular()
194       xi[dim * pcnt + 1] += 0.35 * ds2;  in private_DMSwarmInsertPointsUsingCellDM_PLEX2D_Regular()
205     basis[q][0] = 1.0 - xi[dim * q + 0] - xi[dim * q + 1];  in private_DMSwarmInsertPointsUsingCellDM_PLEX2D_Regular()
206     basis[q][1] = xi[dim * q + 0];  in private_DMSwarmInsertPointsUsingCellDM_PLEX2D_Regular()
207     basis[q][2] = xi[dim * q + 1];  in private_DMSwarmInsertPointsUsingCellDM_PLEX2D_Regular()
243   PetscCall(PetscFree(xi));  in private_DMSwarmInsertPointsUsingCellDM_PLEX2D_Regular()
262     const PetscReal *xi;  in private_DMSwarmInsertPointsUsingCellDM_PLEX()  local
269     PetscCall(PetscQuadratureGetData(quad, NULL, NULL, &Nq, &xi, NULL));  in private_DMSwarmInsertPointsUsingCellDM_PLEX()
270     PetscCall(private_DMSwarmSetPointCoordinatesCellwise_PLEX(dm, celldm, Nq, (PetscReal *)xi));  in private_DMSwarmInsertPointsUsingCellDM_PLEX()
281 …de private_DMSwarmSetPointCoordinatesCellwise_PLEX(DM dm, DM dmc, PetscInt npoints, PetscReal xi[])  in private_DMSwarmSetPointCoordinatesCellwise_PLEX()  argument
315 …for (PetscInt d = 0; d < dim; d++) PetscCheck(xi[dim * p + d] >= -1.0, PetscObjectComm((PetscObjec…  in private_DMSwarmSetPointCoordinatesCellwise_PLEX()
317       for (PetscInt d = 0; d < dim; d++) sum += xi[dim * p + d];  in private_DMSwarmSetPointCoordinatesCellwise_PLEX()
322 …for (PetscInt d = 0; d < dim; d++) PetscCheck(PetscAbsReal(xi[dim * p + d]) <= 1.0, PetscObjectCom…  in private_DMSwarmSetPointCoordinatesCellwise_PLEX()
340 … PetscCall(DMPlexReferenceToCoordinates(dmc, e + ps, npoints, xi, &swarm_coor[npoints * dim * e]));  in private_DMSwarmSetPointCoordinatesCellwise_PLEX()