Evaluate error. More...

#include <users_modules/tutorials/cor-2to5/src/PoissonOperators.hpp>

Inheritance diagram for PoissonExample::OpError:

Collaboration diagram for PoissonExample::OpError:

Public Types
typedef boost::function< double(const double, const double, const double)>	UVal

typedef boost::function< FTensor::Tensor1< double, 3 > const double, const double, const double)>	GVal

Public Member Functions
	OpError (UVal u_value, GVal g_value, boost::shared_ptr< VectorDouble > &field_vals, boost::shared_ptr< MatrixDouble > &grad_vals, Vec global_error)

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

Public Member Functions inherited from PoissonExample::OpBaseRhs< VolumeElementForcesAndSourcesCore::UserDataOperator >
	OpBaseRhs (const std::string field_name)

MoFEMErrorCode	doWork (int row_side, EntityType row_type, EntitiesFieldData::EntData &row_data)
	This function is called by finite element. More...

Private Member Functions
MoFEMErrorCode	iNtegrate (EntitiesFieldData::EntData &data)
	Integrate error. More...

MoFEMErrorCode	aSsemble (EntitiesFieldData::EntData &data)
	Assemble error. More...

Private Attributes
Vec	globalError
	ghost vector with global (integrated over volume) error More...

FTensor::Number< 0 >	NX

FTensor::Number< 1 >	NY

FTensor::Number< 2 >	NZ

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

UVal	uValue
	function with exact solution More...

GVal	gValue
	function with exact solution for gradient More...

boost::shared_ptr< VectorDouble >	fieldVals

boost::shared_ptr< MatrixDouble >	gradVals

Additional Inherited Members
Protected Attributes inherited from PoissonExample::OpBaseRhs< VolumeElementForcesAndSourcesCore::UserDataOperator >
int	nbRows
	< error code More...

int	nbIntegrationPts
	number of integration points More...

Detailed Description

Evaluate error.

Definition at line 491 of file PoissonOperators.hpp.

Member Typedef Documentation

◆ GVal

typedef boost::function<FTensor::Tensor1<double, 3> const double, const double, const double)> PoissonExample::OpError::GVal

Examples: PoissonOperators.hpp.

Definition at line 498 of file PoissonOperators.hpp.

◆ UVal

typedef boost::function<double(const double, const double, const double)> PoissonExample::OpError::UVal

Examples: PoissonOperators.hpp.

Definition at line 495 of file PoissonOperators.hpp.

Constructor & Destructor Documentation

◆ OpError()

PoissonExample::OpError::OpError	(	UVal	u_value,
		GVal	g_value,
		boost::shared_ptr< VectorDouble > &	field_vals,
		boost::shared_ptr< MatrixDouble > &	grad_vals,
		Vec	global_error
	)

inline

Examples: PoissonOperators.hpp.

Definition at line 500 of file PoissonOperators.hpp.

       : OpBaseRhs<VolumeElementForcesAndSourcesCore::UserDataOperator>("ERROR"),
         globalError(global_error), uValue(u_value), gValue(g_value),
         fieldVals(field_vals), gradVals(grad_vals) {}

Member Function Documentation

◆ aSsemble()

MoFEMErrorCode PoissonExample::OpError::aSsemble ( EntitiesFieldData::EntData & data )

inlineprivatevirtual

Assemble error.

Implements PoissonExample::OpBaseRhs< VolumeElementForcesAndSourcesCore::UserDataOperator >.

Examples: PoissonOperators.hpp.

Definition at line 575 of file PoissonOperators.hpp.

                                                           {
     MoFEMFunctionBegin;
     // set error on mesh
     data.getFieldDofs()[0]->getFieldData() = sqrt(data.getFieldData()[0]);
     // assemble vector to global error
     CHKERR VecSetValue(globalError, 0, data.getFieldData()[0], ADD_VALUES);
     MoFEMFunctionReturn(0);
   }

◆ doWork()

MoFEMErrorCode PoissonExample::OpError::doWork	(	int	row_side,
		EntityType	row_type,
		EntitiesFieldData::EntData &	row_data
	)

inline

Examples: PoissonOperators.hpp.

Definition at line 507 of file PoissonOperators.hpp.

                                                             {
     MoFEMFunctionBegin;
     nbRows = row_data.getFieldData().size();
     if (!nbRows)
       MoFEMFunctionReturnHot(0);
     nbIntegrationPts = getGaussPts().size2();
     CHKERR iNtegrate(row_data);
     CHKERR aSsemble(row_data);
     MoFEMFunctionReturn(0);
   }

◆ iNtegrate()

MoFEMErrorCode PoissonExample::OpError::iNtegrate ( EntitiesFieldData::EntData & data )

inlineprivatevirtual

Integrate error.

Implements PoissonExample::OpBaseRhs< VolumeElementForcesAndSourcesCore::UserDataOperator >.

Examples: PoissonOperators.hpp.

Definition at line 535 of file PoissonOperators.hpp.

                                                            {
     MoFEMFunctionBegin;
     // clear field dofs
     data.getFieldData().clear();
     // get volume of element
     const double vol = getVolume();
     // get integration weight
     auto t_w = getFTensor0IntegrationWeight();
     // get solution at integration point
     auto t_u = getFTensor0FromVec(*fieldVals);
     // get solution at integration point
     auto t_grad = getFTensor1FromMat<3>(*gradVals);
     // get coordinates at integration point
     auto t_coords = getFTensor1CoordsAtGaussPts();
     // keep exact gradient and error or gradient
     FTensor::Tensor1<double, 3> t_exact_grad, t_error_grad;
     // integrate over
     for (int gg = 0; gg != nbIntegrationPts; gg++) {
       double alpha = vol * t_w;
       // evaluate exact value
       double exact_u = uValue(t_coords(NX), t_coords(NY), t_coords(NZ));
       // evaluate exact gradient
       t_exact_grad = gValue(t_coords(NX), t_coords(NY), t_coords(NZ));
       // calculate gradient errro
       t_error_grad(i) = t_grad(i) - t_exact_grad(i);
       // error
       double error = pow(t_u - exact_u, 2) + t_error_grad(i) * t_error_grad(i);
       // iterate over base functions
       data.getFieldData()[0] += alpha * error;
       ++t_w;      // move to next integration point
       ++t_u;      // next value of function at integration point
       ++t_grad;   // next gradient at integration point
       ++t_coords; // next coordinate at integration point
     }
     MoFEMFunctionReturn(0);
   }