Lines Matching refs:nn
138 PetscInt i, *idx, nn, left, xs, xe, x, Xs, Xe, start, m, IXs, IXe; in DMSetUp_DA_1D() local
239 nn = IXs - Xs; 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()
249 if ((xe + i) < M) idx[nn++] = xe + i; in DMSetUp_DA_1D()
250 else idx[nn++] = (xe + i) - M; in DMSetUp_DA_1D()
254 if ((xs - sDist + i) >= 0) idx[nn++] = xs - sDist + i; in DMSetUp_DA_1D()
255 else idx[nn++] = sDist - i; in DMSetUp_DA_1D()
258 for (i = 0; i < x; i++) idx[nn++] = xs + i; /* Non-ghost points */ in DMSetUp_DA_1D()
261 if ((xe + i) < M) idx[nn++] = xe + i; in DMSetUp_DA_1D()
262 else idx[nn++] = M - (i + 2); 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()
274 for (i = 0; i < sDist; i++) idx[nn++] = xe + i; in DMSetUp_DA_1D()
276 for (i = xe; i < M; i++) idx[nn++] = i; in DMSetUp_DA_1D()
280 PetscCall(ISCreateBlock(comm, dof, nn - IXs + Xs, &idx[IXs - Xs], PETSC_USE_POINTER, &from)); in DMSetUp_DA_1D()
308 for (i = 0; i < Xe - IXe; i++) idx[nn++] = -1; /* pad with -1s if needed for ghosted case*/ in DMSetUp_DA_1D()
310 PetscCall(ISLocalToGlobalMappingCreate(comm, dof, nn, idx, PETSC_OWN_POINTER, &da->ltogmap)); in DMSetUp_DA_1D()