Operator performs automatic differentiation. More...

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

Inheritance diagram for NonlinearElasticElement::OpJacobianPiolaKirchhoffStress:

Collaboration diagram for NonlinearElasticElement::OpJacobianPiolaKirchhoffStress:

Public Member Functions
	OpJacobianPiolaKirchhoffStress (const std::string field_name, BlockData &data, CommonData &common_data, int tag, bool jacobian, bool ale, bool field_disp)
	Construct operator to calculate Piola-Kirchhoff stress or its derivatives over gradient deformation.

virtual MoFEMErrorCode	calculateStress (const int gg)
	Calculate Paola-Kirchhoff I stress.

virtual MoFEMErrorCode	recordTag (const int gg)
	Record ADOL-C tape.

virtual MoFEMErrorCode	playTag (const int gg)
	Play ADOL-C tape.

virtual bool	recordTagForIntegrationPoint (const int gg)
	Cgeck if tape is recorded for given integration point.

MoFEMErrorCode	doWork (int row_side, EntityType row_type, EntitiesFieldData::EntData &row_data)
	Calculate stress or jacobian at gauss points.

Public Member Functions inherited from MoFEM::VolumeElementForcesAndSourcesCore::UserDataOperator
int	getNumNodes ()
	get element number of nodes

const EntityHandle *	getConn ()
	get element connectivity

double	getVolume () const
	element volume (linear geometry)

double &	getVolume ()
	element volume (linear geometry)

FTensor::Tensor2< double *, 3, 3 > &	getJac ()
	get element Jacobian

FTensor::Tensor2< double *, 3, 3 > &	getInvJac ()
	get element inverse Jacobian

VectorDouble &	getCoords ()
	nodal coordinates

VolumeElementForcesAndSourcesCore *	getVolumeFE () const
	return pointer to Generic Volume Finite Element object

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

MoFEM::Interface &	getMField ()

moab::Interface &	getMoab ()

virtual boost::weak_ptr< ForcesAndSourcesCore >	getSubPipelinePtr () const

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
BlockData &	dAta

CommonData &	commonData

int	tAg

int	adlocReturnValue

bool	jAcobian
	if true Jacobian is calculated

bool	fUnction
	if true stress i calculated

bool	aLe
	true if arbitrary Lagrangian-Eulerian formulation

bool	fieldDisp

VectorDouble	activeVariables

int	nbActiveVariables

std::vector< MatrixDouble > *	ptrh

std::vector< MatrixDouble > *	ptrH

FTensor::Index< 'i', 3 >	i

FTensor::Index< 'j', 3 >	j

FTensor::Index< 'k', 3 >	k

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::VolumeElementForcesAndSourcesCore::UserDataOperator
MoFEMErrorCode	setPtrFE (ForcesAndSourcesCore *ptr)

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

Detailed Description

Operator performs automatic differentiation.

Definition at line 370 of file NonLinearElasticElement.hpp.

Constructor & Destructor Documentation

◆ OpJacobianPiolaKirchhoffStress()

NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::OpJacobianPiolaKirchhoffStress	(	const std::string	field_name,
		BlockData &	data,
		CommonData &	common_data,
		int	tag,
		bool	jacobian,
		bool	ale,
		bool	field_disp
	)

Construct operator to calculate Piola-Kirchhoff stress or its derivatives over gradient deformation.

Parameters

field_name	approximation field name of spatial positions or displacements
data	reference to block data (what is Young modulus, Poisson ratio or what elements are part of the block)
tag	adol-c unique tag of the tape
jacobian	if true derivative of Piola Stress is calculated otherwise just stress is calculated
field_disp	if true approximation field keeps displacements not spatial positions

Definition at line 198 of file NonLinearElasticElement.cpp.

    : VolumeElementForcesAndSourcesCore::UserDataOperator(
          field_name, UserDataOperator::OPROW),
      dAta(data), commonData(common_data), tAg(tag), adlocReturnValue(0),
      jAcobian(jacobian), fUnction(!jacobian), aLe(ale), fieldDisp(field_disp) {
 
}

