| /petsc/src/snes/tutorials/ |
| H A D | ex73f90t.F90 | 341 PetscCall(MatMult(solver%Cmat, Xsub(1), Fsub(2), ierr))
424 Mat:: Amat, Bmat, Cmat, Dmat, KKTMat, matArray(4)
512 PetscCallA(MatCreate(PETSC_COMM_WORLD, Cmat, ierr))
513 PetscCallA(MatSetSizes(Cmat, PETSC_DECIDE, PETSC_DECIDE, N2, N1, ierr))
514 PetscCallA(MatSetUp(Cmat, ierr))
550 PetscCallA(MatSetValues(Cmat, ione, row, ione, row, cval, INSERT_VALUES, ierr))
555 PetscCallA(MatAssemblyBegin(Cmat, MAT_FINAL_ASSEMBLY, ierr))
556 PetscCallA(MatAssemblyEnd(Cmat, MAT_FINAL_ASSEMBLY, ierr))
600 solver%Cmat = Cmat
605 matArray(3) = Cmat
[all …]
|
| /petsc/src/mat/impls/aij/seq/seqhipsparse/ |
| H A D | aijhipsparse.hip.cxx | 2413 Mat_SeqAIJHIPSPARSEMultStruct *Amat, *Bmat, *Cmat; in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE() local
2433 Cmat = Ccusp->mat; in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2434 …PetscCheck(Cmat, PetscObjectComm((PetscObject)C), PETSC_ERR_GPU, "Missing C mult struct for produc… in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2435 Ccsr = (CsrMatrix *)Cmat->mat; in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2480 Cmat = Ccusp->mat; in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2483 …PetscCheck(Cmat, PetscObjectComm((PetscObject)C), PETSC_ERR_GPU, "Missing C mult struct for produc… in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2486 Ccsr = (CsrMatrix *)Cmat->mat; in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2495 …GEMMreuse_compute(Ccusp->handle, opA, opB, Cmat->alpha_one, Amat->matDescr, BmatSpDescr, Cmat->bet… in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2497 …rseSpGEMM_compute(Ccusp->handle, opA, opB, Cmat->alpha_one, Amat->matDescr, BmatSpDescr, Cmat->bet… in MatProductNumeric_SeqAIJHIPSPARSE_SeqAIJHIPSPARSE()
2498 …sparseSpGEMM_copy(Ccusp->handle, opA, opB, Cmat->alpha_one, Amat->matDescr, BmatSpDescr, Cmat->bet… in MatProductNumeric_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
2932 Cmat = Ccusp->mat; in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2933 …PetscCheck(Cmat, PetscObjectComm((PetscObject)C), PETSC_ERR_GPU, "Missing C mult struct for produc… in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2934 Ccsr = (CsrMatrix *)Cmat->mat; in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2979 Cmat = Ccusp->mat; in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2982 …PetscCheck(Cmat, PetscObjectComm((PetscObject)C), PETSC_ERR_GPU, "Missing C mult struct for produc… in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2985 Ccsr = (CsrMatrix *)Cmat->mat; in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2994 …GEMMreuse_compute(Ccusp->handle, opA, opB, Cmat->alpha_one, Amat->matDescr, BmatSpDescr, Cmat->bet… in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2997 …rseSpGEMM_compute(Ccusp->handle, opA, opB, Cmat->alpha_one, Amat->matDescr, BmatSpDescr, Cmat->bet… in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
2999 …sparseSpGEMM_copy(Ccusp->handle, opA, opB, Cmat->alpha_one, Amat->matDescr, BmatSpDescr, Cmat->bet… in MatProductNumeric_SeqAIJCUSPARSE_SeqAIJCUSPARSE()
[all …]
|
| /petsc/src/ksp/pc/impls/gamg/ |
| H A D | gamg.c | 65 Mat Cmat = NULL, Pold = *a_P_inout; in PCGAMGCreateLevel_GAMG() local
201 PetscCall(MatPtAP(Amat_fine, Pold, MAT_INITIAL_MATRIX, 2.0, &Cmat)); in PCGAMGCreateLevel_GAMG()
208 PetscCall(MatConvert(Cmat, MATMPIADJ, MAT_INITIAL_MATRIX, &adj)); in PCGAMGCreateLevel_GAMG()
221 PetscCall(MatGetOwnershipRange(Cmat, &Istart_crs, &Iend_crs)); in PCGAMGCreateLevel_GAMG()
222 PetscCall(MatGetSize(Cmat, &M, &N)); in PCGAMGCreateLevel_GAMG()
224 PetscCall(MatGetRow(Cmat, Ii, &ncols, NULL, NULL)); in PCGAMGCreateLevel_GAMG()
228 PetscCall(MatRestoreRow(Cmat, Ii, &ncols, NULL, NULL)); in PCGAMGCreateLevel_GAMG()
245 PetscCall(MatGetRow(Cmat, ii, &ncols, &idx, &vals)); in PCGAMGCreateLevel_GAMG()
248 PetscCall(MatRestoreRow(Cmat, ii, &ncols, &idx, &vals)); in PCGAMGCreateLevel_GAMG()
421 if (Cmat) { /* repartitioning from Cmat adjacency case */ in PCGAMGCreateLevel_GAMG()
[all …]
|