v0.14.0
Public Member Functions | Private Attributes | List of all members
EshelbianPlasticity::HMHNeohookean::OpSpatialPhysical_du_du Struct Reference
Inheritance diagram for EshelbianPlasticity::HMHNeohookean::OpSpatialPhysical_du_du:
[legend]
Collaboration diagram for EshelbianPlasticity::HMHNeohookean::OpSpatialPhysical_du_du:
[legend]

Public Member Functions

 OpSpatialPhysical_du_du (std::string row_field, std::string col_field, boost::shared_ptr< DataAtIntegrationPts > data_ptr, const double alpha)
 
MoFEMErrorCode integrate (EntData &row_data, EntData &col_data)
 
- Public Member Functions inherited from OpAssembleBasic< VolUserDataOperator >
 OpAssembleBasic (const std::string &field_name, boost::shared_ptr< DataAtIntegrationPts > data_ptr, const char type)
 
 OpAssembleBasic (std::string row_field, std::string col_field, boost::shared_ptr< DataAtIntegrationPts > data_ptr, const char type, const bool assemble_symmetry, ScaleOff scale_off=[]() { return 1;})
 
virtual MoFEMErrorCode integrate (EntData &data)
 
virtual MoFEMErrorCode integrate (int row_side, EntityType row_type, EntData &data)
 
virtual MoFEMErrorCode assemble (EntData &data)
 
virtual MoFEMErrorCode assemble (int row_side, EntityType row_type, EntData &data)
 
virtual MoFEMErrorCode assemble (int row_side, int col_side, EntityType row_type, EntityType col_type, EntData &row_data, EntData &col_data)
 
MoFEMErrorCode doWork (int side, EntityType type, EntData &data)
 
MoFEMErrorCode doWork (int row_side, int col_side, EntityType row_type, EntityType col_type, EntData &row_data, EntData &col_data)
 
- Public Member Functions inherited from MoFEM::VolumeElementForcesAndSourcesCore::UserDataOperator
int getNumNodes ()
 get element number of nodes More...
 
const EntityHandle * getConn ()
 get element connectivity More...
 
double getVolume () const
 element volume (linear geometry) More...
 
double & getVolume ()
 element volume (linear geometry) More...
 
FTensor::Tensor2< double *, 3, 3 > & getJac ()
 get element Jacobian More...
 
FTensor::Tensor2< double *, 3, 3 > & getInvJac ()
 get element inverse Jacobian More...
 
VectorDouble & getCoords ()
 nodal coordinates More...
 
VolumeElementForcesAndSourcesCore * getVolumeFE () const
 return pointer to Generic Volume Finite Element object More...
 
- Public Member Functions inherited from MoFEM::ForcesAndSourcesCore::UserDataOperator
 UserDataOperator (const FieldSpace space, const char type=OPSPACE, const bool symm=true)
 
 UserDataOperator (const std::string field_name, const char type, const bool symm=true)
 
 UserDataOperator (const std::string row_field_name, const std::string col_field_name, const char type, const bool symm=true)
 
boost::shared_ptr< const NumeredEntFiniteElement > getNumeredEntFiniteElementPtr () const
 Return raw pointer to NumeredEntFiniteElement. More...
 
EntityHandle getFEEntityHandle () const
 Return finite element entity handle. More...
 
int getFEDim () const
 Get dimension of finite element. More...
 
EntityType getFEType () const
 Get dimension of finite element. More...
 
boost::weak_ptr< SideNumber > getSideNumberPtr (const int side_number, const EntityType type)
 Get the side number pointer. More...
 
EntityHandle getSideEntity (const int side_number, const EntityType type)
 Get the side entity. More...
 
int getNumberOfNodesOnElement () const
 Get the number of nodes on finite element. More...
 
MoFEMErrorCode getProblemRowIndices (const std::string filed_name, const EntityType type, const int side, VectorInt &indices) const
 Get row indices. More...
 
MoFEMErrorCode getProblemColIndices (const std::string filed_name, const EntityType type, const int side, VectorInt &indices) const
 Get col indices. More...
 
