| /petsc/src/snes/tutorials/ |
| H A D | ex73f90t.F90 | 56 Mat::Amat, AmatLin, Bmat, CMat, Dmat
342 PetscCall(MatMultAdd(solver%Bmat, Xsub(2), Fsub(1), Fsub(1), ierr))
424 Mat:: Amat, Bmat, Cmat, Dmat, KKTMat, matArray(4)
516 PetscCallA(MatCreate(PETSC_COMM_WORLD, Bmat, ierr))
517 PetscCallA(MatSetSizes(Bmat, PETSC_DECIDE, PETSC_DECIDE, N1, N2, ierr))
518 PetscCallA(MatSetUp(Bmat, ierr))
547 PetscCallA(MatSetValues(Bmat, ione, row, ione, col, bval, INSERT_VALUES, ierr))
553 PetscCallA(MatAssemblyBegin(Bmat, MAT_FINAL_ASSEMBLY, ierr))
554 PetscCallA(MatAssemblyEnd(Bmat, MAT_FINAL_ASSEMBLY, ierr))
599 solver%Bmat = Bmat
[all …]
|
| /petsc/src/mat/impls/aij/seq/mkl_pardiso/ |
| H A D | mkl_pardiso.c | 238 Mat S, Xmat, Bmat; in MatMKLPardisoSolveSchur_Private() local
244 PetscCall(MatCreateSeqDense(PETSC_COMM_SELF, mpardiso->schur_size, mpardiso->nrhs, B, &Bmat)); in MatMKLPardisoSolveSchur_Private()
246 PetscCall(MatSetType(Bmat, ((PetscObject)S)->type_name)); in MatMKLPardisoSolveSchur_Private()
250 PetscCall(MatBindToCPU(Bmat, S->boundtocpu)); in MatMKLPardisoSolveSchur_Private()
260 PetscCall(MatMatSolve(S, Bmat, Xmat)); in MatMKLPardisoSolveSchur_Private()
262 PetscCall(MatMatSolveTranspose(S, Bmat, Xmat)); in MatMKLPardisoSolveSchur_Private()
266 PetscCall(MatProductCreateWithMat(S, Bmat, NULL, Xmat)); in MatMKLPardisoSolveSchur_Private()
282 PetscCall(MatDestroy(&Bmat)); in MatMKLPardisoSolveSchur_Private()
|
| /petsc/src/binding/petsc4py/src/petsc4py/PETSc/ |
| H A D | petscksp.pxi | 306 cdef Mat Bmat = ref_Mat(B)
311 computeops(Ksp, Amat, Bmat, *args, **kargs)
|
| /petsc/src/mat/impls/aij/seq/seqhipsparse/ |
| H A D | aijhipsparse.hip.cxx | 2413 Mat_SeqAIJHIPSPARSEMultStruct *Amat, *Bmat, *Cmat; in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE() local
2467 Bmat = Bcusp->mat; in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2471 Bmat = Bcusp->mat; in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2475 Bmat = Bcusp->matTranspose; in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2482 …PetscCheck(Bmat, PetscObjectComm((PetscObject)C), PETSC_ERR_GPU, "Missing B mult struct for produc… in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2485 …Bcsr = mmdata->Bcsr ? mmdata->Bcsr : (CsrMatrix *)Bmat->mat; /* B may be in compressed row storage… in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2492 …BmatSpDescr = mmdata->Bcsr ? mmdata->matSpBDescr : Bmat->matDescr; /* B may be in compressed row s… in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2501 …es->data().get(), Acsr->row_offsets->data().get(), Acsr->column_indices->data().get(), Bmat->descr, in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2528 Mat_SeqAIJHIPSPARSEMultStruct *Amat, *Bmat, *Cmat; in MatProductSymbolic_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE() local
2584 Bmat = Bcusp->mat; in MatProductSymbolic_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
[all …]
|
| /petsc/src/mat/impls/aij/seq/seqcusparse/ |
| H A D | aijcusparse.cu | 2909 Mat_SeqAIJCUSPARSEMultStruct *Amat, *Bmat, *Cmat; in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE() local
2966 Bmat = Bcusp->mat; in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2970 Bmat = Bcusp->mat; in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2974 Bmat = Bcusp->matTranspose; in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2981 …PetscCheck(Bmat, PetscObjectComm((PetscObject)C), PETSC_ERR_GPU, "Missing B mult struct for produc… in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2984 …Bcsr = mmdata->Bcsr ? mmdata->Bcsr : (CsrMatrix *)Bmat->mat; /* B may be in compressed row storage… in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2991 …BmatSpDescr = mmdata->Bcsr ? mmdata->matSpBDescr : Bmat->matDescr; /* B may be in compressed row s… in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
3003 …t(), Acsr->row_offsets->data().get(), Acsr->column_indices->data().get(), Bmat->descr, Bcsr->num_e… in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
3030 Mat_SeqAIJCUSPARSEMultStruct *Amat, *Bmat, *Cmat; in MatProductSymbolic_SeqAIJCUSPARSE_SeqAIJCUSPARSE() local
3087 Bmat = Bcusp->mat; in MatProductSymbolic_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
[all …]
|
| /petsc/src/mat/impls/sell/mpi/ |
| H A D | mpisell.c | 417 static PetscErrorCode MatIsTranspose_MPISELL(Mat Amat, Mat Bmat, PetscReal tol, PetscBool *f) in MatIsTranspose_MPISELL() argument
428 Bsell = (Mat_MPISELL *)Bmat->data; in MatIsTranspose_MPISELL()
446 PetscCall(MatCreateSubMatrices(Bmat, 1, &Notme, &Me, MAT_INITIAL_MATRIX, &Boffs)); in MatIsTranspose_MPISELL()
|
| /petsc/src/dm/impls/plex/ |
| H A D | plextree.c | 1172 Mat Amat, Bmat, Xmat; in DMPlexComputeAnchorMatrix_Tree_Direct() local
1207 PetscCall(MatDuplicate(Amat, MAT_DO_NOT_COPY_VALUES, &Bmat)); in DMPlexComputeAnchorMatrix_Tree_Direct()
1269 …etscCall(EvaluateBasis(bspace, fSize, fSize, Nc, nPoints, sizes, pointsReal, weights, work, Bmat)); in DMPlexComputeAnchorMatrix_Tree_Direct()
1270 PetscCall(MatMatSolve(Amat, Bmat, Xmat)); in DMPlexComputeAnchorMatrix_Tree_Direct()
1374 PetscCall(MatDestroy(&Bmat)); in DMPlexComputeAnchorMatrix_Tree_Direct()
|
| /petsc/src/mat/impls/dense/mpi/ |
| H A D | mpidense.c | 49 Mat_MPIDense *Bmat = (Mat_MPIDense *)B->data; in MatCopy_MPIDense() local
52 PetscCall(MatCopy(Amat->A, Bmat->A, s)); in MatCopy_MPIDense()
|
| /petsc/src/mat/impls/aij/mpi/ |
| H A D | mpiaij.c | 1104 static PetscErrorCode MatIsTranspose_MPIAIJ(Mat Amat, Mat Bmat, PetscReal tol, PetscBool *f) in MatIsTranspose_MPIAIJ() argument
1107 Mat_MPIAIJ *Aij = (Mat_MPIAIJ *)Amat->data, *Bij = (Mat_MPIAIJ *)Bmat->data; in MatIsTranspose_MPIAIJ()
1133 PetscCall(MatCreateSubMatrices(Bmat, 1, &Notme, &Me, MAT_INITIAL_MATRIX, &Boffs)); in MatIsTranspose_MPIAIJ()
|