27 double const t,
double const dt, Eigen::VectorXd
const& local_x,
28 Eigen::VectorXd
const& local_x_prev,
int const process_id,
29 std::vector<double>& local_M_data, std::vector<double>& local_K_data,
30 std::vector<double>& local_b_data)
32 if (process_id == this->_process_data.heat_transport_process_id)
34 assembleHeatTransportEquation(t, dt, local_x, local_M_data,
39 assembleHydraulicEquation(t, dt, local_x, local_x_prev, local_M_data,
40 local_K_data, local_b_data);
45 double const t,
double const dt, Eigen::VectorXd
const& local_x,
46 Eigen::VectorXd
const& local_x_prev, std::vector<double>& local_M_data,
47 std::vector<double>& local_K_data, std::vector<double>& local_b_data)
50 local_x.template segment<pressure_size>(pressure_index);
52 local_x.template segment<temperature_size>(temperature_index);
54 auto const local_T_prev =
55 local_x_prev.template segment<temperature_size>(temperature_index);
58 local_M_data, pressure_size, pressure_size);
60 local_K_data, pressure_size, pressure_size);
67 auto const& process_data = this->_process_data;
69 *this->_process_data.media_map.getMedium(this->_element.getID());
70 auto const& liquid_phase = medium.phase(
"AqueousLiquid");
71 auto const& solid_phase = medium.phase(
"Solid");
75 .projected_specific_body_force_vectors[this->_element.getID()];
79 unsigned const n_integration_points =
80 this->_integration_method.getNumberOfPoints();
83 process_data.shape_matrix_cache
84 .template NsHigherOrder<typename ShapeFunction::MeshElement>();
86 for (
unsigned ip(0); ip < n_integration_points; ip++)
88 auto const& ip_data = this->_ip_data[ip];
89 auto const& dNdx = ip_data.dNdx;
90 auto const& N = Ns[ip];
91 auto const& w = ip_data.integration_weight;
93 double p_int_pt = 0.0;
94 double T_int_pt = 0.0;
103 auto const porosity =
105 .template value<double>(vars, pos, t, dt);
106 auto const fluid_density =
108 .template value<double>(vars, pos, t, dt);
111 const double dfluid_density_dp =
113 .template dValue<double>(
118 auto const viscosity =
120 .template value<double>(vars, pos, t, dt);
124 auto const specific_storage =
126 .template value<double>(vars, pos, t, dt);
128 auto const intrinsic_permeability =
131 .value(vars, pos, t, dt));
133 intrinsic_permeability / viscosity;
138 (porosity * dfluid_density_dp / fluid_density + specific_storage) *
141 local_K.noalias() += w * dNdx.transpose() * K_over_mu * dNdx;
143 if (process_data.has_gravity)
146 w * fluid_density * dNdx.transpose() * K_over_mu * b;
149 if (!process_data.has_fluid_thermal_expansion)
156 auto const solid_thermal_expansion =
157 process_data.solid_thermal_expansion(t, pos)[0];
158 const double dfluid_density_dT =
161 .template dValue<double>(
164 double const Tdot_int_pt = (T_int_pt - local_T_prev.dot(N)) / dt;
165 auto const biot_constant = process_data.biot_constant(t, pos)[0];
166 const double eff_thermal_expansion =
167 3.0 * (biot_constant - porosity) * solid_thermal_expansion -
168 porosity * dfluid_density_dT / fluid_density;
169 local_b.noalias() += eff_thermal_expansion * Tdot_int_pt * w * N;
178 Eigen::VectorXd
const& local_x,
179 std::vector<double>& local_M_data,
180 std::vector<double>& local_K_data)
183 local_x.template segment<pressure_size>(pressure_index);
185 local_x.template segment<temperature_size>(temperature_index);
188 local_M_data, temperature_size, temperature_size);
190 local_K_data, temperature_size, temperature_size);
195 auto const& process_data = this->_process_data;
197 *process_data.media_map.getMedium(this->_element.getID());
198 auto const& liquid_phase = medium.phase(
"AqueousLiquid");
202 .projected_specific_body_force_vectors[this->_element.getID()];
206 unsigned const n_integration_points =
207 this->_integration_method.getNumberOfPoints();
209 std::vector<GlobalDimVectorType> ip_flux_vector;
210 double average_velocity_norm = 0.0;
211 ip_flux_vector.reserve(n_integration_points);
214 process_data.shape_matrix_cache
215 .template NsHigherOrder<typename ShapeFunction::MeshElement>();
217 for (
unsigned ip(0); ip < n_integration_points; ip++)
219 auto const& ip_data = this->_ip_data[ip];
220 auto const& dNdx = ip_data.dNdx;
221 auto const& N = Ns[ip];
222 auto const& w = ip_data.integration_weight;
234 auto const porosity =
236 .template value<double>(vars, pos, t, dt);
240 auto const fluid_density =
242 .template value<double>(vars, pos, t, dt);
244 auto const specific_heat_capacity_fluid =
246 .template value<double>(vars, pos, t, dt);
249 local_M.noalias() += w *
250 this->getHeatEnergyCoefficient(
251 vars, porosity, fluid_density,
252 specific_heat_capacity_fluid, pos, t, dt) *
256 auto const viscosity =
258 .template value<double>(vars, pos, t, dt);
260 auto const intrinsic_permeability =
263 .value(vars, pos, t, dt));
266 intrinsic_permeability / viscosity;
268 process_data.has_gravity
270 (dNdx * local_p - fluid_density * b))
274 this->getThermalConductivityDispersivity(
275 vars, fluid_density, specific_heat_capacity_fluid, velocity,
279 w * dNdx.transpose() * thermal_conductivity_dispersivity * dNdx;
281 ip_flux_vector.emplace_back(velocity * fluid_density *
282 specific_heat_capacity_fluid);
283 average_velocity_norm += velocity.norm();
287 process_data.stabilizer, this->_ip_data,
288 process_data.shape_matrix_cache, ip_flux_vector,
289 average_velocity_norm /
static_cast<double>(n_integration_points),
297 std::vector<GlobalVector*>
const& x,
298 std::vector<NumLib::LocalToGlobalIndexMap const*>
const& dof_table,
299 std::vector<double>& cache)
const
301 assert(x.size() == dof_table.size());
302 auto const n_processes = dof_table.size();
304 std::vector<std::vector<GlobalIndexType>> indices_of_all_coupled_processes;
305 indices_of_all_coupled_processes.reserve(n_processes);
306 for (std::size_t process_id = 0; process_id < n_processes; ++process_id)
310 assert(!indices.empty());
311 indices_of_all_coupled_processes.push_back(indices);
313 auto const local_xs =
316 return this->getIntPtDarcyVelocityLocal(t, local_xs, cache);
void assembleForStaggeredScheme(double const t, double const dt, Eigen::VectorXd const &local_x, Eigen::VectorXd const &local_x_prev, int const process_id, std::vector< double > &local_M_data, std::vector< double > &local_K_data, std::vector< double > &local_b_data) override
void assembleHydraulicEquation(double const t, double const dt, Eigen::VectorXd const &local_x, Eigen::VectorXd const &local_x_prev, std::vector< double > &local_M_data, std::vector< double > &local_K_data, std::vector< double > &local_b_data)