3092   PetscSection    s = section, sNew;  in PetscSectionPermute()  local
3100   PetscCall(PetscSectionCreate(PetscObjectComm((PetscObject)s), &sNew));  in PetscSectionPermute()
3102   if (numFields) PetscCall(PetscSectionSetNumFields(sNew, numFields));  in PetscSectionPermute()
3108     PetscCall(PetscSectionSetFieldName(sNew, f, name));  in PetscSectionPermute()
3110     PetscCall(PetscSectionSetFieldComponents(sNew, f, numComp));  in PetscSectionPermute()
3113       PetscCall(PetscSectionSetComponentName(sNew, f, c, name));  in PetscSectionPermute()
3119   PetscCall(PetscSectionSetChart(sNew, pStart, pEnd));  in PetscSectionPermute()
3125     PetscCall(PetscSectionSetDof(sNew, perm[p], dof));  in PetscSectionPermute()
3127     if (cdof) PetscCall(PetscSectionSetConstraintDof(sNew, perm[p], cdof));  in PetscSectionPermute()
3130       PetscCall(PetscSectionSetFieldDof(sNew, perm[p], f, dof));  in PetscSectionPermute()
3132       if (cdof) PetscCall(PetscSectionSetFieldConstraintDof(sNew, perm[p], f, cdof));  in PetscSectionPermute()
3135   PetscCall(PetscSectionSetUp(sNew));  in PetscSectionPermute()
3143       PetscCall(PetscSectionSetConstraintIndices(sNew, perm[p], cind));  in PetscSectionPermute()
3149         PetscCall(PetscSectionSetFieldConstraintIndices(sNew, perm[p], f, cind));  in PetscSectionPermute()
3154   *sectionNew = sNew;  in PetscSectionPermute()