Name | Description |
---|---|
WetBulbTemperature |
model WetBulbTemperature package Medium = Buildings.Media.PerfectGases.MoistAir "Medium model"; Modelica.Blocks.Sources.Ramp p( duration=1, offset=101325, height=250); Modelica_Fluid.Sources.PrescribedBoundary_pTX sin(redeclare package Medium = Medium, T=293.15); Buildings.Fluids.Sensors.WetBulbTemperature senWetBul(redeclare package Medium = Medium) "Wet bulb temperature sensor"; Modelica_Fluid.Sources.PrescribedMassFlowRate_TX massFlowRate(redeclare package Medium = Medium, m_flow=1); Modelica.Blocks.Sources.Ramp TDB( height=10, duration=1, offset=273.15 + 30) "Dry bulb temperature"; Modelica.Blocks.Sources.Ramp XHum( duration=1, height=(0.0133 - 0.0175), offset=0.0175) "Humidity concentration"; Modelica.Blocks.Sources.Constant const; Modelica.Blocks.Math.Feedback feedback; Buildings.Utilities.Controls.AssertEquality assertEquality(threShold=0.05); Modelica.Blocks.Sources.Constant TWBExp(k=273.15 + 25) "Expected wet bulb temperature"; equation connect(senWetBul.port_b, sin.port); connect(massFlowRate.port, senWetBul.port_a); connect(TDB.y, massFlowRate.T_in); connect(const.y, feedback.u1); connect(XHum.y, feedback.u2); connect(XHum.y, massFlowRate.X_in[1]); connect(feedback.y, massFlowRate.X_in[2]); connect(senWetBul.TWB, assertEquality.u1); connect(TWBExp.y, assertEquality.u2); connect(p.y, sin.p_in); end WetBulbTemperature;