Member Function Documentation

◆ calculateStress()

MoFEMErrorCode NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::calculateStress ( const int gg )

virtual

Calculate Paola-Kirchhoff I stress.

Returns: error code

Reimplemented in NonlinearElasticElement::OpJacobianEshelbyStress, and Smoother::OpJacobianSmoother.

Definition at line 211 of file NonLinearElasticElement.cpp.

                  {
  MoFEMFunctionBegin;
 
  CHKERR dAta.materialAdoublePtr->calculateP_PiolaKirchhoffI(
      dAta, getNumeredEntFiniteElementPtr());
 
  if (aLe) {
    auto &t_P = dAta.materialAdoublePtr->t_P;
    auto &t_invH = dAta.materialAdoublePtr->t_invH;
    t_P(i, j) = t_P(i, k) * t_invH(j, k);
    t_P(i, j) *= dAta.materialAdoublePtr->detH;
  }
 
  commonData.sTress[gg].resize(3, 3, false);
  for (int dd1 = 0; dd1 < 3; dd1++) {
    for (int dd2 = 0; dd2 < 3; dd2++) {
      dAta.materialAdoublePtr->P(dd1, dd2) >>=
          (commonData.sTress[gg])(dd1, dd2);
    }
  }
 
  MoFEMFunctionReturn(0);
}

◆ doWork()

MoFEMErrorCode NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::doWork	(	int	row_side,
		EntityType	row_type,
		EntitiesFieldData::EntData &	row_data
	)

Calculate stress or jacobian at gauss points.

Parameters

row_side
row_type
row_data

Returns: error code

Definition at line 338 of file NonLinearElasticElement.cpp.

                                        {
  MoFEMFunctionBegin;
 
  // do it only once, no need to repeat this for edges,faces or tets
  if (row_type != MBVERTEX)
    MoFEMFunctionReturnHot(0);
 
  if (dAta.tEts.find(getNumeredEntFiniteElementPtr()->getEnt()) ==
      dAta.tEts.end()) {
    MoFEMFunctionReturnHot(0);
  }
 
  int nb_dofs = row_data.getFieldData().size();
  if (nb_dofs == 0)
    MoFEMFunctionReturnHot(0);
  dAta.materialAdoublePtr->commonDataPtr = &commonData;
  dAta.materialAdoublePtr->opPtr = this;
 
  int nb_gauss_pts = row_data.getN().size1();
  commonData.sTress.resize(nb_gauss_pts);
  commonData.jacStress.resize(nb_gauss_pts);
 
  ptrh = &(commonData.gradAtGaussPts[commonData.spatialPositions]);
  if (aLe) {
    ptrH = &(commonData.gradAtGaussPts[commonData.meshPositions]);
  }
 
  for (int gg = 0; gg != nb_gauss_pts; gg++) {
 
    dAta.materialAdoublePtr->gG = gg;
 
    // Record tag and calculate stress
    if (recordTagForIntegrationPoint(gg)) {
      CHKERR recordTag(gg);
    }
 
    // Set active variables vector
    if (jAcobian || (!recordTagForIntegrationPoint(gg))) {
      activeVariables.resize(nbActiveVariables, false);
      if (!aLe) {
        for (int dd1 = 0; dd1 < 3; dd1++) {
          for (int dd2 = 0; dd2 < 3; dd2++) {
            activeVariables(dd1 * 3 + dd2) = (*ptrh)[gg](dd1, dd2);
          }
        }
      } else {
        for (int dd1 = 0; dd1 < 3; dd1++) {
          for (int dd2 = 0; dd2 < 3; dd2++) {
            activeVariables(dd1 * 3 + dd2) = (*ptrh)[gg](dd1, dd2);
          }
        }
        for (int dd1 = 0; dd1 < 3; dd1++) {
          for (int dd2 = 0; dd2 < 3; dd2++) {
            activeVariables(9 + dd1 * 3 + dd2) = (*ptrH)[gg](dd1, dd2);
          }
        }
      }
      CHKERR dAta.materialAdoublePtr->setUserActiveVariables(activeVariables);
 
      // Play tag and calculate stress or tangent
      if (jAcobian || (!recordTagForIntegrationPoint(gg))) {
        CHKERR playTag(gg);
      }
    }
  }
 
  MoFEMFunctionReturn(0);
}