const FEMethod * getFEMethod () const
 Return raw pointer to Finite Element Method object. More...
 
int getOpType () const
 Get operator types. More...
 
void setOpType (const OpType type)
 Set operator type. More...
 
void addOpType (const OpType type)
 Add operator type. More...
 
int getNinTheLoop () const
 get number of finite element in the loop More...
 
int getLoopSize () const
 get size of elements in the loop More...
 
std::string getFEName () const
 Get name of the element. More...
 
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 More...
 
auto getFTensor0IntegrationWeight ()
 Get integration weights. More...
 
MatrixDouble & getCoordsAtGaussPts ()
 Gauss points and weight, matrix (nb. of points x 3) More...
 
auto getFTensor1CoordsAtGaussPts ()
 Get coordinates at integration points assuming linear geometry. More...
 
double getMeasure () const
 get measure of element More...
 
double & getMeasure ()
 get measure of element More...
 
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. More...
 
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. More...
 
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. More...
 
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. More...
 
- Public Member Functions inherited from MoFEM::DataOperator
 DataOperator (const bool symm=true)
 
virtual ~DataOperator ()=default
 
virtual MoFEMErrorCode opLhs (EntitiesFieldData &row_data, EntitiesFieldData &col_data)
 
virtual MoFEMErrorCode opRhs (EntitiesFieldData &data, const bool error_if_no_base=false)
 
bool getSymm () const
 Get if operator uses symmetry of DOFs or not. More...
 
void setSymm ()
 set if operator is executed taking in account symmetry More...
 
void unSetSymm ()
 unset if operator is executed for non symmetric problem More...
 

Private Attributes

const double alphaU
 

Additional Inherited Members

- Public Types inherited from OpAssembleBasic< VolUserDataOperator >
using ScaleOff = boost::function< double()>
 
- 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)>
 
- Public Attributes inherited from OpAssembleBasic< VolUserDataOperator >
const bool assembleSymmetry
 
boost::shared_ptr< DataAtIntegrationPts > dataAtPts
 data at integration pts More...
 
VectorDouble nF
 local right hand side vector More...
 
MatrixDouble K
 local tangent matrix More...
 
MatrixDouble transposeK
 
ScaleOff scaleOff
 
- 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. More...
 
std::array< bool, MBMAXTYPE > doEntities
 If true operator is executed for entity. More...
 
bool & doVertices
 \deprectaed If false skip vertices More...
 
bool & doEdges
 \deprectaed If false skip edges More...
 
bool & doQuads
 \deprectaed More...
 
bool & doTris
 \deprectaed More...
 
bool & doTets
 \deprectaed More...
 
bool & doPrisms
 \deprectaed More...
 
- 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

Definition at line 196 of file HMHNeohookean.cpp.

Constructor & Destructor Documentation

◆ OpSpatialPhysical_du_du()

EshelbianPlasticity::HMHNeohookean::OpSpatialPhysical_du_du::OpSpatialPhysical_du_du ( std::string  row_field,
std::string  col_field,
boost::shared_ptr< DataAtIntegrationPts >  data_ptr,
const double  alpha 
)

Definition at line 455 of file HMHNeohookean.cpp.

458  : OpAssembleVolume(row_field, col_field, data_ptr, OPROWCOL, false),
459  alphaU(alpha) {
460  sYmm = false;
461 }

Member Function Documentation

◆ integrate()

MoFEMErrorCode EshelbianPlasticity::HMHNeohookean::OpSpatialPhysical_du_du::integrate ( EntData &  row_data,
EntData &  col_data 
)
virtual

Reimplemented from OpAssembleBasic< VolUserDataOperator >.

Definition at line 464 of file HMHNeohookean.cpp.

