| /petsc/src/ksp/pc/impls/bddc/ |
| H A D | bddcnullspace.c | 72 Mat local_mat, local_pmat, dmat, Kbasis_mat; in PCBDDCNullSpaceAssembleCorrection() local 81 PetscCall(KSPGetOperators(local_ksp, &local_mat, &local_pmat)); in PCBDDCNullSpaceAssembleCorrection() 98 PetscCall(MatIsSymmetric(local_mat, 0.0, &shell_ctx->symm)); in PCBDDCNullSpaceAssembleCorrection() 101 PetscCall(PetscObjectTypeCompare((PetscObject)local_mat, MATSEQAIJCUSPARSE, &iscusp)); in PCBDDCNullSpaceAssembleCorrection() 103 …PetscCall(MatMatMult(local_mat, shell_ctx->basis_mat, MAT_INITIAL_MATRIX, PETSC_DETERMINE, &Kbasis… in PCBDDCNullSpaceAssembleCorrection() 159 PetscCall(MatIsSPDKnown(local_mat, &isset, &isspd)); in PCBDDCNullSpaceAssembleCorrection() 166 PetscCall(KSPSetOperators(check_ksp, local_mat, local_pmat)); in PCBDDCNullSpaceAssembleCorrection() 179 PetscCall(MatMult(local_mat, work2, work1)); in PCBDDCNullSpaceAssembleCorrection() 199 PetscCall(MatMult(local_mat, work2, work1)); in PCBDDCNullSpaceAssembleCorrection() 202 PetscCall(PCSetOperators(new_pc, local_mat, local_pmat)); in PCBDDCNullSpaceAssembleCorrection() [all …]
|
| H A D | bddcprivate.c | 2874 PetscCall(MatGetLocalSize(pcbddc->local_mat, &n, NULL)); in PCBDDCBenignDetectSaddlePoint() 2876 PetscCall(MatFindZeroDiagonals(pcbddc->local_mat, &zerodiag)); in PCBDDCBenignDetectSaddlePoint() 2955 PetscCall(MatGetLocalSize(pcbddc->local_mat, &nl, NULL)); in PCBDDCBenignDetectSaddlePoint() 3048 PetscCall(MatGetLocalSize(pcbddc->local_mat, &n, NULL)); in PCBDDCBenignDetectSaddlePoint() 3155 PetscCall(MatGetLocalSize(pcbddc->local_mat, &n, NULL)); in PCBDDCBenignDetectSaddlePoint() 3162 PetscCall(MatCreate(PetscObjectComm((PetscObject)pcbddc->local_mat), &pcbddc->benign_change)); in PCBDDCBenignDetectSaddlePoint() 3218 PetscCall(MatPtAP(pcbddc->local_mat, pcbddc->benign_change, MAT_INITIAL_MATRIX, 2.0, &M)); in PCBDDCBenignDetectSaddlePoint() 3219 PetscCall(MatDestroy(&pcbddc->local_mat)); in PCBDDCBenignDetectSaddlePoint() 3220 PetscCall(MatSeqAIJCompress(M, &pcbddc->local_mat)); in PCBDDCBenignDetectSaddlePoint() 3274 PetscCall(MatCreateSubMatrix(pcbddc->local_mat, is_p0, NULL, reuse, &pcbddc->benign_B0)); in PCBDDCBenignPopOrPushB0() [all …]
|
| H A D | bddc.c | 1480 PetscCall(MatDestroy(&pcbddc->local_mat)); in PCSetUp_BDDC() 1482 pcbddc->local_mat = matis->A; in PCSetUp_BDDC() 1512 if (isset) PetscCall(MatSetOption(pcbddc->local_mat, MAT_SYMMETRIC, issym)); in PCSetUp_BDDC() 1514 if (isset) PetscCall(MatSetOption(pcbddc->local_mat, MAT_SPD, isspd)); in PCSetUp_BDDC() 1521 matis->A = pcbddc->local_mat; in PCSetUp_BDDC() 1523 pcbddc->local_mat = matis->A; in PCSetUp_BDDC() 1629 …PetscCall(MatCreateSubMatrix(pcbddc->local_mat, pcis->is_B_local, pcis->is_B_local, MAT_INITIAL_MA… in PCSetUp_BDDC() 1630 …PetscCall(MatCreateSubMatrix(pcbddc->local_mat, pcis->is_I_local, pcis->is_B_local, MAT_INITIAL_MA… in PCSetUp_BDDC() 1631 …PetscCall(MatCreateSubMatrix(pcbddc->local_mat, pcis->is_B_local, pcis->is_I_local, MAT_INITIAL_MA… in PCSetUp_BDDC() 1635 PetscCall(MatDestroy(&pcbddc->local_mat)); in PCSetUp_BDDC() [all …]
|
| H A D | bddcscalingbasic.c | 247 PetscCall(MatGetDiagonal(pcbddc->local_mat, pcis->vec1_N)); in PCBDDCScalingSetUp()
|
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex59.c | 331 static PetscErrorCode ComputeSubdomainMatrix(DomainData dd, GLLData glldata, Mat *local_mat) in ComputeSubdomainMatrix() argument 451 *local_mat = temp_local_mat; in ComputeSubdomainMatrix() 709 Mat local_mat = 0, temp_A = 0; in ComputeMatrix() local 717 PetscCall(ComputeSubdomainMatrix(dd, gll, &local_mat)); in ComputeMatrix() 723 PetscCall(MatScale(local_mat, dd.scalingfactor)); in ComputeMatrix() 724 PetscCall(MatISSetLocalMat(temp_A, local_mat)); in ComputeMatrix() 733 PetscCall(MatSetOption(local_mat, MAT_KEEP_NONZERO_PATTERN, PETSC_TRUE)); in ComputeMatrix() 740 PetscCall(MatSetOption(local_mat, MAT_SPD, PETSC_TRUE)); in ComputeMatrix() 741 PetscCall(MatSetOption(local_mat, MAT_SPD_ETERNAL, PETSC_TRUE)); in ComputeMatrix() 760 PetscCall(MatDestroy(&local_mat)); in ComputeMatrix() [all …]
|
| /petsc/include/petsc/private/ |
| H A D | pcbddcimpl.h | 70 Mat local_mat; member
|
| /petsc/src/mat/impls/is/ |
| H A D | matis.c | 1839 Mat local_mat = NULL, MT; in MatConvert_IS_XAIJ() local 1954 PetscCall(MatConvert(matis->A, MATSEQAIJ, MAT_INITIAL_MATRIX, &local_mat)); in MatConvert_IS_XAIJ() 1957 local_mat = matis->A; in MatConvert_IS_XAIJ() 1963 PetscCall(MatGetSize(local_mat, &nr, &nc)); in MatConvert_IS_XAIJ() 1977 PetscCall(MatGetRowIJ(local_mat, 0, PETSC_FALSE, PETSC_FALSE, &nr, &ii, &jj, &done)); in MatConvert_IS_XAIJ() 1978 … PetscCheck(done, PetscObjectComm((PetscObject)local_mat), PETSC_ERR_PLIB, "Error in MatGetRowIJ"); in MatConvert_IS_XAIJ() 1985 PetscCall(MatRestoreRowIJ(local_mat, 0, PETSC_FALSE, PETSC_FALSE, &nr, &ii, &jj, &done)); in MatConvert_IS_XAIJ() 1986 …PetscCheck(done, PetscObjectComm((PetscObject)local_mat), PETSC_ERR_PLIB, "Error in MatRestoreRowI… in MatConvert_IS_XAIJ() 2006 PetscCall(MatConvert(matis->A, MATSEQAIJ, MAT_INITIAL_MATRIX, &local_mat)); in MatConvert_IS_XAIJ() 2009 local_mat = matis->A; in MatConvert_IS_XAIJ() [all …]
|