| /petsc/src/vec/vec/utils/ |
| H A D | vsection.c | 203 PetscInt gdof, fdof = 0; in PetscSectionGetField_Internal() local 206 if (gdof > 0) PetscCall(PetscSectionGetFieldDof(section, p, field, &fdof)); in PetscSectionGetField_Internal() 207 subSize += fdof; in PetscSectionGetField_Internal() 215 PetscInt fdof, fc, f2, poff = 0; in PetscSectionGetField_Internal() local 220 PetscCall(PetscSectionGetFieldDof(section, p, f2, &fdof)); in PetscSectionGetField_Internal() 221 poff += fdof; in PetscSectionGetField_Internal() 223 PetscCall(PetscSectionGetFieldDof(section, p, field, &fdof)); in PetscSectionGetField_Internal() 224 for (fc = 0; fc < fdof; ++fc, ++subOff) subIndices[subOff] = goff + poff + fc; in PetscSectionGetField_Internal()
|
| /petsc/src/ts/impls/mimex/ |
| H A D | mimex.c | 102 PetscInt fdof, fcdof, d; in SNESTSFormFunction_Mimex() local 104 PetscCall(PetscSectionGetFieldDof(s, p, f, &fdof)); in SNESTSFormFunction_Mimex() 108 for (d = 0; d < fdof - fcdof; ++d) axs[d] = a[d]; in SNESTSFormFunction_Mimex() 174 PetscInt fdof, fcdof, d; in TSStep_Mimex_Split() local 176 PetscCall(PetscSectionGetFieldDof(s, p, f, &fdof)); in TSStep_Mimex_Split() 180 for (d = 0; d < fdof - fcdof; ++d) as[d] = au[d]; in TSStep_Mimex_Split() 196 PetscInt fdof, fcdof, d; in TSStep_Mimex_Split() local 198 PetscCall(PetscSectionGetFieldDof(s, p, f, &fdof)); in TSStep_Mimex_Split() 202 for (d = 0; d < fdof - fcdof; ++d) as[d] += dt * au[d]; in TSStep_Mimex_Split()
|
| /petsc/src/dm/interface/ |
| H A D | dmi.c | 118 PetscInt fdof, fcdof, sfdof, sfcdof = 0; in PetscSectionSelectFields_Private() local 121 PetscCall(PetscSectionGetFieldDof(s, point, fields[f], &fdof)); in PetscSectionSelectFields_Private() 127 …fdof % Nc), PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "Number of components %" PetscInt_FMT " should e… in PetscSectionSelectFields_Private() 128 sfdof = (fdof / Nc) * numComps[f]; in PetscSectionSelectFields_Private() 130 for (PetscInt i = 0; i < (fdof / Nc); ++i) { in PetscSectionSelectFields_Private() 141 pSubSize += fdof - fcdof; in PetscSectionSelectFields_Private() 176 PetscInt fdof, fcdof, poff = 0; in PetscSectionSelectFields_Private() local 180 PetscCall(PetscSectionGetFieldDof(s, point, f2, &fdof)); in PetscSectionSelectFields_Private() 182 poff += fdof - fcdof; in PetscSectionSelectFields_Private() 184 PetscCall(PetscSectionGetFieldDof(s, point, fields[f], &fdof)); in PetscSectionSelectFields_Private() [all …]
|
| H A D | dm.c | 1985 PetscInt fdof, fcdof, fpdof; in DMCreateFieldIS() local 1987 PetscCall(PetscSectionGetFieldDof(section, p, f, &fdof)); in DMCreateFieldIS() 1989 fpdof = fdof - fcdof; in DMCreateFieldIS() 2009 PetscInt fdof, fcdof, fc; in DMCreateFieldIS() local 2011 PetscCall(PetscSectionGetFieldDof(section, p, f, &fdof)); in DMCreateFieldIS() 2013 … for (fc = 0; fc < fdof - fcdof; ++fc, ++fieldSizes[f]) fieldIndices[f][fieldSizes[f]] = goff++; in DMCreateFieldIS()
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexsection.c | 304 PetscInt fdof, fcdof, c, j; in DMPlexCreateSectionBCIndicesField() local 306 PetscCall(PetscSectionGetFieldDof(section, p, field, &fdof)); in DMPlexCreateSectionBCIndicesField() 307 if (!fdof) continue; in DMPlexCreateSectionBCIndicesField() 309 for (d = 0; d < fdof; ++d) indices[d] = d; in DMPlexCreateSectionBCIndicesField() 310 fcdof = fdof; in DMPlexCreateSectionBCIndicesField() 321 for (j = 0; j < fdof / Nc; ++j) in DMPlexCreateSectionBCIndicesField() 377 PetscInt fcdof, fdof; in DMPlexCreateSectionBCIndices() local 379 PetscCall(PetscSectionGetFieldDof(section, p, f, &fdof)); in DMPlexCreateSectionBCIndices() 385 foff += fdof; in DMPlexCreateSectionBCIndices()
|
| H A D | plex.c | 6538 PetscInt fdof, foff, b; in DMPlexVecGetClosure_Fields_Static() local 6543 PetscCall(PetscSectionGetFieldDof(section, point, f, &fdof)); in DMPlexVecGetClosure_Fields_Static() 6548 for (b = 0; b < fdof; b++) array[clperm[offset + perm[b]]] = varr[b]; in DMPlexVecGetClosure_Fields_Static() 6550 for (b = 0; b < fdof; b++) array[clperm[offset + b]] = varr[b]; in DMPlexVecGetClosure_Fields_Static() 6553 for (b = 0; b < fdof; b++) array[clperm[offset + b]] *= flip[b]; in DMPlexVecGetClosure_Fields_Static() 6557 for (b = 0; b < fdof; b++) array[offset + perm[b]] = varr[b]; in DMPlexVecGetClosure_Fields_Static() 6559 for (b = 0; b < fdof; b++) array[offset + b] = varr[b]; in DMPlexVecGetClosure_Fields_Static() 6562 for (b = 0; b < fdof; b++) array[offset + b] *= flip[b]; in DMPlexVecGetClosure_Fields_Static() 6565 offset += fdof; in DMPlexVecGetClosure_Fields_Static() 7029 PetscInt fdof, foff, fcdof, foffset = *offset; in updatePointFields_private() local [all …]
|
| H A D | plexfem.c | 660 PetscInt fdof, gdof, fpdof, gpdof; in DMPlexBasisTransformFieldTensor_Internal() local 667 PetscCall(PetscSectionGetFieldDof(ts, pf, f, &fdof)); in DMPlexBasisTransformFieldTensor_Internal() 673 switch (fdof) { in DMPlexBasisTransformFieldTensor_Internal() 690 switch (fdof) { in DMPlexBasisTransformFieldTensor_Internal() 743 PetscInt Nf, f, g, Np, cpf, cpg, fdof, gdof, r, c = 0; in DMPlexBasisTransformPointTensor_Internal() local 751 PetscCall(PetscSectionGetFieldDof(s, points[cpf], f, &fdof)); in DMPlexBasisTransformPointTensor_Internal() 760 r += fdof; in DMPlexBasisTransformPointTensor_Internal()
|
| /petsc/include/petsc/private/ |
| H A D | dmimpl.h | 501 PetscInt loff, lfoff, fdof, fcdof, ffcdof, f; in DMGetGlobalFieldOffset_Private() local 508 PetscCall(PetscSectionGetFieldDof(dm->localSection, point, field, &fdof)); in DMGetGlobalFieldOffset_Private() 515 *end = *start < 0 ? *start - (fdof - fcdof) : *start + fdof - fcdof; in DMGetGlobalFieldOffset_Private() 525 const PetscInt fdof = fs->atlasDof[point - s->pStart]; in DMGetGlobalFieldOffset_Private() local 534 *end = *start < 0 ? *start - (fdof - fcdof) : *start + fdof - fcdof; in DMGetGlobalFieldOffset_Private()
|
| /petsc/src/vec/is/section/interface/ |
| H A D | section.c | 2059 PetscInt dof = 0, cdof = 0, fdof = 0, cfdof = 0; in PetscSectionCreateSubsection() local 2062 PetscCall(PetscSectionGetFieldDof(s, p, fields[f], &fdof)); in PetscSectionCreateSubsection() 2063 PetscCall(PetscSectionSetFieldDof(*subs, p, f, fdof)); in PetscSectionCreateSubsection() 2066 dof += fdof; in PetscSectionCreateSubsection() 2092 PetscInt fdof = 0, cfdof = 0, fc, numConst = 0, fOff = 0; in PetscSectionCreateSubsection() local 2095 PetscCall(PetscSectionGetFieldDof(s, p, fields[f], &fdof)); in PetscSectionCreateSubsection() 2101 fOff += fdof; in PetscSectionCreateSubsection() 2237 PetscInt fdof = 0, cfdof = 0; in PetscSectionCreateSupersection() local 2243 PetscCall(PetscSectionGetFieldDof(s[i], p, fi, &fdof)); in PetscSectionCreateSupersection() 2244 PetscCall(PetscSectionAddFieldDof(*supers, p, f, fdof)); in PetscSectionCreateSupersection() [all …]
|
| /petsc/src/ksp/pc/impls/patch/ |
| H A D | pcpatch.c | 808 PetscInt fdof, g; in PCPatchGetGlobalDofs() local 813 PetscCall(PetscSectionGetDof(dofSection[g], p, &fdof)); in PCPatchGetGlobalDofs() 814 *dof += fdof; in PCPatchGetGlobalDofs() 820 PetscCall(PetscSectionGetOffset(dofSection[g], p, &fdof)); in PCPatchGetGlobalDofs() 821 *off += fdof; in PCPatchGetGlobalDofs() 1643 PetscInt dof, fdof, f; in PCPatchCreateCellPatchDiscretisationInfo() local 1648 PetscCall(PetscSectionGetFieldDof(patch->dofSection[0], p, f, &fdof)); in PCPatchCreateCellPatchDiscretisationInfo() 1649 PetscCall(PetscSectionSetFieldDof(patch->patchSection, p, f, fdof)); in PCPatchCreateCellPatchDiscretisationInfo() 1665 PetscInt fdof; in PCPatchCreateCellPatchDiscretisationInfo() local 1666 PetscCall(PetscSectionGetDof(patch->dofSection[f], p, &fdof)); in PCPatchCreateCellPatchDiscretisationInfo() [all …]
|
| /petsc/src/snes/utils/ |
| H A D | dmplexsnes.c | 205 PetscInt fdof, foff, d; in SNESMonitorFields() local 207 PetscCall(PetscSectionGetFieldDof(s, p, f, &fdof)); in SNESMonitorFields() 209 for (d = 0; d < fdof; ++d) lnorms[f] += PetscRealPart(PetscSqr(r[foff + d])); in SNESMonitorFields()
|
| /petsc/src/dm/impls/plex/hdf5/ |
| H A D | plexhdf5.c | 589 PetscInt gdof, fdof = 0, val; in VecView_Plex_Local_HDF5_Internal() local 592 if (gdof > 0) PetscCall(PetscSectionGetFieldDof(section, p, f, &fdof)); in VecView_Plex_Local_HDF5_Internal() 593 subSize += fdof; in VecView_Plex_Local_HDF5_Internal() 595 if (val == 1) extSize += fdof; in VecView_Plex_Local_HDF5_Internal() 609 PetscInt fdof, fc, f2, poff = 0; in VecView_Plex_Local_HDF5_Internal() local 614 PetscCall(PetscSectionGetFieldDof(section, p, f2, &fdof)); in VecView_Plex_Local_HDF5_Internal() 615 poff += fdof; in VecView_Plex_Local_HDF5_Internal() 617 PetscCall(PetscSectionGetFieldDof(section, p, f, &fdof)); in VecView_Plex_Local_HDF5_Internal() 618 for (fc = 0; fc < fdof; ++fc, ++subOff) suba[subOff] = ga[goff + poff + fc - gstart]; in VecView_Plex_Local_HDF5_Internal() 621 … for (fc = 0; fc < fdof; ++fc, ++newOff) suba[subSize + newOff] = ga[goff + poff + fc - gstart]; in VecView_Plex_Local_HDF5_Internal()
|