Searched refs:normalExT (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 …c5(cdim, &v0ExT, cdim * cdim, &JExT, cdim * cdim, &invJExT, cdim, ¢roidExT, cdim, &normalExT)); in CheckCell()
349 normalExT[d] = normalEx[d]; in CheckCell()
354 normalExT[d] /= scale; in CheckCell()
364 for (e = 0, rot[d] = 0.0; e < cdim; ++e) rot[d] += R[d * cdim + e] * normalExT[e]; in CheckCell()
366 for (d = 0; d < cdim; ++d) normalExT[d] = rot[d]; in CheckCell()
367 for (d = 0, norm = 0.0; d < cdim; ++d) norm += PetscSqr(normalExT[d]); in CheckCell()
370 for (d = 0; d < cdim; ++d) normalExT[d] /= norm; in CheckCell()
388 PetscCall(CheckFVMGeometry(dm, cell, cdim, centroidExT, normalExT, volExT)); in CheckCell()
429 PetscCall(PetscFree5(v0ExT, JExT, invJExT, centroidExT, normalExT)); in CheckCell()
|