56 …(viewer, "X range of indices: %" PetscInt_FMT " %" PetscInt_FMT "\n", info.xs, info.xs + info.xm));  in DMView_DA_1d()
95     xmin = dd->xs / dd->w;  in DMView_DA_1d()
138   PetscInt        i, *idx, nn, left, xs, xe, x, Xs, Xe, start, m, IXs, IXe;  in DMSetUp_DA_1D()  local
165       xs = rank * M / m;  in DMSetUp_DA_1D()
166       x  = (rank + 1) * M / m - xs;  in DMSetUp_DA_1D()
169       if (M / m == x) xs = rank * x;  in DMSetUp_DA_1D()
170       else xs = rank * (x - 1) + (M + rank) % (x * m);  in DMSetUp_DA_1D()
174       if (rank >= (M % m)) xs = (rank * (M / m) + M % m);  in DMSetUp_DA_1D()
175       else xs = rank * (M / m) + rank;  in DMSetUp_DA_1D()
177     PetscCallMPI(MPI_Allgather(&xs, 1, MPIU_INT, dd->lx, 1, MPIU_INT, comm));  in DMSetUp_DA_1D()
182     xs = 0;  in DMSetUp_DA_1D()
183     for (i = 0; i < rank; i++) xs += lx[i];  in DMSetUp_DA_1D()
185     left = xs;  in DMSetUp_DA_1D()
196   xe = xs + x;  in DMSetUp_DA_1D()
199   if (xs - sDist > 0) {  in DMSetUp_DA_1D()
200     Xs  = xs - sDist;  in DMSetUp_DA_1D()
201     IXs = xs - sDist;  in DMSetUp_DA_1D()
203     if (bx) Xs = xs - sDist;  in DMSetUp_DA_1D()
217     Xs  = xs - sDist;  in DMSetUp_DA_1D()
219     IXs = xs - sDist;  in DMSetUp_DA_1D()
242       if ((xs - sDist + i) >= 0) idx[nn++] = xs - sDist + i;  in DMSetUp_DA_1D()
243       else idx[nn++] = M + (xs - sDist + i);  in DMSetUp_DA_1D()
246     for (i = 0; i < x; i++) idx[nn++] = xs + i; /* Non-ghost points */  in DMSetUp_DA_1D()
254       if ((xs - sDist + i) >= 0) idx[nn++] = xs - sDist + i;  in DMSetUp_DA_1D()
258     for (i = 0; i < x; i++) idx[nn++] = xs + i; /* Non-ghost points */  in DMSetUp_DA_1D()
265     if (0 <= xs - sDist) {  in DMSetUp_DA_1D()
266       for (i = 0; i < sDist; i++) idx[nn++] = xs - sDist + i;  in DMSetUp_DA_1D()
268       for (i = 0; i < xs; i++) idx[nn++] = i;  in DMSetUp_DA_1D()
271     for (i = 0; i < x; i++) idx[nn++] = xs + i;  in DMSetUp_DA_1D()
287   dd->xs = dof * xs;  in DMSetUp_DA_1D()
301   dd->base      = dof * xs;  in DMSetUp_DA_1D()