This function computes a fictitious thermal resistance between the pipe outer wall and a fictitious, average temperature of the plane that contains the pipes. The equation is the same as is implemented in TRNSYS 17 Type 56 active layer component, manual page 197-201. Different equations are used for
sysTyp == Buildings.Fluid.HeatExchangers.RadiantSlabs.Types.SystemType.Floor
),
sysTyp == Buildings.Fluid.HeatExchangers.RadiantSlabs.Types.SystemType.Ceiling_Wall_or_Capillary
and disPip/dPipOut ≥ 5.8
), and
sysTyp == Buildings.Fluid.HeatExchangers.RadiantSlabs.Types.SystemType.Ceiling_Wall_or_Capillary
and disPip/dPipOut < 5.8
).
The resistance Rx
is based on a steady-state heat transfer analysis. Therefore, it is
only valid during steady-state.
For a fully dynamic model, a finite element method for the radiant slab would need to be implemented.
function AverageResistance extends Modelica.Icons.Function; input Modelica.Units.SI.Distance disPip "pipe distance"; input Modelica.Units.SI.Diameter dPipOut "pipe outside diameter"; input Modelica.Units.SI.ThermalConductivity k "pipe level construction element thermal conductivity"; input Buildings.Fluid.HeatExchangers.RadiantSlabs.Types.SystemType sysTyp "Type of radiant system"; input Modelica.Units.SI.ThermalConductivity kIns "floor slab insulation thermal conductivity"; input Modelica.Units.SI.Thickness dIns "floor slab insulation thickness"; output Modelica.Units.SI.ThermalInsulance Rx "Thermal insulance"; end AverageResistance;
alpha
,
and changed print statement to an assertion with assertion level set to warning.1/s
in computation of infSum
.