Lines Matching refs:lA
63 Mat lA, lC; in MatPtAPNumeric_IS_XAIJ() local
81 PetscCall(MatISGetLocalMat(A, &lA)); in MatPtAPNumeric_IS_XAIJ()
87 PetscCall(MatMatMatMult(lPt, lA, ptap->lP[0], reuse, ptap->fill, &lC)); in MatPtAPNumeric_IS_XAIJ()
91 PetscCall(MatPtAP(lA, ptap->lP[0], reuse, ptap->fill, &lC)); in MatPtAPNumeric_IS_XAIJ()
183 Mat PT, lA; in MatPtAPSymbolic_IS_XAIJ() local
195 PetscCall(MatISGetLocalMat(A, &lA)); in MatPtAPSymbolic_IS_XAIJ()
196 PetscCall(MatGetType(lA, &lmtype)); in MatPtAPSymbolic_IS_XAIJ()
629 Mat lA, Ad, Ao, B = NULL; in MatConvert_XAIJ_IS() local
665 Mat *newlA, lA; in MatConvert_XAIJ_IS() local
685 PetscCall(MatISGetLocalMat(B, &lA)); in MatConvert_XAIJ_IS()
692 if (!lA->preallocated) { /* first time */ in MatConvert_XAIJ_IS()
693 PetscCall(MatDuplicate(newlA[0], MAT_COPY_VALUES, &lA)); in MatConvert_XAIJ_IS()
694 PetscCall(MatISSetLocalMat(B, lA)); in MatConvert_XAIJ_IS()
695 PetscCall(PetscObjectDereference((PetscObject)lA)); in MatConvert_XAIJ_IS()
697 PetscCall(MatCopy(newlA[0], lA, SAME_NONZERO_PATTERN)); in MatConvert_XAIJ_IS()
804 PetscCall(MatCreateSeqAIJWithArrays(PETSC_COMM_SELF, dr, lc, ii, jj, aa, &lA)); in MatConvert_XAIJ_IS()
809 …for (i = 0; i < 2; i++) PetscCall(PetscObjectContainerCompose((PetscObject)lA, names[i], ptrs[i], … in MatConvert_XAIJ_IS()
816 PetscCall(MatISSetLocalMat(B, lA)); in MatConvert_XAIJ_IS()
817 PetscCall(MatDestroy(&lA)); in MatConvert_XAIJ_IS()
827 Mat **nest, *snest, **rnest, lA, B; in MatConvert_Nest_IS() local
845 PetscCall(MatISGetLocalMat(*newmat, &lA)); in MatConvert_Nest_IS()
846 PetscCall(PetscObjectTypeCompare((PetscObject)lA, MATNEST, &isnest)); in MatConvert_Nest_IS()
848 PetscCall(MatNestGetSubMats(lA, &i, &j, &rnest)); in MatConvert_Nest_IS()
1059 PetscCall(MatCreateNest(PETSC_COMM_SELF, nr, islrow, nc, islcol, snest, &lA)); in MatConvert_Nest_IS()
1060 PetscCall(MatNestSetVecType(lA, VECNEST)); in MatConvert_Nest_IS()
1064 PetscCall(MatISSetLocalMat(B, lA)); in MatConvert_Nest_IS()
1065 PetscCall(MatDestroy(&lA)); in MatConvert_Nest_IS()
1081 PetscCall(MatISGetLocalMat(*newmat, &lA)); in MatConvert_Nest_IS()
1085 PetscCall(MatNestSetSubMat(lA, i, j, snest[i * nc + j])); in MatConvert_Nest_IS()
1100 PetscCall(MatCreateNest(PETSC_COMM_SELF, nr, islrow, nc, islcol, snest, &lA)); in MatConvert_Nest_IS()
1104 PetscCall(MatISSetLocalMat(*newmat, lA)); in MatConvert_Nest_IS()
1105 PetscCall(MatDestroy(&lA)); in MatConvert_Nest_IS()
1118 PetscCall(MatISGetLocalMat(*newmat, &lA)); in MatConvert_Nest_IS()
1119 PetscCall(MatConvert(lA, MATAIJ, MAT_INITIAL_MATRIX, &M)); in MatConvert_Nest_IS()
1250 Mat C, lC, lA; in MatTranspose_IS() local
1269 PetscCall(MatISGetLocalMat(A, &lA)); in MatTranspose_IS()
1270 PetscCall(MatTranspose(lA, MAT_INITIAL_MATRIX, &lC)); in MatTranspose_IS()
1271 PetscCall(MatSetLocalToGlobalMapping(lC, lA->cmap->mapping, lA->rmap->mapping)); in MatTranspose_IS()
1619 Mat lA = NULL; in MatISSetAllowRepeated_IS() local
1630 lA = matis->A; in MatISSetAllowRepeated_IS()
1631 PetscCall(PetscObjectReference((PetscObject)lA)); in MatISSetAllowRepeated_IS()
1636 if (lA) { /* assemble previous local matrix if needed */ in MatISSetAllowRepeated_IS()
1641 PetscCall(MatISSetLocalMat(A, lA)); in MatISSetAllowRepeated_IS()
1649 PetscCall(MatProductCreate(lA, P, NULL, &nA)); in MatISSetAllowRepeated_IS()
1655 PetscCall(MatProductCreate(R, lA, P, &nA)); in MatISSetAllowRepeated_IS()
1658 PetscCall(MatProductCreate(R, lA, NULL, &nA)); in MatISSetAllowRepeated_IS()
1661 PetscCall(MatProductCreate(lA, P, NULL, &nA)); in MatISSetAllowRepeated_IS()
1676 PetscCall(MatDestroy(&lA)); in MatISSetAllowRepeated_IS()
2336 Mat lA, B; in MatView_IS() local
2341 if (!isaij) PetscCall(MatConvert(a->A, MATSEQAIJ, MAT_INITIAL_MATRIX, &lA)); in MatView_IS()
2344 lA = a->A; in MatView_IS()
2348 PetscCall(MatGetSize(lA, &nr, &nc)); in MatView_IS()
2354 b->A = lA; in MatView_IS()
2415 Mat dA, lA; in MatLoad_IS() local
2485 PetscCall(MatMPIAIJGetSeqAIJ(dA, &lA, NULL, NULL)); in MatLoad_IS()
2486 PetscCall(PetscObjectReference((PetscObject)lA)); in MatLoad_IS()
2491 if (isbaij) PetscCall(MatSetOption(lA, MAT_SYMMETRIC, PETSC_TRUE)); in MatLoad_IS()
2492 PetscCall(MatConvert(lA, lmattype, MAT_INPLACE_MATRIX, &lA)); in MatLoad_IS()
2509 PetscCall(MatISSetLocalMat(A, lA)); in MatLoad_IS()
2510 PetscCall(MatDestroy(&lA)); in MatLoad_IS()
3244 Mat lA; in MatGetLocalSubMatrix_IS() local
3310 PetscCall(MatISGetLocalMat(A, &lA)); in MatGetLocalSubMatrix_IS()
3311 PetscCall(MatISSetLocalMat(*submat, lA)); in MatGetLocalSubMatrix_IS()