8   PetscFE_Composite *cmp = (PetscFE_Composite *)fem->data;  in PetscFEDestroy_Composite()  local
11   PetscCall(PetscFree(cmp->embedding));  in PetscFEDestroy_Composite()
12   PetscCall(PetscFree(cmp));  in PetscFEDestroy_Composite()
18   PetscFE_Composite *cmp = (PetscFE_Composite *)fem->data;  in PetscFESetUp_Composite()  local
36 …Call(DMPlexRefineRegularGetAffineTransforms(tr, ct, &cmp->numSubelements, &cmp->v0, &cmp->jac, &cm…  in PetscFESetUp_Composite()
41   PetscCall(PetscMalloc1(cmp->numSubelements * spdim, &cmp->embedding));  in PetscFESetUp_Composite()
44   for (s = 0; s < cmp->numSubelements; ++s) {  in PetscFESetUp_Composite()
56       for (k = 0; k < dof; k++) cmp->embedding[s * spdim + sd++] = off + k;  in PetscFESetUp_Composite()
63   PetscCall(PetscMalloc1(cmp->numSubelements * spdim * spdim, &fem->invV));  in PetscFESetUp_Composite()
66   PetscCall(PetscMalloc1(cmp->numSubelements * spdim * spdim, &invVscalar));  in PetscFESetUp_Composite()
70   for (s = 0; s < cmp->numSubelements; ++s) {  in PetscFESetUp_Composite()
77       PetscCall(PetscDualSpaceGetFunctional(fem->dualSpace, cmp->embedding[s * spdim + j], &f));  in PetscFESetUp_Composite()
93 …for (s = 0; s < cmp->numSubelements * spdim * spdim; s++) fem->invV[s] = PetscRealPart(invVscalar[…  in PetscFESetUp_Composite()
102   PetscFE_Composite *cmp = (PetscFE_Composite *)fem->data;  in PetscFEComputeTabulation_Composite()  local
127     for (s = 0; s < cmp->numSubelements; ++s) {  in PetscFEComputeTabulation_Composite()
133 …for (e = 0; e < dim; ++e) subpoint[d] += cmp->invjac[(s * dim + d) * dim + e] * (points[p * dim + …  in PetscFEComputeTabulation_Composite()
141 …PetscCheck(s < cmp->numSubelements, PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "Point %" PetscInt_FMT "…  in PetscFEComputeTabulation_Composite()
159         const PetscInt i = (p * pdim + cmp->embedding[s * spdim + j]) * comp;  in PetscFEComputeTabulation_Composite()
169           const PetscInt i = ((p * pdim + cmp->embedding[s * spdim + j]) * comp + 0) * dim + d;  in PetscFEComputeTabulation_Composite()
180 …        const PetscInt i = ((p * pdim + cmp->embedding[s * spdim + j]) * comp + 0) * dim * dim + d;  in PetscFEComputeTabulation_Composite()
220   PetscFE_Composite *cmp;  in PetscFECreate_Composite()  local
224   PetscCall(PetscNew(&cmp));  in PetscFECreate_Composite()
225   fem->data = cmp;  in PetscFECreate_Composite()
227   cmp->numSubelements = -1;  in PetscFECreate_Composite()
228   cmp->v0             = NULL;  in PetscFECreate_Composite()
229   cmp->jac            = NULL;  in PetscFECreate_Composite()
258   PetscFE_Composite *cmp = (PetscFE_Composite *)fem->data;  in PetscFECompositeGetMapping()  local
264     *numSubelements = cmp->numSubelements;  in PetscFECompositeGetMapping()
268     *v0 = cmp->v0;  in PetscFECompositeGetMapping()
272     *jac = cmp->jac;  in PetscFECompositeGetMapping()
276     *invjac = cmp->invjac;  in PetscFECompositeGetMapping()