32 lines
1.1 KiB
Plaintext
32 lines
1.1 KiB
Plaintext
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; |