◆ playTag()

MoFEMErrorCode NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::playTag ( const int gg )

virtual

Play ADOL-C tape.

Returns: error code

Definition at line 303 of file NonLinearElasticElement.cpp.

                                                                           {
  MoFEMFunctionBeginHot;
 
  int r;
 
  if (fUnction) {
    commonData.sTress[gg].resize(3, 3, false);
    // play recorder for values
    r = ::function(tAg, 9, nbActiveVariables, &activeVariables[0],
                   &commonData.sTress[gg](0, 0));
    if (r < adlocReturnValue) { // function is locally analytic
      SETERRQ(PETSC_COMM_SELF, MOFEM_OPERATION_UNSUCCESSFUL,
              "ADOL-C function evaluation with error r = %d", r);
    }
  }
 
  if (jAcobian) {
    commonData.jacStress[gg].resize(9, nbActiveVariables, false);
    double *jac_ptr[] = {
        &(commonData.jacStress[gg](0, 0)), &(commonData.jacStress[gg](1, 0)),
        &(commonData.jacStress[gg](2, 0)), &(commonData.jacStress[gg](3, 0)),
        &(commonData.jacStress[gg](4, 0)), &(commonData.jacStress[gg](5, 0)),
        &(commonData.jacStress[gg](6, 0)), &(commonData.jacStress[gg](7, 0)),
        &(commonData.jacStress[gg](8, 0))};
    // play recorder for jacobians
    r = jacobian(tAg, 9, nbActiveVariables, &activeVariables[0], jac_ptr);
    if (r < adlocReturnValue) {
      SETERRQ(PETSC_COMM_SELF, MOFEM_OPERATION_UNSUCCESSFUL,
              "ADOL-C function evaluation with error");
    }
  }
 
  MoFEMFunctionReturnHot(0);
}

◆ recordTag()

MoFEMErrorCode NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::recordTag ( const int gg )

virtual

Record ADOL-C tape.

Returns: error code

Definition at line 237 of file NonLinearElasticElement.cpp.

                  {
  MoFEMFunctionBegin;
 
  trace_on(tAg, 0);
 
  dAta.materialAdoublePtr->F.resize(3, 3, false);
 
  if (!aLe) {
 
    nbActiveVariables = 0;
    for (int dd1 = 0; dd1 < 3; dd1++) {
      for (int dd2 = 0; dd2 < 3; dd2++) {
        dAta.materialAdoublePtr->F(dd1, dd2) <<= (*ptrh)[gg](dd1, dd2);
        if (fieldDisp) {
          if (dd1 == dd2) {
            dAta.materialAdoublePtr->F(dd1, dd2) += 1;
          }
        }
        nbActiveVariables++;
      }
    }
 
  } else {
 
    nbActiveVariables = 0;
 
    dAta.materialAdoublePtr->h.resize(3, 3, false);
    for (int dd1 = 0; dd1 < 3; dd1++) {
      for (int dd2 = 0; dd2 < 3; dd2++) {
        dAta.materialAdoublePtr->h(dd1, dd2) <<= (*ptrh)[gg](dd1, dd2);
        nbActiveVariables++;
      }
    }
 
    dAta.materialAdoublePtr->H.resize(3, 3, false);
    for (int dd1 = 0; dd1 < 3; dd1++) {
      for (int dd2 = 0; dd2 < 3; dd2++) {
        dAta.materialAdoublePtr->H(dd1, dd2) <<= (*ptrH)[gg](dd1, dd2);
        nbActiveVariables++;
      }
    }
 
    dAta.materialAdoublePtr->detH = determinantTensor3by3(dAta.materialAdoublePtr->H);
    dAta.materialAdoublePtr->invH.resize(3, 3, false);
    CHKERR invertTensor3by3(dAta.materialAdoublePtr->H,
                            dAta.materialAdoublePtr->detH,
                            dAta.materialAdoublePtr->invH);
 
    auto &t_F = dAta.materialAdoublePtr->t_F;
    auto &t_h = dAta.materialAdoublePtr->t_h;
    auto &t_invH = dAta.materialAdoublePtr->t_invH;
 
    t_F(i, j) = t_h(i, k) * t_invH(k, j);
 
  }
 
  CHKERR dAta.materialAdoublePtr->setUserActiveVariables(nbActiveVariables);
  CHKERR calculateStress(gg);
 
  trace_off();
 
  MoFEMFunctionReturn(0);
}

