v0.15.0
Loading...
Searching...
No Matches
ConvectiveMassElement::OpEshelbyDynamicMaterialMomentumRhs Struct Reference

#include "users_modules/basic_finite_elements/src/ConvectiveMassElement.hpp"

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

Public Member Functions

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

Public Attributes

BlockDatadAta
 
CommonDatacommonData
 
Range forcesOnlyOnEntities
 
VectorDouble nf
 

Detailed Description

Definition at line 370 of file ConvectiveMassElement.hpp.

Constructor & Destructor Documentation

◆ OpEshelbyDynamicMaterialMomentumRhs()

ConvectiveMassElement::OpEshelbyDynamicMaterialMomentumRhs::OpEshelbyDynamicMaterialMomentumRhs ( const std::string field_name,
BlockData & data,
CommonData & common_data,
Range * forcesonlyonentities_ptr )

Definition at line 1453 of file ConvectiveMassElement.cpp.

1458 : VolumeElementForcesAndSourcesCore::UserDataOperator(
1459 field_name, ForcesAndSourcesCore::UserDataOperator::OPROW),
1460 dAta(data), commonData(common_data) {
1461 if (forcesonlyonentities_ptr != NULL) {
1462 forcesOnlyOnEntities = *forcesonlyonentities_ptr;
1463 }
1464}
constexpr auto field_name

Member Function Documentation

◆ doWork()

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

Definition at line 1467 of file ConvectiveMassElement.cpp.

1468 {
1470
1471 if (dAta.tEts.find(getNumeredEntFiniteElementPtr()->getEnt()) ==
1472 dAta.tEts.end()) {
1474 }
1475 int nb_dofs = row_data.getIndices().size();
1476 if (nb_dofs == 0)
1478
1479 try {
1480
1481 nf.resize(nb_dofs);
1482 nf.clear();
1483
1484 auto base = row_data.getFTensor0N();
1485 int nb_base_functions = row_data.getN().size2();
1486 FTensor::Index<'i', 3> i;
1487
1488 for (unsigned int gg = 0; gg < row_data.getN().size1(); gg++) {
1489 FTensor::Tensor1<double *, 3> t_nf(&nf[0], &nf[1], &nf[2], 3);
1491 &commonData.valT[gg][1],
1492 &commonData.valT[gg][2]);
1493 int dd = 0;
1494 for (; dd < nb_dofs / 3; dd++) {
1495 t_nf(i) += base * res(i);
1496 ++base;
1497 ++t_nf;
1498 }
1499 for (; dd != nb_base_functions; dd++) {
1500 ++base;
1501 }
1502 }
1503
1504 if (row_data.getIndices().size() > 3 * row_data.getN().size2()) {
1505 SETERRQ(PETSC_COMM_SELF, 1, "data inconsistency");
1506 }
1507 if (!forcesOnlyOnEntities.empty()) {
1508 VectorInt indices = row_data.getIndices();
1509 VectorDofs &dofs = row_data.getFieldDofs();
1510 VectorDofs::iterator dit = dofs.begin();
1511 for (int ii = 0; dit != dofs.end(); dit++, ii++) {
1512 if (forcesOnlyOnEntities.find((*dit)->getEnt()) ==
1513 forcesOnlyOnEntities.end()) {
1514 // std::cerr << **dit << std::endl;
1515 indices[ii] = -1;
1516 }
1517 }
1518 // std::cerr << indices << std::endl;
1519 CHKERR VecSetValues(getFEMethod()->ts_F, indices.size(), &indices[0],
1520 &nf[0], ADD_VALUES);
1521 } else {
1522 CHKERR VecSetValues(getFEMethod()->ts_F, row_data.getIndices().size(),
1523 &row_data.getIndices()[0], &nf[0], ADD_VALUES);
1524 }
1525
1526 } catch (const std::exception &ex) {
1527 std::ostringstream ss;
1528 ss << "throw in method: " << ex.what() << std::endl;
1529 SETERRQ(PETSC_COMM_SELF, MOFEM_DATA_INCONSISTENCY, "%s", ss.str().c_str());
1530 }
1531
1533}
#define MoFEMFunctionReturnHot(a)
Last executable line of each PETSc function used for error handling. Replaces return()
@ MOFEM_DATA_INCONSISTENCY
Definition definitions.h:31
#define CHKERR
Inline error check.
#define MoFEMFunctionBeginHot
First executable line of each MoFEM function, used for error handling. Final line of MoFEM functions ...
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
UBlasVector< int > VectorInt
Definition Types.hpp:67
ublas::vector< FEDofEntity *, DofsAllocator > VectorDofs
MoFEMErrorCode VecSetValues(Vec V, const EntitiesFieldData::EntData &data, const double *ptr, InsertMode iora)
Assemble PETSc vector.
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 VectorDofs & getFieldDofs() const
get dofs data stature FEDofEntity
const VectorInt & getIndices() const
Get global indices of dofs on entity.

Member Data Documentation

◆ commonData

CommonData& ConvectiveMassElement::OpEshelbyDynamicMaterialMomentumRhs::commonData

Definition at line 375 of file ConvectiveMassElement.hpp.

◆ dAta

BlockData& ConvectiveMassElement::OpEshelbyDynamicMaterialMomentumRhs::dAta

Definition at line 374 of file ConvectiveMassElement.hpp.

◆ forcesOnlyOnEntities

Range ConvectiveMassElement::OpEshelbyDynamicMaterialMomentumRhs::forcesOnlyOnEntities

Definition at line 376 of file ConvectiveMassElement.hpp.

◆ nf

VectorDouble ConvectiveMassElement::OpEshelbyDynamicMaterialMomentumRhs::nf

Definition at line 383 of file ConvectiveMassElement.hpp.


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