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

Inheritance diagram for EdgeForce::OpEdgeForce:

Collaboration diagram for EdgeForce::OpEdgeForce:

Public Member Functions
	OpEdgeForce (const std::string field_name, Vec f, bCForce &data, boost::ptr_vector< MethodForForceScaling > &methods_op, bool use_snes_f=false)

MoFEMErrorCode	doWork (int side, EntityType type, EntitiesFieldData::EntData &data)

Public Member Functions inherited from MoFEM::EdgeElementForcesAndSourcesCore::UserDataOperator
const EntityHandle *	getConn ()
	get element connectivity

double	getLength ()
	get edge length

VectorDouble &	getDirection ()
	get edge direction

auto	getFTensor1Normal ()
	get edge normal NOTE: it should be used only in 2D analysis

auto	getFTensor1Normal (const FTensor::Tensor1< double, 3 > &vec)
	get ftensor1 edge normal

auto	getFTensor1NormalsAtGaussPts (const FTensor::Tensor1< double, 3 > &vec)

auto	getFTensor1NormalsAtGaussPts ()
	get normal at integration points

VectorDouble &	getCoords ()
	get edge node coordinates

MatrixDouble &	getTangentAtGaussPts ()
	get tangent vector to edge curve at integration points

DEPRECATED MatrixDouble &	getTangetAtGaussPts ()

const EdgeElementForcesAndSourcesCore *	getEdgeFE ()
	get pointer to this finite element

FTensor::Tensor1< double, 3 >	getFTensor1Direction ()

FTensor::Tensor1< FTensor::PackPtr< double *, 3 >, 3 >	getFTensor1Coords ()
	get get coords at gauss points

DEPRECATED FTensor::Tensor1< FTensor::PackPtr< double *, 3 >, 3 >	getTensor1Coords ()

template<int DIM = 3>
FTensor::Tensor1< FTensor::PackPtr< double *, 3 >, DIM >	getFTensor1TangentAtGaussPts ()
	Get tangent vector at integration points.

MoFEMErrorCode	loopSideFaces (const string fe_name, FaceElementForcesAndSourcesCoreOnSide &fe_side)

template<>
FTensor::Tensor1< FTensor::PackPtr< double *, 3 >, 3 >	getFTensor1TangentAtGaussPts ()

Public Member Functions inherited from MoFEM::ForcesAndSourcesCore::UserDataOperator
	UserDataOperator (const FieldSpace space, const char type=OPSPACE, const bool symm=true)
	Constructor for operators working on finite element spaces.

	UserDataOperator (const std::string field_name, const char type, const bool symm=true)
	Constructor for operators working on a single field.

	UserDataOperator (const std::string row_field_name, const std::string col_field_name, const char type, const bool symm=true)
	Constructor for operators working on two fields (bilinear forms)

boost::shared_ptr< const NumeredEntFiniteElement >	getNumeredEntFiniteElementPtr () const
	Return raw pointer to NumeredEntFiniteElement.

EntityHandle	getFEEntityHandle () const
	Return finite element entity handle.

int	getFEDim () const
	Get dimension of finite element.

EntityType	getFEType () const
	Get dimension of finite element.

boost::weak_ptr< SideNumber >	getSideNumberPtr (const int side_number, const EntityType type)
	Get the side number pointer.

EntityHandle	getSideEntity (const int side_number, const EntityType type)
	Get the side entity.

int	getNumberOfNodesOnElement () const
	Get the number of nodes on finite element.

MoFEMErrorCode	getProblemRowIndices (const std::string filed_name, const EntityType type, const int side, VectorInt &indices) const
	Get row indices.

MoFEMErrorCode	getProblemColIndices (const std::string filed_name, const EntityType type, const int side, VectorInt &indices) const
	Get col indices.

const FEMethod *	getFEMethod () const
	Return raw pointer to Finite Element Method object.

int	getOpType () const
	Get operator types.

void	setOpType (const OpType type)
	Set operator type.

void	addOpType (const OpType type)
	Add operator type.

