#include <src/finite_elements/BiLinearFormsIntegrators.hpp>

Inheritance diagram for MoFEM::OpGradSymTensorGradImpl< 1, SPACE_DIM, SPACE_DIM, S, GAUSS, OpBase >:

Collaboration diagram for MoFEM::OpGradSymTensorGradImpl< 1, SPACE_DIM, SPACE_DIM, S, GAUSS, OpBase >:

Public Member Functions
	OpGradSymTensorGradImpl (const std::string row_field_name, const std::string col_field_name, boost::shared_ptr< MatrixDouble > mat_D, boost::shared_ptr< Range > ents_ptr=nullptr, ScalarFun beta=scalar_fun_one)

Public Member Functions inherited from MoFEM::OpBaseImpl< A, EleOp >
	OpBaseImpl (const std::string row_field_name, const std::string col_field_name, const OpType type, boost::shared_ptr< Range > ents_ptr=nullptr)

MoFEMErrorCode	doWork (int row_side, int col_side, EntityType row_type, EntityType col_type, EntData &row_data, EntData &col_data)
	Do calculations for the left hand side. More...

MoFEMErrorCode	doWork (int row_side, EntityType row_type, EntData &row_data)
	Do calculations for the right hand side. More...

Public Attributes
FTensor::Index< 'i', SPACE_DIM >	i
	summit Index More...

Public Attributes inherited from MoFEM::OpBaseImpl< A, EleOp >
TimeFun	timeScalingFun
	assumes that time variable is set More...

FEFun	feScalingFun
	assumes that time variable is set More...

boost::shared_ptr< Range >	entsPtr
	Entities on which element is run. More...

Protected Member Functions
MoFEMErrorCode	iNtegrate (EntitiesFieldData::EntData &row_data, EntitiesFieldData::EntData &col_data)
	Integrate grad-grad operator. More...

Protected Member Functions inherited from MoFEM::OpBaseImpl< A, EleOp >
template<int DIM>
FTensor::Tensor1< FTensor::PackPtr< double *, DIM >, DIM >	getNf ()

template<int DIM>
FTensor::Tensor2< FTensor::PackPtr< double *, DIM >, DIM, DIM >	getLocMat (const int rr)

virtual MoFEMErrorCode	iNtegrate (EntData &row_data, EntData &col_data)
	Integrate grad-grad operator. More...

virtual MoFEMErrorCode	aSsemble (EntData &row_data, EntData &col_data, const bool trans)

virtual MoFEMErrorCode	iNtegrate (EntData &data)
	Class dedicated to integrate operator. More...

virtual MoFEMErrorCode	aSsemble (EntData &data)

Protected Attributes
boost::shared_ptr< MatrixDouble >	matD

ScalarFun	betaCoeff

Protected Attributes inherited from MoFEM::OpBaseImpl< A, EleOp >
int	nbRows
	number of dofs on rows More...

int	nbCols
	number if dof on column More...

int	nbIntegrationPts
	number of integration points More...

int	nbRowBaseFunctions
	number or row base functions More...

int	rowSide
	row side number More...

int	colSide
	column side number More...

EntityType	rowType
	row type More...

EntityType	colType
	column type More...

bool	assembleTranspose

bool	onlyTranspose

MatrixDouble	locMat
	local entity block matrix More...

MatrixDouble	locMatTranspose
	local entity block matrix More...

VectorDouble	locF
	local entity vector More...

Additional Inherited Members
Public Types inherited from MoFEM::OpBaseImpl< A, EleOp >
using	OpType = typename EleOp::OpType

using	EntData = EntitiesFieldData::EntData

Detailed Description

template<int SPACE_DIM, int S, typename OpBase>
struct MoFEM::OpGradSymTensorGradImpl< 1, SPACE_DIM, SPACE_DIM, S, GAUSS, OpBase >

Definition at line 133 of file BiLinearFormsIntegrators.hpp.

Constructor & Destructor Documentation

◆ OpGradSymTensorGradImpl()

template<int SPACE_DIM, int S, typename OpBase >

MoFEM::OpGradSymTensorGradImpl< 1, SPACE_DIM, SPACE_DIM, S, GAUSS, OpBase >::OpGradSymTensorGradImpl	(	const std::string	row_field_name,
		const std::string	col_field_name,
		boost::shared_ptr< MatrixDouble >	mat_D,
		boost::shared_ptr< Range >	ents_ptr = `nullptr`,
		ScalarFun	beta = `scalar_fun_one`
	)

inline

Definition at line 136 of file BiLinearFormsIntegrators.hpp.

      : OpBase(row_field_name, col_field_name, OpBase::OPROWCOL, ents_ptr),
        matD(mat_D), betaCoeff(beta) {
    if (row_field_name == col_field_name)
      this->sYmm = true;
  }

