25namespace HeatTransportBHE
30 std::unique_ptr<ProcessLib::AbstractJacobianAssembler>&& jacobian_assembler,
31 std::vector<std::unique_ptr<ParameterLib::ParameterBase>>
const& parameters,
32 unsigned const integration_order,
33 std::vector<std::vector<std::reference_wrapper<ProcessVariable>>>&&
37 :
Process(std::move(name), mesh, std::move(jacobian_assembler), parameters,
38 integration_order, std::move(process_variables),
39 std::move(secondary_variables)),
40 _process_data(std::move(process_data)),
47 "The number of the given BHE properties ({:d}) are not consistent "
48 "with the number of BHE groups in the mesh ({:d}).",
54 if (material_ids ==
nullptr)
56 OGS_FATAL(
"Not able to get material IDs! ");
83 std::vector<std::vector<MeshLib::Element*>
const*> vec_var_elements;
86 std::vector<int> vec_n_components{
98 for (
int i = 0; i < n_BHEs; i++)
100 auto const number_of_unknowns =
101 visit([](
auto const& bhe) {
return bhe.number_of_unknowns; },
108 std::make_unique<MeshLib::MeshSubset const>(
_mesh, bhe_nodes));
110 std::generate_n(std::back_inserter(all_mesh_subsets),
117 vec_n_components.push_back(number_of_unknowns);
118 vec_var_elements.push_back(&bhe_elements);
122 std::make_unique<NumLib::LocalToGlobalIndexMap>(
123 std::move(all_mesh_subsets),
135 unsigned const integration_order)
138 std::unordered_map<std::size_t, BHE::BHETypes*> element_to_bhe_map;
140 for (
int i = 0; i < n_BHEs; i++)
143 for (
auto const& e : bhe_elements)
145 element_to_bhe_map[e->getID()] =
162 const double t,
double const dt, std::vector<GlobalVector*>
const& x,
163 std::vector<GlobalVector*>
const& x_prev,
int const process_id,
166 DBUG(
"Assemble HeatTransportBHE process.");
170 std::vector<NumLib::LocalToGlobalIndexMap const*> dof_table = {
180 const double t,
double const dt, std::vector<GlobalVector*>
const& x,
181 std::vector<GlobalVector*>
const& x_prev,
int const process_id,
184 DBUG(
"AssembleWithJacobian HeatTransportBHE process.");
186 std::vector<NumLib::LocalToGlobalIndexMap const*> dof_table = {
194 x_prev, process_id, M, K, b, Jac);
198 double const t,
double const dt, std::vector<GlobalVector*>
const& x,
201 DBUG(
"Compute heat flux for HeatTransportBHE process.");
203 std::vector<NumLib::LocalToGlobalIndexMap const*> dof_tables;
204 dof_tables.reserve(x.size());
205 std::generate_n(std::back_inserter(dof_tables), x.size(),
206 [&]() { return _local_to_global_index_map.get(); });
224 auto const Tout_nodes_id =
226 const std::size_t n_bc_nodes = Tout_nodes_id.size();
228 for (std::size_t i = 0; i < n_bc_nodes; i++)
241 DBUG(
"Method `tespySolver' not overridden in Python script.");
245 for (std::size_t i = 0; i < n_bc_nodes; i++)
248 std::get<2>(tespy_result)[i];
250 std::get<3>(tespy_result)[i];
252 auto const tespy_has_converged = std::get<1>(tespy_result);
253 if (tespy_has_converged ==
true)
260 std::vector<GlobalVector*>
const& x,
const double t,
const double dt,
261 int const process_id)
269 auto& [time, Tin_value, Tout_value, Tout_nodes_ids, flowrate] =
277 auto const& solution = *x[process_id];
280 const std::size_t n_bc_nodes = Tout_nodes_ids.size();
281 for (std::size_t i = 0; i < n_bc_nodes; i++)
284 Tout_value[i] = solution[Tout_nodes_ids[i]];
288 auto const server_communication_result =
290 t, dt, Tin_value, Tout_value, flowrate);
294 DBUG(
"Method `serverCommunication' not overridden in Python script.");
297 auto const& [server_communication_Tin_value,
298 server_communication_flowrate] = server_communication_result;
300 std::copy(begin(server_communication_Tin_value),
301 end(server_communication_Tin_value),
303 std::copy(begin(server_communication_flowrate),
304 end(server_communication_flowrate),
309 std::vector<GlobalVector*>
const& x,
310 std::vector<GlobalVector*>
const& ,
const double t,
311 const double dt,
int const process_id)
319 auto& [time, Tin_value, Tout_value, Tout_nodes_ids, flowrate] =
327 auto const& solution = *x[process_id];
330 const std::size_t n_bc_nodes = Tout_nodes_ids.size();
331 for (std::size_t i = 0; i < n_bc_nodes; i++)
334 Tout_value[i] = solution[Tout_nodes_ids[i]];
339 t, dt, Tin_value, Tout_value, flowrate);
343 DBUG(
"Method `serverCommunication' not overridden in Python script.");
348 std::vector<std::vector<MeshLib::Node*>>
const& all_bhe_nodes)
350 const int process_id = 0;
356 for (
int bhe_i = 0; bhe_i < n_BHEs; bhe_i++)
358 auto const& bhe_nodes = all_bhe_nodes[bhe_i];
362 const int variable_id = bhe_i + 1;
364 std::vector<MeshLib::Node*> bhe_boundary_nodes;
368 for (
auto const& bhe_node : bhe_nodes)
371 auto const& connected_elements =
373 const std::size_t n_line_elements = std::count_if(
374 connected_elements.begin(), connected_elements.end(),
376 { return (elem->getDimension() == 1); });
378 if (n_line_elements == 1)
380 bhe_boundary_nodes.push_back(bhe_node);
384 if (bhe_boundary_nodes.size() != 2)
387 "Error!!! The BHE boundary nodes are not correctly found, "
388 "for every single BHE, there should be 2 boundary nodes.");
403 if ((*bhe_boundary_nodes[0])[2] == (*bhe_boundary_nodes[1])[2])
406 "For 1P-type BHE, the BHE inflow and outflow "
407 "nodes are identified according to their mesh node id in "
415 if ((*bhe_boundary_nodes[0])[2] < (*bhe_boundary_nodes[1])[2])
417 std::swap(bhe_boundary_nodes[0], bhe_boundary_nodes[1]);
421 auto get_global_index =
422 [&](std::size_t
const node_id,
int const component)
426 variable_id, component);
429 auto get_global_bhe_bc_indices =
431 std::pair<std::size_t ,
int >, 2>
432 nodes_and_components)
434 return std::make_pair(
435 get_global_index(nodes_and_components[0].first,
436 nodes_and_components[0].second),
437 get_global_index(nodes_and_components[1].first,
438 nodes_and_components[1].second));
442 [&, bc_top_node_id = bhe_boundary_nodes[0]->getID(),
443 bc_bottom_node_id = bhe_boundary_nodes[1]->getID()](
auto& bhe)
445 for (
auto const& in_out_component_id :
446 bhe.inflow_outflow_bc_component_ids)
448 if (bhe.use_python_bcs ||
455 bcs.addBoundaryCondition(
457 get_global_bhe_bc_indices(
458 bhe.getBHEInflowDirichletBCNodesAndComponents(
459 bc_top_node_id, bc_bottom_node_id,
460 in_out_component_id.first)),
467 "The Python Boundary Condition was switched on, "
468 "but the data object does not exist! ");
474 bcs.addBoundaryCondition(
476 get_global_bhe_bc_indices(
477 bhe.getBHEInflowDirichletBCNodesAndComponents(
478 bc_top_node_id, bc_bottom_node_id,
479 in_out_component_id.first)),
480 [&bhe](
double const T,
double const t) {
481 return bhe.updateFlowRateAndTemperature(T, t);
485 auto const bottom_nodes_and_components =
486 bhe.getBHEBottomDirichletBCNodesAndComponents(
488 in_out_component_id.first,
489 in_out_component_id.second);
491 if (bottom_nodes_and_components)
494 bcs.addBoundaryCondition(
496 get_global_bhe_bc_indices(
497 {{{bc_bottom_node_id,
498 in_out_component_id.first},
500 in_out_component_id.second}}})));
void INFO(fmt::format_string< Args... > fmt, Args &&... args)
void DBUG(fmt::format_string< Args... > fmt, Args &&... args)
Global vector based on Eigen vector.
bool isAxiallySymmetric() const
std::vector< Node * > const & getNodes() const
Get the nodes-vector for the mesh.
std::vector< Element * > const & getElements() const
Get the element-vector for the mesh.
unsigned getDimension() const
Returns the dimension of the mesh (determined by the maximum dimension over all elements).
std::size_t getID() const
Get id of the mesh.
std::vector< Element const * > const & getElementsConnectedToNode(std::size_t node_id) const
std::tuple< double, std::vector< double >, std::vector< double >, std::vector< int >, std::vector< double > > dataframe_network
bool isOverriddenTespy() const
virtual std::tuple< bool, bool, std::vector< double >, std::vector< double > > tespySolver(double, std::vector< double > const &, std::vector< double > const &) const
virtual void serverCommunicationPostTimestep(double, double, std::vector< double > const &, std::vector< double > const &, std::vector< double > const &) const
virtual std::tuple< std::vector< double >, std::vector< double > > serverCommunicationPreTimestep(double, double, std::vector< double > const &, std::vector< double > const &, std::vector< double > const &) const
bool isOverriddenServerCommunicationPostTimestep() const
bool isOverriddenServerCommunicationPreTimestep() const
std::unique_ptr< MeshLib::MeshSubset const > _mesh_subset_soil_nodes
const BHEMeshData _bheMeshData
void assembleConcreteProcess(const double t, double const dt, std::vector< GlobalVector * > const &x, std::vector< GlobalVector * > const &x_prev, int const process_id, GlobalMatrix &M, GlobalMatrix &K, GlobalVector &b) override
std::vector< std::unique_ptr< MeshLib::MeshSubset const > > _mesh_subset_BHE_nodes
void computeSecondaryVariableConcrete(double const t, double const dt, std::vector< GlobalVector * > const &x, GlobalVector const &x_prev, int const process_id) override
std::vector< std::unique_ptr< HeatTransportBHELocalAssemblerInterface > > _local_assemblers
HeatTransportBHEProcessData _process_data
NumLib::IterationResult postIterationConcreteProcess(GlobalVector const &x) override
HeatTransportBHEProcess(std::string name, MeshLib::Mesh &mesh, std::unique_ptr< ProcessLib::AbstractJacobianAssembler > &&jacobian_assembler, std::vector< std::unique_ptr< ParameterLib::ParameterBase > > const ¶meters, unsigned const integration_order, std::vector< std::vector< std::reference_wrapper< ProcessVariable > > > &&process_variables, HeatTransportBHEProcessData &&process_data, SecondaryVariableCollection &&secondary_variables)
void preTimestepConcreteProcess(std::vector< GlobalVector * > const &x, const double t, const double dt, int const process_id) override
void assembleWithJacobianConcreteProcess(const double t, double const dt, std::vector< GlobalVector * > const &x, std::vector< GlobalVector * > const &x_prev, int const process_id, GlobalMatrix &M, GlobalMatrix &K, GlobalVector &b, GlobalMatrix &Jac) override
void constructDofTable() override
void initializeConcreteProcess(NumLib::LocalToGlobalIndexMap const &dof_table, MeshLib::Mesh const &mesh, unsigned const integration_order) override
Process specific initialization called by initialize().
void postTimestepConcreteProcess(std::vector< GlobalVector * > const &x, std::vector< GlobalVector * > const &x_prev, const double t, const double dt, int const process_id) override
void createBHEBoundaryConditionTopBottom(std::vector< std::vector< MeshLib::Node * > > const &all_bhe_nodes)
virtual void computeSecondaryVariable(std::size_t const mesh_item_id, std::vector< NumLib::LocalToGlobalIndexMap const * > const &dof_tables, double const t, double const dt, std::vector< GlobalVector * > const &x, GlobalVector const &x_prev, int const process_id)
std::vector< std::size_t > const & getActiveElementIDs() const
std::vector< BoundaryConditionCollection > _boundary_conditions
std::unique_ptr< MeshLib::MeshSubset const > _mesh_subset_all_nodes
std::vector< std::reference_wrapper< ProcessVariable > > const & getProcessVariables(const int process_id) const
VectorMatrixAssembler _global_assembler
std::unique_ptr< NumLib::LocalToGlobalIndexMap > _local_to_global_index_map
Handles configuration of several secondary variables from the project file.
void assembleWithJacobian(std::size_t const mesh_item_id, LocalAssemblerInterface &local_assembler, std::vector< NumLib::LocalToGlobalIndexMap const * > const &dof_tables, const double t, double const dt, std::vector< GlobalVector * > const &x, std::vector< GlobalVector * > const &x_prev, int const process_id, GlobalMatrix &M, GlobalMatrix &K, GlobalVector &b, GlobalMatrix &Jac)
void assemble(std::size_t const mesh_item_id, LocalAssemblerInterface &local_assembler, std::vector< NumLib::LocalToGlobalIndexMap const * > const &dof_tables, double const t, double const dt, std::vector< GlobalVector * > const &x, std::vector< GlobalVector * > const &x_prev, int const process_id, GlobalMatrix &M, GlobalMatrix &K, GlobalVector &b)
IterationResult
Status flags telling the NonlinearSolver if an iteration succeeded.
PropertyVector< int > const * materialIDs(Mesh const &mesh)
@ BY_COMPONENT
Ordering data by component type.
std::unique_ptr< BHEInflowDirichletBoundaryCondition< BHEUpdateCallback > > createBHEInflowDirichletBoundaryCondition(std::pair< GlobalIndexType, GlobalIndexType > &&in_out_global_indices, BHEUpdateCallback bhe_update_callback)
std::unique_ptr< BHEBottomDirichletBoundaryCondition > createBHEBottomDirichletBoundaryCondition(std::pair< GlobalIndexType, GlobalIndexType > &&in_out_global_indices)
void createLocalAssemblers(std::vector< MeshLib::Element * > const &mesh_elements, NumLib::LocalToGlobalIndexMap const &dof_table, std::vector< std::unique_ptr< LocalAssemblerInterface > > &local_assemblers, NumLib::IntegrationOrder const integration_order, ExtraCtorArgs &&... extra_ctor_args)
BHEMeshData getBHEDataInMesh(MeshLib::Mesh const &mesh)
std::unique_ptr< BHEInflowPythonBoundaryCondition< BHEType > > createBHEInflowPythonBoundaryCondition(std::pair< GlobalIndexType, GlobalIndexType > &&in_out_global_indices, BHEType &bhe, BHEInflowPythonBoundaryConditionPythonSideInterface &py_bc_object)
static void executeSelectedMemberOnDereferenced(Method method, Container const &container, std::vector< std::size_t > const &active_container_ids, Args &&... args)
static void executeSelectedMemberDereferenced(Object &object, Method method, Container const &container, std::vector< std::size_t > const &active_container_ids, Args &&... args)
std::vector< std::vector< MeshLib::Node * > > BHE_nodes
std::vector< std::vector< MeshLib::Element * > > BHE_elements
std::vector< int > BHE_mat_IDs
MeshLib::PropertyVector< int > const * _mesh_prop_materialIDs
BHEInflowPythonBoundaryConditionPythonSideInterface * py_bc_object
Python object computing BC values.
std::unordered_map< int, int > _map_materialID_to_BHE_ID
std::vector< BHE::BHETypes > _vec_BHE_property
const bool _use_server_communication