int	getNinTheLoop () const
	get number of finite element in the loop

int	getLoopSize () const
	get size of elements in the loop

std::string	getFEName () const
	Get name of the element.

ForcesAndSourcesCore *	getPtrFE () const

ForcesAndSourcesCore *	getSidePtrFE () const

ForcesAndSourcesCore *	getRefinePtrFE () const

const PetscData::Switches &	getDataCtx () const

const KspMethod::KSPContext	getKSPCtx () const

const SnesMethod::SNESContext	getSNESCtx () const

const TSMethod::TSContext	getTSCtx () const

Vec	getKSPf () const

Mat	getKSPA () const

Mat	getKSPB () const

Vec	getSNESf () const

Vec	getSNESx () const

Mat	getSNESA () const

Mat	getSNESB () const

Vec	getTSu () const

Vec	getTSu_t () const

Vec	getTSu_tt () const

Vec	getTSf () const

Mat	getTSA () const

Mat	getTSB () const

int	getTSstep () const

double	getTStime () const

double	getTStimeStep () const

double	getTSa () const

double	getTSaa () const

MatrixDouble &	getGaussPts ()
	matrix of integration (Gauss) points for Volume Element

auto	getFTensor0IntegrationWeight ()
	Get integration weights.

MatrixDouble &	getCoordsAtGaussPts ()
	Gauss points and weight, matrix (nb. of points x 3)

auto	getFTensor1CoordsAtGaussPts ()
	Get coordinates at integration points assuming linear geometry.

double	getMeasure () const
	get measure of element

double &	getMeasure ()
	get measure of element

MoFEMErrorCode	loopSide (const string &fe_name, ForcesAndSourcesCore side_fe, const size_t dim, const EntityHandle ent_for_side=0, boost::shared_ptr< Range > fe_range=nullptr, const int verb=QUIET, const LogManager::SeverityLevel sev=Sev::noisy, AdjCache adj_cache=nullptr)
	User calls this function to loop over elements on the side of face. This function calls finite element with its operator to do calculations.

MoFEMErrorCode	loopThis (const string &fe_name, ForcesAndSourcesCore *this_fe, const int verb=QUIET, const LogManager::SeverityLevel sev=Sev::noisy)
	User calls this function to loop over the same element using a different set of integration points. This function calls finite element with its operator to do calculations.

MoFEMErrorCode	loopParent (const string &fe_name, ForcesAndSourcesCore *parent_fe, const int verb=QUIET, const LogManager::SeverityLevel sev=Sev::noisy)
	User calls this function to loop over parent elements. This function calls finite element with its operator to do calculations.

MoFEMErrorCode	loopChildren (const string &fe_name, ForcesAndSourcesCore *child_fe, const int verb=QUIET, const LogManager::SeverityLevel sev=Sev::noisy)
	User calls this function to loop over parent elements. This function calls finite element with its operator to do calculations.

MoFEMErrorCode	loopRange (const string &fe_name, ForcesAndSourcesCore *range_fe, boost::shared_ptr< Range > fe_range, const int verb=QUIET, const LogManager::SeverityLevel sev=Sev::noisy)
	Iterate over range of elements.

Public Member Functions inherited from MoFEM::DataOperator
	DataOperator (const bool symm=true)

virtual	~DataOperator ()=default

virtual MoFEMErrorCode	doWork (int row_side, int col_side, EntityType row_type, EntityType col_type, EntitiesFieldData::EntData &row_data, EntitiesFieldData::EntData &col_data)
	Operator for bi-linear form, usually to calculate values on left hand side.

virtual MoFEMErrorCode	opLhs (EntitiesFieldData &row_data, EntitiesFieldData &col_data)

virtual MoFEMErrorCode	doWork (int side, EntityType type, EntitiesFieldData::EntData &data)
	Operator for linear form, usually to calculate values on right hand side.

virtual MoFEMErrorCode	opRhs (EntitiesFieldData &data, const bool error_if_no_base=false)

bool	getSymm () const
	Get if operator uses symmetry of DOFs or not.

