Searched refs:ati (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/mat/impls/aij/seq/ |
| H A D | symtranspose.c | 16 PetscInt *ati, *atj, *atfill, *ai = a->i, *aj = a->j; in MatTransposeSymbolic_SeqAIJ() local
20 PetscCall(PetscCalloc1(an + 1, &ati)); in MatTransposeSymbolic_SeqAIJ()
25 for (i = 0; i < ai[am]; i++) ati[aj[i] + 1] += 1; in MatTransposeSymbolic_SeqAIJ()
27 for (i = 0; i < an; i++) ati[i + 1] += ati[i]; in MatTransposeSymbolic_SeqAIJ()
31 PetscCall(PetscArraycpy(atfill, ati, an)); in MatTransposeSymbolic_SeqAIJ()
43 …PetscCall(MatCreateSeqAIJWithArrays(PetscObjectComm((PetscObject)A), an, am, ati, atj, NULL, &At)); in MatTransposeSymbolic_SeqAIJ()
50 at->maxnz = ati[an]; in MatTransposeSymbolic_SeqAIJ()
61 PetscInt *ati, *atj, *atfill, *ai = a->i, *aj = a->j; in MatTranspose_SeqAIJ() local
80 PetscCall(PetscCalloc1(an + 1, &ati)); in MatTranspose_SeqAIJ()
84 for (i = 0; i < ai[am]; i++) ati[aj[i] + 1] += 1; in MatTranspose_SeqAIJ()
[all …]
|
| /petsc/src/mat/impls/baij/seq/ |
| H A D | baij.c | 1648 PetscInt bs2 = a->bs2, *ati, *atj, anzj, kr; in MatTranspose_SeqBAIJ() local
1663 ati = at->i; in MatTranspose_SeqBAIJ()
1664 for (i = 0; i < nbs; i++) at->ilen[i] = at->imax[i] = ati[i + 1] - ati[i]; in MatTranspose_SeqBAIJ()
1668 ati = at->i; in MatTranspose_SeqBAIJ()
1675 PetscCall(PetscArraycpy(atfill, ati, nbs)); in MatTranspose_SeqBAIJ()
|