Home
last modified time | relevance | path

Searched refs:auglyrmapo (Results 1 – 2 of 2) sorted by relevance

/petsc/src/mat/impls/aij/mpi/
H A Dmmaij.c203 static PetscInt *auglyrmapd = NULL, *auglyrmapo = NULL; /* mapping from the local ordering to the "… variable
250 PetscCall(PetscMalloc1(nt * bs, &auglyrmapo)); in MatMPIAIJDiagonalScaleLocalSetUp()
253 for (j = 0; j < bs; j++) auglyrmapo[(r_rmapo[i] - 1) * bs + j] = i * bs + j; in MatMPIAIJDiagonalScaleLocalSetUp()
282 …for (i = 0; i < n; i++) o[i] = s[auglyrmapo[i]]; /* copy "off-diagonal" portion of scale into oo v… in MatDiagonalScaleLocal_MPIAIJ()
288 PetscCall(PetscFree(auglyrmapo)); in MatDiagonalScaleLocal_MPIAIJ()
/petsc/src/mat/impls/sell/mpi/
H A Dmmsell.c197 static PetscInt *auglyrmapd = NULL, *auglyrmapo = NULL; /* mapping from the local ordering to the "… variable
237 PetscCall(PetscMalloc1(nt, &auglyrmapo)); in MatMPISELLDiagonalScaleLocalSetUp()
239 if (r_rmapo[i]) auglyrmapo[(r_rmapo[i] - 1)] = i; in MatMPISELLDiagonalScaleLocalSetUp()
264 …for (i = 0; i < n; i++) o[i] = s[auglyrmapo[i]]; /* copy "off-diagonal" portion of scale into oo v… in MatDiagonalScaleLocal_MPISELL()