void	setSymm ()
	set if operator is executed taking in account symmetry

void	unSetSymm ()
	unset if operator is executed for non symmetric problem

Public Attributes
Vec	F

bCForce &	dAta

boost::ptr_vector< MethodForForceScaling > &	methodsOp

bool	useSnesF

VectorDouble	wEights

VectorDouble	Nf

Public Attributes inherited from MoFEM::ForcesAndSourcesCore::UserDataOperator
char	opType

std::string	rowFieldName

std::string	colFieldName

FieldSpace	sPace

Public Attributes inherited from MoFEM::DataOperator
DoWorkLhsHookFunType	doWorkLhsHook

DoWorkRhsHookFunType	doWorkRhsHook

bool	sYmm
	If true assume that matrix is symmetric structure.

std::array< bool, MBMAXTYPE >	doEntities
	If true operator is executed for entity.

bool &	doVertices
	\deprectaed If false skip vertices

bool &	doEdges
	\deprectaed If false skip edges

bool &	doQuads
	\deprectaed

bool &	doTris
	\deprectaed

bool &	doTets
	\deprectaed

bool &	doPrisms
	\deprectaed

Additional Inherited Members
Public Types inherited from MoFEM::ForcesAndSourcesCore::UserDataOperator
enum	OpType { OPROW = 1 << 0 , OPCOL = 1 << 1 , OPROWCOL = 1 << 2 , OPSPACE = 1 << 3 , OPLAST = 1 << 3 }
	Controls loop over entities on element. More...

using	AdjCache = std::map< EntityHandle, std::vector< boost::weak_ptr< NumeredEntFiniteElement > > >

Public Types inherited from MoFEM::DataOperator
using	DoWorkLhsHookFunType = boost::function< MoFEMErrorCode(DataOperator *op_ptr, int row_side, int col_side, EntityType row_type, EntityType col_type, EntitiesFieldData::EntData &row_data, EntitiesFieldData::EntData &col_data)>

using	DoWorkRhsHookFunType = boost::function< MoFEMErrorCode(DataOperator *op_ptr, int side, EntityType type, EntitiesFieldData::EntData &data)>

Static Public Attributes inherited from MoFEM::ForcesAndSourcesCore::UserDataOperator
static const char *const	OpTypeNames []

Protected Member Functions inherited from MoFEM::EdgeElementForcesAndSourcesCore::UserDataOperator
MoFEMErrorCode	setPtrFE (ForcesAndSourcesCore *ptr)

Protected Attributes inherited from MoFEM::ForcesAndSourcesCore::UserDataOperator
ForcesAndSourcesCore *	ptrFE

Detailed Description

Definition at line 36 of file EdgeForce.hpp.

Constructor & Destructor Documentation

◆ OpEdgeForce()

EdgeForce::OpEdgeForce::OpEdgeForce	(	const std::string	field_name,
		Vec	f,
		bCForce &	data,
		boost::ptr_vector< MethodForForceScaling > &	methods_op,
		bool	use_snes_f = `false`
	)

Definition at line 14 of file EdgeForce.cpp.

17 : EdgeElementForcesAndSourcesCore::UserDataOperator(field_name, OPROW),

18 F(f), dAta(data), methodsOp(methods_op), useSnesF(use_snes_f) {}

field_name

constexpr auto field_name

Definition poisson_2d_homogeneous.cpp:13

EdgeForce::OpEdgeForce::methodsOp

boost::ptr_vector< MethodForForceScaling > & methodsOp

Definition EdgeForce.hpp:41

EdgeForce::OpEdgeForce::dAta

bCForce & dAta

Definition EdgeForce.hpp:40

EdgeForce::OpEdgeForce::useSnesF

bool useSnesF

Definition EdgeForce.hpp:42

EdgeForce::OpEdgeForce::F

Vec F

Definition EdgeForce.hpp:39

MoFEM::ForcesAndSourcesCore::UserDataOperator::OPROW

@ OPROW

operator doWork function is executed on FE rows

Definition ForcesAndSourcesCore.hpp:615

