v0.14.0
Public Member Functions | Private Attributes | List of all members
FreeSurfaceOps::OpLhsU_dH Struct Reference

Lhs for U dH. More...

#include <tutorials/vec-5/src/FreeSurfaceOps.hpp>

Inheritance diagram for FreeSurfaceOps::OpLhsU_dH:
[legend]
Collaboration diagram for FreeSurfaceOps::OpLhsU_dH:
[legend]

Public Member Functions

 OpLhsU_dH (const std::string field_name_u, const std::string field_name_h, boost::shared_ptr< MatrixDouble > dot_u_ptr, boost::shared_ptr< MatrixDouble > u_ptr, boost::shared_ptr< MatrixDouble > grad_u_ptr, boost::shared_ptr< VectorDouble > h_ptr, boost::shared_ptr< VectorDouble > g_ptr)
 
MoFEMErrorCode iNtegrate (EntitiesFieldData::EntData &row_data, EntitiesFieldData::EntData &col_data)
 

Private Attributes

boost::shared_ptr< MatrixDouble > dotUPtr
 
boost::shared_ptr< MatrixDouble > uPtr
 
boost::shared_ptr< MatrixDouble > gradUPtr
 
boost::shared_ptr< VectorDouble > hPtr
 
boost::shared_ptr< VectorDouble > gPtr
 

Detailed Description

Lhs for U dH.

Examples
free_surface.cpp.

Definition at line 611 of file FreeSurfaceOps.hpp.

Constructor & Destructor Documentation

◆ OpLhsU_dH()

FreeSurfaceOps::OpLhsU_dH::OpLhsU_dH ( const std::string  field_name_u,
const std::string  field_name_h,
boost::shared_ptr< MatrixDouble >  dot_u_ptr,
boost::shared_ptr< MatrixDouble >  u_ptr,
boost::shared_ptr< MatrixDouble >  grad_u_ptr,
boost::shared_ptr< VectorDouble >  h_ptr,
boost::shared_ptr< VectorDouble >  g_ptr 
)
inline

Definition at line 613 of file FreeSurfaceOps.hpp.

619  : AssemblyDomainEleOp(field_name_u, field_name_h,
620  AssemblyDomainEleOp::OPROWCOL),
621  dotUPtr(dot_u_ptr), uPtr(u_ptr), gradUPtr(grad_u_ptr), hPtr(h_ptr),
622  gPtr(g_ptr) {
623  sYmm = false;
624  assembleTranspose = false;
625  }

Member Function Documentation

◆ iNtegrate()

MoFEMErrorCode FreeSurfaceOps::OpLhsU_dH::iNtegrate ( EntitiesFieldData::EntData row_data,
EntitiesFieldData::EntData col_data 
)
inline

Definition at line 627 of file FreeSurfaceOps.hpp.

628  {
630 
631  const double vol = getMeasure();
632  auto t_dot_u = getFTensor1FromMat<U_FIELD_DIM>(*dotUPtr);
633  auto t_u = getFTensor1FromMat<U_FIELD_DIM>(*uPtr);
634  auto t_grad_u = getFTensor2FromMat<U_FIELD_DIM, SPACE_DIM>(*gradUPtr);
635  auto t_h = getFTensor0FromVec(*hPtr);
636  auto t_g = getFTensor0FromVec(*gPtr);
637  auto t_coords = getFTensor1CoordsAtGaussPts();
638 
639  auto t_row_base = row_data.getFTensor0N();
640  auto t_row_diff_base = row_data.getFTensor1DiffN<SPACE_DIM>();
641 
642  auto t_w = getFTensor0IntegrationWeight();
643 
645  FTensor::Tensor1<double, U_FIELD_DIM> t_phase_force_dh;
646  FTensor::Tensor1<double, U_FIELD_DIM> t_inertia_force_dh;
651 
652  t_buoyancy_dh(i) = 0;
653  t_gravity_dh(i) = 0;
654 
655  for (int gg = 0; gg != nbIntegrationPts; gg++) {
656 
657  const double r = t_coords(0);
658  const double alpha = t_w * vol * cylindrical(r);
659 
660  const double rho = phase_function(t_h, rho_diff, rho_ave);
661  const double rho_dh = d_phase_function_h(t_h, rho_diff);
662  const double mu_dh = d_phase_function_h(t_h, mu_diff);
663 
664  auto t_D_dh = get_D(2 * mu_dh);
665 
666  t_inertia_force_dh(i) = (alpha * rho_dh) * t_dot_u(i);
667  // t_buoyancy_dh(SPACE_DIM - 1) = -(alpha * a0) * (rho + rho_dh * t_h);
668  t_gravity_dh(SPACE_DIM - 1) = (alpha * rho_dh * a0);
669  t_convection_dh(i) = (rho_dh * alpha) * (t_u(j) * t_grad_u(i, j));
670  const double t_phase_force_g_dh = -alpha * kappa * t_g;
671  t_forces_dh(i) = t_inertia_force_dh(i) + t_buoyancy_dh(i) +
672  t_gravity_dh(i) + t_convection_dh(i);
673 
674  t_stress_dh(i, j) = alpha * (t_D_dh(i, j, k, l) * t_grad_u(k, l));
675 
676  int rr = 0;
677  for (; rr != nbRows / U_FIELD_DIM; ++rr) {
678 
679  auto t_mat =
680  getFTensor1FromMat<U_FIELD_DIM, 1>(locMat, rr * U_FIELD_DIM);
681  auto t_col_base = col_data.getFTensor0N(gg, 0);
682  auto t_col_diff_base = col_data.getFTensor1DiffN<SPACE_DIM>(gg, 0);
683 
684  for (int cc = 0; cc != nbCols; ++cc) {
685 
686  const double bb = t_row_base * t_col_base;
687  t_mat(i) += t_forces_dh(i) * bb;
688  t_mat(i) += (t_phase_force_g_dh * t_row_base) * t_col_diff_base(i);
689  t_mat(i) += (t_row_diff_base(j) * t_col_base) * t_stress_dh(i, j);
690 
691  if (coord_type == CYLINDRICAL) {
692  t_mat(0) += (bb * (alpha / t_coords(0))) * (2 * mu_dh * t_u(0));
693  }
694 
695  ++t_mat;
696  ++t_col_base;
697  ++t_col_diff_base;
698  }
699 
700  ++t_row_base;
701  ++t_row_diff_base;
702  }
703 
704  for (; rr < nbRowBaseFunctions; ++rr) {
705  ++t_row_diff_base;
706  ++t_row_base;
707  }
708 
709  ++t_dot_u;
710  ++t_u;
711  ++t_grad_u;
712  ++t_h;
713  ++t_g;
714  ++t_coords;
715  ++t_w;
716  }
717 
719  }

