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.");
168 std::vector<NumLib::LocalToGlobalIndexMap const*> dof_table = {
178 const double t,
double const dt, std::vector<GlobalVector*>
const& x,
179 std::vector<GlobalVector*>
const& x_prev,
int const process_id,
182 DBUG(
"AssembleWithJacobian HeatTransportBHE process.");
184 std::vector<NumLib::LocalToGlobalIndexMap const*> dof_table = {
191 process_id, &b, &Jac);
195 double const t,
double const dt, std::vector<GlobalVector*>
const& x,
198 DBUG(
"Compute heat flux for HeatTransportBHE process.");
200 std::vector<NumLib::LocalToGlobalIndexMap const*> dof_tables;
201 dof_tables.reserve(x.size());
202 std::generate_n(std::back_inserter(dof_tables), x.size(),
203 [&]() { return _local_to_global_index_map.get(); });
220 auto const Tout_nodes_id =
222 const std::size_t n_bc_nodes = Tout_nodes_id.size();
224 for (std::size_t i = 0; i < n_bc_nodes; i++)
237 DBUG(
"Method `tespySolver' not overridden in Python script.");
241 for (std::size_t i = 0; i < n_bc_nodes; i++)
244 std::get<2>(tespy_result)[i];
246 std::get<3>(tespy_result)[i];
248 auto const tespy_has_converged = std::get<1>(tespy_result);
249 if (tespy_has_converged ==
true)
256 std::vector<GlobalVector*>
const& x,
const double t,
const double dt,
257 int const process_id)
265 auto& [time, Tin_value, Tout_value, Tout_nodes_ids, flowrate] =
273 auto const& solution = *x[process_id];
276 const std::size_t n_bc_nodes = Tout_nodes_ids.size();
277 for (std::size_t i = 0; i < n_bc_nodes; i++)
280 Tout_value[i] = solution[Tout_nodes_ids[i]];
284 auto const server_communication_result =
286 t, dt, Tin_value, Tout_value, flowrate);
290 DBUG(
"Method `serverCommunication' not overridden in Python script.");
293 auto const& [server_communication_Tin_value,
294 server_communication_flowrate] = server_communication_result;
296 std::copy(begin(server_communication_Tin_value),
297 end(server_communication_Tin_value),
299 std::copy(begin(server_communication_flowrate),
300 end(server_communication_flowrate),
305 std::vector<GlobalVector*>
const& x,
306 std::vector<GlobalVector*>
const& ,
const double t,
307 const double dt,
int const process_id)
315 auto& [time, Tin_value, Tout_value, Tout_nodes_ids, flowrate] =
323 auto const& solution = *x[process_id];
326 const std::size_t n_bc_nodes = Tout_nodes_ids.size();
327 for (std::size_t i = 0; i < n_bc_nodes; i++)
330 Tout_value[i] = solution[Tout_nodes_ids[i]];
335 t, dt, Tin_value, Tout_value, flowrate);
339 DBUG(
"Method `serverCommunication' not overridden in Python script.");
344 std::vector<std::vector<MeshLib::Node*>>
const& all_bhe_nodes)
346 const int process_id = 0;
352 for (
int bhe_i = 0; bhe_i < n_BHEs; bhe_i++)
354 auto const& bhe_nodes = all_bhe_nodes[bhe_i];
358 const int variable_id = bhe_i + 1;
360 std::vector<MeshLib::Node*> bhe_boundary_nodes;
364 for (
auto const& bhe_node : bhe_nodes)
367 auto const& connected_elements =
369 const std::size_t n_line_elements = std::count_if(
370 connected_elements.begin(), connected_elements.end(),
372 { return (elem->getDimension() == 1); });
374 if (n_line_elements == 1)
376 bhe_boundary_nodes.push_back(bhe_node);
380 if (bhe_boundary_nodes.size() != 2)
383 "Error!!! The BHE boundary nodes are not correctly found, "
384 "for every single BHE, there should be 2 boundary nodes.");
399 if ((*bhe_boundary_nodes[0])[2] == (*bhe_boundary_nodes[1])[2])
402 "For 1P-type BHE, the BHE inflow and outflow "
403 "nodes are identified according to their mesh node id in "
411 if ((*bhe_boundary_nodes[0])[2] < (*bhe_boundary_nodes[1])[2])
413 std::swap(bhe_boundary_nodes[0], bhe_boundary_nodes[1]);
417 auto get_global_index =
418 [&](std::size_t
const node_id,
int const component)
422 variable_id, component);
425 auto get_global_bhe_bc_indices =
427 std::pair<std::size_t ,
int >, 2>
428 nodes_and_components)
430 return std::make_pair(
431 get_global_index(nodes_and_components[0].first,
432 nodes_and_components[0].second),
433 get_global_index(nodes_and_components[1].first,
434 nodes_and_components[1].second));
438 [&, bc_top_node_id = bhe_boundary_nodes[0]->getID(),
439 bc_bottom_node_id = bhe_boundary_nodes[1]->getID()](
auto& bhe)
441 for (
auto const& in_out_component_id :
442 bhe.inflow_outflow_bc_component_ids)
444 if (bhe.use_python_bcs ||
451 bcs.addBoundaryCondition(
453 get_global_bhe_bc_indices(
454 bhe.getBHEInflowDirichletBCNodesAndComponents(
455 bc_top_node_id, bc_bottom_node_id,
456 in_out_component_id.first)),
463 "The Python Boundary Condition was switched on, "
464 "but the data object does not exist! ");
470 bcs.addBoundaryCondition(
472 get_global_bhe_bc_indices(
473 bhe.getBHEInflowDirichletBCNodesAndComponents(
474 bc_top_node_id, bc_bottom_node_id,
475 in_out_component_id.first)),
476 [&bhe](
double const T,
double const t) {
477 return bhe.updateFlowRateAndTemperature(T, t);
481 auto const bottom_nodes_and_components =
482 bhe.getBHEBottomDirichletBCNodesAndComponents(
484 in_out_component_id.first,
485 in_out_component_id.second);
487 if (bottom_nodes_and_components)
490 bcs.addBoundaryCondition(
492 get_global_bhe_bc_indices(
493 {{{bc_bottom_node_id,
494 in_out_component_id.first},
496 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 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 assembleWithJacobianConcreteProcess(const double t, double const dt, std::vector< GlobalVector * > const &x, std::vector< GlobalVector * > const &x_prev, int const process_id, GlobalVector &b, GlobalMatrix &Jac) override
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< BoundaryConditionCollection > _boundary_conditions
std::unique_ptr< MeshLib::MeshSubset const > _mesh_subset_all_nodes
std::vector< std::size_t > const & getActiveElementIDs() 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 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)
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, GlobalVector *b, GlobalMatrix *Jac)
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