Lines Matching refs:inA

200 static PetscErrorCode MatMPISELLDiagonalScaleLocalSetUp(Mat inA, Vec scale)
202   Mat_MPISELL *ina = (Mat_MPISELL *)inA->data; /*access private part of matrix */
207   PetscCall(MatGetOwnershipRange(inA, &cstart, &cend));
209   PetscCall(PetscCalloc1(inA->rmap->mapping->n, &r_rmapd));
211   for (i = 0; i < inA->rmap->mapping->n; i++) {
212     if (inA->rmap->mapping->indices[i] >= cstart && inA->rmap->mapping->indices[i] < cend) {
214       r_rmapd[i] = inA->rmap->mapping->indices[i] + 1;
219   for (i = 0; i < inA->rmap->mapping->n; i++) {
224   PetscCall(PetscCalloc1(inA->cmap->N, &lindices));
226   no = inA->rmap->mapping->n - nt;
227   PetscCall(PetscCalloc1(inA->rmap->mapping->n, &r_rmapo));
229   for (i = 0; i < inA->rmap->mapping->n; i++) {
230     if (lindices[inA->rmap->mapping->indices[i]]) {
232       r_rmapo[i] = lindices[inA->rmap->mapping->indices[i]];
238   for (i = 0; i < inA->rmap->mapping->n; i++) {