361 {
363 try {
364 int nb_dofs = data.getIndices().size();
365 if (nb_dofs == 0)
367 int nb_gauss_pts = data.getN().size1();
368 if (
type == MBVERTEX) {
370 for (int gg = 0; gg < nb_gauss_pts; gg++) {
372 double nrm2_normal = 0;
373 double nrm2_tangent1 = 0;
374 double nrm2_tangent2 = 0;
375 for (
int dd = 0;
dd < 3;
dd++) {
376 nrm2_normal += pow(getNormalsAtGaussPtsF3()(gg, dd), 2);
377 nrm2_tangent1 += pow(getTangent1AtGaussPtF3()(gg, dd), 2);
378 nrm2_tangent2 += pow(getTangent2AtGaussPtF3()(gg, dd), 2);
379 }
380 nrm2_normal = sqrt(nrm2_normal);
381 nrm2_tangent1 = sqrt(nrm2_tangent1);
382 nrm2_tangent2 = sqrt(nrm2_tangent2);
383 for (
int dd = 0;
dd < 3;
dd++) {
385 getNormalsAtGaussPtsF3()(gg,
dd) / nrm2_normal;
387 getTangent1AtGaussPtF3()(gg,
dd) / nrm2_tangent1;
389 getTangent2AtGaussPtF3()(gg,
dd) / nrm2_tangent2;
390 }
391 }
392 }
393 if (
type == MBVERTEX) {
396 }
397 for (int gg = 0; gg < nb_gauss_pts; gg++) {
398 for (
int dd = 0;
dd < 3;
dd++) {
400 nb_dofs / 3, &data.getN(gg)[0], 1, &data.getFieldData()[dd], 3);
401 }
402 }
403 } catch (const std::exception &ex) {
404 std::ostringstream ss;
405 ss << "throw in method: " << ex.what() << std::endl;
407 ss.str().c_str());
408 }
410 }
#define MoFEMFunctionReturnHot(a)
Last executable line of each PETSc function used for error handling. Replaces return()
@ MOFEM_STD_EXCEPTION_THROW
#define MoFEMFunctionBeginHot
First executable line of each MoFEM function, used for error handling. Final line of MoFEM functions ...
const Tensor2_symmetric_Expr< const ddTensor0< T, Dim, i, j >, typename promote< T, double >::V, Dim, i, j > dd(const Tensor0< T * > &a, const Index< i, Dim > index1, const Index< j, Dim > index2, const Tensor1< int, Dim > &d_ijk, const Tensor1< double, Dim > &d_xyz)
ublas::vector< MatrixDouble > R