#include <tutorials/adv-1/src/ContactOps.hpp>

Inheritance diagram for ContactOps::OpConstrainBoundaryRhsImpl< DIM, GAUSS, AssemblyBoundaryEleOp >:

Collaboration diagram for ContactOps::OpConstrainBoundaryRhsImpl< DIM, GAUSS, AssemblyBoundaryEleOp >:

Public Member Functions
	OpConstrainBoundaryRhsImpl (const std::string field_name, boost::shared_ptr< CommonData > common_data_ptr, bool is_axisymmetric=false)

MoFEMErrorCode	iNtegrate (EntitiesFieldData::EntData &data)

Public Attributes
SurfaceDistanceFunction	surfaceDistanceFunction = surface_distance_function

GradSurfaceDistanceFunction	gradSurfaceDistanceFunction

Private Attributes
boost::shared_ptr< CommonData >	commonDataPtr

bool	isAxisymmetric

Detailed Description

template<int DIM, typename AssemblyBoundaryEleOp>
struct ContactOps::OpConstrainBoundaryRhsImpl< DIM, GAUSS, AssemblyBoundaryEleOp >

Definition at line 494 of file ContactOps.hpp.

Constructor & Destructor Documentation

◆ OpConstrainBoundaryRhsImpl()

template<int DIM, typename AssemblyBoundaryEleOp >

ContactOps::OpConstrainBoundaryRhsImpl< DIM, GAUSS, AssemblyBoundaryEleOp >::OpConstrainBoundaryRhsImpl	(	const std::string	field_name,
		boost::shared_ptr< CommonData >	common_data_ptr,
		bool	is_axisymmetric = `false`
	)

Definition at line 840 of file ContactOps.hpp.

     : AssemblyBoundaryEleOp(field_name, field_name,
                             AssemblyBoundaryEleOp::OPROW),
       commonDataPtr(common_data_ptr), isAxisymmetric(is_axisymmetric) {}

Member Function Documentation

◆ iNtegrate()

template<int DIM, typename AssemblyBoundaryEleOp >

MoFEMErrorCode ContactOps::OpConstrainBoundaryRhsImpl< DIM, GAUSS, AssemblyBoundaryEleOp >::iNtegrate ( EntitiesFieldData::EntData & data )

Examples: ContactOps.hpp.

Definition at line 849 of file ContactOps.hpp.

                                     {
   MoFEMFunctionBegin;
  
   FTensor::Index<'i', DIM> i;
   FTensor::Index<'j', DIM> j;
   FTensor::Index<'k', DIM> k;
   FTensor::Index<'l', DIM> l;
  
   const size_t nb_gauss_pts = AssemblyBoundaryEleOp::getGaussPts().size2();
  
   auto &nf = AssemblyBoundaryEleOp::locF;
  
   auto t_normal_at_pts = AssemblyBoundaryEleOp::getFTensor1NormalsAtGaussPts();
  
   auto t_w = AssemblyBoundaryEleOp::getFTensor0IntegrationWeight();
   auto t_disp = getFTensor1FromMat<DIM>(commonDataPtr->contactDisp);
   auto t_traction = getFTensor1FromMat<DIM>(commonDataPtr->contactTraction);
   auto t_coords = AssemblyBoundaryEleOp::getFTensor1CoordsAtGaussPts();
  
   size_t nb_base_functions = data.getN().size2() / 3;
   auto t_base = data.getFTensor1N<3>();
  
   auto m_spatial_coords = get_spatial_coords(
       BoundaryEleOp::getFTensor1CoordsAtGaussPts(),
       getFTensor1FromMat<DIM>(commonDataPtr->contactDisp), nb_gauss_pts);
   auto m_normals_at_pts = get_normalize_normals(
       BoundaryEleOp::getFTensor1NormalsAtGaussPts(), nb_gauss_pts);
  
   auto t_normal = getFTensor1FromMat<3>(m_normals_at_pts);
  
   auto ts_time = AssemblyBoundaryEleOp::getTStime();
   auto ts_time_step = AssemblyBoundaryEleOp::getTStimeStep();
  
   // placeholder to pass boundary block id to python
   int block_id = 0;
  
   auto v_sdf =
       surfaceDistanceFunction(ts_time_step, ts_time, nb_gauss_pts,
                               m_spatial_coords, m_normals_at_pts, block_id);
  
   auto m_grad_sdf =
       gradSurfaceDistanceFunction(ts_time_step, ts_time, nb_gauss_pts,
                                   m_spatial_coords, m_normals_at_pts, block_id);
  
   auto t_sdf = getFTensor0FromVec(v_sdf);
   auto t_grad_sdf = getFTensor1FromMat<3>(m_grad_sdf);
  
   for (size_t gg = 0; gg != nb_gauss_pts; ++gg) {
  
     auto t_nf = getFTensor1FromPtr<DIM>(&nf[0]);
  
     double jacobian = 1.;
     if (isAxisymmetric) {
       jacobian = 2. * M_PI * t_coords(0);
     }
     const double alpha = t_w * jacobian * AssemblyBoundaryEleOp::getMeasure();
  
     auto tn = -t_traction(i) * t_grad_sdf(i);
     auto c = constrain(t_sdf, tn);
  
     FTensor::Tensor2<double, DIM, DIM> t_cP;
     t_cP(i, j) = (c * t_grad_sdf(i)) * t_grad_sdf(j);
     FTensor::Tensor2<double, DIM, DIM> t_cQ;
     t_cQ(i, j) = kronecker_delta(i, j) - t_cP(i, j);
  
     FTensor::Tensor1<double, DIM> t_rhs;
     t_rhs(i) =
  
         t_cQ(i, j) * (t_disp(j) - cn_contact * t_traction(j))
  
         +
  
         t_cP(i, j) * t_disp(j) +
         c * (t_sdf * t_grad_sdf(i)); // add gap0 displacements
  
     size_t bb = 0;
     for (; bb != AssemblyBoundaryEleOp::nbRows / DIM; ++bb) {
       const double beta = alpha * (t_base(i) * t_normal(i));
       t_nf(i) -= beta * t_rhs(i);
  
       ++t_nf;
       ++t_base;
     }
     for (; bb < nb_base_functions; ++bb)
       ++t_base;
  
     ++t_disp;
     ++t_traction;
     ++t_coords;
     ++t_w;
     ++t_normal;
     ++t_sdf;
     ++t_grad_sdf;
   }
  
   MoFEMFunctionReturn(0);
 }