Searched refs:invJExT (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/dm/impls/plex/tests/ |
| H A D | ex8.c | 244 PetscReal *v0ExT, *JExT, *invJExT, detJExT = 0, *centroidExT, *normalExT, volExT = 0; in CheckCell() local
253 …PetscCall(PetscMalloc5(cdim, &v0ExT, cdim * cdim, &JExT, cdim * cdim, &invJExT, cdim, ¢roidExT… in CheckCell()
310 invJExT[d * cdim + e] = invJEx[d * cdim + e]; in CheckCell()
319 invJExT[d * cdim + e] /= scale; in CheckCell()
338 …for (f = 0, rotM[d * cdim + e] = 0.0; f < cdim; ++f) rotM[d * cdim + e] += invJExT[d * cdim + f] *… in CheckCell()
342 for (e = 0; e < cdim; ++e) invJExT[d * cdim + e] = rotM[d * cdim + e]; in CheckCell()
386 if (v0Ex) PetscCall(CheckFEMGeometry(dm, 0, cdim, v0ExT, JExT, invJExT, detJExT)); in CheckCell()
429 PetscCall(PetscFree5(v0ExT, JExT, invJExT, centroidExT, normalExT)); in CheckCell()
|