v0.8.23
Public Member Functions | Public Attributes | List of all members
AnalyticalDirichletBC::ApproxField::OpLhs Struct Reference

Lhs operator used to build matrix. More...

#include <users_modules/basic_finite_elements/src/AnalyticalDirichlet.hpp>

Inheritance diagram for AnalyticalDirichletBC::ApproxField::OpLhs:
[legend]
Collaboration diagram for AnalyticalDirichletBC::ApproxField::OpLhs:
[legend]

Public Member Functions

 OpLhs (const std::string field_name, MatrixDouble &ho_coords)
 
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...
 
- Public Member Functions inherited from MoFEM::FaceElementForcesAndSourcesCore::UserDataOperator
 UserDataOperator (const FieldSpace space)
 
 UserDataOperator (const std::string &field_name, const char type)
 
 UserDataOperator (const std::string &row_field_name, const std::string &col_field_name, const char type, const bool symm=true)
 
double getArea ()
 get area of face More...
 
double getMeasure ()
 get measure of element More...
 
VectorDoublegetNormal ()
 get triangle normal More...
 
VectorDoublegetTangent1 ()
 get triangle tangent 1 More...
 
VectorDoublegetTangent2 ()
 get triangle tangent 2 More...
 
auto getFTensor1Normal ()
 get normal as tensor More...
 
DEPRECATED auto getTensor1Normal ()
 
auto getFTensor1Tangent1 ()
 get tangentOne as tensor More...
 
DEPRECATED auto getTensor1Tangent1 ()
 
auto getFTensor2Tangent1 ()
 get tangentTwo as tensor More...
 
DEPRECATED auto getTensor2Tangent1 ()
 
int getNumNodes ()
 get element number of nodes More...
 
const EntityHandlegetConn ()
 get element connectivity More...
 
VectorDoublegetCoords ()
 get triangle coordinates More...
 
auto getFTensor1Coords ()
 get get coords at gauss points More...
 
DEPRECATED auto getTensor1Coords ()
 
MatrixDoublegetCoordsAtGaussPts ()
 Gauss points and weight, matrix (nb. of points x 3) More...
 
auto getFTensor1CoordsAtGaussPts ()
 get coordinates at Gauss pts. More...
 
DEPRECATED auto getTensor1CoordsAtGaussPts ()
 
MatrixDoublegetHoCoordsAtGaussPts ()
 coordinate at Gauss points (if hierarchical approximation of element geometry) More...
 
auto getFTensor1HoCoordsAtGaussPts ()
 get coordinates at Gauss pts (takes in account ho approx. of geometry) More...
 
DEPRECATED auto getTensor1HoCoordsAtGaussPts ()
 
MatrixDoublegetNormalsAtGaussPts ()
 if higher order geometry return normals at Gauss pts. More...
 
DEPRECATED MatrixDoublegetNormalsAtGaussPt ()
 
ublas::matrix_row< MatrixDoublegetNormalsAtGaussPts (const int gg)
 if higher order geometry return normals at Gauss pts. More...
 
DEPRECATED auto getNormalsAtGaussPt (const int gg)
 
MatrixDoublegetTangent1AtGaussPts ()
 if higher order geometry return tangent vector to triangle at Gauss pts. More...
 
DEPRECATED MatrixDoublegetTangent1AtGaussPt ()
 
MatrixDoublegetTangent2AtGaussPts ()
 if higher order geometry return tangent vector to triangle at Gauss pts. More...
 
DEPRECATED MatrixDoublegetTangent2AtGaussPt ()
 
auto getFTensor1NormalsAtGaussPts ()
 get normal at integration points More...
 
DEPRECATED auto getTensor1NormalsAtGaussPt ()
 
auto getFTensor1Tangent1AtGaussPts ()
 get tangent 1 at integration points More...
 
DEPRECATED auto getTensor1Tangent1AtGaussPt ()
 
auto getFTensor1Tangent2AtGaussPts ()
 get tangent 2 at integration points More...
 