465  {
466  MoFEMFunctionBegin;
467 
468  auto neohookean_ptr =
469  boost::dynamic_pointer_cast<HMHNeohookean>(dataAtPts->physicsPtr);
470  if (!neohookean_ptr) {
471  SETERRQ(PETSC_COMM_SELF, MOFEM_DATA_INCONSISTENCY,
472  "Pointer to HMHNeohookean is null");
473  }
474  auto [def_c10, def_K] =
475  neohookean_ptr->getMaterialParameters(getFEEntityHandle());
476 
477  double c10 = def_c10 / neohookean_ptr->eqScaling;
478  double alpha_u = alphaU / neohookean_ptr->eqScaling;
479  double lambda = def_K / neohookean_ptr->eqScaling;
480 
481  double alpha_grad_u = neohookean_ptr->alphaGradU / neohookean_ptr->eqScaling;
482 
483  FTENSOR_INDEX(size_symm, L);
484  FTENSOR_INDEX(size_symm, J);
485 
486  constexpr auto t_kd_sym = FTensor::Kronecker_Delta_symmetric<int>();
487  constexpr auto t_kd = FTensor::Kronecker_Delta<int>();
488 
489  auto t_L = symm_L_tensor();
490  auto t_diff = diff_tensor();
491 
492  int nb_integration_pts = row_data.getN().size1();
493  int row_nb_dofs = row_data.getIndices().size();
494  int col_nb_dofs = col_data.getIndices().size();
495 
496  auto get_ftensor2 = [](MatrixDouble &m, const int r, const int c) {
497  return FTensor::Tensor2<FTensor::PackPtr<double *, 6>, size_symm,
498  size_symm>(
499 
500  &m(r + 0, c + 0), &m(r + 0, c + 1), &m(r + 0, c + 2), &m(r + 0, c + 3),
501  &m(r + 0, c + 4), &m(r + 0, c + 5),
502 
503  &m(r + 1, c + 0), &m(r + 1, c + 1), &m(r + 1, c + 2), &m(r + 1, c + 3),
504  &m(r + 1, c + 4), &m(r + 1, c + 5),
505 
506  &m(r + 2, c + 0), &m(r + 2, c + 1), &m(r + 2, c + 2), &m(r + 2, c + 3),
507  &m(r + 2, c + 4), &m(r + 2, c + 5),
508 
509  &m(r + 3, c + 0), &m(r + 3, c + 1), &m(r + 3, c + 2), &m(r + 3, c + 3),
510  &m(r + 3, c + 4), &m(r + 3, c + 5),
511 
512  &m(r + 4, c + 0), &m(r + 4, c + 1), &m(r + 4, c + 2), &m(r + 4, c + 3),
513  &m(r + 4, c + 4), &m(r + 4, c + 5),
514 
515  &m(r + 5, c + 0), &m(r + 5, c + 1), &m(r + 5, c + 2), &m(r + 5, c + 3),
516  &m(r + 5, c + 4), &m(r + 5, c + 5)
517 
518  );
519  };
520 
521  FTENSOR_INDEX(SPACE_DIM, i);
522  FTENSOR_INDEX(SPACE_DIM, j);
523  FTENSOR_INDEX(SPACE_DIM, k);
524  FTENSOR_INDEX(SPACE_DIM, l);
525  FTENSOR_INDEX(SPACE_DIM, m);
526  FTENSOR_INDEX(SPACE_DIM, n);
527 
528  auto v = getVolume();
529  auto ts_a = getTSa();
530  auto t_w = getFTensor0IntegrationWeight();
531 
532  int row_nb_base_functions = row_data.getN().size2();
533  auto t_row_base_fun = row_data.getFTensor0N();
534  auto t_row_grad_fun = row_data.getFTensor1DiffN<3>();
535 
536  auto t_grad_h1 = getFTensor2FromMat<3, 3>(dataAtPts->wGradH1AtPts);
537  auto t_diff_u =
538  getFTensor4DdgFromMat<3, 3, 1>(dataAtPts->diffStretchTensorAtPts);
539  auto t_log_u =
540  getFTensor2SymmetricFromMat<3>(dataAtPts->logStretchTensorAtPts);
541  auto t_log_u2_h1 =
542  getFTensor2SymmetricFromMat<3>(dataAtPts->logStretch2H1AtPts);
543  auto t_u = getFTensor2SymmetricFromMat<3>(dataAtPts->stretchTensorAtPts);
544  auto t_approx_P_adjoint_dstretch =
545  getFTensor2FromMat<3, 3>(dataAtPts->adjointPdstretchAtPts);
546  auto t_eigen_vals = getFTensor1FromMat<3>(dataAtPts->eigenVals);
547  auto t_eigen_vecs = getFTensor2FromMat<3, 3>(dataAtPts->eigenVecs);
548  auto &nbUniq = dataAtPts->nbUniq;
549 
550  auto t_P = getFTensor2FromMat<3, 3>(dataAtPts->PAtPts);
551  auto r_P_du = getFTensor4FromMat<3, 3, 3, 3>(dataAtPts->P_du);
552 
553  auto no_h1 = [&]() {
554  MoFEMFunctionBegin;
555 
556  for (int gg = 0; gg != nb_integration_pts; ++gg) {
557  double a = v * t_w;
558  ++t_w;
559 
560  FTensor::Dg<double, SPACE_DIM, size_symm> t_Ldiff_u;
561  t_Ldiff_u(i, j, L) = t_diff_u(i, j, k, l) * t_L(k, l, L);
562  ++t_diff_u;
563 
564  const double tr = t_log_u(i, i);
565  const double det_u = EshelbianCore::f(tr);
566  ++t_log_u;
567 
568  FTensor::Tensor1<double, size_symm> Sigma_J_dtr;
569  Sigma_J_dtr(L) =
570  (lambda * (2 * det_u * det_u - det_u)) * (t_kd(i, j) * t_L(i, j, L));
571 
572 
573  FTensor::Tensor2<double, size_symm, size_symm> t_dP;
574  t_dP(L, J) = (-2.0 * c10) * (t_Ldiff_u(i, j, L) * t_Ldiff_u(i, j, J));
575  t_dP(L, J) -= (t_L(i, j, L) * t_kd(i, j)) * Sigma_J_dtr(J);
576  t_dP(L, J) -= (alpha_u * ts_a) *
577  (t_L(i, j, L) * (t_diff(i, j, k, l) * t_L(k, l, J) -
578  (t_diff(m, n, k, l) * t_kd_sym(m, n)) *
579  t_kd_sym(i, j) * t_L(k, l, J)));
580 
581  FTensor::Tensor2_symmetric<double, SPACE_DIM> t_Sigma_u;
582  t_Sigma_u(i, j) = 2.0 * c10 * t_u(i, j);
583  ++t_u;
584 
585  if constexpr (1) {
586  FTensor::Tensor2<double, 3, 3> t_deltaP;
587  t_deltaP(i, j) = t_approx_P_adjoint_dstretch(i, j) - t_Sigma_u(i, j);
588  auto t_diff2_uP = EigenMatrix::getDiffDiffMat(
589  t_eigen_vals, t_eigen_vecs, EshelbianCore::f, EshelbianCore::d_f,
590  EshelbianCore::dd_f, t_deltaP, nbUniq[gg]);
591  t_dP(L, J) += t_L(i, j, L) * (t_diff2_uP(i, j, k, l) * t_L(k, l, J));
592  }
593  ++t_approx_P_adjoint_dstretch;
594  ++t_eigen_vals;
595  ++t_eigen_vecs;
596 
597  int rr = 0;
598  for (; rr != row_nb_dofs / size_symm; ++rr) {
599  auto t_col_base_fun = col_data.getFTensor0N(gg, 0);
600  auto t_col_grad_fun = col_data.getFTensor1DiffN<3>(gg, 0);
601 
602  auto t_m = get_ftensor2(K, 6 * rr, 0);
603  for (int cc = 0; cc != col_nb_dofs / size_symm; ++cc) {
604  double b = a * t_row_base_fun * t_col_base_fun;
605  double c = (a * alpha_grad_u * ts_a) *
606  (t_row_grad_fun(i) * t_col_grad_fun(i));
607  t_m(L, J) -= b * t_dP(L, J);
608  t_m(L, J) += c * t_kd_sym(L, J);
609 
610  ++t_m;
611  ++t_col_base_fun;
612  ++t_col_grad_fun;
613  }
614  ++t_row_base_fun;
615  ++t_row_grad_fun;
616  }
617 
618  for (; rr != row_nb_base_functions; ++rr) {
619  ++t_row_base_fun;
620  ++t_row_grad_fun;
621  }
622 
623  ++t_P;
624  ++r_P_du;
625  }
626  MoFEMFunctionReturn(0);
627  };
628 
629  auto large = [&]() {
630  MoFEMFunctionBegin;
631 
632  for (int gg = 0; gg != nb_integration_pts; ++gg) {
633  double a = v * t_w;
634  ++t_w;
635 
636  FTensor::Tensor3<double, SPACE_DIM, SPACE_DIM, size_symm> t_Ldiff_u;
637  FTensor::Tensor2<double, SPACE_DIM, SPACE_DIM> t_h1;
638 
639  switch (EshelbianCore::gradApproximator) {
640  case NO_H1_CONFIGURATION:
641  t_h1(i, j) = t_kd(i, j);
642  t_Ldiff_u(i, j, L) = t_diff_u(i, j, k, l) * t_L(k, l, L);
643  break;
644  case LARGE_ROT:
645  case MODERATE_ROT:
646  t_h1(i, j) = t_grad_h1(i, j) + t_kd(i, j);
647  t_Ldiff_u(i, j, L) = (t_diff_u(i, m, k, l) * t_h1(m, j)) * t_L(k, l, L);
648  break;
649  default:
650  SETERRQ(PETSC_COMM_SELF, MOFEM_DATA_INCONSISTENCY,
651  "gradApproximator not handled");
652  };
653  ++t_diff_u;
654  ++t_grad_h1;
655 
656  const double tr_h1 = t_log_u2_h1(i, j) * t_kd_sym(i, j) / 2;
657  const double tr_u = t_log_u(i, j) * t_kd_sym(i, j);
658  const double tr = tr_h1 + tr_u;
659  const double det_u = EshelbianCore::f(tr);
660  ++t_log_u;
661  ++t_log_u2_h1;
662 
663  FTensor::Tensor1<double, size_symm> Sigma_J_dtr;
664  Sigma_J_dtr(L) =
665  (lambda * (2 * det_u * det_u - det_u)) * (t_kd(i, j) * t_L(i, j, L));
666 
667  FTensor::Tensor2<double, SPACE_DIM, SPACE_DIM> t_total_u;
668  t_total_u(i, j) = t_u(i, m) * t_h1(m, j);
669 #ifndef NEOHOOKEAN_OFF_INVERSE
670  FTensor::Tensor2<double, SPACE_DIM, SPACE_DIM> t_inv_total_u;
671  invertTensor3by3(t_total_u, det_u, t_inv_total_u);
672 #endif // NEOHOOKEAN_OFF_INVERSE
673  ++t_u;
674 
675  FTensor::Tensor2<double, size_symm, size_symm> t_dP;
676 #ifndef NEOHOOKEAN_OFF_INVERSE
677  FTensor::Tensor3<double, SPACE_DIM, SPACE_DIM, size_symm> t_Sigma_u_du;
678  t_Sigma_u_du(i, j, J) = t_Ldiff_u(i, j, J) + t_inv_total_u(i, k) *
679  t_Ldiff_u(k, l, J) *
680  t_inv_total_u(l, j);
681  t_dP(L, J) = (-2.0 * c10) * (t_Ldiff_u(i, j, L) * t_Sigma_u_du(i, j, J));
682 #else
683  t_dP(L, J) = (-2.0 * c10) * (t_Ldiff_u(i, j, L) * t_Ldiff_u(i, j, J));
684 #endif // NEOHOOKEAN_OFF_INVERSE
685 
686  t_dP(L, J) -= (t_L(i, j, L) * t_kd(i, j)) * Sigma_J_dtr(J);
687  t_dP(L, J) -= (alpha_u * ts_a) *
688  (t_L(i, j, L) * (t_diff(i, j, k, l) * t_L(k, l, J) -
689  (t_diff(m, n, k, l) * t_kd_sym(m, n)) *
690  t_kd_sym(i, j) * t_L(k, l, J)));
691 
692  FTensor::Tensor2<double, SPACE_DIM, SPACE_DIM> t_Sigma_u;
693 #ifndef NEOHOOKEAN_OFF_INVERSE
694  if (tr > 0) {
695  t_Sigma_u(i, j) =
696  2.0 * c10 * t_total_u(i, m) *
697  (t_kd_sym(m, j) - t_inv_total_u(m, k) * t_inv_total_u(k, j));
698  } else {
699  t_Sigma_u(i, j) = -2.0 * c10 * t_inv_total_u(i, m) *
700  (t_kd_sym(m, j) - t_total_u(m, k) * t_total_u(k, j));
701  }
702 #else
703  t_Sigma_u(i, j) = 2.0 * c10 * t_total_u(i, j);
704 #endif // NEOHOOKEAN_OFF_INVERSE
705 
706  FTensor::Tensor2<double, 3, 3> t_deltaP;
707  switch (EshelbianCore::gradApproximator) {
708  case NO_H1_CONFIGURATION:
709  case LARGE_ROT:
710  t_deltaP(i, j) =
711  t_approx_P_adjoint_dstretch(i, j) - t_h1(j, n) * t_Sigma_u(i, n);
712  break;
713  case MODERATE_ROT:
714  t_deltaP(i, j) = -t_h1(j, n) * t_Sigma_u(i, n);
715  break;
716  default:
717  SETERRQ(PETSC_COMM_SELF, MOFEM_DATA_INCONSISTENCY,
718  "gradApproximator not handled");
719  };
720  ++t_approx_P_adjoint_dstretch;
721 
722  if constexpr (1) {
723  FTensor::Tensor2_symmetric<double, 3> t_deltaP_sym;
724  t_deltaP_sym(i, j) = (t_deltaP(i, j) || t_deltaP(j, i));
725  t_deltaP_sym(i, j) /= 2.0;
726  auto t_diff2_uP2 = EigenMatrix::getDiffDiffMat(
727  t_eigen_vals, t_eigen_vecs, EshelbianCore::f, EshelbianCore::d_f,
728  EshelbianCore::dd_f, t_deltaP_sym, nbUniq[gg]);
729  t_dP(L, J) += t_L(i, j, L) * (t_diff2_uP2(i, j, k, l) * t_L(k, l, J));
730  }
731  ++t_eigen_vals;
732  ++t_eigen_vecs;
733 
734  int rr = 0;
735  for (; rr != row_nb_dofs / size_symm; ++rr) {
736  auto t_col_base_fun = col_data.getFTensor0N(gg, 0);
737  auto t_col_grad_fun = col_data.getFTensor1DiffN<3>(gg, 0);
738 
739  auto t_m = get_ftensor2(K, 6 * rr, 0);
740  for (int cc = 0; cc != col_nb_dofs / size_symm; ++cc) {
741  double b = a * t_row_base_fun * t_col_base_fun;
742  double c = (a * alpha_grad_u * ts_a) *
743  (t_row_grad_fun(i) * t_col_grad_fun(i));
744  t_m(L, J) -= b * t_dP(L, J);
745  t_m(L, J) += c * t_kd_sym(L, J);
746 
747  ++t_m;
748  ++t_col_base_fun;
749  ++t_col_grad_fun;
750  }
751  ++t_row_base_fun;
752  ++t_row_grad_fun;
753  }
754 
755  for (; rr != row_nb_base_functions; ++rr) {
756  ++t_row_base_fun;
757  ++t_row_grad_fun;
758  }
759 
760  ++t_P;
761  ++r_P_du;
762  }
763  MoFEMFunctionReturn(0);
764  };
765 
766  switch (EshelbianCore::gradApproximator) {
767  case NO_H1_CONFIGURATION:
768  CHKERR large();
769  break;
770  case LARGE_ROT:
771  case MODERATE_ROT:
772  CHKERR large();
773  break;
774  default:
775  SETERRQ(PETSC_COMM_SELF, MOFEM_DATA_INCONSISTENCY,
776  "gradApproximator not handled");
777  };
778 
779  MoFEMFunctionReturn(0);
780 }

