| /petsc/src/mat/impls/aij/mpi/ |
| H A D | mpimattransposematmult.c | 60 PetscInt i, j, m = A->rmap->n, n = A->cmap->n, ldb, BN = B->cmap->N, ldc; in MatTransposeMatMultNumeric_MPIAIJ_MPIDense() local
90 PetscCall(MatDenseGetLDA(C, &ldc)); in MatTransposeMatMultNumeric_MPIAIJ_MPIDense()
93 for (i = 0; i < n; i++) Carray[j * ldc + i] = ctarray[i * BN + j]; in MatTransposeMatMultNumeric_MPIAIJ_MPIDense()
|
| /petsc/src/mat/tests/ |
| H A D | ex66.c | 38 …PetscInt N, n = 64, dim = 1, i, j, nrhs = 11, lda = 0, ldc = 0, ldu = 0, nlr = 7, nt, ntr… in main() local
56 PetscCall(PetscOptionsGetInt(NULL, NULL, "-ldc", &ldc, NULL)); in main()
236 if (ldc) PetscCall(PetscMalloc1(nrhs * (n + ldc), &Cdata)); in main()
238 PetscCall(MatDenseSetLDA(C, n + ldc)); in main()
|
| /petsc/src/dm/dt/tests/ |
| H A D | ex13.c | 256 PetscBLASInt m, n, k, lda, ldb, ldc; in test() local
265 PetscCall(PetscBLASIntCast(Nf * Nk * npoints, &ldc)); in test()
266 …, p_scalar, &lda, &M_moment_real[f * Nbpt], &ldb, &beta, &p_trimmed_copy[f * Nk * npoints], &ldc)); in test()
|
| /petsc/src/mat/impls/diagonal/ |
| H A D | diagonal.c | 618 PetscInt ldb, ldc; in MatProductNumeric_Diagonal_Dense() local
627 PetscCall(MatDenseGetLDA(C, &ldc)); in MatProductNumeric_Diagonal_Dense()
631 for (PetscInt i = 0; i < B->rmap->n; i++) c[i + j * ldc] = alpha[i] * b[i + j * ldb]; in MatProductNumeric_Diagonal_Dense()
|
| /petsc/src/dm/dt/fv/interface/ |
| H A D | fv.c | 2045 PetscBLASInt ldc; in PetscFVLeastSquaresPseudoInverse_Static() local
2047 ldc = N; in PetscFVLeastSquaresPseudoInverse_Static()
2048 …m_("ConjugateTranspose", "Normal", &N, &K, &M, &Alpha, Ainv, &lda, Aback, &ldb, &Beta, work, &ldc); in PetscFVLeastSquaresPseudoInverse_Static()
|
| /petsc/src/dm/dt/fe/impls/basic/ |
| H A D | febasic.c | 105 PetscBLASInt n_, p_, k_, lda, ldb, ldc; in TensorContract_Private() local
115 ldc = p_; in TensorContract_Private()
116 …EALgemm_("N", "T", &p_, &n_, &k_, &one, A + i * k * p, &lda, B, &ldb, &zero, C + i * n * p, &ldc)); in TensorContract_Private()
|
| /petsc/src/mat/impls/nest/ |
| H A D | matnest.c | 100 PetscInt i, j, M, N, nr, nc, ldb, ldc; in MatProductNumeric_Nest_Dense() local
119 PetscCall(MatDenseGetLDA(C, &ldc)); in MatProductNumeric_Nest_Dense()
126 PetscCall(MatDenseSetLDA(viewC, ldc)); in MatProductNumeric_Nest_Dense()
|