| /petsc/src/mat/impls/sell/seq/ |
| H A D | fdsell.c | 10 PetscErrorCode MatGetColumnIJ_SeqSELL_Color(Mat A, PetscInt oshift, PetscBool symmetric, PetscBool … in MatGetColumnIJ_SeqSELL_Color() argument
36 cia[0] = oshift; 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()
59 PetscErrorCode MatRestoreColumnIJ_SeqSELL_Color(Mat A, PetscInt oshift, PetscBool symmetric, PetscB… in MatRestoreColumnIJ_SeqSELL_Color() argument
|
| /petsc/src/ts/tutorials/ |
| H A D | ex3.c | 66 PetscReal oshift; /* old shift applied, prevent to recompute the IJacobian */ member
194 appctx.oshift = PETSC_MIN_REAL; in main()
537 if (appctx->oshift == s) PetscFunctionReturn(PETSC_SUCCESS); in IJacobianHeat()
542 appctx->oshift = s; in IJacobianHeat()
|
| /petsc/src/mat/impls/aij/seq/ |
| H A D | inode.c | 53 …de_Symmetric(Mat A, const PetscInt *iia[], const PetscInt *jja[], PetscInt ishift, PetscInt oshift) in MatGetRowIJ_SeqAIJ_Inode_Symmetric() argument
85 ia[0] = oshift; in MatGetRowIJ_SeqAIJ_Inode_Symmetric()
107 work[i1 - 1] = row - oshift; in MatGetRowIJ_SeqAIJ_Inode_Symmetric()
124 ja[work[i2]++] = i1 + oshift; in MatGetRowIJ_SeqAIJ_Inode_Symmetric()
125 ja[work[i1]++] = i2 + oshift; in MatGetRowIJ_SeqAIJ_Inode_Symmetric()
130 if (i2 == i1) ja[work[i1]++] = i2 + oshift; in MatGetRowIJ_SeqAIJ_Inode_Symmetric()
140 …Nonsymmetric(Mat A, const PetscInt *iia[], const PetscInt *jja[], PetscInt ishift, PetscInt oshift) in MatGetRowIJ_SeqAIJ_Inode_Nonsymmetric() argument
169 ia[0] = oshift; in MatGetRowIJ_SeqAIJ_Inode_Nonsymmetric()
189 work[i1 - 1] = row - oshift; in MatGetRowIJ_SeqAIJ_Inode_Nonsymmetric()
206 ja[work[i1]++] = i2 + oshift; in MatGetRowIJ_SeqAIJ_Inode_Nonsymmetric()
[all …]
|
| H A D | aij.c | 194 PetscErrorCode MatGetRowIJ_SeqAIJ(Mat A, PetscInt oshift, PetscBool symmetric, PetscBool inodecompr… in MatGetRowIJ_SeqAIJ() argument
204 …PetscCall(MatToSymmetricIJ_SeqAIJ(A->rmap->n, a->i, a->j, PETSC_TRUE, ishift, oshift, (PetscInt **… in MatGetRowIJ_SeqAIJ()
205 } else if (oshift == 1) { in MatGetRowIJ_SeqAIJ()
227 PetscErrorCode MatRestoreRowIJ_SeqAIJ(Mat A, PetscInt oshift, PetscBool symmetric, PetscBool inodec… in MatRestoreRowIJ_SeqAIJ() argument
231 if ((symmetric && A->structurally_symmetric != PETSC_BOOL3_TRUE) || oshift == 1) { in MatRestoreRowIJ_SeqAIJ()
238 PetscErrorCode MatGetColumnIJ_SeqAIJ(Mat A, PetscInt oshift, PetscBool symmetric, PetscBool inodeco… in MatGetColumnIJ_SeqAIJ() argument
248 …PetscCall(MatToSymmetricIJ_SeqAIJ(A->rmap->n, a->i, a->j, PETSC_TRUE, 0, oshift, (PetscInt **)ia, … in MatGetColumnIJ_SeqAIJ()
255 cia[0] = oshift; in MatGetColumnIJ_SeqAIJ()
264 cja[cia[col] + collengths[col]++ - oshift] = row + oshift; in MatGetColumnIJ_SeqAIJ()
274 PetscErrorCode MatRestoreColumnIJ_SeqAIJ(Mat A, PetscInt oshift, PetscBool symmetric, PetscBool ino… in MatRestoreColumnIJ_SeqAIJ() argument
[all …]
|
| /petsc/src/mat/impls/baij/seq/ |
| H A D | baij.c | 1413 static PetscErrorCode MatGetRowIJ_SeqBAIJ(Mat A, PetscInt oshift, PetscBool symmetric, PetscBool bl… in MatGetRowIJ_SeqBAIJ() argument
1435 (*ia)[0] = oshift; in MatGetRowIJ_SeqBAIJ()
1461 } else if (oshift == 1) { in MatGetRowIJ_SeqBAIJ()
1488 static PetscErrorCode MatRestoreRowIJ_SeqBAIJ(Mat A, PetscInt oshift, PetscBool symmetric, PetscBoo… in MatRestoreRowIJ_SeqBAIJ() argument
1492 if ((!blockcompressed && A->rmap->bs > 1) || (symmetric || oshift == 1)) { in MatRestoreRowIJ_SeqBAIJ()
2820 static PetscErrorCode MatGetColumnIJ_SeqBAIJ(Mat A, PetscInt oshift, PetscBool symmetric, PetscBool… in MatGetColumnIJ_SeqBAIJ() argument
2835 cia[0] = oshift; in MatGetColumnIJ_SeqBAIJ()
2844 cja[cia[col] + collengths[col]++ - oshift] = row + oshift; in MatGetColumnIJ_SeqBAIJ()
2853 static PetscErrorCode MatRestoreColumnIJ_SeqBAIJ(Mat A, PetscInt oshift, PetscBool symmetric, Petsc… in MatRestoreColumnIJ_SeqBAIJ() argument
2867 PetscErrorCode MatGetColumnIJ_SeqBAIJ_Color(Mat A, PetscInt oshift, PetscBool symmetric, PetscBool … in MatGetColumnIJ_SeqBAIJ_Color() argument
[all …]
|
| /petsc/src/mat/impls/adj/mpi/ |
| H A D | mpiadj.c | 355 static PetscErrorCode MatGetRowIJ_MPIAdj(Mat A, PetscInt oshift, PetscBool symmetric, PetscBool blo… in MatGetRowIJ_MPIAdj() argument
366 if (oshift) { in MatGetRowIJ_MPIAdj()
373 static PetscErrorCode MatRestoreRowIJ_MPIAdj(Mat A, PetscInt oshift, PetscBool symmetric, PetscBool… in MatRestoreRowIJ_MPIAdj() argument
382 if (oshift) { in MatRestoreRowIJ_MPIAdj()
|
| /petsc/src/mat/impls/sbaij/seq/ |
| H A D | sbaij.c | 38 static PetscErrorCode MatGetRowIJ_SeqSBAIJ(Mat A, PetscInt oshift, PetscBool symmetric, PetscBool b… in MatGetRowIJ_SeqSBAIJ() argument
60 (*ia)[0] = oshift; in MatGetRowIJ_SeqSBAIJ()
86 } else if (oshift == 1) { in MatGetRowIJ_SeqSBAIJ()
113 static PetscErrorCode MatRestoreRowIJ_SeqSBAIJ(Mat A, PetscInt oshift, PetscBool symmetric, PetscBo… in MatRestoreRowIJ_SeqSBAIJ() argument
117 if ((!blockcompressed && A->rmap->bs > 1) || (symmetric || oshift == 1)) { in MatRestoreRowIJ_SeqSBAIJ()
|
| /petsc/src/mat/impls/aij/mpi/ |
| H A D | mpiaij.c | 111 static PetscErrorCode MatGetRowIJ_MPIAIJ(Mat A, PetscInt oshift, PetscBool symmetric, PetscBool ino… in MatGetRowIJ_MPIAIJ() argument
118 PetscCall(MatGetRowIJ(B, oshift, symmetric, inodecompressed, m, ia, ja, done)); in MatGetRowIJ_MPIAIJ()
123 static PetscErrorCode MatRestoreRowIJ_MPIAIJ(Mat A, PetscInt oshift, PetscBool symmetric, PetscBool… in MatRestoreRowIJ_MPIAIJ() argument
129 PetscCall(MatRestoreRowIJ(B, oshift, symmetric, inodecompressed, m, ia, ja, done)); in MatRestoreRowIJ_MPIAIJ()
|