78 …scSectionSelectFields_Private(PetscSection s, PetscSection gs, PetscInt numFields, const PetscInt …  in PetscSectionSelectFields_Private()  argument
91     for (PetscInt f = 0, off = 0; f < numFields; ++f) {  in PetscSectionSelectFields_Private()
101     for (PetscInt f = 0; f < numFields; ++f) {  in PetscSectionSelectFields_Private()
117       for (PetscInt f = 0; f < numFields; ++f) {  in PetscSectionSelectFields_Private()
175       for (PetscInt f = 0; f < numFields; ++f) {  in PetscSectionSelectFields_Private()
234 static PetscErrorCode DMSelectFields_Private(DM dm, PetscSection section, PetscInt numFields, const…  in DMSelectFields_Private()  argument
244 …PetscCall(PetscCalloc2(numFields, &(*subdm)->nullspaceConstructors, numFields, &(*subdm)->nearnull…  in DMSelectFields_Private()
249 …PetscCheck(numFields == 1, PETSC_COMM_SELF, PETSC_ERR_SUP, "We only support a single field for com…  in DMSelectFields_Private()
287 …if (dm->coarseMesh) PetscCall(DMCreateSubDM(dm->coarseMesh, numFields, fields, NULL, &(*subdm)->co…  in DMSelectFields_Private()
290   PetscCall(PetscSectionCreateSubsection(section, numFields, fields, &subsection));  in DMSelectFields_Private()
294     PetscCall(DMSetNumFields(*subdm, numFields));  in DMSelectFields_Private()
295     for (PetscInt f = 0; f < numFields; ++f) {  in DMSelectFields_Private()
303     if (numFields == 1 && is) {  in DMSelectFields_Private()
325           for (g = 0; g < numFields; ++g)  in DMSelectFields_Private()
327           if (g < numFields) break;  in DMSelectFields_Private()
332         PetscCall(PetscDSCopyBoundary(dm->probs[d].ds, numFields, fields, (*subdm)->probs[e].ds));  in DMSelectFields_Private()
340 …      PetscCall(ISCreateGeneral(PETSC_COMM_SELF, numFields, fields, PETSC_USE_POINTER, &infields));  in DMSelectFields_Private()
364 …PetscCall(PetscDSSelectDiscretizations(dm->probs[0].ds, numFields, fields, PETSC_DETERMINE, PETSC_…  in DMSelectFields_Private()
365       PetscCall(PetscDSSelectEquations(dm->probs[0].ds, numFields, fields, (*subdm)->probs[0].ds));  in DMSelectFields_Private()
368   for (PetscInt f = 0; f < numFields; ++f) {  in DMSelectFields_Private()
385 …if (dm->coarseMesh) PetscCall(DMCreateSubDM(dm->coarseMesh, numFields, fields, NULL, &(*subdm)->co…  in DMSelectFields_Private()
412 PetscErrorCode DMCreateSectionSubDM(DM dm, PetscInt numFields, const PetscInt fields[], const Petsc…  in DMCreateSectionSubDM()  argument
418   if (!numFields) PetscFunctionReturn(PETSC_SUCCESS);  in DMCreateSectionSubDM()
424 …numFields <= Nf, PetscObjectComm((PetscObject)dm), PETSC_ERR_ARG_WRONG, "Number of requested field…  in DMCreateSectionSubDM()
426 …if (is) PetscCall(PetscSectionSelectFields_Private(section, sectionGlobal, numFields, fields, numC…  in DMCreateSectionSubDM()
427 …if (subdm) PetscCall(DMSelectFields_Private(dm, section, numFields, fields, numComps, comps, is, s…  in DMCreateSectionSubDM()