49   PetscInt dim, d;  in DMSetPeriodicity()  local
59     for (d = 0; d < dim; ++d) dm->maxCell[d] = maxCell[d];  in DMSetPeriodicity()
66     for (d = 0; d < dim; ++d) dm->Lstart[d] = Lstart[d];  in DMSetPeriodicity()
73     for (d = 0; d < dim; ++d) dm->L[d] = L[d];  in DMSetPeriodicity()
99   PetscInt dim, d;  in DMLocalizeCoordinate()  local
104     for (d = 0; d < dim; ++d) out[d] = in[d];  in DMLocalizeCoordinate()
107       for (d = 0; d < dim; ++d) {  in DMLocalizeCoordinate()
108 …l(PetscRealPart(in[d]) / dm->L[d] - PetscFloorReal(PetscRealPart(in[d]) / dm->L[d])) < PETSC_SMALL…  in DMLocalizeCoordinate()
109           out[d] = in[d] - dm->L[d] * (PetscFloorReal(PetscRealPart(in[d]) / dm->L[d]) - 1);  in DMLocalizeCoordinate()
111           out[d] = in[d] - dm->L[d] * PetscFloorReal(PetscRealPart(in[d]) / dm->L[d]);  in DMLocalizeCoordinate()
115 …for (d = 0; d < dim; ++d) out[d] = in[d] - dm->L[d] * PetscFloorReal(PetscRealPart(in[d]) / dm->L[…  in DMLocalizeCoordinate()
142   PetscInt d;  in DMLocalizeCoordinate_Internal()  local
146     for (d = 0; d < dim; ++d) out[d] = in[d];  in DMLocalizeCoordinate_Internal()
148     for (d = 0; d < dim; ++d) {  in DMLocalizeCoordinate_Internal()
149       if ((dm->L[d] > 0.0) && (PetscAbsScalar(anchor[d] - in[d]) > dm->maxCell[d])) {  in DMLocalizeCoordinate_Internal()
150 …    out[d] = PetscRealPart(anchor[d]) > PetscRealPart(in[d]) ? dm->L[d] + in[d] : in[d] - dm->L[d];  in DMLocalizeCoordinate_Internal()
152         out[d] = in[d];  in DMLocalizeCoordinate_Internal()
161   PetscInt d;  in DMLocalizeCoordinateReal_Internal()  local
165     for (d = 0; d < dim; ++d) out[d] = in[d];  in DMLocalizeCoordinateReal_Internal()
167     for (d = 0; d < dim; ++d) {  in DMLocalizeCoordinateReal_Internal()
168       if ((dm->L[d] > 0.0) && (PetscAbsReal(anchor[d] - in[d]) > dm->maxCell[d])) {  in DMLocalizeCoordinateReal_Internal()
169         out[d] = anchor[d] > in[d] ? dm->L[d] + in[d] : in[d] - dm->L[d];  in DMLocalizeCoordinateReal_Internal()
171         out[d] = in[d];  in DMLocalizeCoordinateReal_Internal()
200   PetscInt d;  in DMLocalizeAddCoordinate_Internal()  local
204     for (d = 0; d < dim; ++d) out[d] += in[d];  in DMLocalizeAddCoordinate_Internal()
206     for (d = 0; d < dim; ++d) {  in DMLocalizeAddCoordinate_Internal()
207       const PetscReal maxC = dm->maxCell[d];  in DMLocalizeAddCoordinate_Internal()
209       if ((dm->L[d] > 0.0) && (PetscAbsScalar(anchor[d] - in[d]) > maxC)) {  in DMLocalizeAddCoordinate_Internal()
210 … PetscScalar newCoord = PetscRealPart(anchor[d]) > PetscRealPart(in[d]) ? dm->L[d] + in[d] : in[d]…  in DMLocalizeAddCoordinate_Internal()
212         if (PetscAbsScalar(newCoord - anchor[d]) > maxC)  in DMLocalizeAddCoordinate_Internal()
213 …%g more than %g away from anchor %g", d, (double)PetscRealPart(in[d]), (double)maxC, (double)Petsc…  in DMLocalizeAddCoordinate_Internal()
214         out[d] += newCoord;  in DMLocalizeAddCoordinate_Internal()
216         out[d] += in[d];  in DMLocalizeAddCoordinate_Internal()
391       PetscInt       dof, d, p;  in DMLocalizeCoordinates()  local
397       for (d = 0; d < Nc; ++d) anchor[d] = cellCoords[d];  in DMLocalizeCoordinates()
400         for (d = 0; d < Nc; ++d)  in DMLocalizeCoordinates()
401           if (cellCoords[p * Nc + d] != localized[d]) break;  in DMLocalizeCoordinates()
402         if (d < Nc) break;  in DMLocalizeCoordinates()
428       PetscInt     p          = 0, q, dof, cdof, d, offDG;  in DMLocalizeCoordinates()  local
437         for (d = 0; d < Nc; ++d) anchor[d] = cellCoords[q * Nc + d];  in DMLocalizeCoordinates()
441           for (d = 0; d < Nc; ++d)  in DMLocalizeCoordinates()
442 …d] > 0. && ((PetscRealPart(coordsDG[offDG + p * Nc + d]) < (Lstart ? Lstart[d] : 0.)) || (PetscRea…  in DMLocalizeCoordinates()
443           if (d < Nc) break;  in DMLocalizeCoordinates()