v0.9.0
Public Member Functions | Public Attributes | List of all members
MoFEM::OpSetCovariantPiolaTransformOnEdge Struct Reference

transform Hcurl base fluxes from reference element to physical edge More...

#include <src/finite_elements/DataOperators.hpp>

Inheritance diagram for MoFEM::OpSetCovariantPiolaTransformOnEdge:
[legend]
Collaboration diagram for MoFEM::OpSetCovariantPiolaTransformOnEdge:
[legend]

Public Member Functions

 OpSetCovariantPiolaTransformOnEdge (const VectorDouble &tangent, const MatrixDouble &tangent_at_pts)
 
MoFEMErrorCode doWork (int side, EntityType type, DataForcesAndSourcesCore::EntData &data)
 Operator for linear form, usually to calculate values on right hand side. More...
 
- Public Member Functions inherited from MoFEM::DataOperator
 DataOperator (const bool symm=true, const bool do_vertices=true, const bool do_edges=true, const bool do_quads=true, const bool do_tris=true, const bool do_tets=true, const bool do_prisms=true)
 
virtual ~DataOperator ()
 
virtual MoFEMErrorCode doWork (int row_side, int col_side, EntityType row_type, EntityType col_type, DataForcesAndSourcesCore::EntData &row_data, DataForcesAndSourcesCore::EntData &col_data)
 Operator for bi-linear form, usually to calculate values on left hand side. More...
 
virtual MoFEMErrorCode opLhs (DataForcesAndSourcesCore &row_data, DataForcesAndSourcesCore &col_data, bool symm=true)
 
virtual MoFEMErrorCode opLhs (DataForcesAndSourcesCore &row_data, DataForcesAndSourcesCore &col_data)
 
virtual MoFEMErrorCode opRhs (DataForcesAndSourcesCore &data, const bool do_vertices, const bool do_edges, const bool do_quads, const bool do_tris, const bool do_tets, const bool do_prisms, const bool error_if_no_base=true)
 
virtual MoFEMErrorCode opRhs (DataForcesAndSourcesCore &data, const bool error_if_no_base=true)
 
bool getSymm () const
 Get if operator uses symmetry of DOFs or not. More...
 
void setSymm ()
 set if operator is executed taking in account symmetry More...
 
void unSetSymm ()
 unset if operator is executed for non symmetric problem More...
 

Public Attributes

const VectorDoubletAngent
 
const MatrixDoubletangentAtGaussPt
 
- Public Attributes inherited from MoFEM::DataOperator
bool sYmm
 If true assume that matrix is symmetric structure. More...
 
bool doVertices
 If false skip vertices. More...
 
bool doEdges
 If false skip edges. More...
 
bool doQuads
 
bool doTris
 
bool doTets
 
bool doPrisms
 

Detailed Description

transform Hcurl base fluxes from reference element to physical edge

Definition at line 566 of file DataOperators.hpp.

Constructor & Destructor Documentation

◆ OpSetCovariantPiolaTransformOnEdge()

MoFEM::OpSetCovariantPiolaTransformOnEdge::OpSetCovariantPiolaTransformOnEdge ( const VectorDouble tangent,
const MatrixDouble tangent_at_pts 
)

Definition at line 571 of file DataOperators.hpp.

573  : tAngent(tangent), tangentAtGaussPt(tangent_at_pts) {}

Member Function Documentation

◆ doWork()

MoFEMErrorCode MoFEM::OpSetCovariantPiolaTransformOnEdge::doWork ( int  side,
EntityType  type,
DataForcesAndSourcesCore::EntData data 
)
virtual

Operator for linear form, usually to calculate values on right hand side.

Reimplemented from MoFEM::DataOperator.

Definition at line 1549 of file DataOperators.cpp.

