Lines Matching refs:closure
136 PetscInt *closure = NULL; in DMPlexMarkBoundaryFaces_Internal() local
140 PetscCall(DMPlexGetTransitiveClosure(dm, f, PETSC_TRUE, &clSize, &closure)); in DMPlexMarkBoundaryFaces_Internal()
142 PetscCall(DMLabelGetValue(label, closure[cl], &cval)); in DMPlexMarkBoundaryFaces_Internal()
148 PetscCall(DMPlexRestoreTransitiveClosure(dm, f, PETSC_TRUE, &clSize, &closure)); in DMPlexMarkBoundaryFaces_Internal()
227 PetscInt *closure = NULL; in DMPlexLabelComplete_Internal() local
233 PetscCall(DMPlexGetTransitiveClosure(dm, q, PETSC_TRUE, &closureSize, &closure)); in DMPlexLabelComplete_Internal()
234 … for (c = 0; c < closureSize * 2; c += 2) PetscCall(DMLabelSetValue(label, closure[c], values[v])); in DMPlexLabelComplete_Internal()
235 PetscCall(DMPlexRestoreTransitiveClosure(dm, q, PETSC_TRUE, &closureSize, &closure)); in DMPlexLabelComplete_Internal()
344 PetscInt *closure = NULL; in DMPlexLabelAddCells() local
359 PetscCall(DMPlexGetTransitiveClosure(dm, points[p], PETSC_FALSE, &closureSize, &closure)); in DMPlexLabelAddCells()
361 const PetscInt cell = closure[cl * 2]; in DMPlexLabelAddCells()
367 PetscCall(DMPlexRestoreTransitiveClosure(dm, points[p], PETSC_FALSE, &closureSize, &closure)); in DMPlexLabelAddCells()
416 PetscInt *closure = NULL; in DMPlexLabelAddFaceCells() local
420 PetscCall(DMPlexGetTransitiveClosure(dm, face, PETSC_FALSE, &closureSize, &closure)); in DMPlexLabelAddFaceCells()
422 const PetscInt cell = closure[cl * 2]; in DMPlexLabelAddFaceCells()
428 PetscCall(DMPlexRestoreTransitiveClosure(dm, face, PETSC_FALSE, &closureSize, &closure)); in DMPlexLabelAddFaceCells()
1098 PetscInt *closure = NULL; in DivideCells_Private() local
1103 PetscCall(DMPlexGetTransitiveClosure(dm, cell, PETSC_TRUE, &closureSize, &closure)); in DivideCells_Private()
1107 const PetscInt clp = closure[cl]; in DivideCells_Private()
1150 PetscCall(DMPlexRestoreTransitiveClosure(dm, cell, PETSC_TRUE, &closureSize, &closure)); in DivideCells_Private()
2017 PetscInt *closure = NULL, *inclosure = NULL; in CheckFaultEdge_Private() local
2054 PetscCall(DMPlexGetTransitiveClosure(dm, point, PETSC_TRUE, &Ncl, &closure)); in CheckFaultEdge_Private()
2056 PetscCall(DMLabelGetValue(label, closure[cl], &val)); in CheckFaultEdge_Private()
2077 PetscCall(DMPlexGetTransitiveClosure(dm, point, PETSC_TRUE, &closureSize, &closure)); in CheckFaultEdge_Private()
2079 PetscCall(DMLabelGetValue(label, closure[cl], &valA)); in CheckFaultEdge_Private()
2081 PetscCall(DMPlexGetPointDepth(dm, closure[cl], &dep)); in CheckFaultEdge_Private()
2082 PetscCall(DMLabelSetValue(label, closure[cl], shift2 + dep)); in CheckFaultEdge_Private()
2084 PetscCall(DMPlexGetPointDepth(dm, closure[cl], &dep)); in CheckFaultEdge_Private()
2085 PetscCall(DMLabelClearValue(label, closure[cl], valA)); in CheckFaultEdge_Private()
2086 PetscCall(DMLabelSetValue(label, closure[cl], dep)); in CheckFaultEdge_Private()
2094 PetscCall(DMPlexGetTransitiveClosure(dm, point, PETSC_TRUE, &Ncl, &closure)); in CheckFaultEdge_Private()
2096 PetscCall(DMLabelGetValue(label, closure[cl], &val)); in CheckFaultEdge_Private()
2097 …l(PetscPrintf(PETSC_COMM_SELF, " Point %" PetscInt_FMT ":%" PetscInt_FMT "\n", closure[cl], val)); in CheckFaultEdge_Private()
2101 …tscCall(PetscPrintf(PETSC_COMM_SELF, " Point %" PetscInt_FMT " is being unsplit\n", closure[cl])); in CheckFaultEdge_Private()
2102 PetscCall(DMPlexGetPointDepth(dm, closure[cl], &dep)); in CheckFaultEdge_Private()
2103 PetscCall(DMLabelClearValue(label, closure[cl], val)); in CheckFaultEdge_Private()
2104 PetscCall(DMLabelSetValue(label, closure[cl], shift2 + dep)); in CheckFaultEdge_Private()
2106 PetscCall(DMPlexGetTransitiveClosure(dm, closure[cl], PETSC_TRUE, &Nincl, &inclosure)); in CheckFaultEdge_Private()
2121 PetscCall(DMPlexRestoreTransitiveClosure(dm, 0, PETSC_TRUE, NULL, &closure)); in CheckFaultEdge_Private()
2209 PetscInt *closure = NULL; in DMPlexLabelCohesiveComplete() local
2212 PetscCall(DMPlexGetTransitiveClosure(dm, point, PETSC_TRUE, &closureSize, &closure)); in DMPlexLabelCohesiveComplete()
2214 const PetscInt clp = closure[cl]; in DMPlexLabelCohesiveComplete()
2224 PetscCall(DMPlexRestoreTransitiveClosure(dm, point, PETSC_TRUE, &closureSize, &closure)); in DMPlexLabelCohesiveComplete()
2303 PetscInt *closure = NULL; in DMPlexLabelCohesiveComplete() local
2310 PetscCall(DMPlexGetTransitiveClosure(dm, point, PETSC_TRUE, &closureSize, &closure)); in DMPlexLabelCohesiveComplete()
2312 const PetscInt clp = closure[cl]; in DMPlexLabelCohesiveComplete()
2319 PetscCall(DMPlexRestoreTransitiveClosure(dm, point, PETSC_TRUE, &closureSize, &closure)); in DMPlexLabelCohesiveComplete()
2350 PetscInt *closure = NULL; in DMPlexCheckValidSubmesh_Private() local
2353 PetscCall(DMPlexGetTransitiveClosure(dm, dmpoints[c], PETSC_TRUE, &closureSize, &closure)); in DMPlexCheckValidSubmesh_Private()
2357 if ((closure[cl] < vStart) || (closure[cl] >= vEnd)) continue; in DMPlexCheckValidSubmesh_Private()
2358 PetscCall(DMLabelGetValue(label, closure[cl], &value)); in DMPlexCheckValidSubmesh_Private()
2364 PetscCall(DMPlexRestoreTransitiveClosure(dm, dmpoints[c], PETSC_TRUE, &closureSize, &closure)); in DMPlexCheckValidSubmesh_Private()
2499 PetscInt *closure = NULL; in DMPlexMarkSubmesh_Uninterpolated() local
2506 PetscCall(DMPlexGetTransitiveClosure(dm, cell, PETSC_TRUE, &closureSize, &closure)); in DMPlexMarkSubmesh_Uninterpolated()
2508 const PetscInt point = closure[cl]; in DMPlexMarkSubmesh_Uninterpolated()
2514 if (vertexLoc == value) closure[faceSize++] = point; in DMPlexMarkSubmesh_Uninterpolated()
2524 for (cl = 0; cl < faceSize; ++cl) PetscCall(DMLabelSetValue(subpointMap, closure[cl], 0)); in DMPlexMarkSubmesh_Uninterpolated()
2525 PetscCall(DMPlexGetJoin(dm, faceSize, closure, &numCells, &cells)); in DMPlexMarkSubmesh_Uninterpolated()
2527 PetscCall(DMPlexRestoreJoin(dm, faceSize, closure, &numCells, &cells)); in DMPlexMarkSubmesh_Uninterpolated()
2529 PetscCall(DMPlexRestoreTransitiveClosure(dm, cell, PETSC_TRUE, &closureSize, &closure)); in DMPlexMarkSubmesh_Uninterpolated()
2578 PetscInt *closure = NULL; in DMPlexMarkSubmesh_Interpolated() local
2585 PetscCall(DMPlexGetTransitiveClosure(dm, face, PETSC_TRUE, &closureSize, &closure)); in DMPlexMarkSubmesh_Interpolated()
2587 const PetscInt point = closure[c]; in DMPlexMarkSubmesh_Interpolated()
2600 const PetscInt point = closure[c]; in DMPlexMarkSubmesh_Interpolated()
2614 PetscCall(DMPlexRestoreTransitiveClosure(dm, face, PETSC_TRUE, &closureSize, &closure)); in DMPlexMarkSubmesh_Interpolated()
2694 PetscInt *closure = NULL; in DMPlexMarkCohesiveSubmesh_Interpolated() local
2706 PetscCall(DMPlexGetTransitiveClosure(dm, cone[0], PETSC_TRUE, &closureSize, &closure)); in DMPlexMarkCohesiveSubmesh_Interpolated()
2708 const PetscInt point = closure[cl]; in DMPlexMarkCohesiveSubmesh_Interpolated()
2717 PetscCall(DMPlexRestoreTransitiveClosure(dm, cone[0], PETSC_TRUE, &closureSize, &closure)); in DMPlexMarkCohesiveSubmesh_Interpolated()
3208 PetscInt *closure = NULL; in DMPlexCreateSubmesh_Uninterpolated() local
3211 PetscCall(DMPlexGetTransitiveClosure(dm, cell, PETSC_TRUE, &closureSize, &closure)); in DMPlexCreateSubmesh_Uninterpolated()
3213 const PetscInt point = closure[cl]; in DMPlexCreateSubmesh_Uninterpolated()
3220 closure[faceSize] = point; in DMPlexCreateSubmesh_Uninterpolated()
3227 …if (faceSize == nFV) PetscCall(DMPlexInsertFace_Internal(dm, subdm, faceSize, closure, subface, nu… in DMPlexCreateSubmesh_Uninterpolated()
3228 PetscCall(DMPlexRestoreTransitiveClosure(dm, cell, PETSC_TRUE, &closureSize, &closure)); in DMPlexCreateSubmesh_Uninterpolated()
3425 PetscInt *closure = NULL; in DMPlexCreateSubmeshGeneric_Interpolated() local
3429 PetscCall(DMPlexGetTransitiveClosure(dm, points[p], PETSC_TRUE, &closureSize, &closure)); in DMPlexCreateSubmeshGeneric_Interpolated()
3431 PetscCall(DMLabelGetValue(depth, closure[c], &pdim)); in DMPlexCreateSubmeshGeneric_Interpolated()
3432 PetscCall(DMLabelSetValue(subpointMap, closure[c], pdim)); in DMPlexCreateSubmeshGeneric_Interpolated()
3434 PetscCall(DMPlexRestoreTransitiveClosure(dm, points[p], PETSC_TRUE, &closureSize, &closure)); in DMPlexCreateSubmeshGeneric_Interpolated()
3753 PetscInt *ownedCells, *closure = NULL; in DMPlexCreateSubmeshGeneric_Interpolated() local
3776 PetscCall(DMPlexGetTransitiveClosure(dm, c, PETSC_TRUE, &clSize, &closure)); in DMPlexCreateSubmeshGeneric_Interpolated()
3778 p = closure[cl]; in DMPlexCreateSubmeshGeneric_Interpolated()
3781 PetscCall(DMPlexRestoreTransitiveClosure(dm, c, PETSC_TRUE, &clSize, &closure)); in DMPlexCreateSubmeshGeneric_Interpolated()