v0.13.1
Public Member Functions | Public Attributes | List of all members
ConvectiveMassElement::OpVelocityRhs Struct Reference

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

Inheritance diagram for ConvectiveMassElement::OpVelocityRhs:
[legend]
Collaboration diagram for ConvectiveMassElement::OpVelocityRhs:
[legend]

Public Member Functions

 OpVelocityRhs (const std::string field_name, BlockData &data, CommonData &common_data)
 
MoFEMErrorCode doWork (int row_side, EntityType row_type, EntitiesFieldData::EntData &row_data)
 

Public Attributes

BlockDatadAta
 
CommonDatacommonData
 
VectorDouble nf
 

Detailed Description

Definition at line 301 of file ConvectiveMassElement.hpp.

Constructor & Destructor Documentation

◆ OpVelocityRhs()

ConvectiveMassElement::OpVelocityRhs::OpVelocityRhs ( const std::string  field_name,
BlockData data,
CommonData common_data 
)

Definition at line 1009 of file ConvectiveMassElement.cpp.

1012 field_name, ForcesAndSourcesCore::UserDataOperator::OPROW),
1013 dAta(data), commonData(common_data) {}
ForcesAndSourcesCore::UserDataOperator UserDataOperator
constexpr auto field_name

Member Function Documentation

◆ doWork()

MoFEMErrorCode ConvectiveMassElement::OpVelocityRhs::doWork ( int  row_side,
EntityType  row_type,
EntitiesFieldData::EntData row_data 
)

Definition at line 1015 of file ConvectiveMassElement.cpp.

1017 {
1019
1020 if (dAta.tEts.find(getNumeredEntFiniteElementPtr()->getEnt()) ==
1021 dAta.tEts.end()) {
1023 }
1024 int nb_dofs = row_data.getIndices().size();
1025 if (nb_dofs == 0)
1027
1028 auto base = row_data.getFTensor0N();
1029 int nb_base_functions = row_data.getN().size2();
1031
1032 {
1033
1034 nf.resize(nb_dofs);
1035 nf.clear();
1036
1037 for (unsigned int gg = 0; gg < row_data.getN().size1(); gg++) {
1038 FTensor::Tensor1<double *, 3> t_nf(&nf[0], &nf[1], &nf[2], 3);
1040 &commonData.valVel[gg][1],
1041 &commonData.valVel[gg][2]);
1042 int dd = 0;
1043 for (; dd < nb_dofs / 3; dd++) {
1044 t_nf(i) += base * res(i);
1045 ++base;
1046 ++t_nf;
1047 }
1048 for (; dd != nb_base_functions; dd++) {
1049 ++base;
1050 }
1051 }
1052
1053 if (row_data.getIndices().size() > 3 * row_data.getN().size2()) {
1054 SETERRQ(PETSC_COMM_SELF, 1, "data inconsistency");
1055 }
1056 CHKERR VecSetValues(getFEMethod()->ts_F, row_data.getIndices().size(),
1057 &row_data.getIndices()[0], &nf[0], ADD_VALUES);
1058 }
1060}
#define MoFEMFunctionReturnHot(a)
Last executable line of each PETSc function used for error handling. Replaces return()
Definition: definitions.h:447
#define CHKERR
Inline error check.
Definition: definitions.h:535
#define MoFEMFunctionBeginHot
First executable line of each MoFEM function, used for error handling. Final line of MoFEM functions ...
Definition: definitions.h:440
FTensor::Index< 'i', SPACE_DIM > i
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)
Definition: ddTensor0.hpp:33
FTensor::Tensor0< FTensor::PackPtr< double *, 1 > > getFTensor0N(const FieldApproximationBase base)
Get base function as Tensor0.
MatrixDouble & getN(const FieldApproximationBase base)
get base functions this return matrix (nb. of rows is equal to nb. of Gauss pts, nb....
const VectorInt & getIndices() const
Get global indices of dofs on entity.

Member Data Documentation

◆ commonData

CommonData& ConvectiveMassElement::OpVelocityRhs::commonData

Definition at line 306 of file ConvectiveMassElement.hpp.

◆ dAta

BlockData& ConvectiveMassElement::OpVelocityRhs::dAta

Definition at line 305 of file ConvectiveMassElement.hpp.

◆ nf

VectorDouble ConvectiveMassElement::OpVelocityRhs::nf

Definition at line 311 of file ConvectiveMassElement.hpp.


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