Lines Matching refs:p
98 PetscInt numFields, f, c, pStart, pEnd, p; in PetscSectionCopy_Internal() local
127 for (p = pStart; p < pEnd; ++p) { in PetscSectionCopy_Internal()
129 …PetscBool force_constrained = (PetscBool)(constrained_dofs && PetscBTLookup(constrained_dofs, p - … in PetscSectionCopy_Internal()
131 PetscCall(PetscSectionGetDof(section, p, &dof)); in PetscSectionCopy_Internal()
132 PetscCall(PetscSectionSetDof(newSection, p, dof)); in PetscSectionCopy_Internal()
134 else PetscCall(PetscSectionGetConstraintDof(section, p, &cdof)); in PetscSectionCopy_Internal()
135 if (cdof) PetscCall(PetscSectionSetConstraintDof(newSection, p, cdof)); in PetscSectionCopy_Internal()
137 PetscCall(PetscSectionGetFieldDof(section, p, f, &dof)); in PetscSectionCopy_Internal()
138 PetscCall(PetscSectionSetFieldDof(newSection, p, f, dof)); in PetscSectionCopy_Internal()
141 else PetscCall(PetscSectionGetFieldConstraintDof(section, p, f, &fcdof)); in PetscSectionCopy_Internal()
142 if (fcdof) PetscCall(PetscSectionSetFieldConstraintDof(newSection, p, f, fcdof)); 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()
153 PetscCall(PetscSectionGetOffset(section, p, &off)); in PetscSectionCopy_Internal()
154 PetscCall(PetscSectionSetOffset(newSection, p, off)); in PetscSectionCopy_Internal()
155 PetscCall(PetscSectionGetConstraintDof(newSection, p, &cdof)); in PetscSectionCopy_Internal()
158 else PetscCall(PetscSectionGetConstraintIndices(section, p, &cInd)); in PetscSectionCopy_Internal()
159 PetscCall(PetscSectionSetConstraintIndices(newSection, p, cInd)); in PetscSectionCopy_Internal()
161 PetscCall(PetscSectionGetFieldOffset(section, p, f, &off)); in PetscSectionCopy_Internal()
162 PetscCall(PetscSectionSetFieldOffset(newSection, p, f, off)); in PetscSectionCopy_Internal()
163 PetscCall(PetscSectionGetFieldConstraintDof(newSection, p, f, &fcdof)); in PetscSectionCopy_Internal()
166 else PetscCall(PetscSectionGetFieldConstraintIndices(section, p, f, &cInd)); in PetscSectionCopy_Internal()
167 PetscCall(PetscSectionSetFieldConstraintIndices(newSection, p, f, cInd)); in PetscSectionCopy_Internal()
252 PetscInt pStart, pEnd, nfields, ncdof, nfcdof, p, f, n1, n2; in PetscSectionCompare() local
281 for (p = pStart; p < pEnd; ++p) { in PetscSectionCompare()
282 PetscCall(PetscSectionGetOffset(s1, p, &n1)); in PetscSectionCompare()
283 PetscCall(PetscSectionGetOffset(s2, p, &n2)); in PetscSectionCompare()
286 PetscCall(PetscSectionGetDof(s1, p, &n1)); in PetscSectionCompare()
287 PetscCall(PetscSectionGetDof(s2, p, &n2)); in PetscSectionCompare()
290 PetscCall(PetscSectionGetConstraintDof(s1, p, &ncdof)); in PetscSectionCompare()
291 PetscCall(PetscSectionGetConstraintDof(s2, p, &n2)); in PetscSectionCompare()
294 PetscCall(PetscSectionGetConstraintIndices(s1, p, &idx1)); in PetscSectionCompare()
295 PetscCall(PetscSectionGetConstraintIndices(s2, p, &idx2)); in PetscSectionCompare()
309 for (p = pStart; p < pEnd; ++p) { in PetscSectionCompare()
310 PetscCall(PetscSectionGetFieldOffset(s1, p, f, &n1)); in PetscSectionCompare()
311 PetscCall(PetscSectionGetFieldOffset(s2, p, f, &n2)); in PetscSectionCompare()
314 PetscCall(PetscSectionGetFieldDof(s1, p, f, &n1)); in PetscSectionCompare()
315 PetscCall(PetscSectionGetFieldDof(s2, p, f, &n2)); in PetscSectionCompare()
318 PetscCall(PetscSectionGetFieldConstraintDof(s1, p, f, &nfcdof)); in PetscSectionCompare()
319 PetscCall(PetscSectionGetFieldConstraintDof(s2, p, f, &n2)); in PetscSectionCompare()
322 PetscCall(PetscSectionGetFieldConstraintIndices(s1, p, f, &idx1)); in PetscSectionCompare()
323 PetscCall(PetscSectionGetFieldConstraintIndices(s2, p, f, &idx2)); in PetscSectionCompare()
1313 for (PetscInt p = 0; p < s->pEnd - s->pStart; ++p) { in PetscSectionSetUp() local
1314 const PetscInt q = pind ? pind[p] : p; in PetscSectionSetUp()
1332 for (PetscInt p = 0; p < s->pEnd - s->pStart; ++p) { in PetscSectionSetUp() local
1333 const PetscInt q = pind ? pind[p] : p; in PetscSectionSetUp()
1340 for (PetscInt p = 0; p < s->pEnd - s->pStart; ++p) s->atlasOff[p] = -1; in PetscSectionSetUp() local
1381 PetscInt p; in PetscSectionGetMaxDof() local
1388 for (p = 0; p < s->pEnd - s->pStart; ++p) s->maxDof = PetscMax(s->maxDof, s->atlasDof[p]); in PetscSectionGetMaxDof()
1416 for (PetscInt p = 0; p < s->pEnd - s->pStart; ++p) n += s->atlasDof[p] > 0 ? s->atlasDof[p] : 0; in PetscSectionGetStorageSize() local
1443 for (PetscInt p = 0; p < s->pEnd - s->pStart; ++p) { in PetscSectionGetConstrainedStorageSize() local
1444 const PetscInt cdof = s->bc ? s->bc->atlasDof[p] : 0; in PetscSectionGetConstrainedStorageSize()
1445 n += s->atlasDof[p] > 0 ? s->atlasDof[p] - cdof : 0; in PetscSectionGetConstrainedStorageSize()
1480 PetscInt pStart, pEnd, p, dof, cdof, off, globalOff = 0, nroots, nlocal, maxleaf; in PetscSectionCreateGlobalSection() local
1509 for (p = pStart; p < pEnd; ++p) { in PetscSectionCreateGlobalSection()
1510 PetscCall(PetscSectionGetDof(s, p, &dof)); in PetscSectionCreateGlobalSection()
1511 PetscCall(PetscSectionSetDof(gs, p, dof)); in PetscSectionCreateGlobalSection()
1512 PetscCall(PetscSectionGetConstraintDof(s, p, &cdof)); in PetscSectionCreateGlobalSection()
1513 if (!includeConstraints && cdof > 0) PetscCall(PetscSectionSetConstraintDof(gs, p, cdof)); in PetscSectionCreateGlobalSection()
1514 if (neg) neg[p] = -(dof + 1); in PetscSectionCreateGlobalSection()
1522 for (p = pStart; p < pEnd; ++p) { in PetscSectionCreateGlobalSection()
1523 if (recv[p] < 0) { in PetscSectionCreateGlobalSection()
1524 gs->atlasDof[p - pStart] = recv[p]; in PetscSectionCreateGlobalSection()
1525 PetscCall(PetscSectionGetDof(s, p, &dof)); in PetscSectionCreateGlobalSection()
1526 …p] + 1) == dof, PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "Global dof %" PetscInt_FMT " for point %" P… in PetscSectionCreateGlobalSection()
1532 for (p = 0, off = 0; p < pEnd - pStart; ++p) { in PetscSectionCreateGlobalSection()
1533 const PetscInt q = pind ? pind[p] : p; in PetscSectionCreateGlobalSection()
1543 for (p = pStart, off = 0; p < pEnd; ++p) { in PetscSectionCreateGlobalSection()
1544 gs->atlasOff[p - pStart] += globalOff; in PetscSectionCreateGlobalSection()
1545 if (neg) neg[p] = -(gs->atlasOff[p - pStart] + 1); in PetscSectionCreateGlobalSection()
1553 for (p = pStart; p < pEnd; ++p) { in PetscSectionCreateGlobalSection()
1554 if (recv[p] < 0) gs->atlasOff[p - pStart] = recv[p]; in PetscSectionCreateGlobalSection()
1568 for (p = pStart; p < pEnd; ++p) { in PetscSectionCreateGlobalSection()
1569 PetscCall(PetscSectionGetOffset(gs, p, &off)); in PetscSectionCreateGlobalSection()
1571 PetscCall(PetscSectionGetFieldConstraintDof(s, p, f, &cdof)); in PetscSectionCreateGlobalSection()
1572 … if (!includeConstraints && cdof > 0) PetscCall(PetscSectionSetFieldConstraintDof(gs, p, f, cdof)); in PetscSectionCreateGlobalSection()
1573 PetscCall(PetscSectionGetFieldDof(s, p, f, &dof)); in PetscSectionCreateGlobalSection()
1574 PetscCall(PetscSectionSetFieldDof(gs, p, f, off < 0 ? -(dof + 1) : dof)); in PetscSectionCreateGlobalSection()
1575 PetscCall(PetscSectionSetFieldOffset(gs, p, f, foff)); in PetscSectionCreateGlobalSection()
1576 PetscCall(PetscSectionGetFieldConstraintDof(gs, p, f, &cdof)); in PetscSectionCreateGlobalSection()
1625 PetscInt pStart, pEnd, p, e, dof, cdof, globalOff = 0, nroots; in PetscSectionCreateGlobalSectionCensored() local
1646 for (p = pStart; p < pEnd; ++p) { in PetscSectionCreateGlobalSectionCensored()
1648 if ((p >= excludes[e * 2 + 0]) && (p < excludes[e * 2 + 1])) { in PetscSectionCreateGlobalSectionCensored()
1649 PetscCall(PetscSectionSetDof(*gsection, p, 0)); in PetscSectionCreateGlobalSectionCensored()
1654 PetscCall(PetscSectionGetDof(s, p, &dof)); in PetscSectionCreateGlobalSectionCensored()
1655 PetscCall(PetscSectionSetDof(*gsection, p, dof)); in PetscSectionCreateGlobalSectionCensored()
1656 PetscCall(PetscSectionGetConstraintDof(s, p, &cdof)); in PetscSectionCreateGlobalSectionCensored()
1657 … if (!includeConstraints && cdof > 0) PetscCall(PetscSectionSetConstraintDof(*gsection, p, cdof)); in PetscSectionCreateGlobalSectionCensored()
1658 if (neg) neg[p] = -(dof + 1); in PetscSectionCreateGlobalSectionCensored()
1665 for (p = pStart; p < pEnd; ++p) { in PetscSectionCreateGlobalSectionCensored()
1666 if (tmpOff[p] < 0) (*gsection)->atlasDof[p - pStart] = tmpOff[p]; in PetscSectionCreateGlobalSectionCensored()
1672 for (p = 0, off = 0; p < pEnd - pStart; ++p) { in PetscSectionCreateGlobalSectionCensored()
1673 const PetscInt q = pind ? pind[p] : p; in PetscSectionCreateGlobalSectionCensored()
1681 for (p = 0, off = 0; p < pEnd - pStart; ++p) { in PetscSectionCreateGlobalSectionCensored()
1682 (*gsection)->atlasOff[p] += globalOff; in PetscSectionCreateGlobalSectionCensored()
1683 if (neg) neg[p + pStart] = -((*gsection)->atlasOff[p] + 1); in PetscSectionCreateGlobalSectionCensored()
1692 for (p = pStart; p < pEnd; ++p) { in PetscSectionCreateGlobalSectionCensored()
1693 if (tmpOff[p] < 0) (*gsection)->atlasOff[p - pStart] = tmpOff[p]; in PetscSectionCreateGlobalSectionCensored()
1737 PetscInt pStart, pEnd, p, localSize = 0; in PetscSectionGetPointLayout() local
1741 for (p = pStart; p < pEnd; ++p) { in PetscSectionGetPointLayout()
1744 PetscCall(PetscSectionGetDof(s, p, &dof)); in PetscSectionGetPointLayout()
1784 PetscInt pStart, pEnd, p, localSize = 0; in PetscSectionGetValueLayout() local
1790 for (p = pStart; p < pEnd; ++p) { in PetscSectionGetValueLayout()
1793 PetscCall(PetscSectionGetDof(s, p, &dof)); in PetscSectionGetValueLayout()
1794 PetscCall(PetscSectionGetConstraintDof(s, p, &cdof)); in PetscSectionGetValueLayout()
1983 PetscInt os = 0, oe = 0, pStart, pEnd, p; in PetscSectionGetOffsetRange() local
1992 for (p = 0; p < pEnd - pStart; ++p) { in PetscSectionGetOffsetRange()
1993 PetscInt dof = s->atlasDof[p], off = s->atlasOff[p]; in PetscSectionGetOffsetRange()
2029 PetscInt nF, f, c, pStart, pEnd, p, maxCdof = 0; in PetscSectionCreateSubsection() local
2058 for (p = pStart; p < pEnd; ++p) { in PetscSectionCreateSubsection()
2062 PetscCall(PetscSectionGetFieldDof(s, p, fields[f], &fdof)); in PetscSectionCreateSubsection()
2063 PetscCall(PetscSectionSetFieldDof(*subs, p, f, fdof)); in PetscSectionCreateSubsection()
2064 PetscCall(PetscSectionGetFieldConstraintDof(s, p, fields[f], &cfdof)); in PetscSectionCreateSubsection()
2065 if (cfdof) PetscCall(PetscSectionSetFieldConstraintDof(*subs, p, f, cfdof)); in PetscSectionCreateSubsection()
2069 PetscCall(PetscSectionSetDof(*subs, p, dof)); in PetscSectionCreateSubsection()
2070 if (cdof) PetscCall(PetscSectionSetConstraintDof(*subs, p, cdof)); in PetscSectionCreateSubsection()
2086 for (p = pStart; p < pEnd; ++p) { in PetscSectionCreateSubsection()
2089 PetscCall(PetscSectionGetConstraintDof(*subs, p, &cdof)); in PetscSectionCreateSubsection()
2095 PetscCall(PetscSectionGetFieldDof(s, p, fields[f], &fdof)); in PetscSectionCreateSubsection()
2096 PetscCall(PetscSectionGetFieldConstraintDof(s, p, fields[f], &cfdof)); in PetscSectionCreateSubsection()
2097 PetscCall(PetscSectionGetFieldConstraintIndices(s, p, fields[f], &oldIndices)); in PetscSectionCreateSubsection()
2098 PetscCall(PetscSectionSetFieldConstraintIndices(*subs, p, f, oldIndices)); in PetscSectionCreateSubsection()
2103 PetscCall(PetscSectionSetConstraintIndices(*subs, p, indices)); in PetscSectionCreateSubsection()
2159 for (PetscInt p = pStart; p < pEnd; ++p) { in PetscSectionCreateComponentSubsection() local
2162 PetscCall(PetscSectionGetDof(s, p, &dof)); in PetscSectionCreateComponentSubsection()
2164 PetscCall(PetscSectionGetFieldConstraintDof(s, p, 0, &cfdof)); in PetscSectionCreateComponentSubsection()
2165 PetscCall(PetscSectionGetConstraintDof(s, p, &cdof)); in PetscSectionCreateComponentSubsection()
2167 PetscCall(PetscSectionSetFieldDof(*subs, p, 0, len)); in PetscSectionCreateComponentSubsection()
2168 PetscCall(PetscSectionSetDof(*subs, p, len)); in PetscSectionCreateComponentSubsection()
2198 PetscInt Nf = 0, f, pStart = PETSC_INT_MAX, pEnd = 0, p, maxCdof = 0, i; in PetscSectionCreateSupersection() local
2232 for (p = pStart; p < pEnd; ++p) { in PetscSectionCreateSupersection()
2241 if ((p < pStarti) || (p >= pEndi)) continue; in PetscSectionCreateSupersection()
2243 PetscCall(PetscSectionGetFieldDof(s[i], p, fi, &fdof)); in PetscSectionCreateSupersection()
2244 PetscCall(PetscSectionAddFieldDof(*supers, p, f, fdof)); in PetscSectionCreateSupersection()
2245 PetscCall(PetscSectionGetFieldConstraintDof(s[i], p, fi, &cfdof)); in PetscSectionCreateSupersection()
2246 if (cfdof) PetscCall(PetscSectionAddFieldConstraintDof(*supers, p, f, cfdof)); in PetscSectionCreateSupersection()
2251 PetscCall(PetscSectionSetDof(*supers, p, dof)); in PetscSectionCreateSupersection()
2252 if (cdof) PetscCall(PetscSectionSetConstraintDof(*supers, p, cdof)); in PetscSectionCreateSupersection()
2260 for (p = pStart; p < pEnd; ++p) { in PetscSectionCreateSupersection()
2263 PetscCall(PetscSectionGetConstraintDof(*supers, p, &cdof)); in PetscSectionCreateSupersection()
2273 if ((p < pStarti) || (p >= pEndi)) continue; in PetscSectionCreateSupersection()
2275 PetscCall(PetscSectionGetFieldDof(s[i], p, fi, &fdof)); in PetscSectionCreateSupersection()
2276 PetscCall(PetscSectionGetFieldConstraintDof(s[i], p, fi, &cfdof)); in PetscSectionCreateSupersection()
2277 PetscCall(PetscSectionGetFieldConstraintIndices(s[i], p, fi, &oldIndices)); in PetscSectionCreateSupersection()
2279 PetscCall(PetscSectionSetFieldConstraintIndices(*supers, p, f, &indices[numConst])); in PetscSectionCreateSupersection()
2283 PetscCall(PetscSectionGetDof(s[i], p, &dof)); in PetscSectionCreateSupersection()
2286 PetscCall(PetscSectionSetConstraintIndices(*supers, p, indices)); in PetscSectionCreateSupersection()
2298 PetscInt numFields, f, c, numSubpoints = 0, pStart, pEnd, p, spStart, spEnd, subp; in PetscSectionCreateSubplexSection_Private() local
2343 for (p = pStart; p < pEnd; ++p) { in PetscSectionCreateSubplexSection_Private()
2346 PetscCall(PetscFindInt(p, numSubpoints, spoints ? spoints : points, &subp)); in PetscSectionCreateSubplexSection_Private()
2348 if (!renumberPoints) subp = p; in PetscSectionCreateSubplexSection_Private()
2351 PetscCall(PetscSectionGetFieldDof(s, p, f, &fdof)); in PetscSectionCreateSubplexSection_Private()
2353 PetscCall(PetscSectionGetFieldConstraintDof(s, p, f, &cfdof)); in PetscSectionCreateSubplexSection_Private()
2356 PetscCall(PetscSectionGetDof(s, p, &dof)); in PetscSectionCreateSubplexSection_Private()
2358 PetscCall(PetscSectionGetConstraintDof(s, p, &cdof)); in PetscSectionCreateSubplexSection_Private()
2363 for (p = pStart; p < pEnd; ++p) { in PetscSectionCreateSubplexSection_Private()
2366 PetscCall(PetscFindInt(p, numSubpoints, spoints ? spoints : points, &subp)); in PetscSectionCreateSubplexSection_Private()
2368 if (!renumberPoints) subp = p; in PetscSectionCreateSubplexSection_Private()
2371 PetscCall(PetscSectionGetFieldOffset(s, p, f, &foff)); in PetscSectionCreateSubplexSection_Private()
2374 PetscCall(PetscSectionGetOffset(s, p, &off)); in PetscSectionCreateSubplexSection_Private()
2461 PetscInt p; in PetscSectionView_ASCII() local
2468 for (p = 0; p < s->pEnd - s->pStart; ++p) { in PetscSectionView_ASCII()
2469 if (s->bc && s->bc->atlasDof[p] > 0) { in PetscSectionView_ASCII()
2471 …etscInt_FMT " offset %3" PetscInt_FMT " constrained", p + s->pStart, s->atlasDof[p], s->atlasOff[p… in PetscSectionView_ASCII()
2473 … b < s->bc->atlasDof[p]; ++b) PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, " %" PetscInt_F… in PetscSectionView_ASCII()
2477 … dof %2" PetscInt_FMT " offset %3" PetscInt_FMT "\n", p + s->pStart, s->atlasDof[p], s->atlasOff[p… in PetscSectionView_ASCII()
2668 PetscInt p, i; in PetscSectionArrayView_ASCII_Internal() local
2675 for (p = 0; p < s->pEnd - s->pStart; ++p) { in PetscSectionArrayView_ASCII_Internal()
2676 if (s->bc && (s->bc->atlasDof[p] > 0)) { in PetscSectionArrayView_ASCII_Internal()
2679 …MT ") dof %2" PetscInt_FMT " offset %3" PetscInt_FMT, p + s->pStart, s->atlasDof[p], s->atlasOff[p… in PetscSectionArrayView_ASCII_Internal()
2680 …for (i = s->atlasOff[p]; i < s->atlasOff[p] + s->atlasDof[p]; ++i) PetscCall(PrintArrayElement(arr… in PetscSectionArrayView_ASCII_Internal()
2682 … b < s->bc->atlasDof[p]; ++b) PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, " %" PetscInt_F… in PetscSectionArrayView_ASCII_Internal()
2685 …MT ") dof %2" PetscInt_FMT " offset %3" PetscInt_FMT, p + s->pStart, s->atlasDof[p], s->atlasOff[p… in PetscSectionArrayView_ASCII_Internal()
2686 …for (i = s->atlasOff[p]; i < s->atlasOff[p] + s->atlasDof[p]; ++i) PetscCall(PrintArrayElement(arr… in PetscSectionArrayView_ASCII_Internal()
2841 const PetscInt p = point - s->pStart; in VecIntGetValuesSection_Private() local
2845 *values = &baseArray[s->atlasOff[p]]; in VecIntGetValuesSection_Private()
2852 const PetscInt p = point - s->pStart; in VecIntSetValuesSection_Private() local
2858 PetscCall(PetscSectionGetConstraintDof(s, p, &cDim)); in VecIntSetValuesSection_Private()
2859 array = &baseArray[s->atlasOff[p]]; in VecIntSetValuesSection_Private()
2862 const PetscInt dim = s->atlasDof[p]; in VecIntSetValuesSection_Private()
2875 const PetscInt dim = s->field[field]->atlasDof[p]; in VecIntSetValuesSection_Private()
2883 const PetscInt dim = s->atlasDof[p]; in VecIntSetValuesSection_Private()
2913 const PetscInt dim = s->field[field]->atlasDof[p]; /* PetscSectionGetFieldDof() */ in VecIntSetValuesSection_Private()
2914 … const PetscInt tDim = s->field[field]->bc->atlasDof[p]; /* PetscSectionGetFieldConstraintDof() */ in VecIntSetValuesSection_Private()
3094 PetscInt numFields, f, c, numPoints, pStart, pEnd, p; in PetscSectionPermute() local
3121 for (p = pStart; p < pEnd; ++p) { in PetscSectionPermute()
3124 PetscCall(PetscSectionGetDof(s, p, &dof)); in PetscSectionPermute()
3125 PetscCall(PetscSectionSetDof(sNew, perm[p], dof)); in PetscSectionPermute()
3126 PetscCall(PetscSectionGetConstraintDof(s, p, &cdof)); in PetscSectionPermute()
3127 if (cdof) PetscCall(PetscSectionSetConstraintDof(sNew, perm[p], cdof)); in PetscSectionPermute()
3129 PetscCall(PetscSectionGetFieldDof(s, p, f, &dof)); in PetscSectionPermute()
3130 PetscCall(PetscSectionSetFieldDof(sNew, perm[p], f, dof)); in PetscSectionPermute()
3131 PetscCall(PetscSectionGetFieldConstraintDof(s, p, f, &cdof)); in PetscSectionPermute()
3132 if (cdof) PetscCall(PetscSectionSetFieldConstraintDof(sNew, perm[p], f, cdof)); in PetscSectionPermute()
3136 for (p = pStart; p < pEnd; ++p) { in PetscSectionPermute()
3140 PetscCall(PetscSectionGetConstraintDof(s, p, &cdof)); in PetscSectionPermute()
3142 PetscCall(PetscSectionGetConstraintIndices(s, p, &cind)); in PetscSectionPermute()
3143 PetscCall(PetscSectionSetConstraintIndices(sNew, perm[p], cind)); in PetscSectionPermute()
3146 PetscCall(PetscSectionGetFieldConstraintDof(s, p, f, &cdof)); in PetscSectionPermute()
3148 PetscCall(PetscSectionGetFieldConstraintIndices(s, p, f, &cind)); in PetscSectionPermute()
3149 PetscCall(PetscSectionSetFieldConstraintIndices(sNew, perm[p], f, cind)); in PetscSectionPermute()
3818 SymWorkLink *p, link; in PetscSectionRestorePointSyms() local
3820 for (p = &sym->workout; (link = *p); p = &link->next) { in PetscSectionRestorePointSyms()
3822 *p = link->next; in PetscSectionRestorePointSyms()