DEPRECATED auto getTensor1Tangent2AtGaussPt ()
 
DEPRECATED const FaceElementForcesAndSourcesCoregetFaceElementForcesAndSourcesCore ()
 
DEPRECATED const FaceElementForcesAndSourcesCoregetTriFE ()
 
const FaceElementForcesAndSourcesCoregetFaceFE ()
 return pointer to Generic Triangle Finite Element object More...
 
MoFEMErrorCode loopSideVolumes (const string &fe_name, VolumeElementForcesAndSourcesCoreOnSide &method)
 
- Public Member Functions inherited from MoFEM::ForcesAndSourcesCore::UserDataOperator
 UserDataOperator (const FieldSpace space, const char type=OPLAST, const bool symm=true)
 
 UserDataOperator (const std::string &field_name, const char type, const bool symm=true)
 
 UserDataOperator (const std::string &row_field_name, const std::string &col_field_name, const char type, const bool symm=true)
 
virtual ~UserDataOperator ()
 
boost::shared_ptr< const NumeredEntFiniteElementgetNumeredEntFiniteElementPtr () const
 Return raw pointer to NumeredEntFiniteElement. More...
 
EntityHandle getFEEntityHandle () const
 Return finite element entity handle. More...
 
MoFEMErrorCode getProblemRowIndices (const std::string filed_name, const EntityType type, const int side, VectorInt &indices) const
 Get row indices. More...
 
MoFEMErrorCode getProblemColIndices (const std::string filed_name, const EntityType type, const int side, VectorInt &indices) const
 Get col indices. More...
 
virtual MoFEMErrorCode setPtrFE (ForcesAndSourcesCore *ptr)
 
const FEMethodgetFEMethod () const
 Return raw pointer to Finite Element Method object. More...
 
int getOpType () const
 Get operator types. More...
 
void setOpType (const OpType type)
 Set operator type. More...
 
void addOpType (const OpType type)
 Add operator type. More...
 
int getNinTheLoop () const
 get number of finite element in the loop More...
 
int getLoopSize () const
 get size of elements in the loop More...
 
const std::string & getFEName () const
 Get name of the element. More...
 
Vec getSnesF () const
 
Vec getSnesX () const
 
Mat getSnesA () const
 
Mat getSnesB () const
 
Vec getTSu () const
 
Vec getTSu_t () const
 
Vec getTSf () const
 
Mat getTSA () const
 
Mat getTSB () const
 
int getTSstep () const
 
double getTStime () const
 
double getTSa () const
 
MatrixDoublegetGaussPts ()
 matrix of integration (Gauss) points for Volume Element More...
 
auto getFTensor0IntegrationWeight ()
 Get integration weights. More...
 
DEPRECATED MoFEMErrorCode getPorblemRowIndices (const std::string filed_name, const EntityType type, const int side, VectorInt &indices) const
 
DEPRECATED MoFEMErrorCode getPorblemColIndices (const std::string filed_name, const EntityType type, const int side, VectorInt &indices) const
 
- 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 opLhs (DataForcesAndSourcesCore &row_data, DataForcesAndSourcesCore &col_data, bool symm=true)
 
virtual MoFEMErrorCode opLhs (DataForcesAndSourcesCore &row_data, DataForcesAndSourcesCore &col_data)
 
virtual MoFEMErrorCode doWork (int side, EntityType type, DataForcesAndSourcesCore::EntData &data)
 Operator for linear form, usually to calculate values on right hand side. More...
 
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

MatrixDouble & hoCoords
 
MatrixDouble NN
 
MatrixDouble transNN
 
- Public Attributes inherited from MoFEM::ForcesAndSourcesCore::UserDataOperator
char opType
 
std::string rowFieldName
 
std::string colFieldName
 
FieldSpace sPace
 
- 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
 

Additional Inherited Members

- Public Types inherited from MoFEM::ForcesAndSourcesCore::UserDataOperator
enum  OpType { OPROW = 1 << 0, OPCOL = 1 << 1, OPROWCOL = 1 << 2, OPLAST = 1 << 3 }
 Controls loop over entities on element. More...
 
