Buildings.Fluid.HeatPumps.ModularReversible.RefrigerantCycle.Frosting.Validation
Examples to validate the frosting approaches
Information
Validate models for frosting suppression.
Extends from Modelica.Icons.ExamplesPackage (Icon for packages containing runnable examples).
Package Content
Name | Description |
---|---|
![]() |
Validate the values described by Wetter, Afjei and Glass |
Buildings.Fluid.HeatPumps.ModularReversible.RefrigerantCycle.Frosting.Validation.WetterAfjei1997
Validate the values described by Wetter, Afjei and Glass
Information
Test model to validate if the equation fit the data in Figure 3 in the paper by Wetter, Afjei and Glass. Also, the option to disable frosting surpression if air is not used is tested.References
Thomas Afjei, Michael Wetter and Andrew Glass.
TRNSYS type: Dual-stage compressor heat pump including frost and cycle losses. Model description and implementation in TRNSYS.
TRNSYS user meeting, November 1997, Stuttgart, Germany.
https://simulationresearch.lbl.gov/wetter/download/type204_hp.pdf
Extends from Modelica.Icons.Example (Icon for runnable examples).
Connectors
Type | Name | Description |
---|---|---|
output RealOutput | iceFacWat | Icing factor from 0 to 1 to estimate influence of icing |
RefrigerantMachineControlBus | sigBus1 | Bus-connector used in a heat pump |
output RealOutput | iceFacAir | Icing factor from 0 to 1 to estimate influence of icing |
Modelica definition
model WetterAfjei1997
"Validate the values described by Wetter, Afjei and Glass"
extends Modelica.Icons.Example;
Buildings.Fluid.HeatPumps.ModularReversible.RefrigerantCycle.Frosting.FunctionalIcingFactor
iceFacWatSou(cpEva=4184, redeclare function icingFactor =
Buildings.Fluid.HeatPumps.ModularReversible.RefrigerantCycle.Frosting.Functions.wetterAfjei1997)
"Water source icing factor";
Modelica.Blocks.Interfaces.RealOutput iceFacWat
"Icing factor from 0 to 1 to estimate influence of icing";
Buildings.Fluid.HeatPumps.ModularReversible.BaseClasses.RefrigerantMachineControlBus
sigBus1
"Bus-connector used in a heat pump";
Modelica.Blocks.Sources.Constant const(final k=0)
"Values are irrelevant for the function";
Modelica.Blocks.Sources.Ramp ramp(
height=35,
duration=35,
offset=253.15,
y(unit="K", displayUnit="degC"))
"Outdoor air temperature ramp";
FunctionalIcingFactor iceFacAirSou(cpEva=1004, redeclare function icingFactor
= Functions.wetterAfjei1997) "Air source icing factor";
Modelica.Blocks.Interfaces.RealOutput iceFacAir
"Icing factor from 0 to 1 to estimate influence of icing";
equation
connect(iceFacWatSou.iceFac, iceFacWat);
connect(iceFacWatSou.sigBus, sigBus1);
connect(const.y, sigBus1.mEvaMea_flow);
connect(const.y, sigBus1.TEvaOutMea);
connect(ramp.y, sigBus1.TEvaInMea);
connect(iceFacAirSou.iceFac, iceFacAir);
connect(iceFacAirSou.sigBus, sigBus1);
end WetterAfjei1997;