| /petsc/src/dm/impls/plex/transform/interface/ |
| H A D | plextransform.c | 422 PetscInt *rsize, *rcone, *rornt, Nct, n, r; in DMPlexTransformDestroy() local
425 …PetscCall(DMPlexTransformCellTransform(*tr, (DMPolytopeType)c, 0, NULL, &Nct, &rct, &rsize, &rcone… in DMPlexTransformDestroy()
428 for (r = 0; r < rsize[n]; ++r) PetscCall(PetscFree((*tr)->trSubVerts[c][rct[n]][r])); in DMPlexTransformDestroy()
478 PetscInt *rsize, *cone, *ornt; in DMPlexTransformCreateOffset_Internal() local
499 … PetscCall(DMPlexTransformCellTransform(tr, sct, q, &qrt, &Nct, &rct, &rsize, &cone, &ornt)); in DMPlexTransformCreateOffset_Internal()
512 off[r * DM_NUM_POLYTOPES + ctNew] += sn * rsize[n]; in DMPlexTransformCreateOffset_Internal()
527 PetscInt *rsize, *cone, *ornt; in DMPlexTransformCreateOffset_Internal() local
539 …PetscCall(DMPlexTransformCellTransform(tr, ict, PETSC_DETERMINE, NULL, &Nct, &rct, &rsize, &cone, … in DMPlexTransformCreateOffset_Internal()
547 … (rct[n] == ctNew) off[ct * DM_NUM_POLYTOPES + ctNew] += (ctStart[ictn] - ctStart[ict]) * rsize[n]; in DMPlexTransformCreateOffset_Internal()
612 PetscInt *rsize, *cone, *ornt; in DMPlexTransformSetUp() local
[all …]
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexcheckinterface.c | 9 PetscInt *rsize; in ExchangeArrayByRank_Private() local
18 PetscCall(PetscMalloc2(nrranks, &rsize, nrranks, &rarr)); in ExchangeArrayByRank_Private()
22 …for (r = 0; r < nrranks; r++) PetscCallMPI(MPIU_Irecv(&rsize[r], 1, MPIU_INT, rranks[r], tag, comm… in ExchangeArrayByRank_Private()
29 PetscCall(PetscMalloc(rsize[r] * unitsize, &rarr[r])); in ExchangeArrayByRank_Private()
30 PetscCallMPI(MPIU_Irecv(rarr[r], rsize[r], dt, rranks[r], tag, comm, &rreq[r])); in ExchangeArrayByRank_Private()
36 *rsize_out = rsize; in ExchangeArrayByRank_Private()
46 PetscInt *ssize, *rsize; in ExchangeVecByRank_Private() local
58 …IU_SCALAR, nsranks, sranks, ssize, (const void **)sarr, nrranks, rranks, &rsize, (void ***)&rarr)); in ExchangeVecByRank_Private()
62 PetscCall(VecCreateSeqWithArray(PETSC_COMM_SELF, 1, rsize[r], NULL, &rvecs_[r])); in ExchangeVecByRank_Private()
66 PetscCall(PetscFree2(rsize, rarr)); in ExchangeVecByRank_Private()
|
| H A D | plexextrude.c | 99 PetscInt *rsize, *rcone, *rornt; in DMPlexExtrude() local
103 PetscCall(DMPlexTransformCellTransform(tr, ct, p, NULL, &Nct, &rct, &rsize, &rcone, &rornt)); in DMPlexExtrude()
|
| H A D | plex.c | 8614 PetscInt *rsize, *rcone, *rornt, Nt; in DMPlexMatSetClosureRefined() local
8618 PetscCall(DMPlexTransformCellTransform(tr, ct, point, NULL, &Nt, &rct, &rsize, &rcone, &rornt)); in DMPlexMatSetClosureRefined()
8619 numSubcells = rsize[Nt - 1]; in DMPlexMatSetClosureRefined()
8774 PetscInt *rsize, *rcone, *rornt, Nt; in DMPlexMatGetClosureIndicesRefined() local
8778 PetscCall(DMPlexTransformCellTransform(tr, ct, point, NULL, &Nt, &rct, &rsize, &rcone, &rornt)); in DMPlexMatGetClosureIndicesRefined()
8779 numSubcells = rsize[Nt - 1]; in DMPlexMatGetClosureIndicesRefined()
|
| /petsc/src/dm/label/impls/ephemeral/ |
| H A D | dmlabeleph.c | 34 PetscInt *rsize, *rcone, *rornt; in DMLabelEphemeralComputeStratumSize_Private() local
38 … PetscCall(DMPlexTransformCellTransform(tr, ct, point, NULL, &Nct, &rct, &rsize, &rcone, &rornt)); in DMLabelEphemeralComputeStratumSize_Private()
39 for (PetscInt n = 0; n < Nct; ++n) Np += rsize[n]; in DMLabelEphemeralComputeStratumSize_Private()
71 PetscInt *rsize, *rcone, *rornt; in DMLabelGetStratumIS_Ephemeral() local
75 … PetscCall(DMPlexTransformCellTransform(tr, ct, point, NULL, &Nct, &rct, &rsize, &rcone, &rornt)); in DMLabelGetStratumIS_Ephemeral()
77 for (r = 0; r < rsize[n]; ++r) { in DMLabelGetStratumIS_Ephemeral()
|
| /petsc/src/dm/impls/plex/tests/ |
| H A D | ex41.c | 65 PetscInt *rsize, *rcone, *rornt; in ConstructRefineTree() local
71 PetscCall(DMPlexTransformCellTransform(tr, ct, c, NULL, &Nct, &rct, &rsize, &rcone, &rornt)); in ConstructRefineTree()
74 for (PetscInt r = 0; r < rsize[n]; ++r) { in ConstructRefineTree()
|
| /petsc/src/sys/memory/ |
| H A D | mtr.c | 22 size_t size, rsize; /* Aligned size and requested size */ member
185 head->rsize = a; in PetscTrMallocDefault()
194 TRallocated += TRrequestedSize ? head->rsize : head->size; in PetscTrMallocDefault()
294 …& head->rsize >= PetscLogMallocTraceThreshold) PetscCall(PetscViewerASCIIPrintf(PetscLogMallocTrac… in PetscTrFreeDefault()
304 asize = TRrequestedSize ? head->rsize : head->size; in PetscTrFreeDefault()
376 TRallocated -= TRrequestedSize ? head->rsize : head->size; in PetscTrReallocDefault()
393 head->rsize = len; in PetscTrReallocDefault()
402 TRallocated += TRrequestedSize ? head->rsize : head->size; in PetscTrReallocDefault()
701 libAlloc += TRrequestedSize ? head->rsize : head->size; in PetscMallocDump()
712 …fprintf(fp, "[%2d] %.0f bytes\n", rank, (PetscLogDouble)(TRrequestedSize ? head->rsize : head->siz… in PetscMallocDump()
[all …]
|
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex79.c | 57 PetscInt rbegin, rend, rsize = m / 2; in main() local
61 PetscCall(ISCreateStride(PETSC_COMM_WORLD, rsize, rbegin, 1, &is)); in main()
|
| /petsc/src/snes/tutorials/ |
| H A D | ex4.c | 460 PetscInt bsize = 0, lsize = 0, tsize = 0, rsize = 0; in FormBoundaryConditions_Enneper() local
477 rsize = my + 2; in FormBoundaryConditions_Enneper()
483 PetscCall(PetscMalloc1(rsize, &user->right)); in FormBoundaryConditions_Enneper()
507 limit = rsize; in FormBoundaryConditions_Enneper()
553 PetscInt limit, bsize = 0, lsize = 0, tsize = 0, rsize = 0; in FormBoundaryConditions_Sins() local
568 rsize = my + 2; in FormBoundaryConditions_Sins()
574 PetscCall(PetscMalloc1(rsize, &user->right)); in FormBoundaryConditions_Sins()
598 limit = rsize; in FormBoundaryConditions_Sins()
|
| H A D | ex58.c | 464 PetscInt bsize = 0, lsize = 0, tsize = 0, rsize = 0; in FormBoundaryConditions() local
487 rsize = my + 2; in FormBoundaryConditions()
493 PetscCall(PetscMalloc1(rsize, &ctx->right)); in FormBoundaryConditions()
517 limit = rsize; in FormBoundaryConditions()
|
| /petsc/src/dm/impls/plex/tutorials/ |
| H A D | ex11.c | 255 PetscInt *rsize, *rcone, *rornt; in CheckSubcells() local
277 PetscCall(DMPlexTransformCellTransform(tr, ct, p, NULL, &Nct, &rct, &rsize, &rcone, &rornt)); in CheckSubcells()
283 for (r = 0; r < rsize[n]; ++r) { in CheckSubcells()
297 for (ro = 0; ro < rsize[n]; ++ro) { in CheckSubcells()
314 if (ro == rsize[n]) { in CheckSubcells()
|
| /petsc/src/tao/complementarity/tutorials/ |
| H A D | minsurf1.c | 427 PetscInt bsize = 0, lsize = 0, tsize = 0, rsize = 0; in MSA_BoundaryConditions() local
437 rsize = my + 2; in MSA_BoundaryConditions()
443 PetscCall(PetscMalloc1(rsize, &user->right)); in MSA_BoundaryConditions()
467 limit = rsize; in MSA_BoundaryConditions()
|
| /petsc/src/tao/unconstrained/tutorials/ |
| H A D | minsurf1.c | 475 PetscInt bsize = 0, lsize = 0, tsize = 0, rsize = 0; in MSA_BoundaryConditions() local
485 rsize = my + 2; in MSA_BoundaryConditions()
491 PetscCall(PetscMalloc1(rsize, &user->right)); in MSA_BoundaryConditions()
515 limit = rsize; in MSA_BoundaryConditions()
|
| H A D | minsurf2.c | 692 PetscInt bsize = 0, lsize = 0, tsize = 0, rsize = 0; in MSA_BoundaryConditions() local
707 rsize = ym + 2; in MSA_BoundaryConditions()
713 PetscCall(PetscMalloc1(rsize, &user->right)); in MSA_BoundaryConditions()
737 limit = rsize; in MSA_BoundaryConditions()
783 for (i = 0; i < rsize; i++) user->right[i] *= scl; in MSA_BoundaryConditions()
|
| /petsc/src/mat/impls/elemental/ |
| H A D | matelem.cxx | 1096 PetscMPIInt rsize, csize; in MatSetUp_Elemental() local
1119 PetscCallMPI(MPI_Comm_size(A->rmap->comm, &rsize)); in MatSetUp_Elemental()
1121 …PetscCheck(csize == rsize, PetscObjectComm((PetscObject)A), PETSC_ERR_ARG_INCOMP, "Cannot use row … in MatSetUp_Elemental()
1122 a->commsize = rsize; in MatSetUp_Elemental()
1123 a->mr[0] = A->rmap->N % rsize; in MatSetUp_Elemental()
1124 if (!a->mr[0]) a->mr[0] = rsize; in MatSetUp_Elemental()
1127 a->m[0] = A->rmap->N / rsize + (a->mr[0] != rsize); in MatSetUp_Elemental()
|
| /petsc/src/ksp/pc/impls/patch/ |
| H A D | pcpatch.c | 1700 PetscInt csize, rsize; in PCPatchCreateMatrix_Private() local
1708 PetscCall(PetscSectionGetDof(patch->gtolCountsWithArtificial, point + pStart, &rsize)); in PCPatchCreateMatrix_Private()
1709 csize = rsize; in PCPatchCreateMatrix_Private()
1713 PetscCall(PetscSectionGetDof(patch->gtolCounts, point + pStart, &rsize)); in PCPatchCreateMatrix_Private()
1714 csize = rsize; in PCPatchCreateMatrix_Private()
1723 PetscCall(MatSetSizes(*mat, rsize, csize, rsize, csize)); in PCPatchCreateMatrix_Private()
1747 if (rsize < 3000) { /* FIXME: I picked this switch value out of my hat */ in PCPatchCreateMatrix_Private()
1751 PetscCall(PetscCalloc1(rsize, &dnnz)); in PCPatchCreateMatrix_Private()
1752 PetscCall(PetscBTCreate(rsize * rsize, &bt)); in PCPatchCreateMatrix_Private()
1760 const PetscInt key = row * rsize + col; in PCPatchCreateMatrix_Private()
[all …]
|
| /petsc/src/tao/bound/tutorials/ |
| H A D | plate2f.F90 | 517 PetscInt tsize, rsize
546 rsize = ym + 2
552 PetscCall(VecCreateMPI(PETSC_COMM_WORLD, rsize, PETSC_DECIDE, Right, ierr))
580 limit = rsize
|
| H A D | plate2.c | 608 PetscInt bsize = 0, lsize = 0, tsize = 0, rsize = 0; in MSA_BoundaryConditions() local
624 rsize = ym + 2; in MSA_BoundaryConditions()
630 PetscCall(VecCreateMPI(MPI_COMM_WORLD, rsize, PETSC_DECIDE, &Right)); in MSA_BoundaryConditions()
659 limit = rsize; in MSA_BoundaryConditions()
|
| /petsc/src/dm/impls/plex/transform/impls/extrude/ |
| H A D | plextrcohesive.c | 1238 PetscInt *rsize, *rcone, *rornt; in DMPlexTransformCohesiveExtrudeGetUnsplit() local
1242 … PetscCall(DMPlexTransformCellTransform(tr, ct, point, NULL, &Nct, &rct, &rsize, &rcone, &rornt)); in DMPlexTransformCohesiveExtrudeGetUnsplit()
1244 for (PetscInt r = 0; r < rsize[n]; ++r) { in DMPlexTransformCohesiveExtrudeGetUnsplit()
|
| /petsc/src/binding/petsc4py/src/petsc4py/PETSc/ |
| H A D | petscmat.pxi | 740 cdef object rsize, csize
742 rsize , csize = size
744 rsize = csize = size
752 Sys_Sizes(rsize, rbsize, r, m, M)
|
| /petsc/src/mat/impls/h2opus/cuda/ |
| H A D | math2opus.cu | 1131 PetscMPIInt rsize = 4; in MatView_H2OPUS() local
1134 PetscMPIInt rsize = 2; in MatView_H2OPUS()
1144 …PetscCallMPI(MPIU_Allreduce(MPI_IN_PLACE, matrix_mem, rsize, MPI_DOUBLE_PRECISION, MPI_SUM, PetscO… in MatView_H2OPUS()
|
| /petsc/src/ksp/pc/impls/bddc/ |
| H A D | bddcprivate.c | 90 PetscInt rsize, csize, esize; in PCBDDCComputeNedelecChangeEdge() local
96 PetscCall(ISGetSize(extrow, &rsize)); in PCBDDCComputeNedelecChangeEdge()
102 PetscCall(MatCreateSeqDense(PETSC_COMM_SELF, rsize, csize, ptr, Gins)); in PCBDDCComputeNedelecChangeEdge()
107 ptr += rsize * csize; in PCBDDCComputeNedelecChangeEdge()
5464 PetscInt rsize, *idxs_perm_r = NULL, csize, *idxs_perm_c = NULL; in MatCreateSubMatrixUnsorted() local
5469 PetscCall(ISGetLocalSize(isrow, &rsize)); in MatCreateSubMatrixUnsorted()
5476 PetscCall(PetscMalloc1(rsize, &idxs_perm_r)); in MatCreateSubMatrixUnsorted()
5477 PetscCall(PetscMalloc1(rsize, &idxs_sorted)); in MatCreateSubMatrixUnsorted()
5478 for (i = 0; i < rsize; i++) idxs_perm_r[i] = i; in MatCreateSubMatrixUnsorted()
5480 PetscCall(PetscSortIntWithPermutation(rsize, idxs, idxs_perm_r)); in MatCreateSubMatrixUnsorted()
[all …]
|
| /petsc/src/mat/impls/nest/ |
| H A D | matnest.c | 1893 PetscInt ij, rsize = nii[1] - nii[0], ist = ii[ir] + ci[ir]; in MatConvert_Nest_SeqAIJ_fast() local
1895 for (ij = 0; ij < rsize; ij++) { in MatConvert_Nest_SeqAIJ_fast()
1902 ci[ir] += rsize; in MatConvert_Nest_SeqAIJ_fast()
|
| /petsc/src/mat/impls/sbaij/mpi/ |
| H A D | mpisbaij.c | 1367 PetscInt csize, csize_local, rsize; in MatCreateSubMatrix_MPISBAIJ() local
1372 PetscCall(ISGetLocalSize(isrow, &rsize)); in MatCreateSubMatrix_MPISBAIJ()
1408 …PetscCall(MatCreateSubMatrix_MPIBAIJ_Private(mat, iscol, isrow_local, rsize, MAT_INITIAL_MATRIX, C… in MatCreateSubMatrix_MPISBAIJ()
|
| /petsc/src/ts/tutorials/ |
| H A D | ex30.c | 1104 PetscInt *rsize, *rcone, *rornt, Nt; in SaveToFile() local
1109 PetscCall(DMPlexTransformCellTransform(tr, ct, c, NULL, &Nt, &rct, &rsize, &rcone, &rornt)); in SaveToFile()
1110 for (PetscInt r = 0; r < rsize[Nt - 1]; ++r) { in SaveToFile()
|