| /petsc/src/ksp/pc/impls/gamg/ |
| H A D | util.c | 26 Mat_MPIAIJ *mpimat; in PCGAMGGetDataWithGhosts() local
34 mpimat = (Mat_MPIAIJ *)Gmat->data; in PCGAMGGetDataWithGhosts()
38 PetscCall(VecGetLocalSize(mpimat->lvec, &num_ghosts)); in PCGAMGGetDataWithGhosts()
56 … PetscCall(VecScatterBegin(mpimat->Mvctx, tmp_crds, mpimat->lvec, INSERT_VALUES, SCATTER_FORWARD)); in PCGAMGGetDataWithGhosts()
57 PetscCall(VecScatterEnd(mpimat->Mvctx, tmp_crds, mpimat->lvec, INSERT_VALUES, SCATTER_FORWARD)); in PCGAMGGetDataWithGhosts()
58 PetscCall(VecGetArray(mpimat->lvec, &data_arr)); in PCGAMGGetDataWithGhosts()
60 PetscCall(VecRestoreArray(mpimat->lvec, &data_arr)); in PCGAMGGetDataWithGhosts()
|
| /petsc/src/mat/impls/sbaij/mpi/ |
| H A D | mpiaijsbaij.c | 13 Mat_MPIAIJ *mpimat = (Mat_MPIAIJ *)A->data; in MatConvert_MPIAIJ_MPISBAIJ() local
24 PetscCall(MatConvert_SeqAIJ_SeqSBAIJ_Preallocate(mpimat->A, &d_nnz)); in MatConvert_MPIAIJ_MPISBAIJ()
25 PetscCall(MatConvert_SeqAIJ_SeqBAIJ_Preallocate(mpimat->B, &o_nnz)); in MatConvert_MPIAIJ_MPISBAIJ()
54 Mat_MPIBAIJ *mpimat = (Mat_MPIBAIJ *)A->data; in MatConvert_MPIBAIJ_MPISBAIJ() local
55 Mat_SeqBAIJ *Aa = (Mat_SeqBAIJ *)mpimat->A->data, *Ba = (Mat_SeqBAIJ *)mpimat->B->data; in MatConvert_MPIBAIJ_MPISBAIJ()
71 PetscCall(MatGetDiagonalMarkers_SeqBAIJ(mpimat->A, &adiag, NULL)); in MatConvert_MPIBAIJ_MPISBAIJ()
|
| /petsc/src/mat/tests/ |
| H A D | ex86.c | 6 Mat seqmat, mpimat; in main() local
75 …reateMPIMatConcatenateSeqMat(PETSC_COMM_WORLD, seqmat, PETSC_DECIDE, MAT_INITIAL_MATRIX, &mpimat)); in main()
76 …tCreateMPIMatConcatenateSeqMat(PETSC_COMM_WORLD, seqmat, PETSC_DECIDE, MAT_REUSE_MATRIX, &mpimat)); in main()
77 PetscCall(MatView(mpimat, PETSC_VIEWER_STDOUT_WORLD)); in main()
80 PetscCall(MatDestroy(&mpimat)); in main()
|
| /petsc/src/mat/graphops/coarsen/impls/hem/ |
| H A D | hem.c | 426 Mat_MPIAIJ *mpimat = NULL; in MatCoarsenApply_HEM_private() local
468 mpimat = (Mat_MPIAIJ *)cMat->data; in MatCoarsenApply_HEM_private()
469 matA = (Mat_SeqAIJ *)mpimat->A->data; in MatCoarsenApply_HEM_private()
470 matB = (Mat_SeqAIJ *)mpimat->B->data; in MatCoarsenApply_HEM_private()
473 …PetscCall(MatCheckCompressedRow(mpimat->B, matB->nonzerorowcnt, &matB->compressedrow, matB->i, mpi… in MatCoarsenApply_HEM_private()
499 PetscCall(VecGetLocalSize(mpimat->lvec, &num_ghosts)); in MatCoarsenApply_HEM_private()
508 PetscCall(VecScatterBegin(mpimat->Mvctx, vec, mpimat->lvec, INSERT_VALUES, SCATTER_FORWARD)); in MatCoarsenApply_HEM_private()
509 PetscCall(VecScatterEnd(mpimat->Mvctx, vec, mpimat->lvec, INSERT_VALUES, SCATTER_FORWARD)); in MatCoarsenApply_HEM_private()
510 PetscCall(VecGetArrayRead(mpimat->lvec, &buf)); /* get proc ID in 'buf' */ in MatCoarsenApply_HEM_private()
514 PetscCall(VecRestoreArrayRead(mpimat->lvec, &buf)); in MatCoarsenApply_HEM_private()
[all …]
|
| /petsc/src/mat/impls/baij/mpi/ |
| H A D | mpiaijbaij.c | 11 Mat_MPIAIJ *mpimat = (Mat_MPIAIJ *)A->data; in MatConvert_MPIAIJ_MPIBAIJ() local
22 PetscCall(MatConvert_SeqAIJ_SeqBAIJ_Preallocate(mpimat->A, &d_nnz)); in MatConvert_MPIAIJ_MPIBAIJ()
23 PetscCall(MatConvert_SeqAIJ_SeqBAIJ_Preallocate(mpimat->B, &o_nnz)); in MatConvert_MPIAIJ_MPIBAIJ()
|
| /petsc/src/mat/graphops/coarsen/impls/mis/ |
| H A D | mis.c | 26 Mat_MPIAIJ *mpimat = NULL; in MatCoarsenApply_MIS_private() local
46 mpimat = (Mat_MPIAIJ *)Gmat->data; in MatCoarsenApply_MIS_private()
47 matA = (Mat_SeqAIJ *)mpimat->A->data; in MatCoarsenApply_MIS_private()
48 matB = (Mat_SeqAIJ *)mpimat->B->data; in MatCoarsenApply_MIS_private()
50 …PetscCall(MatCheckCompressedRow(mpimat->B, matB->nonzerorowcnt, &matB->compressedrow, matB->i, Gma… in MatCoarsenApply_MIS_private()
61 PetscCall(VecGetLocalSize(mpimat->lvec, &num_fine_ghosts)); in MatCoarsenApply_MIS_private()
65 …PetscCall(PetscSFSetGraphLayout(sf, layout, num_fine_ghosts, NULL, PETSC_COPY_VALUES, mpimat->garr… in MatCoarsenApply_MIS_private()
|
| /petsc/src/mat/graphops/coarsen/impls/misk/ |
| H A D | misk.c | 69 Mat_MPIAIJ *mpimat = NULL; in MatCoarsenApply_MISK_private() local
80 mpimat = (Mat_MPIAIJ *)cMat->data; in MatCoarsenApply_MISK_private()
81 matA = (Mat_SeqAIJ *)mpimat->A->data; in MatCoarsenApply_MISK_private()
82 matB = (Mat_SeqAIJ *)mpimat->B->data; in MatCoarsenApply_MISK_private()
84 …PetscCall(MatCheckCompressedRow(mpimat->B, matB->nonzerorowcnt, &matB->compressedrow, matB->i, cMa… in MatCoarsenApply_MISK_private()
98 PetscCall(VecGetLocalSize(mpimat->lvec, &num_fine_ghosts)); in MatCoarsenApply_MISK_private()
102 …PetscCall(PetscSFSetGraphLayout(sf, layout, num_fine_ghosts, NULL, PETSC_COPY_VALUES, mpimat->garr… in MatCoarsenApply_MISK_private()
|
| /petsc/src/ksp/pc/impls/ml/ |
| H A D | ml.c | 171 Mat_MPIAIJ *mpimat = (Mat_MPIAIJ *)A->data; in MatConvert_MPIAIJ_ML() local
172 Mat_SeqAIJ *mat, *a = (Mat_SeqAIJ *)mpimat->A->data, *b = (Mat_SeqAIJ *)mpimat->B->data; in MatConvert_MPIAIJ_ML()
180 PetscCall(MatSeqAIJGetArrayRead(mpimat->A, (const PetscScalar **)&aa)); in MatConvert_MPIAIJ_ML()
181 PetscCall(MatSeqAIJGetArrayRead(mpimat->B, (const PetscScalar **)&ba)); in MatConvert_MPIAIJ_ML()
208 an = mpimat->A->cmap->n + mpimat->B->cmap->n; in MatConvert_MPIAIJ_ML()
232 PetscCall(MatSeqAIJRestoreArrayRead(mpimat->A, (const PetscScalar **)&aa)); in MatConvert_MPIAIJ_ML()
233 PetscCall(MatSeqAIJRestoreArrayRead(mpimat->B, (const PetscScalar **)&ba)); in MatConvert_MPIAIJ_ML()
|
| /petsc/src/mat/impls/aij/mpi/ |
| H A D | mpiaij.c | 4648 PetscErrorCode MatCreateMPIAIJSumSeqAIJNumeric(Mat seqmat, Mat mpimat) in MatCreateMPIAIJSumSeqAIJNumeric() argument
4653 PetscInt N = mpimat->cmap->N, i, j, *owners, *ai = a->i, *aj, m; in MatCreateMPIAIJSumSeqAIJNumeric()
4666 PetscCall(PetscObjectGetComm((PetscObject)mpimat, &comm)); in MatCreateMPIAIJSumSeqAIJNumeric()
4672 PetscCall(PetscObjectQuery((PetscObject)mpimat, "MatMergeSeqsToMPI", (PetscObject *)&container)); in MatCreateMPIAIJSumSeqAIJNumeric()
4673 …PetscCheck(container, PetscObjectComm((PetscObject)mpimat), PETSC_ERR_PLIB, "Mat not created from … in MatCreateMPIAIJSumSeqAIJNumeric()
4688 PetscCall(PetscObjectGetNewTag((PetscObject)mpimat, &taga)); in MatCreateMPIAIJSumSeqAIJNumeric()
4753 PetscCall(MatSetValues(mpimat, 1, &arow, bnzi, bj_i, ba_i, INSERT_VALUES)); in MatCreateMPIAIJSumSeqAIJNumeric()
4756 PetscCall(MatAssemblyBegin(mpimat, MAT_FINAL_ASSEMBLY)); in MatCreateMPIAIJSumSeqAIJNumeric()
4757 PetscCall(MatAssemblyEnd(mpimat, MAT_FINAL_ASSEMBLY)); in MatCreateMPIAIJSumSeqAIJNumeric()
4767 …de MatCreateMPIAIJSumSeqAIJSymbolic(MPI_Comm comm, Mat seqmat, PetscInt m, PetscInt n, Mat *mpimat) in MatCreateMPIAIJSumSeqAIJSymbolic() argument
[all …]
|
| /petsc/src/mat/interface/ |
| H A D | matrix.c | 11079 …atCreateMPIMatConcatenateSeqMat(MPI_Comm comm, Mat seqmat, PetscInt n, MatReuse reuse, Mat *mpimat) in MatCreateMPIMatConcatenateSeqMat() argument
11087 PetscCall(MatDuplicate(seqmat, MAT_COPY_VALUES, mpimat)); in MatCreateMPIMatConcatenateSeqMat()
11089 PetscCall(MatCopy(seqmat, *mpimat, SAME_NONZERO_PATTERN)); in MatCreateMPIMatConcatenateSeqMat()
11094 …PetscCheck(reuse != MAT_REUSE_MATRIX || seqmat != *mpimat, PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "… in MatCreateMPIMatConcatenateSeqMat()
11097 PetscCall((*seqmat->ops->creatempimatconcatenateseqmat)(comm, seqmat, n, reuse, mpimat)); in MatCreateMPIMatConcatenateSeqMat()
|