| /petsc/src/mat/tests/ |
| H A D | ex221.c | 71 PetscBool nc = PETSC_FALSE, cong, flg; in main() local
154 PetscCall(MatHasCongruentLayouts(A, &cong)); in main()
165 …if (cong) PetscCall(MatShellSetOperation(S, MATOP_GET_DIAGONAL, (PetscErrorCodeFn *)MatGetDiagonal… in main()
171 ronl = cong ? ronl : PETSC_TRUE; in main()
213 if (size > 1 && !cong) { /* MATMPIAIJ ZeroRows and ZeroRowsColumns are buggy in this case */ in main()
310 …if (testshift && cong) { /* MatShift() : MATSHELL shift is broken when row/cols layout are not con… in main()
315 if (testgetdiag && cong) { /* MatGetDiagonal() */ in main()
|
| /petsc/src/ksp/ksp/guess/impls/fischer/ |
| H A D | fischer.c | 25 PetscBool cong; in KSPGuessReset_Fischer() local
32 cong = PETSC_FALSE; in KSPGuessReset_Fischer()
33 if (vlay && Alay) PetscCall(PetscLayoutCompare(Alay, vlay, &cong)); in KSPGuessReset_Fischer()
34 if (!cong) { in KSPGuessReset_Fischer()
|
| /petsc/src/ksp/ksp/guess/impls/pod/ |
| H A D | pod.c | 44 PetscBool cong; in KSPGuessReset_POD() local
56 cong = PETSC_FALSE; in KSPGuessReset_POD()
57 if (vlay && Alay) PetscCall(PetscLayoutCompare(Alay, vlay, &cong)); in KSPGuessReset_POD()
58 if (!cong) { in KSPGuessReset_POD()
|
| /petsc/src/mat/impls/is/ |
| H A D | matis.c | 641 PetscBool flg, ismpiaij, ismpibaij, was_inplace = PETSC_FALSE, cong; in MatConvert_XAIJ_IS() local
652 PetscCall(MatHasCongruentLayouts(A, &cong)); in MatConvert_XAIJ_IS()
653 if (reuse != MAT_REUSE_MATRIX && cong && rbs == cbs) { in MatConvert_XAIJ_IS()
1421 PetscBool cong; in MatCreateSubMatrix_IS() local
1463 PetscCall(MatHasCongruentLayouts(mat, &cong)); in MatCreateSubMatrix_IS()
1464 if (cong && irow == icol && matis->csf == matis->sf) { in MatCreateSubMatrix_IS()
2666 PetscBool cong, freem[] = {PETSC_FALSE, PETSC_FALSE}; in MatSetLocalToGlobalMapping_IS() local
2676 PetscCall(MatHasCongruentLayouts(A, &cong)); in MatSetLocalToGlobalMapping_IS()
2687 if (!cmapping && cong && A->rmap->bs == A->cmap->bs) cmapping = rmapping; in MatSetLocalToGlobalMapping_IS()
2736 if (is->rmapping != is->cmapping && cong) { in MatSetLocalToGlobalMapping_IS()
[all …]
|
| /petsc/src/mat/impls/nest/ |
| H A D | matnest.c | 1366 PetscBool cong, isstd, sametype = PETSC_FALSE; in MatNestSetSubMats_Nest() local
1434 PetscCall(MatHasCongruentLayouts(A, &cong)); in MatNestSetSubMats_Nest()
1435 if (cong && nr != nc) cong = PETSC_FALSE; in MatNestSetSubMats_Nest()
1436 if (cong) { in MatNestSetSubMats_Nest()
1437 …for (i = 0; cong && i < nr; i++) PetscCall(ISEqualUnsorted(s->isglobal.row[i], s->isglobal.col[i],… in MatNestSetSubMats_Nest()
1439 if (!cong) { in MatNestSetSubMats_Nest()
|
| /petsc/src/mat/impls/h2opus/cuda/ |
| H A D | math2opus.cu | 1173 PetscBool cong; in MatH2OpusSetCoords_H2OPUS() local
1179 PetscCall(MatHasCongruentLayouts(A, &cong)); in MatH2OpusSetCoords_H2OPUS()
1180 PetscCheck(cong, comm, PETSC_ERR_SUP, "Only for square matrices with congruent layouts"); in MatH2OpusSetCoords_H2OPUS()
|
| /petsc/src/mat/impls/aij/mpi/ |
| H A D | mpiaij.c | 275 PetscBool cong; in MatDiagonalSet_MPIAIJ() local
278 PetscCall(MatHasCongruentLayouts(Y, &cong)); in MatDiagonalSet_MPIAIJ()
279 if (Y->assembled && cong) { in MatDiagonalSet_MPIAIJ()
867 PetscBool cong; in MatZeroRows_MPIAIJ() local
872 PetscCall(MatHasCongruentLayouts(A, &cong)); in MatZeroRows_MPIAIJ()
878 … PetscCheck(cong, PetscObjectComm((PetscObject)A), PETSC_ERR_SUP, "Need matching row/col layout"); in MatZeroRows_MPIAIJ()
886 if (diag != 0.0 && cong) { in MatZeroRows_MPIAIJ()
984 PetscBool cong; in MatZeroRowsColumns_MPIAIJ() local
986 PetscCall(MatHasCongruentLayouts(A, &cong)); in MatZeroRowsColumns_MPIAIJ()
987 … PetscCheck(cong, PetscObjectComm((PetscObject)A), PETSC_ERR_SUP, "Need matching row/col layout"); in MatZeroRowsColumns_MPIAIJ()
|
| /petsc/src/mat/impls/hypre/ |
| H A D | mhypre.c | 2203 PetscBool cong; local
2206 PetscCall(MatHasCongruentLayouts(A, &cong));
2207 …PetscCheck(cong, PetscObjectComm((PetscObject)A), PETSC_ERR_SUP, "Only for square matrices with sa…
|
| /petsc/src/mat/impls/sbaij/mpi/ |
| H A D | mpisbaij.c | 80 PetscBool cong = PETSC_TRUE; in MatPreallocateWithMats_Private() local
87 PetscCall(PetscLayoutCompare(B->rmap, X[i]->rmap, &cong)); in MatPreallocateWithMats_Private()
88 PetscCheck(cong, PetscObjectComm((PetscObject)B), PETSC_ERR_SUP, "Not for different layouts"); in MatPreallocateWithMats_Private()
|
| /petsc/src/mat/interface/ |
| H A D | matrix.c | 11351 PetscErrorCode MatHasCongruentLayouts(Mat mat, PetscBool *cong) in MatHasCongruentLayouts() argument
11356 PetscAssertPointer(cong, 2); in MatHasCongruentLayouts()
11358 *cong = mat->rmap == mat->cmap ? PETSC_TRUE : PETSC_FALSE; in MatHasCongruentLayouts()
11364 PetscCall(PetscLayoutCompare(mat->rmap, mat->cmap, cong)); in MatHasCongruentLayouts()
11365 if (*cong) mat->congruentlayouts = 1; in MatHasCongruentLayouts()
11367 } else *cong = mat->congruentlayouts ? PETSC_TRUE : PETSC_FALSE; in MatHasCongruentLayouts()
|
| /petsc/src/mat/impls/baij/mpi/ |
| H A D | mpibaij.c | 1602 PetscBool cong; in MatZeroRows_MPIBAIJ() local
1629 PetscCall(MatHasCongruentLayouts(A, &cong)); in MatZeroRows_MPIBAIJ()
1630 if ((diag != 0.0) && cong) { in MatZeroRows_MPIBAIJ()
|