Lines Matching refs:formDegree
542 …gNodeIndices vertp, PetscLagNodeIndices nodep, PetscInt ornt, PetscInt formDegree, PetscInt pfNode… in PetscLagNodeIndicesPushForward() argument
632 PetscCall(PetscDTBinomialInt(dim, PetscAbsInt(formDegree), &Nk)); in PetscLagNodeIndicesPushForward()
633 PetscCall(PetscDTBinomialInt(pdim, PetscAbsInt(formDegree), &pNk)); in PetscLagNodeIndicesPushForward()
635 PetscCall(PetscDTAltVPullbackMatrix(pdim, dim, J, formDegree, Jstar)); in PetscLagNodeIndicesPushForward()
654 PetscInt formDegree = kT + kF; in PetscLagNodeIndicesTensor() local
666 PetscCall(PetscDTBinomialInt(dim, PetscAbsInt(formDegree), &Nk)); in PetscLagNodeIndicesTensor()
733 if (formDegree < 0) { in PetscLagNodeIndicesTensor()
735 PetscCall(PetscDTAltVStar(dim, PetscAbsInt(formDegree), -1, work2, work)); in PetscLagNodeIndicesTensor()
1440 PetscInt formDegree, Nk; in PetscDualSpaceLagrangeCreateAllNodeIdx() local
1450 PetscCall(PetscDualSpaceGetFormDegree(sp, &formDegree)); in PetscDualSpaceLagrangeCreateAllNodeIdx()
1451 PetscCall(PetscDTBinomialInt(dim, PetscAbsInt(formDegree), &Nk)); in PetscDualSpaceLagrangeCreateAllNodeIdx()
1476 …sPushForward(dm, verti, p, plag->vertIndices, plag->intNodeIndices, 0, formDegree, &ni->nodeIdx[of… in PetscDualSpaceLagrangeCreateAllNodeIdx()
1891 static PetscErrorCode BiunitSimplexSymmetricFormTransformation(PetscInt dim, PetscInt formDegree, P… in BiunitSimplexSymmetricFormTransformation() argument
1893 PetscInt k = formDegree; in BiunitSimplexSymmetricFormTransformation()
1990 PetscInt formDegree, Nk, Ncopies; in PetscDualSpaceSetUp_Lagrange() local
2008 PetscCall(PetscDualSpaceGetFormDegree(sp, &formDegree)); in PetscDualSpaceSetUp_Lagrange()
2009 …PetscCheck(PetscAbsInt(formDegree) <= dim, comm, PETSC_ERR_ARG_OUTOFRANGE, "Form degree must be bo… in PetscDualSpaceSetUp_Lagrange()
2010 PetscCall(PetscDTBinomialInt(dim, PetscAbsInt(formDegree), &Nk)); in PetscDualSpaceSetUp_Lagrange()
2021 …if (lag->trimmed && !formDegree) lag->trimmed = PETSC_FALSE; /* trimmed spaces are the same as ful… in PetscDualSpaceSetUp_Lagrange()
2032 …if (lag->trimmed && PetscAbsInt(formDegree) == dim) { /* convert trimmed n-forms to untrimmed of o… in PetscDualSpaceSetUp_Lagrange()
2038 if (!order || PetscAbsInt(formDegree) == dim) lag->continuous = PETSC_FALSE; in PetscDualSpaceSetUp_Lagrange()
2059 …PetscCheck(interpolated == DMPLEX_INTERPOLATED_FULL || !continuous || (PetscAbsInt(formDegree) <= … in PetscDualSpaceSetUp_Lagrange()
2111 …PetscCall(PetscDualSpaceCreateFacetSubspace_Lagrange(sp, NULL, p, formDegree, Ncopies, PETSC_FALSE… in PetscDualSpaceSetUp_Lagrange()
2117 if (hdim < PetscAbsInt(formDegree)) break; in PetscDualSpaceSetUp_Lagrange()
2209 if (order + PetscAbsInt(formDegree) > dim) { in PetscDualSpaceSetUp_Lagrange()
2210 PetscInt sum = order + PetscAbsInt(formDegree) - dim - 1; in PetscDualSpaceSetUp_Lagrange()
2240 if (order + PetscAbsInt(formDegree) > dim) { in PetscDualSpaceSetUp_Lagrange()
2244 …PetscInt trFormDegree = formDegree >= 0 ? formDegree - dim : dim - PetscAbsInt(formDegr… in PetscDualSpaceSetUp_Lagrange()
2250 PetscCall(PetscDualSpaceSetOrder(trimmedsp, order + PetscAbsInt(formDegree) - dim)); in PetscDualSpaceSetUp_Lagrange()
2261 if (PetscAbsInt(formDegree) > 0 && PetscAbsInt(formDegree) < dim) { in PetscDualSpaceSetUp_Lagrange()
2270 PetscCall(BiunitSimplexSymmetricFormTransformation(dim, formDegree, T)); in PetscDualSpaceSetUp_Lagrange()
2329 …if (PetscAbsInt(formDegree) < dim) { /* get the trace k-forms on the first facet, and the 0-forms … in PetscDualSpaceSetUp_Lagrange()
2339 …PetscCall(PetscDualSpaceCreateFacetSubspace_Lagrange(sp, NULL, tensorf, formDegree, Ncopies, PETSC… in PetscDualSpaceSetUp_Lagrange()
2349 PetscCall(MatTensorAltV(intMatTrace, intMatFiber, dim - 1, formDegree, 1, 0, &intMat)); in PetscDualSpaceSetUp_Lagrange()
2350 …PetscCall(PetscLagNodeIndicesTensor(tracel->intNodeIndices, dim - 1, formDegree, fiberl->intNodeIn… in PetscDualSpaceSetUp_Lagrange()
2357 …if (PetscAbsInt(formDegree) > 0) { /* get the trace (k-1)-forms on the first facet, and the 1-form… in PetscDualSpaceSetUp_Lagrange()
2364 PetscInt traceDegree = formDegree > 0 ? formDegree - 1 : formDegree + 1; in PetscDualSpaceSetUp_Lagrange()
2365 PetscInt fiberDegree = formDegree > 0 ? 1 : -1; in PetscDualSpaceSetUp_Lagrange()
2395 … PetscCall(MatricesMerge(intMat, intMat2, dim, formDegree, nM, toMerged, toMerged2, &matMerged)); in PetscDualSpaceSetUp_Lagrange()
2471 PetscInt formDegree; in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange() local
2488 PetscCall(PetscDualSpaceGetFormDegree(sp, &formDegree)); in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()
2497 …icesPushForward(dm, vertIndices, 0, vertIndices, intNodeIndices, ornt, formDegree, ni->nodeIdx, ni… in PetscDualSpaceCreateInteriorSymmetryMatrix_Lagrange()