Lines Matching refs:lda

59   PetscInt      j, lda, rstart = A->rmap->rstart, rend = A->rmap->rend, rend2;  in MatShift_MPIDense()  local
64 PetscCall(MatDenseGetLDA(mat->A, &lda)); in MatShift_MPIDense()
67 for (j = rstart; j < rend2; j++) v[j - rstart + j * lda] += alpha; in MatShift_MPIDense()
186 static PetscErrorCode MatDenseGetLDA_MPIDense(Mat A, PetscInt *lda) in MatDenseGetLDA_MPIDense() argument
191 PetscCall(MatDenseGetLDA(a->A, lda)); in MatDenseGetLDA_MPIDense()
195 static PetscErrorCode MatDenseSetLDA_MPIDense(Mat A, PetscInt lda) in MatDenseSetLDA_MPIDense() argument
218 PetscCall(MatDenseSetLDA(a->A, lda)); in MatDenseSetLDA_MPIDense()
288 PetscInt lda, i, j, rstart, rend, nrows, ncols, Ncols, nlrows, nlcols; in MatCreateSubMatrix_MPIDense() local
332 PetscCall(MatDenseGetLDA(mat->A, &lda)); in MatCreateSubMatrix_MPIDense()
334 const PetscScalar *av = v + lda * icol[i]; in MatCreateSubMatrix_MPIDense()
676 PetscInt lda, len, i, nl, ng, m = A->rmap->n, radd; in MatGetDiagonal_MPIDense() local
688 PetscCall(MatDenseGetLDA(a->A, &lda)); in MatGetDiagonal_MPIDense()
689 for (i = 0; i < len; i++) x[i] = av[radd + i * lda + i]; in MatGetDiagonal_MPIDense()
978 PetscInt i, j, s2a, s3a, s2, s3, m = mdn->A->rmap->n, n = mdn->A->cmap->n, lda; in MatDiagonalScale_MPIDense() local
982 PetscCall(MatDenseGetLDA(mdn->A, &lda)); in MatDiagonalScale_MPIDense()
993 v += lda; in MatDiagonalScale_MPIDense()
1012 v = vv + i * lda; in MatDiagonalScale_MPIDense()
1077 PetscInt j, i, lda; in MatTranspose_MPIDense() local
1092 PetscCall(MatDenseGetLDA(a->A, &lda)); in MatTranspose_MPIDense()
1097 v = PetscSafePointerPlusOffset(v, lda); in MatTranspose_MPIDense()
1441 PetscInt m = A->rmap->n, N = A->cmap->N, rstart = A->rmap->rstart, i, *rows, *cols, lda; in MatConvert_MPIDense_Elemental() local
1461 PetscCall(MatDenseGetLDA(a->A, &lda)); in MatConvert_MPIDense_Elemental()
1462 if (lda == m) PetscCall(MatSetValues(mat_elemental, m, rows, N, cols, v, ADD_VALUES)); in MatConvert_MPIDense_Elemental()
1464 …for (i = 0; i < N; i++) PetscCall(MatSetValues(mat_elemental, m, rows, 1, &i, v + lda * i, ADD_VAL… in MatConvert_MPIDense_Elemental()
1527 PetscInt lda; in MatDenseGetColumnVec_MPIDense() local
1534 PetscCall(MatDenseGetLDA(a->A, &lda)); in MatDenseGetColumnVec_MPIDense()
1536 …scCall(VecPlaceArray(a->cvec, PetscSafePointerPlusOffset(a->ptrinuse, (size_t)col * (size_t)lda))); in MatDenseGetColumnVec_MPIDense()
1559 PetscInt lda; in MatDenseGetColumnVecRead_MPIDense() local
1566 PetscCall(MatDenseGetLDA(a->A, &lda)); in MatDenseGetColumnVecRead_MPIDense()
1568 …scCall(VecPlaceArray(a->cvec, PetscSafePointerPlusOffset(a->ptrinuse, (size_t)col * (size_t)lda))); in MatDenseGetColumnVecRead_MPIDense()
1593 PetscInt lda; in MatDenseGetColumnVecWrite_MPIDense() local
1600 PetscCall(MatDenseGetLDA(a->A, &lda)); in MatDenseGetColumnVecWrite_MPIDense()
1602 …scCall(VecPlaceArray(a->cvec, PetscSafePointerPlusOffset(a->ptrinuse, (size_t)col * (size_t)lda))); in MatDenseGetColumnVecWrite_MPIDense()
2075 PetscInt i, cN = C->cmap->N, proc, k, j, lda; in MatTransposeMatMultNumeric_MPIDense_MPIDense() local
2154 PetscCall(MatDenseGetLDA(atb->atb, &lda)); in MatTransposeMatMultNumeric_MPIDense_MPIDense()
2157 for (i = ranges[proc]; i < ranges[proc + 1]; i++) sendbuf[k++] = atbarray[i + j * lda]; in MatTransposeMatMultNumeric_MPIDense_MPIDense()
2450 PetscInt lda; in MatMatMultNumeric_MPIDense_MPIDense() local
2505 PetscCall(MatDenseGetLDA(B, &lda)); in MatMatMultNumeric_MPIDense_MPIDense()
2509 …PetscCall(PetscSFBcastBegin(mdn->Mvctx, MPIU_SCALAR, read + i * lda, write + i * ab->Be->rmap->n, … in MatMatMultNumeric_MPIDense_MPIDense()
2510 …PetscCall(PetscSFBcastEnd(mdn->Mvctx, MPIU_SCALAR, read + i * lda, write + i * ab->Be->rmap->n, MP… in MatMatMultNumeric_MPIDense_MPIDense()