Member Data Documentation

◆ dotUPtr

boost::shared_ptr<MatrixDouble> FreeSurfaceOps::OpLhsU_dH::dotUPtr
private

Definition at line 722 of file FreeSurfaceOps.hpp.

◆ gPtr

boost::shared_ptr<VectorDouble> FreeSurfaceOps::OpLhsU_dH::gPtr
private

Definition at line 726 of file FreeSurfaceOps.hpp.

◆ gradUPtr

boost::shared_ptr<MatrixDouble> FreeSurfaceOps::OpLhsU_dH::gradUPtr
private

Definition at line 724 of file FreeSurfaceOps.hpp.

◆ hPtr

boost::shared_ptr<VectorDouble> FreeSurfaceOps::OpLhsU_dH::hPtr
private

Definition at line 725 of file FreeSurfaceOps.hpp.

◆ uPtr

boost::shared_ptr<MatrixDouble> FreeSurfaceOps::OpLhsU_dH::uPtr
private

Definition at line 723 of file FreeSurfaceOps.hpp.


The documentation for this struct was generated from the following file:
get_D
auto get_D
Definition: free_surface.cpp:252
rho_ave
double rho_ave
Definition: free_surface.cpp:178
FTensor::Tensor1
Definition: Tensor1_value.hpp:8
rho
double rho
Definition: plastic.cpp:140
d_phase_function_h
auto d_phase_function_h
Definition: free_surface.cpp:215
FreeSurfaceOps::OpLhsU_dH::dotUPtr
boost::shared_ptr< MatrixDouble > dotUPtr
Definition: FreeSurfaceOps.hpp:722
FTensor::Tensor2_symmetric
Definition: Tensor2_symmetric_value.hpp:13
sdf.r
int r
Definition: sdf.py:8
cylindrical
auto cylindrical
Definition: free_surface.cpp:187
U_FIELD_DIM
constexpr int U_FIELD_DIM
Definition: free_surface.cpp:79
SPACE_DIM
constexpr int SPACE_DIM
Definition: child_and_parent.cpp:16
rho_diff
double rho_diff
Definition: free_surface.cpp:179
MoFEM::getFTensor0FromVec
static auto getFTensor0FromVec(ublas::vector< T, A > &data)
Get tensor rank 0 (scalar) form data vector.
Definition: Templates.hpp:135
phase_function
auto phase_function
Definition: free_surface.cpp:211
FreeSurfaceOps::OpLhsU_dH::gradUPtr
boost::shared_ptr< MatrixDouble > gradUPtr
Definition: FreeSurfaceOps.hpp:724
i
FTensor::Index< 'i', SPACE_DIM > i
Definition: hcurl_divergence_operator_2d.cpp:27
mu_diff
double mu_diff
Definition: free_surface.cpp:181
kappa
double kappa
Definition: free_surface.cpp:183
CYLINDRICAL
@ CYLINDRICAL
Definition: definitions.h:130
j
FTensor::Index< 'j', 3 > j
Definition: matrix_function.cpp:19
FreeSurfaceOps::OpLhsU_dH::gPtr
boost::shared_ptr< VectorDouble > gPtr
Definition: FreeSurfaceOps.hpp:726
coord_type
constexpr CoordinateTypes coord_type
Definition: incompressible_elasticity.cpp:19
FreeSurfaceOps::OpLhsU_dH::uPtr
boost::shared_ptr< MatrixDouble > uPtr
Definition: FreeSurfaceOps.hpp:723
a0
constexpr double a0
Definition: hcurl_check_approx_in_2d.cpp:37
AssemblyDomainEleOp
FormsIntegrators< DomainEleOp >::Assembly< A >::OpBase AssemblyDomainEleOp
Definition: tensor_divergence_operator.cpp:59
k
FTensor::Index< 'k', 3 > k
Definition: matrix_function.cpp:20
MoFEMFunctionReturn
#define MoFEMFunctionReturn(a)
Last executable line of each PETSc function used for error handling. Replaces return()
Definition: definitions.h:429
FreeSurfaceOps::OpLhsU_dH::hPtr
boost::shared_ptr< VectorDouble > hPtr
Definition: FreeSurfaceOps.hpp:725
MoFEMFunctionBegin
#define MoFEMFunctionBegin
First executable line of each MoFEM function, used for error handling. Final line of MoFEM functions ...
Definition: definitions.h:359
l
FTensor::Index< 'l', 3 > l
Definition: matrix_function.cpp:21