◆ recordTagForIntegrationPoint()

virtual bool NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::recordTagForIntegrationPoint ( const int gg )

inlinevirtual

Cgeck if tape is recorded for given integration point.

Parameters

gg	integration point

Returns: true if tag is recorded

Definition at line 437 of file NonLinearElasticElement.hpp.

                                                            {
      // return true;
      if (gg == 0)
        return true;
      return false;
    }

Member Data Documentation

◆ activeVariables

VectorDouble NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::activeVariables

Definition at line 404 of file NonLinearElasticElement.hpp.

◆ adlocReturnValue

int NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::adlocReturnValue

return value from ADOL-C, if non-zero that is error.

Definition at line 379 of file NonLinearElasticElement.hpp.

◆ aLe

bool NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::aLe

true if arbitrary Lagrangian-Eulerian formulation

Definition at line 383 of file NonLinearElasticElement.hpp.

◆ commonData

CommonData& NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::commonData

Structure keeping data abut this particular element, e.g. gradient of deformation at integration points

Definition at line 375 of file NonLinearElasticElement.hpp.

◆ dAta

BlockData& NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::dAta

Structure keeping data about problem, like material parameters

Definition at line 373 of file NonLinearElasticElement.hpp.

◆ fieldDisp

bool NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::fieldDisp

true if field of displacements is given, usually spatial positions are given.

Definition at line 384 of file NonLinearElasticElement.hpp.

◆ fUnction

bool NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::fUnction

if true stress i calculated

Definition at line 382 of file NonLinearElasticElement.hpp.

◆ i

FTensor::Index<'i', 3> NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::i

Definition at line 410 of file NonLinearElasticElement.hpp.

◆ j

FTensor::Index<'j', 3> NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::j

Definition at line 411 of file NonLinearElasticElement.hpp.

◆ jAcobian

bool NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::jAcobian

if true Jacobian is calculated

Definition at line 381 of file NonLinearElasticElement.hpp.

◆ k

FTensor::Index<'k', 3> NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::k

Definition at line 412 of file NonLinearElasticElement.hpp.

◆ nbActiveVariables

int NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::nbActiveVariables

Definition at line 405 of file NonLinearElasticElement.hpp.

◆ ptrh

std::vector<MatrixDouble>* NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::ptrh

Definition at line 407 of file NonLinearElasticElement.hpp.

◆ ptrH

std::vector<MatrixDouble>* NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::ptrH

Definition at line 408 of file NonLinearElasticElement.hpp.

◆ tAg

int NonlinearElasticElement::OpJacobianPiolaKirchhoffStress::tAg

Definition at line 378 of file NonLinearElasticElement.hpp.

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

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

Public Member Functions

Public Attributes

Additional Inherited Members

Detailed Description

Constructor & Destructor Documentation

◆ OpJacobianPiolaKirchhoffStress()

Member Function Documentation

◆ calculateStress()

◆ doWork()

◆ playTag()

◆ recordTag()

◆ recordTagForIntegrationPoint()

Member Data Documentation

◆ activeVariables

◆ adlocReturnValue

◆ aLe

◆ commonData

◆ dAta

◆ fieldDisp

◆ fUnction

◆ i

◆ j

◆ jAcobian

◆ k

◆ nbActiveVariables

◆ ptrh

◆ ptrH

◆ tAg