Lines Matching defs:numFields
599 PetscInt numFields;
609 PetscCall(PetscSectionGetNumFields(section, &numFields));
610 if (!numFields) {
616 for (f = 0; f < numFields; f++) {
642 PetscInt i, numFields;
650 PetscCall(DMGetNumFields(dm, &numFields));
651 for (i = 0; i < numFields; i++) {
4329 PetscErrorCode DMCreateSubDM_Plex(DM dm, PetscInt numFields, const PetscInt fields[], IS *is, DM *subdm)
4333 PetscCall(DMCreateSectionSubDM(dm, numFields, fields, NULL, NULL, is, subdm));
6524 static inline PetscErrorCode DMPlexVecGetClosure_Fields_Static(DM dm, PetscSection section, PetscInt numPoints, const PetscInt points[], PetscInt numFields, const PetscInt clperm[], const PetscScalar vArray[], PetscInt *size, PetscScalar array[])
6530 for (f = 0; f < numFields; ++f) {
6616 PetscInt depth, numFields, numPoints, asize;
6624 PetscCall(PetscSectionGetNumFields(section, &numFields));
6625 if (depth == 1 && numFields < 2) {
6648 if (numFields > 0) PetscCall(DMPlexVecGetClosure_Fields_Static(dm, section, numPoints, points, numFields, perm, vArray, &size, *values));
6797 PetscInt mdepth, numFields, numPoints, Np = 0, p, clsize, size;
6806 PetscCall(PetscSectionGetNumFields(section, &numFields));
6807 if (mdepth == 1 && numFields < 2) {
6848 if (numFields > 0) PetscCall(DMPlexVecGetClosure_Fields_Static(dm, section, Np, points, numFields, perm, vArray, &size, array));
7301 PetscInt depth, numFields, numPoints, p, clsize;
7309 PetscCall(PetscSectionGetNumFields(section, &numFields));
7310 if (depth == 1 && numFields < 2 && mode == ADD_VALUES) {
7325 if (numFields > 0) {
7327 for (f = 0; f < numFields; ++f) {
7485 PetscInt numFields, numPoints, p;
7493 PetscCall(PetscSectionGetNumFields(section, &numFields));
7499 for (f = 0; f < numFields; ++f) {
7667 . foffs - array of length numFields containing the offset in canonical point ordering (the location in indices) of each field
7700 PetscInt numFields, foff, f;
7704 PetscCall(PetscSectionGetNumFields(section, &numFields));
7705 for (f = 0, foff = 0; f < numFields; ++f) {
7751 PetscInt numFields, foff, f;
7754 PetscCall(PetscSectionGetNumFields(section, &numFields));
7755 for (f = 0; f < numFields; ++f) {
7792 PetscInt numFields, sStart, sEnd, cStart, cEnd;
7795 PetscCall(PetscSectionGetNumFields(section, &numFields));
7808 if (numFields) {
7813 for (PetscInt f = 0; f < numFields; f++) {
7823 for (PetscInt f = 0; f < numFields; f++) {
7847 PetscInt numFields, p;
7860 PetscCall(PetscSectionGetNumFields(section, &numFields));
7880 for (PetscInt f = 0; f < numFields; f++) {
7903 for (PetscInt f = 0; f < numFields; ++f) {
7914 for (PetscInt f = 0; f < numFields; ++f) {
7935 for (PetscInt f = 0; f < numFields; ++f) newOffsets[f + 1] += newOffsets[f];
7936 for (PetscInt f = 0; f < numFields; ++f) oldOffsets[f + 1] += oldOffsets[f];
7940 for (PetscInt f = 0; f <= numFields; f++) offsets[f] = newOffsets[f];
7946 PetscCheck(!numFields || newOffsets[numFields] == newNumIndices, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Invalid size for closure %" PetscInt_FMT " should be %" PetscInt_FMT, newOffsets[numFields], newNumIndices);
7947 PetscCheck(!numFields || oldOffsets[numFields] == numIndices, PETSC_COMM_SELF, PETSC_ERR_PLIB, "Invalid size for closure %" PetscInt_FMT " should be %" PetscInt_FMT, oldOffsets[numFields], numIndices);
8003 for (PetscInt f = 0; f < PetscMax(1, numFields); f++) {
8011 if (numFields) {
8025 if (numFields) {
8064 for (PetscInt f = 0; f <= numFields; f++) offsets[f] = newOffsets[f];
8564 PetscInt numFields, numSubcells, maxFPoints, numFPoints, numCPoints, numFIndices, numCIndices, dof, off, globalOff, pStart, pEnd, p, q, r, s, f;
8579 PetscCall(PetscSectionGetNumFields(fsection, &numFields));
8580 PetscCheck(numFields <= 31, PetscObjectComm((PetscObject)dmf), PETSC_ERR_ARG_OUTOFRANGE, "Number of fields %" PetscInt_FMT " limited to 31", numFields);
8602 for (f = 0; f < numFields; ++f) {
8608 for (f = 1; f < numFields; ++f) coffsets[f + 1] += coffsets[f];
8648 for (f = 0; f < numFields; ++f) {
8654 for (f = 1; f < numFields; ++f) foffsets[f + 1] += foffsets[f];
8656 PetscCheck(!numFields || foffsets[numFields] == numFIndices, PetscObjectComm((PetscObject)dmf), PETSC_ERR_PLIB, "Invalid size for closure %" PetscInt_FMT " should be %" PetscInt_FMT, foffsets[numFields], numFIndices);
8657 PetscCheck(!numFields || coffsets[numFields] == numCIndices, PetscObjectComm((PetscObject)dmc), PETSC_ERR_PLIB, "Invalid size for closure %" PetscInt_FMT " should be %" PetscInt_FMT, coffsets[numFields], numCIndices);
8660 if (numFields) {
8664 for (f = 0; f < numFields; f++) {
8676 for (f = 0; f < numFields; f++) {
8728 PetscInt numFields, numSubcells, maxFPoints, numFPoints, numCPoints, numFIndices, numCIndices, dof, off, globalOff, pStart, pEnd, p, q, r, s, f;
8741 PetscCall(PetscSectionGetNumFields(fsection, &numFields));
8742 PetscCheck(numFields <= 31, PetscObjectComm((PetscObject)dmf), PETSC_ERR_ARG_OUTOFRANGE, "Number of fields %" PetscInt_FMT " limited to 31", numFields);
8762 for (f = 0; f < numFields; ++f) {
8768 for (f = 1; f < numFields; ++f) coffsets[f + 1] += coffsets[f];
8808 for (f = 0; f < numFields; ++f) {
8814 for (f = 1; f < numFields; ++f) foffsets[f + 1] += foffsets[f];
8816 PetscCheck(!numFields || foffsets[numFields] == numFIndices, PetscObjectComm((PetscObject)dmf), PETSC_ERR_PLIB, "Invalid size for closure %" PetscInt_FMT " should be %" PetscInt_FMT, foffsets[numFields], numFIndices);
8817 PetscCheck(!numFields || coffsets[numFields] == numCIndices, PetscObjectComm((PetscObject)dmc), PETSC_ERR_PLIB, "Invalid size for closure %" PetscInt_FMT " should be %" PetscInt_FMT, coffsets[numFields], numCIndices);
8818 if (numFields) {
8822 for (f = 0; f < numFields; f++) {
8834 for (f = 0; f < numFields; f++) {
10673 PetscInt pStart, pEnd, sStart, sEnd, p, dof, numFields, f;
10679 PetscCall(PetscSectionGetNumFields(section, &numFields));
10680 if (numFields) {
10682 PetscCall(PetscSectionSetNumFields(*cSec, numFields));
10684 for (f = 0; f < numFields; f++) {
10702 for (f = 0; f < numFields; f++) {
10718 PetscInt numFields, f;
10744 PetscCall(PetscSectionGetNumFields(section, &numFields));
10751 if (numFields) {
10752 for (f = 0; f < numFields; f++) {
10782 if (numFields) {
10783 for (f = 0; f < numFields; f++) {