Member Function Documentation

◆ iNtegrate()

template<int SPACE_DIM, int S, typename OpBase >

MoFEMErrorCode MoFEM::OpGradSymTensorGradImpl< 1, SPACE_DIM, SPACE_DIM, S, GAUSS, OpBase >::iNtegrate	(	EntitiesFieldData::EntData &	row_data,
		EntitiesFieldData::EntData &	col_data
	)

protectedvirtual

Integrate grad-grad operator.

Parameters

row_data	row data (consist base functions on row entity)
col_data	column data (consist base functions on column entity)

Returns: error code

Reimplemented from MoFEM::OpBaseImpl< A, EleOp >.

Definition at line 887 of file BiLinearFormsIntegrators.hpp.

                                        {
  MoFEMFunctionBegin;
 
  const size_t nb_row_dofs = row_data.getIndices().size();
  const size_t nb_col_dofs = col_data.getIndices().size();
 
  if (nb_row_dofs && nb_col_dofs) {
 
    const bool diag = (row_data.getFieldEntities()[0]->getLocalUniqueId() ==
                       col_data.getFieldEntities()[0]->getLocalUniqueId());
 
    FTensor::Index<'i', SPACE_DIM> i;
    FTensor::Index<'j', SPACE_DIM> j;
    FTensor::Index<'k', SPACE_DIM> k;
    FTensor::Index<'l', SPACE_DIM> l;
 
    // get element volume
    double vol = OpBase::getMeasure();
 
    // get intergrayion weights
    auto t_w = OpBase::getFTensor0IntegrationWeight();
 
    // get derivatives of base functions on rows
    auto t_row_diff_base = row_data.getFTensor1DiffN<SPACE_DIM>();
 
    // Elastic stiffness tensor (4th rank tensor with minor and major
    // symmetry)
    auto t_D = getFTensor4DdgFromMat<SPACE_DIM, SPACE_DIM, S>(*matD);
 
    // get coordinate at integration points
    auto t_coords = OpBase::getFTensor1CoordsAtGaussPts();
 
    // iterate over integration points
    for (int gg = 0; gg != OpBase::nbIntegrationPts; ++gg) {
 
      // calculate scalar weight times element volume
      double a = t_w * vol * betaCoeff(t_coords(0), t_coords(1), t_coords(2));
 
      // iterate over row base functions
      int rr = 0;
      for (; rr != OpBase::nbRows / SPACE_DIM; ++rr) {
 
        // get sub matrix for the row
        auto t_m = OpBase::template getLocMat<SPACE_DIM>(SPACE_DIM * rr);
 
        FTensor::Christof<double, SPACE_DIM, SPACE_DIM> t_rowD;
        // I mix up the indices here so that it behaves like a
        // Dg.  That way I don't have to have a separate wrapper
        // class Christof_Expr, which simplifies things.
        t_rowD(l, j, k) = t_D(i, j, k, l) * (a * t_row_diff_base(i));
 
        // get derivatives of base functions for columns
        auto t_col_diff_base = col_data.getFTensor1DiffN<SPACE_DIM>(gg, 0);
 
        // iterate column base functions
        const auto nb_cols = (diag) ? rr : OpBase::nbCols / SPACE_DIM - 1;
        for (int cc = 0; cc <= nb_cols; ++cc) {
 
          // integrate block local stiffens matrix
          t_m(i, j) += t_rowD(i, j, k) * t_col_diff_base(k);
 
          // move to next column base function
          ++t_col_diff_base;
 
          // move to next block of local stiffens matrix
          ++t_m;
        }
 
        // move to next row base function
        ++t_row_diff_base;
      }
 
      for (; rr < OpBase::nbRowBaseFunctions; ++rr)
        ++t_row_diff_base;
 
      // move to next integration weight
      ++t_w;
      ++t_D;
      ++t_coords;
    }
 
    // Copy symmetry
    if (diag) {
      for (int rr = 0; rr != OpBase::nbRows / SPACE_DIM - 1; ++rr) {
        auto t_m_rr = getFTensor2FromArray<SPACE_DIM, SPACE_DIM, SPACE_DIM>(
            this->locMat, SPACE_DIM * rr, SPACE_DIM * (rr + 1));
        auto t_m_cc = getFTensor2FromArray<SPACE_DIM, SPACE_DIM>(
            this->locMat, SPACE_DIM * (rr + 1), SPACE_DIM * rr,
            SPACE_DIM * OpBase::nbCols);
        for (int cc = rr + 1; cc < OpBase::nbCols / SPACE_DIM; ++cc) {
          t_m_rr(i, j) = t_m_cc(j, i);
          ++t_m_rr;
          ++t_m_cc;
        }
      }
    }
 
  }
 
  MoFEMFunctionReturn(0);
}