- Protected Attributes inherited from MoFEM::ForcesAndSourcesCore::UserDataOperator
ForcesAndSourcesCoreptrFE
 

Detailed Description

Lhs operator used to build matrix.

Definition at line 64 of file AnalyticalDirichlet.hpp.

Constructor & Destructor Documentation

◆ OpLhs()

AnalyticalDirichletBC::ApproxField::OpLhs::OpLhs ( const std::string  field_name,
MatrixDouble &  ho_coords 
)

Definition at line 58 of file AnalyticalDirichlet.cpp.

61  field_name, ForcesAndSourcesCore::UserDataOperator::OPROWCOL),
62  hoCoords(ho_coords) {}
ForcesAndSourcesCore::UserDataOperator UserDataOperator

Member Function Documentation

◆ doWork()

MoFEMErrorCode AnalyticalDirichletBC::ApproxField::OpLhs::doWork ( int  row_side,
int  col_side,
EntityType  row_type,
EntityType  col_type,
DataForcesAndSourcesCore::EntData row_data,
DataForcesAndSourcesCore::EntData col_data 
)
virtual

Operator for bi-linear form, usually to calculate values on left hand side.

Reimplemented from MoFEM::DataOperator.

Definition at line 64 of file AnalyticalDirichlet.cpp.

