| /petsc/src/mat/impls/dense/seq/hdf5/ |
| H A D | densehdf5.c | 54 if (mat->rmap->n >= 0 && mat->cmap->N < 0) { in MatLoad_Dense_HDF5() 56 PetscCall(PetscViewerHDF5ReadSizes(viewer, mat_name, &mat->cmap->N, NULL)); in MatLoad_Dense_HDF5() 58 vmap->bs = mat->cmap->N; in MatLoad_Dense_HDF5() 59 vmap->n = (mat->rmap->n < 0 || mat->cmap->N < 0) ? -1 : mat->rmap->n * mat->cmap->N; in MatLoad_Dense_HDF5() 60 vmap->N = (mat->rmap->N < 0 || mat->cmap->N < 0) ? -1 : mat->rmap->N * mat->cmap->N; in MatLoad_Dense_HDF5() 67 mat->cmap->N = vmap->bs; in MatLoad_Dense_HDF5() 68 mat->rmap->n = vmap->n / mat->cmap->N; in MatLoad_Dense_HDF5() 69 mat->rmap->N = vmap->N / mat->cmap->N; in MatLoad_Dense_HDF5() 71 PetscCall(PetscLayoutSetUp(mat->cmap)); in MatLoad_Dense_HDF5()
|
| /petsc/src/mat/tests/ |
| H A D | ex46.c | 10 ISLocalToGlobalMapping rmap, cmap; in main() local 21 PetscCall(ISLocalToGlobalMappingCreateIS(is, &cmap)); in main() 22 PetscCall(ISLocalToGlobalMappingSetBlockSize(cmap, 2)); in main() 24 PetscCall(MatSetLocalToGlobalMapping(A, rmap, cmap)); in main() 26 PetscCall(ISLocalToGlobalMappingDestroy(&cmap)); in main() 42 PetscCall(MatGetLocalToGlobalMapping(A, &rmap, &cmap)); in main() 44 PetscCall(ISLocalToGlobalMappingGetBlockSize(cmap, &l2gcbs)); in main()
|
| H A D | ex212.c | 9 ISLocalToGlobalMapping cmap, rmap; in main() local 23 …PetscCall(ISLocalToGlobalMappingCreate(PETSC_COMM_WORLD, 1, 1, indices, PETSC_COPY_VALUES, &cmap)); in main() 24 PetscCall(MatSetLocalToGlobalMapping(A, rmap, cmap)); in main() 26 PetscCall(ISLocalToGlobalMappingDestroy(&cmap)); in main() 28 …PetscCall(ISLocalToGlobalMappingCreate(PETSC_COMM_WORLD, 1, 3, indices, PETSC_COPY_VALUES, &cmap)); in main() 33 PetscCall(MatSetLocalToGlobalMapping(B, rmap, cmap)); in main() 35 PetscCall(ISLocalToGlobalMappingDestroy(&cmap)); in main()
|
| H A D | ex210.c | 8 ISLocalToGlobalMapping cmap, rmap; in main() local 20 …PetscCall(ISLocalToGlobalMappingCreate(PETSC_COMM_WORLD, 2, 1, indices, PETSC_COPY_VALUES, &cmap)); in main() 22 PetscCall(MatSetLocalToGlobalMapping(A, rmap, cmap)); in main() 29 PetscCall(ISLocalToGlobalMappingDestroy(&cmap)); in main()
|
| H A D | ex211.c | 8 Vec x, cmap; in ISGetSeqIS_SameColDist_Private() local 15 PetscInt i, cstart, cend, Bn = B->cmap->N; in ISGetSeqIS_SameColDist_Private() 27 PetscCall(VecDuplicate(x, &cmap)); in ISGetSeqIS_SameColDist_Private() 29 PetscCall(VecSet(cmap, -1.0)); in ISGetSeqIS_SameColDist_Private() 40 PetscCall(VecGetArray(cmap, &cmaparray)); in ISGetSeqIS_SameColDist_Private() 48 PetscCall(VecRestoreArray(cmap, &cmaparray)); in ISGetSeqIS_SameColDist_Private() 81 PetscCall(VecScatterBegin(Mvctx, cmap, lcmap, INSERT_VALUES, SCATTER_FORWARD)); in ISGetSeqIS_SameColDist_Private() 82 PetscCall(VecScatterEnd(Mvctx, cmap, lcmap, INSERT_VALUES, SCATTER_FORWARD)); in ISGetSeqIS_SameColDist_Private() 120 PetscCall(VecDestroy(&cmap)); in ISGetSeqIS_SameColDist_Private()
|
| /petsc/src/mat/impls/baij/mpi/ |
| H A D | mpb_baij.c | 21 PetscCall(MatSetSizes(*subMat, mat->rmap->n, mat->cmap->n, PETSC_DECIDE, PETSC_DECIDE)); in MatGetMultiProcBlock_MPIBAIJ() 22 PetscCall(MatSetBlockSizes(*subMat, mat->rmap->bs, mat->cmap->bs)); in MatGetMultiProcBlock_MPIBAIJ() 26 PetscCall(PetscLayoutSetBlockSize((*subMat)->cmap, mat->cmap->bs)); in MatGetMultiProcBlock_MPIBAIJ() 28 PetscCall(PetscLayoutSetUp((*subMat)->cmap)); in MatGetMultiProcBlock_MPIBAIJ() 40 PetscCall(PetscCalloc1(aij->B->cmap->n / bs, &garrayCMap)); in MatGetMultiProcBlock_MPIBAIJ() 41 for (i = 0; i < aij->B->cmap->n / bs; i++) { in MatGetMultiProcBlock_MPIBAIJ() 45 if ((col >= mat->cmap->range[rank] / bs) && (col < mat->cmap->range[rank + 1] / bs)) { in MatGetMultiProcBlock_MPIBAIJ() 46 garrayCMap[i] = (((*subMat)->cmap->range[subRank] - mat->cmap->range[rank]) / bs + col + 1); in MatGetMultiProcBlock_MPIBAIJ()
|
| /petsc/src/mat/impls/aij/mpi/ |
| H A D | mpb_aij.c | 20 PetscCall(MatSetSizes(*subMat, mat->rmap->n, mat->cmap->n, PETSC_DECIDE, PETSC_DECIDE)); in MatGetMultiProcBlock_MPIAIJ() 25 PetscCall(PetscLayoutSetUp((*subMat)->cmap)); in MatGetMultiProcBlock_MPIAIJ() 35 PetscCall(PetscCalloc1(aij->B->cmap->n, &garrayCMap)); in MatGetMultiProcBlock_MPIAIJ() 36 for (i = 0; i < aij->B->cmap->n; i++) { in MatGetMultiProcBlock_MPIAIJ() 40 if ((col >= mat->cmap->range[rank]) && (col < mat->cmap->range[rank + 1])) { in MatGetMultiProcBlock_MPIAIJ() 41 garrayCMap[i] = (*subMat)->cmap->range[subRank] + col - mat->cmap->range[rank] + 1; in MatGetMultiProcBlock_MPIAIJ()
|
| H A D | mpimattransposematmult.c | 34 PetscCall(MatSetSizes(C, A->cmap->n, B->cmap->n, A->cmap->N, B->cmap->N)); in MatTransposeMatMultSymbolic_MPIAIJ_MPIDense() 41 if (B->cmap->N) { in MatTransposeMatMultSymbolic_MPIAIJ_MPIDense() 42 PetscCall(MatCreateMAIJ(A, B->cmap->N, &atb->mA)); in MatTransposeMatMultSymbolic_MPIAIJ_MPIDense() 60 PetscInt i, j, m = A->rmap->n, n = A->cmap->n, ldb, BN = B->cmap->N, ldc; in MatTransposeMatMultNumeric_MPIAIJ_MPIDense()
|
| H A D | mpihashmat.h | 14 const PetscInt cStart = A->cmap->rstart; in MatSetValues_MPI_Hash() 15 const PetscInt cEnd = A->cmap->rend; in MatSetValues_MPI_Hash() 172 PetscCall(PetscLayoutSetUp(A->cmap)); in MatSetUp_MPI_Hash() 174 if (A->cmap->bs < 1) A->cmap->bs = 1; in MatSetUp_MPI_Hash() 182 a->nbs = A->cmap->n / bs; in MatSetUp_MPI_Hash() 184 a->Nbs = A->cmap->N / bs; in MatSetUp_MPI_Hash() 189 a->cstartbs = A->cmap->rstart / bs; in MatSetUp_MPI_Hash() 190 a->cendbs = A->cmap->rend / bs; in MatSetUp_MPI_Hash() 195 PetscCall(MatSetSizes(a->A, A->rmap->n, A->cmap->n, A->rmap->n, A->cmap->n)); in MatSetUp_MPI_Hash() 205 …PetscCall(MatSetSizes(a->B, A->rmap->n, size > 1 ? A->cmap->N : 0, A->rmap->n, size > 1 ? A->cmap-… in MatSetUp_MPI_Hash()
|
| H A D | mpiaij.c | 21 …tate((PetscObject)mat, "Rows=%" PetscInt_FMT ", Cols=%" PetscInt_FMT, mat->rmap->N, mat->cmap->N)); in MatReset_MPIAIJ() 318 …for (i = 0; i < a_aij->i[aij->A->rmap->n]; i++) work[A->cmap->rstart + a_aij->j[i]] += PetscAbsSca… in MatGetColumnReductions_MPIAIJ() 321 …for (i = 0; i < a_aij->i[aij->A->rmap->n]; i++) work[A->cmap->rstart + a_aij->j[i]] += PetscAbsSca… in MatGetColumnReductions_MPIAIJ() 324 …j->i[aij->A->rmap->n]; i++) work[A->cmap->rstart + a_aij->j[i]] = PetscMax(PetscAbsScalar(a_aij->a… in MatGetColumnReductions_MPIAIJ() 327 …for (i = 0; i < a_aij->i[aij->A->rmap->n]; i++) work[A->cmap->rstart + a_aij->j[i]] += PetscRealPa… in MatGetColumnReductions_MPIAIJ() 330 …for (i = 0; i < a_aij->i[aij->A->rmap->n]; i++) work[A->cmap->rstart + a_aij->j[i]] += PetscImagin… in MatGetColumnReductions_MPIAIJ() 388 PetscInt n = aij->B->cmap->n, i; in MatCreateColmap_MPIAIJ_Private() 396 PetscCall(PetscCalloc1(mat->cmap->N + 1, &aij->colmap)); in MatCreateColmap_MPIAIJ_Private() 534 PetscInt cstart = mat->cmap->rstart, cend = mat->cmap->rend, row, col; in MatSetValues_MPIAIJ() 583 …[j] < mat->cmap->N, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Column too large: col %" PetscInt_… in MatSetValues_MPIAIJ() [all …]
|
| /petsc/src/ksp/pc/impls/tfs/ |
| H A D | tfs.c | 88 …PetscCheck(A->cmap->N == A->rmap->N, PetscObjectComm((PetscObject)pc), PETSC_ERR_ARG_SIZ, "matrix … in PCSetUp_TFS() 93 ncol = a->A->cmap->n + a->B->cmap->n; in PCSetUp_TFS() 95 for (i = 0; i < a->A->cmap->n; i++) localtoglobal[i] = A->cmap->rstart + i + 1; in PCSetUp_TFS() 96 for (i = 0; i < a->B->cmap->n; i++) localtoglobal[i + a->A->cmap->n] = a->garray[i] + 1; in PCSetUp_TFS() 100 PetscCall(VecCreateSeqWithArray(PETSC_COMM_SELF, 1, a->A->cmap->n, NULL, &tfs->xd)); in PCSetUp_TFS() 101 PetscCall(VecCreateSeqWithArray(PETSC_COMM_SELF, 1, a->B->cmap->n, NULL, &tfs->xo)); in PCSetUp_TFS() 102 tfs->nd = a->A->cmap->n; in PCSetUp_TFS()
|
| /petsc/src/ksp/ksp/utils/schurm/ |
| H A D | schurm.c | 233 …->cmap->n, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Local rows of A00 %" PetscInt_FMT " do not equal l… in MatSchurComplementSetSubMatrices() 235 …cmap->n, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Local rows of Ap00 %" PetscInt_FMT " do not equal lo… in MatSchurComplementSetSubMatrices() 236 …cmap->n == A01->rmap->n, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Local columns of A00 %" PetscInt_FMT… in MatSchurComplementSetSubMatrices() 237 …cmap->n == A00->rmap->n, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Local columns of A10 %" PetscInt_FMT… in MatSchurComplementSetSubMatrices() 244 PetscCall(MatSetSizes(S, A10->rmap->n, A01->cmap->n, A10->rmap->N, A01->cmap->N)); in MatSchurComplementSetSubMatrices() 376 …->cmap->n, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Local rows of A00 %" PetscInt_FMT " do not equal l… in MatSchurComplementUpdateSubMatrices() 378 …cmap->n, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Local rows of Ap00 %" PetscInt_FMT " do not equal lo… in MatSchurComplementUpdateSubMatrices() 379 …cmap->n == A01->rmap->n, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Local columns of A00 %" PetscInt_FMT… in MatSchurComplementUpdateSubMatrices() 380 …cmap->n == A00->rmap->n, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Local columns of A10 %" PetscInt_FMT… in MatSchurComplementUpdateSubMatrices() 494 …if (set && AinvBd->cmap->N == -1) PetscFunctionReturn(PETSC_SUCCESS); // early bail out if compose… in MatSchurComplementComputeExplicitOperator() [all …]
|
| /petsc/src/mat/impls/aij/seq/ |
| H A D | mattransposematmult.c | 37 PetscCall(MatSetSizes(C, A->cmap->n, B->cmap->N, A->cmap->n, B->cmap->N)); in MatTMatTMultSymbolic_SeqAIJ_SeqDense() 38 dofm = B->cmap->n; in MatTMatTMultSymbolic_SeqAIJ_SeqDense() 64 PetscInt i, j, m = A->rmap->n, n = A->cmap->n, blda, clda; in MatTMatTMultNumeric_SeqAIJ_SeqDense() 65 PetscInt mdof = C->cmap->N; in MatTMatTMultNumeric_SeqAIJ_SeqDense() 109 PetscInt bn = B->cmap->n; in MatTMatTMultNumeric_SeqAIJ_SeqDense()
|
| H A D | matrart.c | 68 …PetscCall(MatSetSizes(Rt_dense, A->cmap->n, matcoloring->ncolors, A->cmap->n, matcoloring->ncolors… in MatRARtSymbolic_SeqAIJ_SeqAIJ_colorrart() 92 PetscReal density = (PetscReal)c->nz / (RARt_dense->rmap->n * RARt_dense->cmap->n); in MatRARtSymbolic_SeqAIJ_SeqAIJ_colorrart() 94 …PetscInt_FMT ")/(m*ncolors)=%g\n", RARt_dense->rmap->n, RARt_dense->cmap->n, R->cmap->n, R->rmap->… in MatRARtSymbolic_SeqAIJ_SeqAIJ_colorrart() 109 …PetscInt cn = B->cmap->n, bm = B->rmap->n, col, i, j, n, *ai = a->i, *aj, am = A->rmap->… in MatMatMatMultNumeric_SeqAIJ_SeqAIJ_SeqDense() 112 PetscInt *rj, rm = R->rmap->n, dm = RAB->rmap->n, dn = RAB->cmap->n; in MatMatMatMultNumeric_SeqAIJ_SeqAIJ_SeqDense() 117 …ck(bm == A->cmap->n, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Number columns in A %" PetscInt_FMT " no… in MatMatMatMultNumeric_SeqAIJ_SeqAIJ_SeqDense() 118 …ck(am == R->cmap->n, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Number columns in R %" PetscInt_FMT " no… in MatMatMatMultNumeric_SeqAIJ_SeqAIJ_SeqDense() 120 …cmap->n == RAB->cmap->n, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Number columns in RAB %" PetscInt_FM… in MatMatMatMultNumeric_SeqAIJ_SeqAIJ_SeqDense()
|
| /petsc/src/mat/utils/ |
| H A D | gcreate.c | 11 …cmap->bs <= 0 || mat->cmap->bs == cbs, PetscObjectComm((PetscObject)mat), PETSC_ERR_SUP, "Cannot c… in MatSetBlockSizes_Default() 47 if (i < Y->cmap->N) PetscCall(MatSetValues(Y, 1, &i, 1, &i, &alpha, ADD_VALUES)); in MatShift_Basic() 105 PetscCall(PetscLayoutCreate(comm, &B->cmap)); in MatCreate() 235 …PetscCheck((A->cmap->n < 0 || A->cmap->N < 0) || (A->cmap->n == n && (N <= 0 || A->cmap->N == N)),… in MatSetSizes() 236 A->cmap->n, A->cmap->N); in MatSetSizes() 238 A->cmap->n = n; in MatSetSizes() 240 A->cmap->N = N > -1 ? N : A->cmap->N; in MatSetSizes() 292 PetscCall(PetscLayoutSetBlockSize(B->cmap, newbs)); in MatSetFromOptions() 363 PetscCall(PetscLayoutSetUp(A->cmap)); in MatXAIJSetPreallocation() 473 PetscCall(PetscLayoutDestroy(&A->cmap)); in MatHeaderMerge() [all …]
|
| /petsc/src/mat/impls/dense/seq/ |
| H A D | dense.c | 20 …PetscCheck(A->rmap->n == A->cmap->n, PetscObjectComm((PetscObject)A), PETSC_ERR_SUP, "Cannot symme… in MatSeqDenseSymmetrize_Private() 41 if (!A->rmap->n || !A->cmap->n) PetscFunctionReturn(PETSC_SUCCESS); in MatSeqDenseInvertFactors_Private() 42 PetscCall(PetscBLASIntCast(A->cmap->n, &n)); in MatSeqDenseInvertFactors_Private() 52 PetscCall(PetscLogFlops((1.0 * A->cmap->n * A->cmap->n * A->cmap->n) / 3.0)); in MatSeqDenseInvertFactors_Private() 77 PetscCall(PetscLogFlops((1.0 * A->cmap->n * A->cmap->n * A->cmap->n) / 3.0)); in MatSeqDenseInvertFactors_Private() 94 PetscInt m = l->lda, n = A->cmap->n, r = A->rmap->n, i, j; in MatZeroRowsColumns_SeqDense() 103 …cmap->n, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Col %" PetscInt_FMT " requested to be zeroed … in MatZeroRowsColumns_SeqDense() 112 …PetscCheck(A->rmap->n == A->cmap->n, PETSC_COMM_SELF, PETSC_ERR_SUP, "Only coded for square matric… in MatZeroRowsColumns_SeqDense() 138 …PetscCheck(A->rmap->n == A->cmap->n, PETSC_COMM_SELF, PETSC_ERR_SUP, "Only coded for square matric… in MatZeroRowsColumns_SeqDense() 153 PetscInt *ai = a->i, *aj = a->j, m = A->rmap->N, n = A->cmap->N, i; in MatConvert_SeqAIJ_SeqDense() [all …]
|
| /petsc/src/mat/impls/aij/mpi/mpiviennacl/ |
| H A D | mpiaijviennacl.cxx | 13 PetscCall(PetscLayoutSetUp(B->cmap)); in MatMPIAIJSetPreallocation_MPIAIJViennaCL() 17 PetscCall(MatSetSizes(b->A, B->rmap->n, B->cmap->n, B->rmap->n, B->cmap->n)); in MatMPIAIJSetPreallocation_MPIAIJViennaCL() 20 PetscCall(MatSetSizes(b->B, B->rmap->n, B->cmap->N, B->rmap->n, B->cmap->N)); in MatMPIAIJSetPreallocation_MPIAIJViennaCL()
|
| /petsc/src/mat/impls/aij/seq/hdf5/ |
| H A D | aijhdf5.c | 70 mat->rmap = mat->cmap; in MatLoad_AIJ_HDF5() 71 mat->cmap = tmp; in MatLoad_AIJ_HDF5() 76 …cmap->N < 0 || mat->cmap->N == N, PETSC_COMM_SELF, PETSC_ERR_FILE_UNEXPECTED, "Inconsistent # of c… in MatLoad_AIJ_HDF5() 80 mat->cmap->N = N; in MatLoad_AIJ_HDF5() 82 PetscCall(PetscLayoutSetUp(mat->cmap)); in MatLoad_AIJ_HDF5()
|
| /petsc/src/vec/is/utils/hdf5/ |
| H A D | hdf5io.c | 89 PetscLayout cmap; in PetscViewerHDF5ReadSizes_Private() local 101 PetscCall(PetscLayoutCreate(PetscObjectComm((PetscObject)viewer), &cmap)); in PetscViewerHDF5ReadSizes_Private() 102 cmap->bs = 3; in PetscViewerHDF5ReadSizes_Private() 103 …PetscCall(PetscViewerHDF5Load_Internal(viewer, ctx->name, PETSC_FALSE, cmap, inttype, (void **)&lc… in PetscViewerHDF5ReadSizes_Private() 104 …etscCheck(!(cmap->n % 3), PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "Compressed IS must have an even n… in PetscViewerHDF5ReadSizes_Private() 105 for (PetscInt i = 0; i < cmap->n / 3; ++i) N += lcind[i * 3 + 0]; in PetscViewerHDF5ReadSizes_Private() 107 ctx->runs = cmap->N / 3; in PetscViewerHDF5ReadSizes_Private() 108 PetscCall(PetscMalloc1(cmap->N, &ctx->cind)); in PetscViewerHDF5ReadSizes_Private() 110 PetscCall(PetscLayoutGetRanges(cmap, &range)); in PetscViewerHDF5ReadSizes_Private() 116 PetscCall(PetscMPIIntCast(cmap->n, &n)); in PetscViewerHDF5ReadSizes_Private() [all …]
|
| /petsc/src/sys/classes/draw/tests/ |
| H A D | ex6.c | 55 char title[64], cmap[32] = ""; in main() local 62 PetscCall(PetscOptionsGetString(NULL, NULL, "-draw_cmap", cmap, sizeof(cmap), NULL)); in main() 63 PetscCall(PetscSNPrintf(title, sizeof(title), "Colormap: %s", cmap)); in main()
|
| /petsc/src/mat/impls/sell/mpi/ |
| H A D | mpisell.c | 30 if (Y->assembled && Y->rmap->rstart == Y->cmap->rstart && Y->rmap->rend == Y->cmap->rend) { in MatDiagonalSet_MPISELL() 48 PetscInt n = sell->B->cmap->n, i; in MatCreateColmap_MPISELL_Private() 56 PetscCall(PetscCalloc1(mat->cmap->N + 1, &sell->colmap)); in MatCreateColmap_MPISELL_Private() 155 PetscInt cstart = mat->cmap->rstart, cend = mat->cmap->rend, row, col; in MatSetValues_MPISELL() 201 …[j] < mat->cmap->N, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Column too large: col %" PetscInt_… in MatSetValues_MPISELL() 252 PetscInt cstart = mat->cmap->rstart, cend = mat->cmap->rend, row, col; in MatGetValues_MPISELL() 262 …j] < mat->cmap->N, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Column too large: col %" PetscInt_F… in MatGetValues_MPISELL() 373 …k(nt == A->cmap->n, PETSC_COMM_SELF, PETSC_ERR_ARG_SIZ, "Incompatible partition of A (%" PetscInt_… in MatMult_MPISELL() 481 …PetscCheck(A->rmap->N == A->cmap->N, PetscObjectComm((PetscObject)A), PETSC_ERR_SUP, "Supports onl… in MatGetDiagonal_MPISELL() 482 …PetscCheck(A->rmap->rstart == A->cmap->rstart && A->rmap->rend == A->cmap->rend, PETSC_COMM_SELF, … in MatGetDiagonal_MPISELL() [all …]
|
| H A D | mmsell.c | 21 PetscInt i, j, totalslices, N = A->cmap->N, row; in MatDisAssemble_MPISELL() 86 PetscInt N = mat->cmap->N, *indices; in MatSetUpMultiply_MPISELL() 136 PetscCall(PetscLayoutDestroy(&sell->B->cmap)); in MatSetUpMultiply_MPISELL() 137 …Call(PetscLayoutCreateFromSizes(PetscObjectComm((PetscObject)sell->B), ec, ec, 1, &sell->B->cmap)); in MatSetUpMultiply_MPISELL() 170 PetscCall(PetscLayoutDestroy(&sell->B->cmap)); in MatSetUpMultiply_MPISELL() 171 …Call(PetscLayoutCreateFromSizes(PetscObjectComm((PetscObject)sell->B), ec, ec, 1, &sell->B->cmap)); in MatSetUpMultiply_MPISELL() 182 …PetscCall(VecCreateMPIWithArray(PetscObjectComm((PetscObject)mat), 1, mat->cmap->n, mat->cmap->N, … in MatSetUpMultiply_MPISELL() 224 PetscCall(PetscCalloc1(inA->cmap->N, &lindices)); in MatMPISELLDiagonalScaleLocalSetUp() 225 for (i = 0; i < ina->B->cmap->n; i++) lindices[garray[i]] = i + 1; in MatMPISELLDiagonalScaleLocalSetUp()
|
| /petsc/src/mat/impls/sell/mpi/mpicuda/ |
| H A D | mpisellcuda.cu | 11 PetscCall(PetscLayoutSetUp(B->cmap)); in MatMPISELLSetPreallocation_MPISELLCUDA() 17 PetscCall(MatSetSizes(b->A, B->rmap->n, B->cmap->n, B->rmap->n, B->cmap->n)); in MatMPISELLSetPreallocation_MPISELLCUDA() 21 PetscCall(MatSetSizes(b->B, B->rmap->n, B->cmap->N, B->rmap->n, B->cmap->N)); in MatMPISELLSetPreallocation_MPISELLCUDA()
|
| /petsc/src/mat/impls/sell/mpi/mpihip/ |
| H A D | mpisellhip.hip.cxx | 11 PetscCall(PetscLayoutSetUp(B->cmap)); in MatMPISELLSetPreallocation_MPISELLHIP() 17 PetscCall(MatSetSizes(b->A, B->rmap->n, B->cmap->n, B->rmap->n, B->cmap->n)); in MatMPISELLSetPreallocation_MPISELLHIP() 21 PetscCall(MatSetSizes(b->B, B->rmap->n, B->cmap->N, B->rmap->n, B->cmap->N)); in MatMPISELLSetPreallocation_MPISELLHIP()
|
| /petsc/src/mat/impls/dense/mpi/ |
| H A D | mpidense.c | 65 rend2 = PetscMin(rend, A->cmap->N); in MatShift_MPIDense() 150 … PetscCheck(idxn[j] < mat->cmap->N, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Column too large"); in MatSetValues_MPIDense() 179 … PetscCheck(idxn[j] < mat->cmap->N, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Column too large"); in MatGetValues_MPIDense() 204 PetscCall(PetscLayoutSetUp(A->cmap)); in MatDenseSetLDA_MPIDense() 206 PetscCall(MatSetSizes(a->A, A->rmap->n, A->cmap->N, A->rmap->n, A->cmap->N)); in MatDenseSetLDA_MPIDense() 685 len = PetscMin(a->A->rmap->n, a->A->cmap->n); in MatGetDiagonal_MPIDense() 701 …tate((PetscObject)mat, "Rows=%" PetscInt_FMT ", Cols=%" PetscInt_FMT, mat->rmap->N, mat->cmap->N)); in MatDestroy_MPIDense() 837 PetscInt M = mat->rmap->N, N = mat->cmap->N, m, row, i, nz; in MatView_MPIDense_ASCIIorDraworSocket() 965 if (a->A && A->rmap->n == A->cmap->n) PetscCall(MatSetOption(a->A, op, flg)); in MatSetOption_MPIDense() 978 PetscInt i, j, s2a, s3a, s2, s3, m = mdn->A->rmap->n, n = mdn->A->cmap->n, lda; in MatDiagonalScale_MPIDense() [all …]
|