feat : dev convection
This commit is contained in:
32
Formation/OTRERA_formation/Components/Convection.mo
Normal file
32
Formation/OTRERA_formation/Components/Convection.mo
Normal file
@@ -0,0 +1,32 @@
|
||||
within OTRERA_formation.Components;
|
||||
|
||||
model Convection
|
||||
|
||||
//USER DEFINED PARAMETERS
|
||||
parameter Modelica.Units.SI.Area S=0.0 "Exchange area between fluid and solid" ;
|
||||
parameter Modelica.Units.SI.CoefficientOfHeatTransfer h = 0.0 "Convective heat transfer coefficient";
|
||||
|
||||
|
||||
//INTERNAL VARIABLES
|
||||
Modelica.Units.SI.HeatFlowRate Q_flow ;
|
||||
Modelica.Units.SI.Temperature T_wall ;
|
||||
Modelica.Units.SI.Temperature T_fluid ;
|
||||
//IMPORTED COMPONENTS
|
||||
Modelica.Thermal.HeatTransfer.Interfaces.HeatPort_a port_wall annotation(
|
||||
Placement(transformation(origin = {-96, 2}, extent = {{-10, -10}, {10, 10}}), iconTransformation(origin = {-90, 0}, extent = {{-10, -10}, {10, 10}})));
|
||||
Modelica.Thermal.HeatTransfer.Interfaces.HeatPort_b port_fluid annotation(
|
||||
Placement(transformation(origin = {96, 0}, extent = {{-10, -10}, {10, 10}}), iconTransformation(origin = {90, 0}, extent = {{-10, -10}, {10, 10}})));
|
||||
equation
|
||||
|
||||
Q_flow = h * S * (T_wall - T_fluid) ;
|
||||
|
||||
//Port handover
|
||||
|
||||
port_fluid.Q_flow + port_wall.Q_flow = 0.0 ;
|
||||
port_fluid.Q_flow = -Q_flow ;
|
||||
T_wall = port_wall.T ;
|
||||
T_fluid = port_fluid.T ;
|
||||
|
||||
|
||||
|
||||
end Convection;
|
||||
Reference in New Issue
Block a user