Lines Matching refs:cD
200 PetscScalar *cD = &((PetscScalar *)D)[nc * nq * dim * i]; in DMFieldEvaluateFE_DS() local
202 DMFieldDSdot(cD, T->T[1], elem, nq, feDim, (nc * dim), (PetscScalar)); in DMFieldEvaluateFE_DS()
204 PetscReal *cD = &((PetscReal *)D)[nc * nq * dim * i]; in DMFieldEvaluateFE_DS() local
206 DMFieldDSdot(cD, T->T[1], elem, nq, feDim, (nc * dim), PetscRealPart); in DMFieldEvaluateFE_DS()
316 PetscScalar *cD = &cellDs[nc * dim * offset]; in DMFieldEvaluate_DS() local
318 DMFieldDSdot(cD, T->T[1], elem, nq, feDim, (nc * dim), (PetscScalar)); in DMFieldEvaluate_DS()
325 …for (e = 0; e < dimR; e++) vs[d] += invJ[dimR * dimR * p + e * dimR + d] * cD[(nc * p + g) * dimR … in DMFieldEvaluate_DS()
327 for (d = 0; d < dimR; d++) cD[(nc * p + g) * dimR + d] = vs[d]; in DMFieldEvaluate_DS()
331 PetscReal *cD = &cellDr[nc * dim * offset]; in DMFieldEvaluate_DS() local
333 DMFieldDSdot(cD, T->T[1], elem, nq, feDim, (nc * dim), PetscRealPart); in DMFieldEvaluate_DS()
338 …for (e = 0; e < dimR; e++) v[d] += invJ[dimR * dimR * p + e * dimR + d] * cD[(nc * p + g) * dimR +… in DMFieldEvaluate_DS()
340 for (d = 0; d < dimR; d++) cD[(nc * p + g) * dimR + d] = v[d]; in DMFieldEvaluate_DS()