1550  {
1552 
1553  if (type != MBEDGE)
1555 
1558  &tAngent[0], &tAngent[1], &tAngent[2]);
1559  const double l0 = t_m(i) * t_m(i);
1560 
1561  auto get_base_at_pts = [&](auto base) {
1563  &data.getN(base)(0, HVEC0), &data.getN(base)(0, HVEC1),
1564  &data.getN(base)(0, HVEC2));
1565  return t_h_curl;
1566  };
1567 
1568  auto get_tangent_at_pts = [&]() {
1570  &tangentAtGaussPt(0, 0), &tangentAtGaussPt(0, 1),
1571  &tangentAtGaussPt(0, 2));
1572  return t_m_at_pts;
1573  };
1574 
1575  auto calculate_squared_edge_length = [&]() {
1576  std::vector<double> l1;
1577  int nb_gauss_pts = tangentAtGaussPt.size1();
1578  if (nb_gauss_pts) {
1579  l1.resize(nb_gauss_pts);
1580  auto t_m_at_pts = get_tangent_at_pts();
1581  for (size_t gg = 0; gg != nb_gauss_pts; ++gg) {
1582  l1[gg] = t_m_at_pts(i) * t_m_at_pts(i);
1583  ++t_m_at_pts;
1584  }
1585  }
1586  return l1;
1587  };
1588 
1589  auto l1 = calculate_squared_edge_length();
1590 
1591  for (int b = AINSWORTH_LEGENDRE_BASE; b != LASTBASE; b++) {
1592 
1593  FieldApproximationBase base = static_cast<FieldApproximationBase>(b);
1594  const size_t nb_gauss_pts = data.getN(base).size1();
1595  const size_t nb_dofs = data.getN(base).size2() / 3;
1596  if (nb_gauss_pts && nb_dofs) {
1597  auto t_h_curl = get_base_at_pts(base);
1598  int cc = 0;
1599  if (tangentAtGaussPt.size1() == nb_gauss_pts) {
1600  auto t_m_at_pts = get_tangent_at_pts();
1601  for (int gg = 0; gg != nb_gauss_pts; ++gg) {
1602  const double l0 = l1[gg];
1603  for (int ll = 0; ll != nb_dofs; ll++) {
1604  const double val = t_h_curl(0);
1605  const double a = val / l0;
1606  t_h_curl(i) = t_m_at_pts(i) * a;
1607  ++t_h_curl;
1608  ++cc;
1609  }
1610  ++t_m_at_pts;
1611  }
1612  } else {
1613  for (int gg = 0; gg != nb_gauss_pts; ++gg) {
1614  for (int ll = 0; ll != nb_dofs; ll++) {
1615  const double val = t_h_curl(0);
1616  const double a = val / l0;
1617  t_h_curl(i) = t_m(i) * a;
1618  ++t_h_curl;
1619  ++cc;
1620  }
1621  }
1622  }
1623 
1624  if (cc != nb_gauss_pts * nb_dofs)
1625  SETERRQ(PETSC_COMM_SELF, MOFEM_IMPOSIBLE_CASE, "Data inconsistency");
1626  }
1627  }
1628 
1630 }
#define MoFEMFunctionBeginHot
First executable line of each MoFEM function, used for error handling. Final line of MoFEM functions ...
Definition: definitions.h:501
#define MoFEMFunctionReturnHot(a)
Last executable line of each PETSc function used for error handling. Replaces return()
Definition: definitions.h:508
FieldApproximationBase
approximation base
Definition: definitions.h:144
Ainsworth Cole (Legendre) approx. base .
Definition: definitions.h:146

Member Data Documentation

◆ tAngent

const VectorDouble& MoFEM::OpSetCovariantPiolaTransformOnEdge::tAngent

Definition at line 568 of file DataOperators.hpp.

◆ tangentAtGaussPt

const MatrixDouble& MoFEM::OpSetCovariantPiolaTransformOnEdge::tangentAtGaussPt

Definition at line 569 of file DataOperators.hpp.


The documentation for this struct was generated from the following files: