| /petsc/src/mat/impls/sell/seq/ |
| H A D | fdsell.c | 13 PetscInt i, j, *collengths, *cia, *cja, n = A->cmap->n, totalslices; in MatGetColumnIJ_SeqSELL_Color() local
24 PetscCall(PetscMalloc1(n + 1, &cia)); in MatGetColumnIJ_SeqSELL_Color()
36 cia[0] = oshift; in MatGetColumnIJ_SeqSELL_Color()
37 for (i = 0; i < n; i++) cia[i + 1] = cia[i] + collengths[i]; in MatGetColumnIJ_SeqSELL_Color()
45 cspidx[cia[col] + collengths[col] - oshift] = j; /* index of a->colidx */ in MatGetColumnIJ_SeqSELL_Color()
46 cja[cia[col] + collengths[col] - oshift] = 8 * i + row + oshift; /* row index */ in MatGetColumnIJ_SeqSELL_Color()
53 *ia = cia; in MatGetColumnIJ_SeqSELL_Color()
|
| /petsc/src/mat/graphops/color/impls/minpack/ |
| H A D | color.c | 13 …ingDegreeSequence_Minpack(PetscInt m, const PetscInt *cja, const PetscInt *cia, const PetscInt *rj… in MatFDColoringDegreeSequence_Minpack() argument
21 PetscCall(MINPACKdegr(&m, cja, cia, rja, ria, *seq, work)); in MatFDColoringDegreeSequence_Minpack()
30 const PetscInt *ria, *rja, *cia, *cja; in MatColoringApply_SL() local
57 PetscCall(MatGetColumnIJ(mat_seq, 1, PETSC_FALSE, PETSC_TRUE, &n, &cia, &cja, &done)); in MatColoringApply_SL()
60 PetscCall(MatFDColoringDegreeSequence_Minpack(n, cja, cia, rja, ria, &seq)); in MatColoringApply_SL()
64 …PetscCall(MINPACKslo(&n, cja, cia, rja, ria, seq, list, &clique, work, work + n, work + 2 * n, wor… in MatColoringApply_SL()
67 PetscCall(MINPACKseq(&n, cja, cia, rja, ria, list, coloring, &ncolors, work)); in MatColoringApply_SL()
72 PetscCall(MatRestoreColumnIJ(mat_seq, 1, PETSC_FALSE, PETSC_TRUE, NULL, &cia, &cja, &done)); in MatColoringApply_SL()
130 const PetscInt *ria, *rja, *cia, *cja; in MatColoringApply_LF() local
157 PetscCall(MatGetColumnIJ(mat_seq, 1, PETSC_FALSE, PETSC_TRUE, &n, &cia, &cja, &done)); in MatColoringApply_LF()
[all …]
|
| /petsc/src/mat/graphops/color/utils/ |
| H A D | valid.c | 101 const PetscInt *cia, *cja, *cols; in MatISColoringTest() local
115 PetscCall(MatGetColumnIJ(A, 0, PETSC_FALSE, PETSC_FALSE, &N, &cia, &cja, &done)); in MatISColoringTest()
128 nnz = cia[col + 1] - cia[col]; in MatISColoringTest()
130 row = cja[cia[col] + i]; in MatISColoringTest()
138 PetscCall(MatRestoreColumnIJ(A, 1, PETSC_FALSE, PETSC_TRUE, NULL, &cia, &cja, &done)); in MatISColoringTest()
|
| /petsc/src/mat/impls/baij/seq/ |
| H A D | baij.c | 2823 …PetscInt bs = A->rmap->bs, i, *collengths, *cia, *cja, n = A->cmap->n / bs, m = A->rmap->n / b… in MatGetColumnIJ_SeqBAIJ() local
2831 PetscCall(PetscMalloc1(n + 1, &cia)); in MatGetColumnIJ_SeqBAIJ()
2835 cia[0] = oshift; in MatGetColumnIJ_SeqBAIJ()
2836 for (i = 0; i < n; i++) cia[i + 1] = cia[i] + collengths[i]; in MatGetColumnIJ_SeqBAIJ()
2844 cja[cia[col] + collengths[col]++ - oshift] = row + oshift; in MatGetColumnIJ_SeqBAIJ()
2848 *ia = cia; in MatGetColumnIJ_SeqBAIJ()
2870 PetscInt i, *collengths, *cia, *cja, n = a->nbs, m = a->mbs; in MatGetColumnIJ_SeqBAIJ_Color() local
2879 PetscCall(PetscMalloc1(n + 1, &cia)); in MatGetColumnIJ_SeqBAIJ_Color()
2884 cia[0] = oshift; in MatGetColumnIJ_SeqBAIJ_Color()
2885 for (i = 0; i < n; i++) cia[i + 1] = cia[i] + collengths[i]; in MatGetColumnIJ_SeqBAIJ_Color()
[all …]
|
| /petsc/src/mat/impls/aij/seq/ |
| H A D | aij.c | 241 PetscInt i, *collengths, *cia, *cja, n = A->cmap->n, m = A->rmap->n; in MatGetColumnIJ_SeqAIJ() local
251 PetscCall(PetscMalloc1(n + 1, &cia)); in MatGetColumnIJ_SeqAIJ()
255 cia[0] = oshift; in MatGetColumnIJ_SeqAIJ()
256 for (i = 0; i < n; i++) cia[i + 1] = cia[i] + collengths[i]; in MatGetColumnIJ_SeqAIJ()
264 cja[cia[col] + collengths[col]++ - oshift] = row + oshift; in MatGetColumnIJ_SeqAIJ()
268 *ia = cia; in MatGetColumnIJ_SeqAIJ()
292 PetscInt i, *collengths, *cia, *cja, n = A->cmap->n, m = A->rmap->n; in MatGetColumnIJ_SeqAIJ_Color() local
302 PetscCall(PetscMalloc1(n + 1, &cia)); in MatGetColumnIJ_SeqAIJ_Color()
307 cia[0] = oshift; in MatGetColumnIJ_SeqAIJ_Color()
308 for (i = 0; i < n; i++) cia[i + 1] = cia[i] + collengths[i]; in MatGetColumnIJ_SeqAIJ_Color()
[all …]
|