Home
last modified time | relevance | path

Searched refs:auglyrmapd (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
224 PetscCall(PetscMalloc1(n, &auglyrmapd)); in MatMPIAIJDiagonalScaleLocalSetUp()
227 for (j = 0; j < bs; j++) auglyrmapd[(r_rmapd[i] - 1) * bs + j - cstart] = i * bs + j; in MatMPIAIJDiagonalScaleLocalSetUp()
269 if (!auglyrmapd) PetscCall(MatMPIAIJDiagonalScaleLocalSetUp(A, scale)); in MatDiagonalScaleLocal_MPIAIJ()
275 …for (i = 0; i < n; i++) d[i] = s[auglyrmapd[i]]; /* copy "diagonal" (true local) portion of scale … in MatDiagonalScaleLocal_MPIAIJ()
287 PetscCall(PetscFree(auglyrmapd)); 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
218 PetscCall(PetscMalloc1(n, &auglyrmapd)); in MatMPISELLDiagonalScaleLocalSetUp()
220 if (r_rmapd[i]) auglyrmapd[(r_rmapd[i] - 1) - cstart] = i; in MatMPISELLDiagonalScaleLocalSetUp()
254 if (!auglyrmapd) PetscCall(MatMPISELLDiagonalScaleLocalSetUp(A, scale)); in MatDiagonalScaleLocal_MPISELL()
258 …for (i = 0; i < n; i++) d[i] = s[auglyrmapd[i]]; /* copy "diagonal" (true local) portion of scale … in MatDiagonalScaleLocal_MPISELL()