Member Data Documentation

◆ alphaU

const double EshelbianPlasticity::HMHNeohookean::OpSpatialPhysical_du_du::alphaU
private

Definition at line 203 of file HMHNeohookean.cpp.

The documentation for this struct was generated from the following file:
OpAssembleBasic< VolUserDataOperator >::K
MatrixDouble K
local tangent matrix
Definition: EshelbianOperators.hpp:61
EshelbianPlasticity::size_symm
constexpr static auto size_symm
Definition: EshelbianAux.hpp:41
EshelbianCore::dd_f
static boost::function< double(const double)> dd_f
Definition: EshelbianCore.hpp:34
FTensor::Tensor1
Definition: Tensor1_value.hpp:8
EshelbianCore::f
static boost::function< double(const double)> f
Definition: EshelbianCore.hpp:32
MoFEM::ForcesAndSourcesCore::UserDataOperator::getTSa
double getTSa() const
Definition: ForcesAndSourcesCore.hpp:1217
MoFEM::Types::MatrixDouble
UBlasMatrix< double > MatrixDouble
Definition: Types.hpp:77
FTensor::Kronecker_Delta
Kronecker Delta class.
Definition: Kronecker_Delta.hpp:15
EshelbianPlasticity::diff_tensor
auto diff_tensor()
Definition: EshelbianAux.hpp:43
J
FTensor::Index< 'J', DIM1 > J
Definition: level_set.cpp:30
MoFEM::VolumeElementForcesAndSourcesCore::UserDataOperator::getVolume
double getVolume() const
element volume (linear geometry)
Definition: VolumeElementForcesAndSourcesCore.hpp:162
FTensor::Tensor2_symmetric
Definition: Tensor2_symmetric_value.hpp:13
FTENSOR_INDEX
#define FTENSOR_INDEX(DIM, I)
Definition: Templates.hpp:2013
EshelbianPlasticity::NO_H1_CONFIGURATION
@ NO_H1_CONFIGURATION
Definition: EshelbianPlasticity.hpp:45
MoFEM::ForcesAndSourcesCore::UserDataOperator::OPROWCOL
@ OPROWCOL
operator doWork is executed on FE rows &columns
Definition: ForcesAndSourcesCore.hpp:569
OpAssembleBasic< VolUserDataOperator >::dataAtPts
boost::shared_ptr< DataAtIntegrationPts > dataAtPts
data at integration pts
Definition: EshelbianOperators.hpp:46
sdf.r
int r
Definition: sdf.py:8
FTensor::Tensor2
Definition: Tensor2_value.hpp:16
MoFEM::ForcesAndSourcesCore::UserDataOperator::getFTensor0IntegrationWeight
auto getFTensor0IntegrationWeight()
Get integration weights.
Definition: ForcesAndSourcesCore.hpp:1241
MoFEM::invertTensor3by3
MoFEMErrorCode invertTensor3by3(ublas::matrix< T, L, A > &jac_data, ublas::vector< T, A > &det_data, ublas::matrix< T, L, A > &inv_jac_data)
Calculate inverse of tensor rank 2 at integration points.
Definition: Templates.hpp:1588
MoFEM::EntitiesFieldData::EntData::getFTensor0N
FTensor::Tensor0< FTensor::PackPtr< double *, 1 > > getFTensor0N(const FieldApproximationBase base)
Get base function as Tensor0.
Definition: EntitiesFieldData.hpp:1502
EshelbianCore::gradApproximator
static enum RotSelector gradApproximator
Definition: EshelbianCore.hpp:16
c
const double c
speed of light (cm/ns)
Definition: initial_diffusion.cpp:39
CHKERR
#define CHKERR
Inline error check.
Definition: definitions.h:548
FTensor::Tensor3
Definition: Tensor3_value.hpp:12
SPACE_DIM
constexpr int SPACE_DIM
Definition: child_and_parent.cpp:16
a
constexpr double a
Definition: approx_sphere.cpp:30
MoFEM::EntitiesFieldData::EntData::getIndices
const VectorInt & getIndices() const
Get global indices of dofs on entity.
Definition: EntitiesFieldData.hpp:1214
MoFEM::L
VectorDouble L
Definition: Projection10NodeCoordsOnField.cpp:124
i
FTensor::Index< 'i', SPACE_DIM > i
Definition: hcurl_divergence_operator_2d.cpp:27
t_kd
constexpr auto t_kd
Definition: free_surface.cpp:139
EshelbianPlasticity::symm_L_tensor
auto symm_L_tensor()
Definition: EshelbianAux.hpp:54
convert.n
n
Definition: convert.py:82
v
const double v
phase velocity of light in medium (cm/ns)
Definition: initial_diffusion.cpp:40
MoFEM::EntitiesFieldData::EntData::getFTensor1DiffN
FTensor::Tensor1< FTensor::PackPtr< double *, Tensor_Dim >, Tensor_Dim > getFTensor1DiffN(const FieldApproximationBase base)
Get derivatives of base functions.
Definition: EntitiesFieldData.cpp:526
FTensor::Dg
Definition: Dg_value.hpp:9
EshelbianPlasticity::LARGE_ROT
@ LARGE_ROT
Definition: EshelbianPlasticity.hpp:45
MoFEM::ForcesAndSourcesCore::UserDataOperator::getFEEntityHandle
EntityHandle getFEEntityHandle() const
Return finite element entity handle.
Definition: ForcesAndSourcesCore.hpp:1005
MoFEM::EntitiesFieldData::EntData::getN
MatrixDouble & getN(const FieldApproximationBase base)
get base functions this return matrix (nb. of rows is equal to nb. of Gauss pts, nb....
Definition: EntitiesFieldData.hpp:1318
j
FTensor::Index< 'j', 3 > j
Definition: matrix_function.cpp:19
EshelbianPlasticity::HMHNeohookean::OpSpatialPhysical_du_du::alphaU
const double alphaU
Definition: HMHNeohookean.cpp:203
lambda
static double lambda
Definition: incompressible_elasticity.cpp:199
MOFEM_DATA_INCONSISTENCY
@ MOFEM_DATA_INCONSISTENCY
Definition: definitions.h:31
m
FTensor::Index< 'm', 3 > m
Definition: shallow_wave.cpp:80
FTensor::Kronecker_Delta_symmetric
Kronecker Delta class symmetric.
Definition: Kronecker_Delta.hpp:49
EshelbianPlasticity::MODERATE_ROT
@ MODERATE_ROT
Definition: EshelbianPlasticity.hpp:45
k
FTensor::Index< 'k', 3 > k
Definition: matrix_function.cpp:20
MoFEM::DataOperator::sYmm
bool sYmm
If true assume that matrix is symmetric structure.
Definition: DataOperators.hpp:82
MoFEMFunctionReturn
#define MoFEMFunctionReturn(a)
Last executable line of each PETSc function used for error handling. Replaces return()
Definition: definitions.h:429
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
EigenMatrix::getDiffDiffMat
auto getDiffDiffMat(A &&t_val, B &&t_vec, Fun< double > f, Fun< double > d_f, Fun< double > dd_f, C &&t_S, const int nb)
Get the Diff Diff Mat object.
Definition: MatrixFunction.hpp:279
EshelbianCore::d_f
static boost::function< double(const double)> d_f
Definition: EshelbianCore.hpp:33
OpAssembleVolume
Definition: EshelbianOperators.hpp:151
Generated by Doxygen 1.8.17 and hosted at University of Glasgow