67  {
69 
70  if (row_data.getIndices().size() == 0)
72  if (col_data.getIndices().size() == 0)
74 
75  const auto &dof_ptr = row_data.getFieldDofs()[0];
76  const int rank = dof_ptr->getNbOfCoeffs();
77 
78  int nb_row_dofs = row_data.getIndices().size() / rank;
79  int nb_col_dofs = col_data.getIndices().size() / rank;
80 
81  NN.resize(nb_row_dofs, nb_col_dofs);
82  NN.clear();
83 
84  unsigned int nb_gauss_pts = row_data.getN().size1();
85  for (unsigned int gg = 0; gg < nb_gauss_pts; gg++) {
86 
87  double w = getGaussPts()(2, gg);
88  if (hoCoords.size1() == row_data.getN().size1()) {
89 
90  // higher order element
91  double area = norm_2(getNormalsAtGaussPts(gg)) * 0.5;
92  w *= area;
93 
94  } else {
95 
96  // linear element
97  w *= getArea();
98  }
99 
100  cblas_dger(CblasRowMajor, nb_row_dofs, nb_col_dofs, w,
101  &row_data.getN()(gg, 0), 1, &col_data.getN()(gg, 0), 1,
102  &*NN.data().begin(), nb_col_dofs);
103  }
104 
105  if ((row_type != col_type) || (row_side != col_side)) {
106  transNN.resize(nb_col_dofs, nb_row_dofs);
107  ublas::noalias(transNN) = trans(NN);
108  }
109 
110  double *data = &*NN.data().begin();
111  double *trans_data = &*transNN.data().begin();
112  VectorInt row_indices, col_indices;
113  row_indices.resize(nb_row_dofs);
114  col_indices.resize(nb_col_dofs);
115 
116  for (int rr = 0; rr < rank; rr++) {
117 
118  if ((row_data.getIndices().size() % rank) != 0) {
119  SETERRQ(PETSC_COMM_SELF, MOFEM_DATA_INCONSISTENCY, "data inconsistency");
120  }
121 
122  if ((col_data.getIndices().size() % rank) != 0) {
123  SETERRQ(PETSC_COMM_SELF, MOFEM_DATA_INCONSISTENCY, "data inconsistency");
124  }
125 
126  unsigned int nb_rows;
127  unsigned int nb_cols;
128  int *rows;
129  int *cols;
130 
131  if (rank > 1) {
132 
133  ublas::noalias(row_indices) = ublas::vector_slice<VectorInt>(
134  row_data.getIndices(),
135  ublas::slice(rr, rank, row_data.getIndices().size() / rank));
136  ublas::noalias(col_indices) = ublas::vector_slice<VectorInt>(
137  col_data.getIndices(),
138  ublas::slice(rr, rank, col_data.getIndices().size() / rank));
139 
140  nb_rows = row_indices.size();
141  nb_cols = col_indices.size();
142  rows = &*row_indices.data().begin();
143  cols = &*col_indices.data().begin();
144 
145  } else {
146 
147  nb_rows = row_data.getIndices().size();
148  nb_cols = col_data.getIndices().size();
149  rows = &*row_data.getIndices().data().begin();
150  cols = &*col_data.getIndices().data().begin();
151  }
152 
153  if (nb_rows != NN.size1()) {
154  SETERRQ(PETSC_COMM_SELF, MOFEM_DATA_INCONSISTENCY, "data inconsistency");
155  }
156  if (nb_cols != NN.size2()) {
157  SETERRQ(PETSC_COMM_SELF, MOFEM_DATA_INCONSISTENCY, "data inconsistency");
158  }
159 
160  CHKERR MatSetValues(getFEMethod()->snes_B, nb_rows, rows, nb_cols, cols,
161  data, ADD_VALUES);
162  if ((row_type != col_type) || (row_side != col_side)) {
163  if (nb_rows != transNN.size2()) {
164  SETERRQ(PETSC_COMM_SELF, MOFEM_DATA_INCONSISTENCY,
165  "data inconsistency");
166  }
167  if (nb_cols != transNN.size1()) {
168  SETERRQ(PETSC_COMM_SELF, MOFEM_DATA_INCONSISTENCY,
169  "data inconsistency");
170  }
171  CHKERR MatSetValues(getFEMethod()->snes_B, nb_cols, cols, nb_rows, rows,
172  trans_data, ADD_VALUES);
173  }
174  }
175 
177 }
MatrixDouble & getNormalsAtGaussPts()
if higher order geometry return normals at Gauss pts.
#define MoFEMFunctionReturn(a)
Last executable line of each PETSc function used for error handling. Replaces return()
Definition: definitions.h:476
const VectorDofs & getFieldDofs() const
get dofs data stature FEDofEntity
void cblas_dger(const enum CBLAS_ORDER order, const int M, const int N, const double alpha, const double *X, const int incX, const double *Y, const int incY, double *A, const int lda)
Definition: cblas_dger.c:12
#define MoFEMFunctionReturnHot(a)
Last executable line of each PETSc function used for error handling. Replaces return()
Definition: definitions.h:507
virtual const MatrixDouble & getN(const FieldApproximationBase base) const
get base functions this return matrix (nb. of rows is equal to nb. of Gauss pts, nb....
const FEMethod * getFEMethod() const
Return raw pointer to Finite Element Method object.
MatrixDouble & getGaussPts()
matrix of integration (Gauss) points for Volume Element
MoFEMErrorCode MatSetValues(Mat M, const DataForcesAndSourcesCore::EntData &row_data, const DataForcesAndSourcesCore::EntData &col_data, const double *ptr, InsertMode iora)
Assemble PETSc matrix.
#define CHKERR
Inline error check.
Definition: definitions.h:595
ublas::vector< int, IntAllocator > VectorInt
Definition: Types.hpp:75
const VectorInt & getIndices() const
Get global indices of dofs on entity.
#define MoFEMFunctionBegin
First executable line of each MoFEM function, used for error handling. Final line of MoFEM functions ...
Definition: definitions.h:406

Member Data Documentation

◆ hoCoords

MatrixDouble& AnalyticalDirichletBC::ApproxField::OpLhs::hoCoords

Definition at line 67 of file AnalyticalDirichlet.hpp.

◆ NN

MatrixDouble AnalyticalDirichletBC::ApproxField::OpLhs::NN

Definition at line 70 of file AnalyticalDirichlet.hpp.

◆ transNN

MatrixDouble AnalyticalDirichletBC::ApproxField::OpLhs::transNN

Definition at line 70 of file AnalyticalDirichlet.hpp.


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