OGS
UniaxialElasticityModel.h
Go to the documentation of this file.
1
12#pragma once
13
15
16namespace ProcessLib
17{
18namespace ThermoRichardsFlow
19{
21{
23 {
24 DBUG("using uniaxial simplified mechanics model");
25 }
26
28 MaterialPropertyLib::Phase const& solid_phase,
30 ParameterLib::SpatialPosition const& x_position, double const t,
31 double const dt) override
32 {
35 .value(variables, x_position, t, dt));
38 .value(variables, x_position, t, dt));
39 auto const nu12 = nu[0];
40 auto const nu23 = nu[1];
41 auto const nu13 = nu[2];
42 auto const nu21 = nu12 * E[1] / E[0];
43 auto const nu32 = nu23 * E[2] / E[1];
44 auto const nu31 = nu13 * E[2] / E[0];
45 auto const D = 1 - nu12 * nu21 - nu23 * nu32 - nu31 * nu13 -
46 2 * nu12 * nu23 * nu31;
47 return D / (E[2] * (1 - nu12 * nu21));
48 }
49
51 Eigen::Matrix<double, 3, 3> const&
52 solid_linear_thermal_expansion_coefficient,
53 MaterialPropertyLib::Phase const& solid_phase,
55 ParameterLib::SpatialPosition const& x_position, double const t,
56 double const dt) override
57 {
60 .value(variables, x_position, t, dt));
63 .value(variables, x_position, t, dt));
64 auto const nu12 = nu[0];
65 auto const nu23 = nu[1];
66 auto const nu13 = nu[2];
67 auto const nu21 = nu12 * E[1] / E[0];
68 auto const D = (1 - nu12 * nu21);
69 return -(solid_linear_thermal_expansion_coefficient(2, 2) +
70 solid_linear_thermal_expansion_coefficient(0, 0) *
71 (nu13 + nu12 * nu23) / D +
72 solid_linear_thermal_expansion_coefficient(1, 1) *
73 (nu23 + nu13 * nu21) / D);
74 }
75};
76
77} // namespace ThermoRichardsFlow
78} // namespace ProcessLib
void DBUG(fmt::format_string< Args... > fmt, Args &&... args)
Definition Logging.h:30
template Eigen::Matrix< double, 3, 1 > formEigenVector< 3 >(MaterialPropertyLib::PropertyDataType const &values)
double storageContribution(MaterialPropertyLib::Phase const &solid_phase, MaterialPropertyLib::VariableArray const &variables, ParameterLib::SpatialPosition const &x_position, double const t, double const dt) override
double thermalExpansivityContribution(Eigen::Matrix< double, 3, 3 > const &solid_linear_thermal_expansion_coefficient, MaterialPropertyLib::Phase const &solid_phase, MaterialPropertyLib::VariableArray const &variables, ParameterLib::SpatialPosition const &x_position, double const t, double const dt) override