Searched refs:tja (Results 1 – 3 of 3) sorted by relevance
| /petsc/src/mat/impls/sbaij/seq/ |
| H A D | sbaij.c | 41 PetscInt i, j, n = a->mbs, nz = a->i[n], *tia, *tja, bs = A->rmap->bs, k, l, cnt; in MatGetRowIJ_SeqSBAIJ() local
48 PetscCall(MatToSymmetricIJ_SeqAIJ(n, a->i, a->j, PETSC_FALSE, 0, 0, &tia, &tja)); in MatGetRowIJ_SeqSBAIJ()
52 tja = a->j; in MatGetRowIJ_SeqSBAIJ()
76 for (l = 0; l < bs; l++) (*ja)[cnt++] = bs * tja[k] + l; in MatGetRowIJ_SeqSBAIJ()
84 PetscCall(PetscFree(tja)); in MatGetRowIJ_SeqSBAIJ()
93 for (i = 0; i < nz; i++) tja[i] = tja[i] + 1; in MatGetRowIJ_SeqSBAIJ()
94 *ja = tja; in MatGetRowIJ_SeqSBAIJ()
108 if (ja) *ja = tja; in MatGetRowIJ_SeqSBAIJ()
|
| /petsc/src/mat/impls/baij/seq/ |
| H A D | baij.c | 1416 PetscInt i, j, n = a->mbs, nz = a->i[n], *tia, *tja, bs = A->rmap->bs, k, l, cnt; in MatGetRowIJ_SeqBAIJ() local
1423 PetscCall(MatToSymmetricIJ_SeqAIJ(n, a->i, a->j, PETSC_TRUE, 0, 0, &tia, &tja)); in MatGetRowIJ_SeqBAIJ()
1427 tja = a->j; in MatGetRowIJ_SeqBAIJ()
1451 for (l = 0; l < bs; l++) (*ja)[cnt++] = bs * tja[k] + l; in MatGetRowIJ_SeqBAIJ()
1459 PetscCall(PetscFree(tja)); in MatGetRowIJ_SeqBAIJ()
1468 for (i = 0; i < nz; i++) tja[i] = tja[i] + 1; in MatGetRowIJ_SeqBAIJ()
1469 *ja = tja; in MatGetRowIJ_SeqBAIJ()
1483 if (ja) *ja = tja; in MatGetRowIJ_SeqBAIJ()
|
| /petsc/src/mat/impls/aij/seq/ |
| H A D | aij.c | 214 PetscInt *tja; in MatGetRowIJ_SeqAIJ() local
216 PetscCall(PetscMalloc1(nz + 1, &tja)); in MatGetRowIJ_SeqAIJ()
217 for (i = 0; i < nz; i++) tja[i] = a->j[i] + 1; in MatGetRowIJ_SeqAIJ()
218 *ja = tja; in MatGetRowIJ_SeqAIJ()
|