| /petsc/src/dm/dt/dualspace/impls/refined/ |
| H A D | dualspacerefined.c | 36 PetscInt pStart, pEnd; in PetscDualSpaceRefinedSetCellSpaces_Refined() local 42 PetscCall(DMPlexGetChart(dm, &pStart, &pEnd)); in PetscDualSpaceRefinedSetCellSpaces_Refined() 43 if (!sp->pointSpaces) PetscCall(PetscCalloc1(pEnd - pStart, &sp->pointSpaces)); in PetscDualSpaceRefinedSetCellSpaces_Refined() 47 PetscCall(PetscDualSpaceDestroy(&sp->pointSpaces[c + cStart - pStart])); in PetscDualSpaceRefinedSetCellSpaces_Refined() 48 sp->pointSpaces[c + cStart - pStart] = cellSpaces[c]; in PetscDualSpaceRefinedSetCellSpaces_Refined() 65 PetscInt pStart, pEnd, depth; in PetscDualSpaceSetUp_Refined() local 74 PetscCall(DMPlexGetChart(dm, &pStart, &pEnd)); in PetscDualSpaceSetUp_Refined() 77 if (sp->pointSpaces[c - pStart]) { in PetscDualSpaceSetUp_Refined() 79 …PetscCheck(sp->pointSpaces[c - pStart]->k == sp->k, PetscObjectComm((PetscObject)sp), PETSC_ERR_AR… in PetscDualSpaceSetUp_Refined() 80 …PetscCheck(sp->pointSpaces[c - pStart]->Nc == sp->Nc, PetscObjectComm((PetscObject)sp), PETSC_ERR_… in PetscDualSpaceSetUp_Refined() [all …]
|
| /petsc/src/dm/impls/plex/tests/ |
| H A D | ex48.c | 11 PetscInt pStart, pEnd, p; in main() local 21 PetscCall(DMPlexGetChart(dm, &pStart, &pEnd)); in main() 22 PetscCall(PetscSectionSetChart(section, pStart, pEnd)); in main() 23 PetscCall(DMPlexGetHeightStratum(dm, 0, &pStart, &pEnd)); in main() 24 for (p = pStart; p < pEnd; p++) PetscCall(PetscSectionSetDof(section, p, 1)); in main() 25 PetscCall(DMPlexGetDepthStratum(dm, 0, &pStart, &pEnd)); in main() 26 for (p = pStart; p < pEnd; p++) PetscCall(PetscSectionSetDof(section, p, 2)); in main() 35 PetscCall(DMPlexGetChart(dm, &pStart, &pEnd)); in main() 36 for (p = pStart; p < pEnd; ++p) { in main() 45 for (p = pStart; p < pEnd; ++p) { in main()
|
| H A D | ex48f90.F90 | 9 PetscInt :: dof, p, pStart, pEnd, d 26 PetscCallA(DMPlexGetChart(dm, pStart, pEnd, ierr)) 27 PetscCallA(PetscSectionSetChart(section, pStart, pEnd, ierr)) 28 PetscCallA(DMPlexGetHeightStratum(dm, zero, pStart, pEnd, ierr)) 29 do p = pStart, pEnd - 1 32 PetscCallA(DMPlexGetDepthStratum(dm, zero, pStart, pEnd, ierr)) 33 do p = pStart, pEnd - 1 42 PetscCallA(DMPlexGetChart(dm, pStart, pEnd, ierr)) 43 do p = pStart, pEnd - 1 54 do p = pStart, pEnd - 1
|
| H A D | ex6.c | 7 PetscInt pStart, pEnd; /* The label chart */ member 17 options->pStart = 0; in ProcessOptions() 34 PetscInt n = (PetscInt)(user->fill * (user->pEnd - user->pStart)), i; in TestSetup() 39 PetscCall(PetscRandomSetInterval(r, user->pStart, user->pEnd)); in TestSetup() 55 PetscCall(DMLabelCreateIndex(label, user->pStart, user->pEnd)); in TestSetup() 56 …Int_FMT ", %" PetscInt_FMT ") and set %" PetscInt_FMT " values\n", user->pStart, user->pEnd, user-… in TestSetup() 62 const PetscInt pStart = user->pStart; in TestLookup() local 67 for (p = pStart; p < pEnd; ++p) { in TestLookup() 83 PetscInt pStart = user->pStart, pEnd = user->pEnd, p; in TestClear() local 88 for (p = pStart; p < pEnd; p++) { in TestClear()
|
| H A D | ex37.c | 33 PetscInt dim, pStart, pEnd, p, pid; in ComputeVolume() local 43 PetscCall(DMPlexGetHeightStratum(dm, 0, &pStart, &pEnd)); in ComputeVolume() 44 for (p = pStart; p < pEnd; ++p) { in ComputeVolume() 51 PetscCall(DMPlexGetHeightStratum(dm, 1, &pStart, &pEnd)); in ComputeVolume() 52 for (p = pStart; p < pEnd; ++p) { in ComputeVolume()
|
| H A D | ex98.c | 11 PetscInt sdim, s, pStart, pEnd, p, numVS, numPoints; in main() local 39 PetscCall(DMPlexGetChart(dm, &pStart, &pEnd)); in main() 40 PetscCall(PetscSectionSetChart(section, pStart, pEnd)); in main() 43 PetscCall(DMPlexGetDepthStratum(dm, 0, &pStart, &pEnd)); in main() 44 for (p = pStart; p < pEnd; ++p) { in main()
|
| H A D | ex97.c | 9 PetscInt pStart, pEnd, p; in main() local 33 PetscCall(DMPlexGetHeightStratum(dm, 0, &pStart, &pEnd)); in main() 34 for (p = pStart; p < pEnd; ++p) { in main()
|
| H A D | ex97f90.F90 | 16 PetscInt :: pStart, pEnd, p 33 PetscCallA(DMPlexGetHeightStratum(dm, 0_kPI, pStart, pEnd, ierr)) 34 do p = pStart, pEnd - 1
|
| H A D | ex40.c | 11 PetscInt pStart, pEnd, p; in LabelPoints() local 19 PetscCall(DMPlexGetChart(dm, &pStart, &pEnd)); in LabelPoints() 20 for (p = pStart; p < pEnd; ++p) PetscCall(DMLabelSetValue(label, p, p)); in LabelPoints()
|
| H A D | ex98f90.F90 | 15 PetscInt :: sdim, s, pStart, pEnd, p, numVS, numPoints 47 PetscCallA(DMPlexGetChart(dm, pStart, pEnd, ierr)) 48 PetscCallA(PetscSectionSetChart(section, pStart, pEnd, ierr)) 51 PetscCallA(DMPlexGetDepthStratum(dm, 0_kPI, pStart, pEnd, ierr)) 52 do p = pStart, pEnd - 1
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexreorder.c | 8 PetscInt depth, d, pStart, pEnd, fStart, fMax, fEnd, p; in DMPlexCreateOrderingClosure_Static() local 12 PetscCall(DMPlexGetChart(dm, &pStart, &pEnd)); in DMPlexCreateOrderingClosure_Static() 13 PetscCall(PetscMalloc1(pEnd - pStart, &perm)); in DMPlexCreateOrderingClosure_Static() 14 PetscCall(PetscMalloc1(pEnd - pStart, &iperm)); in DMPlexCreateOrderingClosure_Static() 15 for (p = pStart; p < pEnd; ++p) iperm[p] = -1; in DMPlexCreateOrderingClosure_Static() 17 PetscCall(DMPlexGetDepthStratum(dm, d, &pStart, &pEnd)); in DMPlexCreateOrderingClosure_Static() 20 for (p = pStart; p < pEnd; ++p) { in DMPlexCreateOrderingClosure_Static() 72 …ULL, *adjacency = NULL, *cperm, *clperm = NULL, *invclperm = NULL, *mask, *xls, pStart, pEnd, c, i; in DMPlexGetOrdering() local 131 PetscCall(DMPlexGetChart(dm, &pStart, &pEnd)); in DMPlexGetOrdering() 132 …PetscCall(ISCreateGeneral(PetscObjectComm((PetscObject)dm), pEnd - pStart, invclperm, PETSC_OWN_PO… in DMPlexGetOrdering() [all …]
|
| H A D | plexindices.c | 24 PetscInt pStart, pEnd, sStart, sEnd, point, clSize; in DMPlexCreateClosureIndex() local 31 PetscCall(DMPlexGetChart(dm, &pStart, &pEnd)); in DMPlexCreateClosureIndex() 33 PetscCall(PetscSectionSetChart(closureSection, pStart, pEnd)); in DMPlexCreateClosureIndex() 34 for (point = pStart; point < pEnd; ++point) { in DMPlexCreateClosureIndex() 50 for (point = pStart; point < pEnd; ++point) { in DMPlexCreateClosureIndex()
|
| H A D | plexpartition.c | 113 PetscInt dim, depth, p, pStart, pEnd, a, adjSize, idx, size; in DMPlexCreatePartitionerGraph_Native() local 145 PetscCall(DMPlexGetHeightStratum(dm, height, &pStart, &pEnd)); in DMPlexCreatePartitionerGraph_Native() 148 PetscCall(PetscSectionSetChart(section, pStart, pEnd)); in DMPlexCreatePartitionerGraph_Native() 153 PetscCall(DMPlexCreateNumbering_Plex(dm, pStart, pEnd, 0, NULL, sfPoint, &cellNumbering)); in DMPlexCreatePartitionerGraph_Native() 175 if (supportSize == 1) adjCells[f] = DMPlex_GlobalID(cellNum[support[0] - pStart]); in DMPlexCreatePartitionerGraph_Native() 178 if (p >= 0) adjCells[f] = DMPlex_GlobalID(cellNum[support[1] - pStart]); in DMPlexCreatePartitionerGraph_Native() 180 if (p >= 0) adjCells[f] = DMPlex_GlobalID(cellNum[support[0] - pStart]); in DMPlexCreatePartitionerGraph_Native() 193 if (supportSize == 1) adjCells[child] = DMPlex_GlobalID(cellNum[support[0] - pStart]); in DMPlexCreatePartitionerGraph_Native() 196 if (p >= 0) adjCells[child] = DMPlex_GlobalID(cellNum[support[1] - pStart]); in DMPlexCreatePartitionerGraph_Native() 198 if (p >= 0) adjCells[child] = DMPlex_GlobalID(cellNum[support[0] - pStart]); in DMPlexCreatePartitionerGraph_Native() [all …]
|
| H A D | plexpreallocate.c | 9 PetscInt pStart, pEnd; in DMPlexComputeAnchorAdjacencies() local 17 PetscCall(PetscSectionGetChart(section, &pStart, &pEnd)); in DMPlexComputeAnchorAdjacencies() 18 PetscCall(PetscSectionSetChart(adjSec, pStart, pEnd)); in DMPlexComputeAnchorAdjacencies() 29 PetscCall(PetscSectionSetChart(inverseSec, pStart, pEnd)); in DMPlexComputeAnchorAdjacencies() 41 PetscCall(PetscCalloc1(pEnd - pStart, &offsets)); in DMPlexComputeAnchorAdjacencies() 54 inverse[iOff + offsets[a - pStart]++] = p; in DMPlexComputeAnchorAdjacencies() 77 for (p = pStart; p < pEnd; p++) { in DMPlexComputeAnchorAdjacencies() 91 if ((qAdj < pStart) || (qAdj >= pEnd)) continue; in DMPlexComputeAnchorAdjacencies() 108 for (p = pStart; p < pEnd; p++) { in DMPlexComputeAnchorAdjacencies() 125 if ((qAdj < pStart) || (qAdj >= pEnd)) continue; in DMPlexComputeAnchorAdjacencies() [all …]
|
| H A D | plexdistribute.c | 183 PetscInt depth, maxC, maxS, maxP, pStart, pEnd, asiz, maxAnchors = 1; in DMPlexGetMaxAdjacencySize_Internal() local 198 PetscCall(DMPlexGetChart(dm, &pStart, &pEnd)); in DMPlexGetMaxAdjacencySize_Internal() 213 if ((depth == 3 && maxP > 200) || (depth == 2 && maxP > 580)) asiz = pEnd - pStart; in DMPlexGetMaxAdjacencySize_Internal() 216 *max_adjacency_size = PetscMin(asiz, pEnd - pStart); in DMPlexGetMaxAdjacencySize_Internal() 355 PetscInt pStart, pEnd, p, numLeaves, l, numNeighbors, n; in DMPlexCreateTwoSidedProcessSF() local 369 PetscCall(PetscSectionGetChart(rootRankSection, &pStart, &pEnd)); in DMPlexCreateTwoSidedProcessSF() 371 for (p = pStart; p < pEnd; ++p) { in DMPlexCreateTwoSidedProcessSF() 380 PetscCall(PetscSectionGetChart(leafRankSection, &pStart, &pEnd)); in DMPlexCreateTwoSidedProcessSF() 382 for (p = pStart; p < pEnd; ++p) { in DMPlexCreateTwoSidedProcessSF() 445 PetscInt pStart, pEnd, p, nedges; in DMPlexDistributeOwnership() local [all …]
|
| /petsc/src/vec/is/section/interface/ |
| H A D | section.c | 44 (*s)->pStart = -1; in PetscSectionCreate() 98 PetscInt numFields, f, c, pStart, pEnd, p; in PetscSectionCopy_Internal() local 121 PetscCall(PetscSectionGetChart(section, &pStart, &pEnd)); in PetscSectionCopy_Internal() 122 PetscCall(PetscSectionSetChart(newSection, pStart, pEnd)); in PetscSectionCopy_Internal() 127 for (p = pStart; p < pEnd; ++p) { in PetscSectionCopy_Internal() 129 …l force_constrained = (PetscBool)(constrained_dofs && PetscBTLookup(constrained_dofs, p - pStart)); in PetscSectionCopy_Internal() 147 for (p = pStart; p < pEnd; ++p) { in PetscSectionCopy_Internal() 150 … force_constrained = (PetscBool)(constrained_dofs && PetscBTLookup(constrained_dofs, p - pStart)); in PetscSectionCopy_Internal() 252 PetscInt pStart, pEnd, nfields, ncdof, nfcdof, p, f, n1, n2; in PetscSectionCompare() local 270 PetscCall(PetscSectionGetChart(s1, &pStart, &pEnd)); in PetscSectionCompare() [all …]
|
| /petsc/src/vec/vec/tests/ |
| H A D | ex40f90.F90 | 7 PetscInt pStart, pEnd, p, three 14 pStart = 0 16 PetscCallA(PetscSectionSetChart(section, pStart, pEnd, ierr)) 17 do p = pStart, pEnd - 1
|
| /petsc/src/dm/impls/da/ |
| H A D | dalocal.c | 234 PetscErrorCode DMDAGetHeightStratum(DM dm, PetscInt height, PeOp PetscInt *pStart, PeOp PetscInt *p… in DMDAGetHeightStratum() argument 240 if (pStart) PetscAssertPointer(pStart, 3); in DMDAGetHeightStratum() 247 if (pStart) *pStart = 0; in DMDAGetHeightStratum() 251 if (pStart) *pStart = nC + nV; in DMDAGetHeightStratum() 255 if (pStart) *pStart = nC; in DMDAGetHeightStratum() 259 if (pStart) *pStart = 0; in DMDAGetHeightStratum() 286 PetscErrorCode DMDAGetDepthStratum(DM dm, PetscInt depth, PeOp PetscInt *pStart, PeOp PetscInt *pEn… in DMDAGetDepthStratum() argument 292 if (pStart) PetscAssertPointer(pStart, 3); in DMDAGetDepthStratum() 299 if (pStart) *pStart = 0; in DMDAGetDepthStratum() 303 if (pStart) *pStart = nC + nV; in DMDAGetDepthStratum() [all …]
|
| /petsc/src/dm/impls/plex/adaptors/parmmg/ |
| H A D | parmmgadapt.c | 39 PetscInt *gv_new, *owners, *verticesNewSorted, pStart, pEnd; in DMAdaptMetric_ParMmg_Plex() local 138 PetscCall(DMLabelGetBounds(bdLabel, &pStart, &pEnd)); in DMAdaptMetric_ParMmg_Plex() 139 PetscCall(PetscCalloc1(pEnd - pStart, &fIsIncluded)); in DMAdaptMetric_ParMmg_Plex() 140 for (f = pStart, bdSize = 0, numFaceTags = 0; f < pEnd; ++f) { in DMAdaptMetric_ParMmg_Plex() 152 …for (c = 0; c < nnbrs; ++c) fIsIncluded[f - pStart] = fIsIncluded[f - pStart] || !cIsLeaf[nbrs[c]]; in DMAdaptMetric_ParMmg_Plex() 153 if (!fIsIncluded[f - pStart]) continue; in DMAdaptMetric_ParMmg_Plex() 164 for (f = pStart, bdSize = 0, numFaceTags = 0; f < pEnd; ++f) { in DMAdaptMetric_ParMmg_Plex() 167 if (!fIsIncluded[f - pStart]) continue; in DMAdaptMetric_ParMmg_Plex() 221 PetscCall(DMPlexGetChart(dm, &pStart, &pEnd)); in DMAdaptMetric_ParMmg_Plex() 222 for (i = 0, rootDegreeCnt = 0; i < pEnd - pStart; ++i) rootDegreeCnt += degree[i]; in DMAdaptMetric_ParMmg_Plex() [all …]
|
| /petsc/src/dm/impls/plex/tutorials/ |
| H A D | ex17.c | 9 PetscInt dim, pStart, pEnd, pid; in ComputeVolume() local 20 PetscCall(DMPlexGetHeightStratum(dm, 0, &pStart, &pEnd)); in ComputeVolume() 21 for (PetscInt p = pStart; p < pEnd; ++p) { in ComputeVolume() 28 PetscCall(DMPlexGetHeightStratum(dm, 1, &pStart, &pEnd)); in ComputeVolume() 29 for (PetscInt p = pStart; p < pEnd; ++p) { in ComputeVolume()
|
| /petsc/src/vec/is/section/interface/hdf5/ |
| H A D | sectionhdf5.c | 10 PetscInt pStart, pEnd, p, n; in PetscSectionView_HDF5_SingleField() local 17 PetscCall(PetscSectionGetChart(s, &pStart, &pEnd)); in PetscSectionView_HDF5_SingleField() 20 for (p = pStart, n = 0, m = 0; p < pEnd; ++p) { in PetscSectionView_HDF5_SingleField() 37 for (p = pStart, n = 0, m = 0; p < pEnd; ++p) { in PetscSectionView_HDF5_SingleField() 129 PetscInt pStart, pEnd, p, M, m, i, cdof; in PetscSectionLoad_HDF5_SingleField_SetConstraintIndices() local 139 PetscCall(PetscSectionGetChart(s, &pStart, &pEnd)); in PetscSectionLoad_HDF5_SingleField_SetConstraintIndices() 144 for (p = pStart, m = 0; p < pEnd; ++p) { in PetscSectionLoad_HDF5_SingleField_SetConstraintIndices() 146 for (i = 0; i < cdof; ++i) coffsets[m++] = coffs[p - pStart] + i; in PetscSectionLoad_HDF5_SingleField_SetConstraintIndices() 165 for (p = pStart, m = 0; p < pEnd; ++p) { in PetscSectionLoad_HDF5_SingleField_SetConstraintIndices() 177 PetscInt pStart, pEnd, p, N, n, M, m; in PetscSectionLoad_HDF5_SingleField() local [all …]
|
| /petsc/src/binding/petsc4py/demo/legacy/dmplex/ |
| H A D | distribute_field.py | 34 pStart, pEnd = plex.getChart() variable 36 print("pStart, pEnd: ", pStart, pEnd) 59 origVec.setValues(list(range(pStart, pEnd)),list(range(pStart,pEnd)))
|
| /petsc/src/vec/vec/utils/ |
| H A D | vsection.c | 75 const PetscInt p = point - s->pStart; in VecGetValuesSection() 108 const PetscInt p = point - s->pStart; in VecSetValuesSection() 195 …ion section, PetscSection sectionGlobal, Vec v, PetscInt field, PetscInt pStart, PetscInt pEnd, IS… in PetscSectionGetField_Internal() argument 202 for (p = pStart; p < pEnd; ++p) { in PetscSectionGetField_Internal() 210 for (p = pStart; p < pEnd; ++p) { in PetscSectionGetField_Internal() 233 …ion section, PetscSection sectionGlobal, Vec v, PetscInt field, PetscInt pStart, PetscInt pEnd, IS… in PetscSectionRestoreField_Internal() argument 259 PetscInt Nf, f, pStart, pEnd; in PetscSectionVecNorm() local 269 PetscCall(PetscSectionGetChart(s, &pStart, &pEnd)); in PetscSectionVecNorm() 274 PetscCall(PetscSectionGetField_Internal(s, gs, x, f, pStart, pEnd, &is, &subv)); in PetscSectionVecNorm() 276 PetscCall(PetscSectionRestoreField_Internal(s, gs, x, f, pStart, pEnd, &is, &subv)); in PetscSectionVecNorm()
|
| /petsc/src/dm/label/ |
| H A D | dmlabel.c | 44 (*label)->pStart = -1; in DMLabelCreate() 105 …pStart) && !(point >= label->pEnd), PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Label point %" Pet… in DMLabelMakeValid_Private() 106 PetscCall(PetscBTSet(label->bt, point - label->pStart)); in DMLabelMakeValid_Private() 431 …dex has been calculated in [%" PetscInt_FMT ", %" PetscInt_FMT ")\n", label->pStart, label->pEnd)); in DMLabelView_Concrete_Ascii() 535 label->pStart = -1; in DMLabelReset() 619 (*labelnew)->pStart = -1; in DMLabelDuplicate() 750 PetscInt pStart = PETSC_INT_MAX, pEnd = -1, v; in DMLabelComputeIndex() local 763 pStart = PetscMin(point, pStart); in DMLabelComputeIndex() 768 label->pStart = pStart == PETSC_INT_MAX ? -1 : pStart; in DMLabelComputeIndex() 770 PetscCall(DMLabelCreateIndex(label, label->pStart, label->pEnd)); in DMLabelComputeIndex() [all …]
|
| /petsc/src/dm/label/tutorials/ |
| H A D | ex1.c | 180 PetscInt p, pStart, pEnd; in main() local 181 PetscCall(DMPlexGetChart(dm, &pStart, &pEnd)); in main() 189 pEnd = PetscMin(pEnd, pStart + 5); in main() 190 for (p = pStart; p < pEnd; p++) { in main() 213 PetscInt p, pStart, pEnd; in main() local 230 PetscCall(DMLabelGetBounds(label1, &pStart, &pEnd)); in main() 232 for (p = pStart; p < pEnd; p++) { in main() 240 for (p = pStart; p < pEnd; p++) { in main() 297 PetscInt pStart, pEnd, lStart = 5, lEnd = 19; in main() local 299 PetscCall(DMPlexGetChart(dm, &pStart, &pEnd)); in main() [all …]
|