Searched refs:cH (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/dm/field/impls/ds/ |
| H A D | dmfieldds.c | 211 PetscScalar *cH = &((PetscScalar *)H)[nc * nq * dim * dim * i]; in DMFieldEvaluateFE_DS() local
213 DMFieldDSdot(cH, T->T[2], elem, nq, feDim, (nc * dim * dim), (PetscScalar)); in DMFieldEvaluateFE_DS()
215 PetscReal *cH = &((PetscReal *)H)[nc * nq * dim * dim * i]; in DMFieldEvaluateFE_DS() local
217 DMFieldDSdot(cH, T->T[2], elem, nq, feDim, (nc * dim * dim), PetscRealPart); in DMFieldEvaluateFE_DS()
347 PetscScalar *cH = &cellHs[nc * dim * dim * offset]; in DMFieldEvaluate_DS() local
349 DMFieldDSdot(cH, T->T[2], elem, nq, feDim, (nc * dim * dim), (PetscScalar)); in DMFieldEvaluate_DS()
356 …for (e = 0; e < dimR; e++) vs[d] += invJ[dimR * dimR * p + e * dimR + d] * cH[(nc * dimR * p + g) … in DMFieldEvaluate_DS()
358 for (d = 0; d < dimR; d++) cH[(nc * dimR * p + g) * dimR + d] = vs[d]; in DMFieldEvaluate_DS()
366 …for (e = 0; e < dimR; e++) vs[d] += invJ[dimR * dimR * p + e * dimR + d] * cH[((nc * p + g) * dimR… in DMFieldEvaluate_DS()
368 for (d = 0; d < dimR; d++) cH[((nc * p + g) * dimR + d) * dimR + f] = vs[d]; in DMFieldEvaluate_DS()
[all …]
|
| /petsc/src/dm/field/impls/da/ |
| H A D | dmfieldda.c | 264 void *cB, *cD, *cH; in DMFieldEvaluateFE_DA() local
269 cH = PetscSafePointerPlusOffset((PetscScalar *)H, nc * nq * dim * dim * c); in DMFieldEvaluateFE_DA()
273 cH = PetscSafePointerPlusOffset((PetscReal *)H, nc * nq * dim * dim * c); in DMFieldEvaluateFE_DA()
292 …tilinearEvaluate(dim, cellCoordRange, nc, cellCoeffs, dafield->work, nq, qs, datatype, cB, cD, cH); in DMFieldEvaluateFE_DA()
|