Member Function Documentation

◆ doWork()

MoFEMErrorCode EdgeForce::OpEdgeForce::doWork	(	int	side,
		EntityType	type,
		EntitiesFieldData::EntData &	data
	)

Definition at line 21 of file EdgeForce.cpp.

                                                               {
  MoFEMFunctionBegin;
 
  if (data.getIndices().size() == 0) {
    MoFEMFunctionReturnHot(0);
  }
  EntityHandle ent = getNumeredEntFiniteElementPtr()->getEnt();
  if (dAta.eDges.find(ent) == dAta.eDges.end()) {
    MoFEMFunctionReturnHot(0);
  }
 
  // Get pointer to DOF and its rank
  const auto &dof_ptr = data.getFieldDofs()[0];
  int rank = dof_ptr->getNbOfCoeffs();
 
  int nb_dofs = data.getIndices().size();
 
  Nf.resize(nb_dofs, false);
  Nf.clear();
 
  int nb_gauss_pts = data.getN().size1();
  wEights.resize(nb_gauss_pts, false);
 
  // This will work for fluxes and other fields with rank other than 3.
  for (int rr = 0; rr < rank; rr++) {
 
    // Get force value for each vector element from blockset data.
    double force;
    if (rr == 0) {
      force = dAta.data.data.value3 * dAta.data.data.value1;
    } else if (rr == 1) {
      force = dAta.data.data.value4 * dAta.data.data.value1;
    } else if (rr == 2) {
      force = dAta.data.data.value5 * dAta.data.data.value1;
    } else {
      SETERRQ(PETSC_COMM_SELF, MOFEM_DATA_INCONSISTENCY, "data inconsistency");
    }
 
    // Integrate force on the line
    for (int gg = 0; gg < nb_gauss_pts; gg++) {
 
      if (!rr) {
        wEights[gg] = 0;
        // This is if edge is curved, i.e. HO geometry
        for (int dd = 0; dd < 3; dd++) {
          wEights[gg] += pow(getTangentAtGaussPts()(gg, dd), 2);
        }
        wEights[gg] = std::sqrt(wEights[gg]);
        wEights[gg] *= getGaussPts()(1, gg);
      }
 
      cblas_daxpy(nb_dofs / rank, wEights[gg] * force, &data.getN()(gg, 0), 1,
                  &Nf[rr], rank);
    }
  }
 
  // I time/step varying force or calculate in arc-length control. This hack
  // scale force appropriately, and is controlled for user
  CHKERR MethodForForceScaling::applyScale(getFEMethod(), methodsOp, Nf);
 
  // Assemble force into right-hand vector
  Vec myF = F;
  if (useSnesF || F == PETSC_NULLPTR) 
    myF = getKSPf();
 
  CHKERR VecSetValues(myF, data.getIndices().size(), &data.getIndices()[0],
                      &Nf[0], ADD_VALUES);
 
  MoFEMFunctionReturn(0);
}

Member Data Documentation

◆ dAta

bCForce& EdgeForce::OpEdgeForce::dAta

Definition at line 40 of file EdgeForce.hpp.

◆ F

Vec EdgeForce::OpEdgeForce::F

Definition at line 39 of file EdgeForce.hpp.

◆ methodsOp

boost::ptr_vector<MethodForForceScaling>& EdgeForce::OpEdgeForce::methodsOp

Definition at line 41 of file EdgeForce.hpp.

◆ Nf

VectorDouble EdgeForce::OpEdgeForce::Nf

Definition at line 49 of file EdgeForce.hpp.

◆ useSnesF

bool EdgeForce::OpEdgeForce::useSnesF

Definition at line 42 of file EdgeForce.hpp.

◆ wEights

VectorDouble EdgeForce::OpEdgeForce::wEights

Definition at line 48 of file EdgeForce.hpp.

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

users_modules/basic_finite_elements/src/EdgeForce.hpp
users_modules/basic_finite_elements/src/impl/EdgeForce.cpp

Public Member Functions

Public Attributes

Additional Inherited Members