![\"schema](\"modelica://AixLib/Resources/Images/Airflow/AirCurtain/AirCurtain.png\")
This is an ideal model of an air curtain. It accounts for additional heat losses through an air curtain in the entrance zone.
+It accounts for an ideal temperature mixing of the ventilation air with the air curtain air.
+Ideal mass balance: All air flow rate going outside through the entrance will be replace by ambient air flow going inside. This is mainly described by the air curtain efficiency. It mainly describes the share of total airflow of the air curtain staying inside.
+Ideal temperature mixing: Ideal mixing of two air flows with different temperatures
+
CD from
+
+AixLib.Airflow.Multizone.BaseClasses.DoorDiscretized
+to
+
+AixLib.Airflow.Multizone.DoorDiscretizedOpen.allowFlowReversal=true as the flow can be slightly negative
due to the regularization, in which case the m_flow(min=0)
diff --git a/AixLib/Airflow/Multizone/BaseClasses/ZonalFlow.mo b/AixLib/Airflow/Multizone/BaseClasses/ZonalFlow.mo
index 0c72e48af9..e8e08b35ec 100644
--- a/AixLib/Airflow/Multizone/BaseClasses/ZonalFlow.mo
+++ b/AixLib/Airflow/Multizone/BaseClasses/ZonalFlow.mo
@@ -9,7 +9,8 @@ partial model ZonalFlow "Flow across zonal boundaries of a room"
final m2_flow_nominal = m1_flow_nominal);
replaceable package Medium = Modelica.Media.Interfaces.PartialMedium
- annotation (choicesAllMatching = true);
+ annotation (choices(
+ choice(redeclare package Medium = AixLib.Media.Air "Moist air")));
equation
// Energy balance (no storage, no heat loss/gain)
@@ -69,6 +70,11 @@ Models that extend this model need to provide an equation for
revisions="
forceErrorControlOnFlow as it was not used.
CD from
+
+AixLib.Airflow.Multizone.BaseClasses.DoorDiscretized
+to
+
+AixLib.Airflow.Multizone.DoorDiscretizedOpen.sha.m_flow_nominal.Modelica.Fluid.System
to address issue
diff --git a/AixLib/Airflow/Multizone/Examples/ReverseBuoyancy.mo b/AixLib/Airflow/Multizone/Examples/ReverseBuoyancy.mo
index 55dea1ee2c..327ec53f18 100644
--- a/AixLib/Airflow/Multizone/Examples/ReverseBuoyancy.mo
+++ b/AixLib/Airflow/Multizone/Examples/ReverseBuoyancy.mo
@@ -136,14 +136,13 @@ model ReverseBuoyancy
vZer=0.01,
dp_turbulent=0.1) "Discretized door"
annotation (Placement(transformation(extent={{-63,80},{-43,100}})));
- AixLib.Fluid.Sources.FixedBoundary volOut(
+ AixLib.Fluid.Sources.Boundary_pT volOut(
redeclare package Medium = Medium,
p=100000,
T=283.15,
- nPorts=2) "Ambient conditions" annotation (Placement(transformation(
- extent={{-10,-10},{10,10}},
- rotation=180,
- origin={130,-50})));
+ nPorts=2) "Ambient conditions"
+ annotation (Placement(transformation(extent={{-10,-10},{10,10}},
+ rotation=180, origin={130,-50})));
equation
connect(ope.y, dooOpeClo.y) annotation (Line(points={{-81,-13},{-74,-13},{-74,
-45},{-62,-45}}, color={0,0,255}));
@@ -264,6 +263,11 @@ bottom floor directly exchanges air with the outside.
", revisions="
Modelica.Fluid.System
to address issue
diff --git a/AixLib/Airflow/Multizone/MediumColumn.mo b/AixLib/Airflow/Multizone/MediumColumn.mo
index 366910a706..f2981bf02d 100644
--- a/AixLib/Airflow/Multizone/MediumColumn.mo
+++ b/AixLib/Airflow/Multizone/MediumColumn.mo
@@ -2,8 +2,10 @@ within AixLib.Airflow.Multizone;
model MediumColumn
"Vertical shaft with no friction and no storage of heat and mass"
- replaceable package Medium = Modelica.Media.Interfaces.PartialMedium
- "Medium in the component" annotation (choicesAllMatching=true);
+ replaceable package Medium =
+ Modelica.Media.Interfaces.PartialMedium "Medium in the component"
+ annotation (choices(
+ choice(redeclare package Medium = AixLib.Media.Air "Moist air")));
parameter Modelica.SIunits.Length h(min=0) = 3 "Height of shaft";
parameter AixLib.Airflow.Multizone.Types.densitySelection densitySelection
@@ -202,6 +204,11 @@ AixLib.Airflow.Multizone.MediumColumnDynamic instead of this model.
revisions="
allowFlowReversal
and changed default density computation such
diff --git a/AixLib/Airflow/Multizone/MediumColumnDynamic.mo b/AixLib/Airflow/Multizone/MediumColumnDynamic.mo
index a2287464e1..5608465328 100644
--- a/AixLib/Airflow/Multizone/MediumColumnDynamic.mo
+++ b/AixLib/Airflow/Multizone/MediumColumnDynamic.mo
@@ -3,15 +3,13 @@ model MediumColumnDynamic
"Vertical shaft with no friction and storage of heat and mass"
extends AixLib.Fluid.Interfaces.LumpedVolumeDeclarations;
- replaceable package Medium = Modelica.Media.Interfaces.PartialMedium
- "Medium in the component" annotation (choicesAllMatching=true);
+ replaceable package Medium =
+ Modelica.Media.Interfaces.PartialMedium "Medium in the component"
+ annotation (choices(
+ choice(redeclare package Medium = AixLib.Media.Air "Moist air")));
parameter Modelica.SIunits.Length h(min=0) = 3 "Height of shaft";
- parameter Modelica.SIunits.MassFlowRate m_flow_nominal(min=0)
- "Nominal mass flow rate"
- annotation(Dialog(group = "Nominal condition, used only for steady-state model"));
-
Modelica.Fluid.Interfaces.FluidPort_a port_a(
redeclare final package Medium = Medium,
p(start=Medium.p_default))
@@ -24,12 +22,20 @@ model MediumColumnDynamic
"Fluid connector b (positive design flow direction is from port_a to port_b)"
annotation (Placement(transformation(extent={{10,-110},{-10,-90}}), iconTransformation(extent={{10,-110},{-10,-90}})));
+ parameter Modelica.SIunits.Volume V "Volume in medium shaft";
+
+ // Heat transfer through boundary
+ parameter Boolean use_HeatTransfer = false
+ "= true to use the HeatTransfer model"
+ annotation (Dialog(tab="Assumptions", group="Heat transfer"));
+
// m_flow_nominal is not used by vol, since this component
// can only be configured as a dynamic model.
+ // Therefore we set it to about 10 air changes per hour
AixLib.Fluid.MixingVolumes.MixingVolume vol(
final nPorts=2,
redeclare final package Medium = Medium,
- final m_flow_nominal=m_flow_nominal,
+ final m_flow_nominal=V/360,
final V=V,
final energyDynamics=energyDynamics,
final massDynamics=massDynamics,
@@ -56,12 +62,6 @@ model MediumColumnDynamic
"Medium colum that connects to bottom port"
annotation (Placement(transformation(extent={{-10,-60},{10,-40}})));
- parameter Modelica.SIunits.Volume V "Volume in medium shaft";
-
- // Heat transfer through boundary
- parameter Boolean use_HeatTransfer = false
- "= true to use the HeatTransfer model"
- annotation (Dialog(tab="Assumptions", group="Heat transfer"));
replaceable model HeatTransfer =
Modelica.Fluid.Vessels.BaseClasses.HeatTransfer.IdealHeatTransfer
constrainedby
@@ -181,6 +181,17 @@ at the top of the column.
revisions="
m_flow_nominal.allowFlowReversal
and changed default density computation such
diff --git a/AixLib/Airflow/Multizone/UsersGuide.mo b/AixLib/Airflow/Multizone/UsersGuide.mo
index fac6e64d88..26dfd25e4b 100644
--- a/AixLib/Airflow/Multizone/UsersGuide.mo
+++ b/AixLib/Airflow/Multizone/UsersGuide.mo
@@ -72,7 +72,7 @@ Cape Canaveral, Florida.
Andrew K. Persily and Elizabeth M. Ivy. - + Input Data for Multizone Airflow and IAQ Analysis. NIST, NISTIR 6585. January, 2001. diff --git a/AixLib/Airflow/Multizone/Validation/ThreeRoomsContam.mo b/AixLib/Airflow/Multizone/Validation/ThreeRoomsContam.mo index c819490fa0..5583f8da97 100644 --- a/AixLib/Airflow/Multizone/Validation/ThreeRoomsContam.mo +++ b/AixLib/Airflow/Multizone/Validation/ThreeRoomsContam.mo @@ -32,7 +32,7 @@ model ThreeRoomsContam h=1.5, densitySelection=AixLib.Airflow.Multizone.Types.densitySelection.fromBottom) annotation (Placement(transformation(extent={{121,-10},{141,10}}))); - AixLib.Fluid.Sources.FixedBoundary volOut( + AixLib.Fluid.Sources.Boundary_pT volOut( redeclare package Medium = Medium, nPorts=2, p(displayUnit="Pa") = 101325, @@ -256,6 +256,11 @@ Proc. of the 5th International Modelica Conference, p. 431-440. Vienna, Austria, ", revisions="
Modelica.Fluid.System
to address issue
diff --git a/AixLib/Airflow/package.order b/AixLib/Airflow/package.order
index 4df00d1a6e..ea152c453e 100644
--- a/AixLib/Airflow/package.order
+++ b/AixLib/Airflow/package.order
@@ -1,3 +1,4 @@
+AirCurtain
AirHandlingUnit
FacadeVentilationUnit
Multizone
diff --git a/AixLib/BoundaryConditions/SkyTemperature/Examples/BlackBody.mo b/AixLib/BoundaryConditions/SkyTemperature/Examples/BlackBody.mo
index ae392e15e8..52beb99adb 100644
--- a/AixLib/BoundaryConditions/SkyTemperature/Examples/BlackBody.mo
+++ b/AixLib/BoundaryConditions/SkyTemperature/Examples/BlackBody.mo
@@ -22,7 +22,7 @@ equation
points={{10,10},{-20,10}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus.TDewPoi, TBlaSky.TDewPoi) annotation (Line(
@@ -42,7 +42,7 @@ equation
points={{10,10},{24,10},{24,22},{38,22}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus.TDewPoi, TBlaSkyIrr.TDewPoi) annotation (Line(
@@ -61,7 +61,7 @@ equation
points={{10,10},{24,10},{24,-18},{38,-18}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
annotation (
diff --git a/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/AltitudeAngle.mo b/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/AltitudeAngle.mo
index d815b92bd0..4bea680d1b 100644
--- a/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/AltitudeAngle.mo
+++ b/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/AltitudeAngle.mo
@@ -30,21 +30,21 @@ equation
1.13798e-15},{-47,5.55112e-16},{-34,5.55112e-16}},
color={255,204,51},
thickness=0.5), Text(
- string="%second",
+ textString="%second",
index=1,
extent={{6,3},{6,3}}));
connect(weaBus.cloTim, decAng.nDay) annotation (Line(
points={{-34,5.55112e-16},{-20,5.55112e-16},{-20,30},{-2,30}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus.solTim, solHouAng.solTim) annotation (Line(
points={{-34,5.55112e-16},{-20,5.55112e-16},{-20,-30},{-2,-30}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(zen.zen, altAng.zen) annotation (Line(
diff --git a/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/IncidenceAngle.mo b/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/IncidenceAngle.mo
index b9818800df..be2b3fe977 100644
--- a/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/IncidenceAngle.mo
+++ b/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/IncidenceAngle.mo
@@ -30,21 +30,21 @@ equation
1.13798e-15},{-48,5.55112e-16},{-36,5.55112e-16}},
color={255,204,51},
thickness=0.5), Text(
- string="%second",
+ textString="%second",
index=1,
extent={{6,3},{6,3}}));
connect(weaBus.cloTim, decAng.nDay) annotation (Line(
points={{-36,5.55112e-16},{-20,5.55112e-16},{-20,30},{-2,30}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus.solTim, solHouAng.solTim) annotation (Line(
points={{-36,5.55112e-16},{-20,5.55112e-16},{-20,-30},{-2,-30}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
annotation (
diff --git a/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/SolarAzimuth.mo b/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/SolarAzimuth.mo
index 034ca0f532..e7ba63f211 100644
--- a/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/SolarAzimuth.mo
+++ b/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/SolarAzimuth.mo
@@ -38,28 +38,28 @@ equation
points={{-60,10},{-44,10}},
color={255,204,51},
thickness=0.5), Text(
- string="%second",
+ textString="%second",
index=1,
extent={{6,3},{6,3}}));
connect(weaBus.cloTim, decAng.nDay) annotation (Line(
points={{-44,10},{-28,10},{-28,50},{-22,50}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus.solTim, solHouAng.solTim) annotation (Line(
points={{-44,10},{-28,10},{-28,-10},{18,-10}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus.solTim, solAzi.solTim) annotation (Line(
points={{-44,10},{-28,10},{-28,-28},{92,-28},{92,14},{98,14}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
annotation (
diff --git a/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/SolarHourAngle.mo b/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/SolarHourAngle.mo
index 632dcb02c6..267af6958b 100644
--- a/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/SolarHourAngle.mo
+++ b/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/SolarHourAngle.mo
@@ -16,7 +16,7 @@ equation
1.13798e-15},{-52,0},{-44,0}},
color={255,204,51},
thickness=0.5), Text(
- string="%second",
+ textString="%second",
index=1,
extent={{6,3},{6,3}}));
connect(weaBus.solTim, solHouAng.solTim) annotation (Line(
@@ -24,7 +24,7 @@ equation
1.22125e-15},{-23,6.66134e-16},{-2,6.66134e-16}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
annotation (experiment(Tolerance=1e-6, StopTime=86400),
diff --git a/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/WallSolarAzimuth.mo b/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/WallSolarAzimuth.mo
index 05a1eb89b8..a9cd8f6d69 100644
--- a/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/WallSolarAzimuth.mo
+++ b/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/WallSolarAzimuth.mo
@@ -24,7 +24,7 @@ equation
points={{-80,10},{-60,10}},
color={255,204,51},
thickness=0.5), Text(
- string="%second",
+ textString="%second",
index=1,
extent={{6,3},{6,3}}));
connect(weaDat.weaBus, incAng.weaBus) annotation (Line(
@@ -41,7 +41,7 @@ equation
points={{-60,10},{-40,10},{-40,30},{-22,30}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
annotation (experiment(Tolerance=1e-6, StopTime=86400),
diff --git a/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/ZenithAngle.mo b/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/ZenithAngle.mo
index de8caf613a..208cc0f5be 100644
--- a/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/ZenithAngle.mo
+++ b/AixLib/BoundaryConditions/SolarGeometry/BaseClasses/Examples/ZenithAngle.mo
@@ -28,21 +28,21 @@ equation
1.13798e-15},{-47,5.55112e-16},{-34,5.55112e-16}},
color={255,204,51},
thickness=0.5), Text(
- string="%second",
+ textString="%second",
index=1,
extent={{6,3},{6,3}}));
connect(weaBus.cloTim, decAng.nDay) annotation (Line(
points={{-34,5.55112e-16},{-18,5.55112e-16},{-18,30},{18,30}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus.solTim, solHouAng.solTim) annotation (Line(
points={{-34,5.55112e-16},{-18,5.55112e-16},{-18,-30},{18,-30}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
annotation (
diff --git a/AixLib/BoundaryConditions/SolarGeometry/IncidenceAngle.mo b/AixLib/BoundaryConditions/SolarGeometry/IncidenceAngle.mo
index a6210e19a2..e230b7702e 100644
--- a/AixLib/BoundaryConditions/SolarGeometry/IncidenceAngle.mo
+++ b/AixLib/BoundaryConditions/SolarGeometry/IncidenceAngle.mo
@@ -40,14 +40,14 @@ equation
points={{-100,0},{-80,0},{-80,40},{-42,40}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus.solTim, solHouAng.solTim) annotation (Line(
points={{-100,0},{-80,0},{-80,-40},{-42,-40}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
annotation (
diff --git a/AixLib/BoundaryConditions/SolarIrradiation/BaseClasses/Examples/BrighteningCoefficient.mo b/AixLib/BoundaryConditions/SolarIrradiation/BaseClasses/Examples/BrighteningCoefficient.mo
index aa8d4aa780..e60db92dfa 100644
--- a/AixLib/BoundaryConditions/SolarIrradiation/BaseClasses/Examples/BrighteningCoefficient.mo
+++ b/AixLib/BoundaryConditions/SolarIrradiation/BaseClasses/Examples/BrighteningCoefficient.mo
@@ -42,35 +42,35 @@ equation
points={{-70,70},{-50,70}},
color={255,204,51},
thickness=0.5), Text(
- string="%second",
+ textString="%second",
index=1,
extent={{6,3},{6,3}}));
connect(weaBus.HGloHor, skyCle.HGloHor) annotation (Line(
points={{-50,70},{20,70},{20,36},{38,36}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus.HDifHor, skyCle.HDifHor) annotation (Line(
points={{-50,70},{20,70},{20,30},{38,30}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus.HDifHor, skyBri.HDifHor) annotation (Line(
points={{-50,70},{20,70},{20,-34},{38,-34}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus, zen.weaBus) annotation (Line(
points={{-50,70},{-50,70},{-50,28},{-50,28},{-50,-10},{-40,-10}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
annotation (
diff --git a/AixLib/BoundaryConditions/SolarIrradiation/BaseClasses/Examples/DiffuseIsotropic.mo b/AixLib/BoundaryConditions/SolarIrradiation/BaseClasses/Examples/DiffuseIsotropic.mo
index 577b699004..9ec6f44aeb 100644
--- a/AixLib/BoundaryConditions/SolarIrradiation/BaseClasses/Examples/DiffuseIsotropic.mo
+++ b/AixLib/BoundaryConditions/SolarIrradiation/BaseClasses/Examples/DiffuseIsotropic.mo
@@ -15,21 +15,21 @@ equation
points={{-40,10},{-1,10}},
color={255,204,51},
thickness=0.5), Text(
- string="%second",
+ textString="%second",
index=1,
extent={{6,3},{6,3}}));
connect(weaBus.HGloHor, HDifTilIso.HGloHor) annotation (Line(
points={{-1,10},{24,10},{24,14},{38,14}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus.HDifHor, HDifTilIso.HDifHor) annotation (Line(
points={{-1,10},{24,10},{24,6},{38,6}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
annotation (
diff --git a/AixLib/BoundaryConditions/SolarIrradiation/BaseClasses/Examples/SkyBrightness.mo b/AixLib/BoundaryConditions/SolarIrradiation/BaseClasses/Examples/SkyBrightness.mo
index 3ba0df955b..31d8dc8a56 100644
--- a/AixLib/BoundaryConditions/SolarIrradiation/BaseClasses/Examples/SkyBrightness.mo
+++ b/AixLib/BoundaryConditions/SolarIrradiation/BaseClasses/Examples/SkyBrightness.mo
@@ -29,21 +29,21 @@ equation
points={{-60,-10},{-40,-10}},
color={255,204,51},
thickness=0.5), Text(
- string="%second",
+ textString="%second",
index=1,
extent={{6,3},{6,3}}));
connect(weaBus.HDifHor, skyBri.HDifHor) annotation (Line(
points={{-40,-10},{58,-10}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(zen.weaBus, weaBus) annotation (Line(
points={{-20,30},{-30,30},{-30,-10},{-40,-10}},
color={255,204,51},
thickness=0.5), Text(
- string="%second",
+ textString="%second",
index=1,
extent={{6,3},{6,3}}));
annotation (
diff --git a/AixLib/BoundaryConditions/SolarIrradiation/BaseClasses/Examples/SkyClearness.mo b/AixLib/BoundaryConditions/SolarIrradiation/BaseClasses/Examples/SkyClearness.mo
index a833b95a83..da5ba749ff 100644
--- a/AixLib/BoundaryConditions/SolarIrradiation/BaseClasses/Examples/SkyClearness.mo
+++ b/AixLib/BoundaryConditions/SolarIrradiation/BaseClasses/Examples/SkyClearness.mo
@@ -22,21 +22,21 @@ equation
points={{-20,30},{8,30}},
color={255,204,51},
thickness=0.5), Text(
- string="%second",
+ textString="%second",
index=1,
extent={{6,3},{6,3}}));
connect(weaBus.HGloHor, skyCle.HGloHor) annotation (Line(
points={{8,30},{24,30},{24,16},{38,16}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus.HDifHor, skyCle.HDifHor) annotation (Line(
points={{8,30},{24,30},{24,10},{38,10}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
@@ -44,7 +44,7 @@ equation
points={{8,30},{8,12},{-54,12},{-54,-10},{-40,-10}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
annotation (
diff --git a/AixLib/BoundaryConditions/SolarIrradiation/DiffuseIsotropic.mo b/AixLib/BoundaryConditions/SolarIrradiation/DiffuseIsotropic.mo
index 6a942351cc..5f9adff9b8 100644
--- a/AixLib/BoundaryConditions/SolarIrradiation/DiffuseIsotropic.mo
+++ b/AixLib/BoundaryConditions/SolarIrradiation/DiffuseIsotropic.mo
@@ -28,14 +28,14 @@ equation
points={{-100,5.55112e-16},{-51.5,5.55112e-16},{-51.5,4},{-22,4}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus.HDifHor, HDifTilIso.HDifHor) annotation (Line(
points={{-100,5.55112e-16},{-51.5,5.55112e-16},{-51.5,-4},{-22,-4}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
diff --git a/AixLib/BoundaryConditions/SolarIrradiation/DiffusePerez.mo b/AixLib/BoundaryConditions/SolarIrradiation/DiffusePerez.mo
index 3586f88bad..6fcde9172a 100644
--- a/AixLib/BoundaryConditions/SolarIrradiation/DiffusePerez.mo
+++ b/AixLib/BoundaryConditions/SolarIrradiation/DiffusePerez.mo
@@ -67,28 +67,28 @@ equation
points={{-100,5.55112e-16},{-92,5.55112e-16},{-92,22.4},{-62.8,22.4}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus.HDifHor, skyCle.HDifHor) annotation (Line(
points={{-100,5.55112e-16},{-92,5.55112e-16},{-92,20},{-62.8,20}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus.HDifHor, skyBri.HDifHor) annotation (Line(
points={{-100,5.55112e-16},{-92,5.55112e-16},{-92,-51.6},{-60.8,-51.6}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus.HGloHor, HDifTil.HGloHor) annotation (Line(
points={{-100,5.55112e-16},{-70,0},{-38,0},{-38,16.8},{-4.2,16.8}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus.HDifHor, HDifTil.HDifHor) annotation (Line(
@@ -96,7 +96,7 @@ equation
10.5}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
@@ -110,7 +110,7 @@ equation
points={{-100,5.55112e-16},{-92,5.55112e-16},{-92,-90.8},{-86,-90.8}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus.solZen, HDifTil.zen) annotation (Line(
@@ -118,7 +118,7 @@ equation
-8.4},{-4.2,-8.4}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(HDifTil.HSkyDifTil, add.u1) annotation (Line(
diff --git a/AixLib/BoundaryConditions/SolarIrradiation/DirectTiltedSurface.mo b/AixLib/BoundaryConditions/SolarIrradiation/DirectTiltedSurface.mo
index 52ec0810a5..68b12c8d1e 100644
--- a/AixLib/BoundaryConditions/SolarIrradiation/DirectTiltedSurface.mo
+++ b/AixLib/BoundaryConditions/SolarIrradiation/DirectTiltedSurface.mo
@@ -31,7 +31,7 @@ equation
points={{-100,5.55112e-16},{-80,5.55112e-16},{-80,12},{-4,12}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(incAng.y, inc) annotation (Line(
@@ -46,7 +46,7 @@ equation
points={{-100,5.55112e-16},{-80,5.55112e-16},{-80,-20},{-50,-20}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
annotation (
diff --git a/AixLib/BoundaryConditions/SolarIrradiation/Examples/DiffuseIsotropic.mo b/AixLib/BoundaryConditions/SolarIrradiation/Examples/DiffuseIsotropic.mo
index 81352d01b6..3b01261107 100644
--- a/AixLib/BoundaryConditions/SolarIrradiation/Examples/DiffuseIsotropic.mo
+++ b/AixLib/BoundaryConditions/SolarIrradiation/Examples/DiffuseIsotropic.mo
@@ -30,7 +30,7 @@ equation
points={{-20,10},{-1,10}},
color={255,204,51},
thickness=0.5), Text(
- string="%second",
+ textString="%second",
index=1,
extent={{6,3},{6,3}}));
@@ -38,21 +38,21 @@ equation
points={{-1,10},{40,10}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(HDifWal.weaBus, weaBus) annotation (Line(
points={{40,-30},{20,-30},{20,10},{-1,10}},
color={255,204,51},
thickness=0.5), Text(
- string="%second",
+ textString="%second",
index=1,
extent={{6,3},{6,3}}));
connect(HDifFlo.weaBus, weaBus) annotation (Line(
points={{40,-70},{20,-70},{20,10},{-1,10}},
color={255,204,51},
thickness=0.5), Text(
- string="%second",
+ textString="%second",
index=1,
extent={{6,3},{6,3}}));
annotation (
diff --git a/AixLib/BoundaryConditions/SolarIrradiation/Examples/DiffusePerez.mo b/AixLib/BoundaryConditions/SolarIrradiation/Examples/DiffusePerez.mo
index 3fe76d5f2a..d1af5c2d6f 100644
--- a/AixLib/BoundaryConditions/SolarIrradiation/Examples/DiffusePerez.mo
+++ b/AixLib/BoundaryConditions/SolarIrradiation/Examples/DiffusePerez.mo
@@ -31,14 +31,14 @@ equation
points={{-20,10},{11,10}},
color={255,204,51},
thickness=0.5), Text(
- string="%second",
+ textString="%second",
index=1,
extent={{6,3},{6,3}}));
connect(weaBus,HDifRoo. weaBus) annotation (Line(
points={{11,10},{40,10}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
@@ -46,14 +46,14 @@ equation
points={{11,10},{30,10},{30,-70},{40,-70}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(weaBus, HDifWal.weaBus) annotation (Line(
points={{11,10},{30,10},{30,-30},{40,-30}},
color={255,204,51},
thickness=0.5), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
annotation (
diff --git a/AixLib/BoundaryConditions/UsersGuide.mo b/AixLib/BoundaryConditions/UsersGuide.mo
index a893c95fd1..c5bba1dddc 100644
--- a/AixLib/BoundaryConditions/UsersGuide.mo
+++ b/AixLib/BoundaryConditions/UsersGuide.mo
@@ -74,10 +74,14 @@ AixLib.Types.Tilt
can be used.
-Note that a ceiling has a tilt of 0, and also the solar collector models +Note that a ceiling has a tilt of 0 + +if they are facing straight upwards. This is correct because the solar irradiation on a ceiling construction is on the other-side surface, which faces upwards toward the sky. Hence, a construction is considered diff --git a/AixLib/BoundaryConditions/WeatherData/BaseClasses/ConvertTime.mo b/AixLib/BoundaryConditions/WeatherData/BaseClasses/ConvertTime.mo index ffa00dd890..47291b5ae2 100644 --- a/AixLib/BoundaryConditions/WeatherData/BaseClasses/ConvertTime.mo +++ b/AixLib/BoundaryConditions/WeatherData/BaseClasses/ConvertTime.mo @@ -1,7 +1,11 @@ within AixLib.BoundaryConditions.WeatherData.BaseClasses; block ConvertTime - "Converts the simulation time to calendar time in scale of 1 year (365 days)" + "Converts the simulation time to calendar time in scale of 1 year (365 days), or a multiple of a year" extends Modelica.Blocks.Icons.Block; + + parameter Modelica.SIunits.Time weaDatStaTim(displayUnit="d") "Start time of weather data"; + parameter Modelica.SIunits.Time weaDatEndTim(displayUnit="d") "End time of weather data"; + Modelica.Blocks.Interfaces.RealInput modTim( final quantity="Time", final unit="s") "Simulation time" @@ -12,28 +16,65 @@ block ConvertTime annotation (Placement(transformation(extent={{100,-10},{120,10}}))); protected - constant Modelica.SIunits.Time year=31536000 "Number of seconds in a year"; - discrete Modelica.SIunits.Time tStart "Start time of period"; + constant Modelica.SIunits.Time shiftSolarRad=1800 "Number of seconds for the shift for solar radiation calculation"; + parameter Modelica.SIunits.Time lenWea = weaDatEndTim-weaDatStaTim "Length of weather data"; + + parameter Boolean canRepeatWeatherFile = abs(mod(lenWea, 365*24*3600)) < 1E-2 + "=true, if the weather file can be repeated, since it has the length of a year or a multiple of it"; + + discrete Modelica.SIunits.Time tNext(start=0, fixed=true) "Start time of next period"; -initial equation - tStart = integer(modTim/year)*year; equation - when modTim - pre(tStart) > year then - tStart = integer(modTim/year)*year; + when {initial(), canRepeatWeatherFile and modTim > pre(tNext)} then + // simulation time stamp went over the end time of the weather file + //(last time stamp of the weather file + average increment) + tNext = if canRepeatWeatherFile then integer(modTim/lenWea)*lenWea + lenWea else time; end when; - calTim = modTim - tStart; + calTim = if canRepeatWeatherFile then modTim - tNext + lenWea else modTim; + + assert(canRepeatWeatherFile or (time - weaDatEndTim) < shiftSolarRad, + "In " + getInstanceName() + ": Insufficient weather data provided for the desired simulation period. + Based on the provided weather file the following start time " + String(weaDatStaTim) + + " and end time " + String(weaDatEndTim) + " (last time stamp + average increment) for the weather data were determined", + AssertionLevel.error); + annotation ( defaultComponentName="conTim", Documentation(info="
-This component converts the simulation time to calendar time in a scale of 1 year (365 days). +This component converts the simulation time to calendar time in a scale of 1 year (365 days), +or a multiple of it, if this is the length of the weather file.
", revisions="lenWea). The new formulation
+allows inclusion of the weather file in JModelica-generated FMUs, and it works with
+Dymola as well.+This example tests the model that converts time for negative start time. +
+", +revisions=" ++This example tests the model that converts time for positive start time. +
+", +revisions=" ++This example tests getting the time span of a TMY3 weather data file. +
+", +revisions=" +.mos
+file name and updated the documentation
++This example tests getting time span of a TMY3 weather data file that +starts at a non-zero time. +
+", +revisions=" ++This function returns the start time (first time stamp) and end time +(last time stamp plus average increment) of the TMY3 weather data file. +
+", revisions=" +
This component reads TMY3 weather data (Wilcox and Marion, 2008) or user specified weather data.
+The Modelica built-in variable time determines what row
+of the weather file is read.
+The value of time is the number of seconds
+that have passed since January 1st at midnight (00:00) in the local time zone.
+The local time zone value, longitude and latitute are also read from the weather data,
+such that the solar position computations are consistent with the weather data.
+
The weather data format is the Typical Meteorological Year (TMY3) as obtained from the EnergyPlus web site at http://energyplus.net/weather. These data, which are in the EnergyPlus format, need to be converted as described -in the next paragraph. +below.
-Notes
+If weather data span a year, which is the default for TMY3 data, or multiple years,
+then this model can be used for simulations that span multiple years. The simulation
+start time needs to be set to the clock time of the respective start time. For example,
+to start at January 2 at 10am, set start time to t=(24+10)*3600 seconds.
+For this computation, the used date and time (here January 2, 10 am) must be expressed in the same time zone
+as the one that is used to define the TMY3 file. This is usually the local (winter) time zone.
+The parameter `timZon` represents the TMY3 file time zone, expressed in seconds compared to UTC.
+Moreover, weather data need not span a whole year, or it can span across New Year. +In this case, the simulation cannot exceed the time of the weather data file. Otherwise, +the simulation stops with an error. +
++As weather data have one entry at the start of the time interval, the end time of the weather +data file is computed as the last time entry plus the average time increment of the file. +For example, an hourly weather data file has 8760 entries, starting on January 1 at 0:00. +The last entry in the file will be for December 31 at 23:00. As the time increment is 1 hour, +the model assumes the weather file to end at December 31 at 23:00 plus 1 hour, e.g., at January 1 at 0:00. +
+ +
@@ -1521,9 +1559,15 @@ midnight at December 31 as the value for t=0. Rather, the
value from 1:00 AM on January 1 is duplicated and used for 0:00 on January 1.
To maintain a data record with 8760 hours, the weather data record from
midnight at December 31 is deleted.
-These changes in the weather data file are done in the Java program that converts
+These changes in the weather data file are done in the Java program
+AixLib/Resources/bin/ConvertWeatherData.jar that converts
EnergyPlus weather data file to Modelica weather data files, and which is described
-below.
+above.
+The length of the weather data is calculated as the
+end time stamp minus start time stamp plus average increment, where the
+average increment is equal to the end time stamp minus start time stamp divided
+by the number of rows minus 1.
+This only works correctly for weather files with equidistant time stamps.
@@ -1555,6 +1599,18 @@ Technical Report, NREL/TP-581-43156, revised May 2008. ", revisions="
time in the documentation.+This is a validation case for a data file that has a few incomplete days in December and goes into +a few days into January. The data does not start and does not end at midnight. +
+", revisions=" ++This is a validation case for a simulation extending with two months over one year, +but using data for only one year. +
++The test script plots the dry bulb temperature for the days 0-10 and 365-375 for comparison. +
+", revisions=" ++This is a validation case for a simulation extending over three years, +but using only two years of data with equidistant monthly values. +
+", revisions=" ++This is a validation case for a simulation extending over six years +starting at a negative start date, +but using only two years of data with equidistant monthly values. +
+", revisions=" ++This is a validation case for a simulation extending over six years +starting at a positive start date, +but using only two years of data with equidistant monthly values. +
+", revisions=" +homotopyType=NoHomotopy.
+See issue 1221.
+diff --git a/AixLib/Controls/HVACAgentBasedControl/Agents/Broker.mo b/AixLib/Controls/HVACAgentBasedControl/Agents/Broker.mo index 6bf47ec406..0dfc7634ec 100644 --- a/AixLib/Controls/HVACAgentBasedControl/Agents/Broker.mo +++ b/AixLib/Controls/HVACAgentBasedControl/Agents/Broker.mo @@ -388,7 +388,7 @@ algorithm heatSupplierTable[cheapest,2] := 1; heatingCalculationSum := heatingCalculationSum + heatSupplierTable[cheapest,6]; heatingPriceSum := heatingPriceSum + heatSupplierTable[cheapest,6]*heatSupplierTable[cheapest,5]; - heatSupplierTable[cheapest,7] := 9999999999; + heatSupplierTable[cheapest,7] := 9999999999.0; restHeat := heatingRequestSum - heatingCalculationSum; end while; @@ -469,7 +469,7 @@ algorithm heatSupplierTable[cheapest,2] := 1; //setting approve for supplier heatingCalculationSum := heatingCalculationSum + heatSupplierTable[cheapest,6]; //saving the amount of heat that is approved already heatingPriceSum := heatingPriceSum + heatSupplierTable[cheapest,6]*heatSupplierTable[cheapest,5]; //saving the the total price of the heat so far - heatSupplierTable[cheapest,7] := 9999999999; //setting the price high, so the next cheapest producer can be found in the next loop + heatSupplierTable[cheapest,7] := 9999999999.0; //setting the price high, so the next cheapest producer can be found in the next loop restHeat := heatingRequestSum - heatingCalculationSum; //calculating the amount of heat that still needs to be approved in the next loop end while; diff --git a/AixLib/Controls/HVACAgentBasedControl/Agents/RoomAgent.mo b/AixLib/Controls/HVACAgentBasedControl/Agents/RoomAgent.mo index d39d85cec9..f1e88e15fa 100644 --- a/AixLib/Controls/HVACAgentBasedControl/Agents/RoomAgent.mo +++ b/AixLib/Controls/HVACAgentBasedControl/Agents/RoomAgent.mo @@ -69,7 +69,7 @@ model RoomAgent Modelica.StateGraph.TransitionWithSignal rightMessage "confirmation" annotation (Placement(transformation(extent={{106,52},{126,32}}))); Modelica.StateGraph.Transition repeat1(enableTimer=true, waitTime= - 100000000000) + 100000000000.0) annotation (Placement(transformation(extent={{-8,-38},{-28,-18}}))); Modelica.StateGraph.Step composeNotUnderstood annotation (Placement(transformation(extent={{-56,-240},{-36,-220}}))); diff --git a/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/BookBuyerAgent.mo b/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/BookBuyerAgent.mo index 94554257b4..fd8a24d65a 100644 --- a/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/BookBuyerAgent.mo +++ b/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/BookBuyerAgent.mo @@ -4,7 +4,7 @@ model BookBuyerAgent parameter Real[:,1] knownSellers = [30001; 30002; 30003] "List of known BookSellerAgents (their adresses)"; Real[3,2] proposals(start=[9999,9999;9999,9999;9999,9999]); - parameter Real ISBN = 3551551677 + parameter Real ISBN = 3551551677.0 "ISBN number of the book that the agent tries to buy"; Integer counter( start=1); Integer counterProposals( start=1); diff --git a/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/BookSellerAgent.mo b/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/BookSellerAgent.mo index 98b6f3bcb9..4420ce2ffe 100644 --- a/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/BookSellerAgent.mo +++ b/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/BookSellerAgent.mo @@ -1,7 +1,7 @@ within AixLib.Controls.HVACAgentBasedControl.Examples.BookTrading; model BookSellerAgent extends BaseClasses.PartialAgent; - Real[:,2] bookList( start= [3551551677,30; 3551551679,20; 3551551616, 20]); + Real[:,2] bookList( start= [3551551677.0,30; 3551551679.0,20; 3551551616.0, 20]); Real searchedBook(start=0); Integer counter(start=1); Boolean bookInStock(start=false); diff --git a/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/BookTrading.mo b/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/BookTrading.mo index 3925c540c0..5f40dc58ef 100644 --- a/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/BookTrading.mo +++ b/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/BookTrading.mo @@ -5,26 +5,26 @@ model BookTrading BookBuyerAgent bookBuyerAgent(name=10001, ISBN=0618640150, sampleRate=1) annotation (Placement(transformation(extent={{-60,-40},{-40,-20}}))); - BookSellerAgent bookSellerAgent(name=30001, bookList(start=[3551555559,30; - 3551555577,20; 3551555588,20]), + BookSellerAgent bookSellerAgent(name=30001, bookList(start=[3551555559.0,30; + 3551555577.0,20; 3551555588.0,20]), sampleRate=1) annotation (Placement(transformation(extent={{-60,40},{-40,60}}))); - BookSellerAgent bookSellerAgent1(name=30002, bookList(start=[3551555589, - 30; 3551555559,40; 3551555556,20]), + BookSellerAgent bookSellerAgent1(name=30002, bookList(start=[3551555589.0, + 30; 3551555559.0,40; 3551555556.0,20]), sampleRate=1) annotation (Placement(transformation(extent={{-20,40},{0,60}}))); - BookSellerAgent bookSellerAgent2(name=30003, bookList(start=[3551555555, - 30; 3551555554,20; 3551555553,20; 3551555580,15]), + BookSellerAgent bookSellerAgent2(name=30003, bookList(start=[3551555555.0, + 30; 3551555554.0,20; 3551555553.0,20; 3551555580.0,15]), sampleRate=1) annotation (Placement(transformation(extent={{20,40},{40,60}}))); BookBuyerAgent bookBuyerAgent1( name=10002, - ISBN=3551555559, + ISBN=3551555559.0, sampleRate=1, sampleTime=40) annotation (Placement(transformation(extent={{-20,-40},{0,-20}}))); BookBuyerAgent bookBuyerAgent2( - ISBN=3551555559, + ISBN=3551555559.0, name=10003, sampleRate=1, sampleTime=55) diff --git a/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/NetworkCommunication1.mo b/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/NetworkCommunication1.mo index 8a20d8c35e..4d83fff581 100644 --- a/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/NetworkCommunication1.mo +++ b/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/NetworkCommunication1.mo @@ -2,8 +2,8 @@ within AixLib.Controls.HVACAgentBasedControl.Examples.BookTrading; model NetworkCommunication1 extends Modelica.Icons.Example; - BookSellerAgent bookSellerAgent1( bookList(start=[3551555589, - 30; 3551555559,40; 3551555556,20]), + BookSellerAgent bookSellerAgent1( bookList(start=[3551555589.0, + 30; 3551555559.0,40; 3551555556.0,20]), uDPSend_adapted(IPAddress="134.130.49.128"), name=10003, sampleRate=1) diff --git a/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/NetworkCommunication2.mo b/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/NetworkCommunication2.mo index 078f30c1a5..a0aa48fdaf 100644 --- a/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/NetworkCommunication2.mo +++ b/AixLib/Controls/HVACAgentBasedControl/Examples/BookTrading/NetworkCommunication2.mo @@ -4,7 +4,7 @@ model NetworkCommunication2 BookBuyerAgent bookBuyerAgent1( name=10002, - ISBN=3551555559, + ISBN=3551555559.0, sampleTime=10, uDPSend_adapted(IPAddress="134.130.49.160"), knownSellers=[10002], diff --git a/AixLib/Controls/HVACAgentBasedControl/Examples/BuildingHeatingSystems/BuildingHeating.mo b/AixLib/Controls/HVACAgentBasedControl/Examples/BuildingHeatingSystems/BuildingHeating.mo index a8b1c0e3b2..18190cd566 100644 --- a/AixLib/Controls/HVACAgentBasedControl/Examples/BuildingHeatingSystems/BuildingHeating.mo +++ b/AixLib/Controls/HVACAgentBasedControl/Examples/BuildingHeatingSystems/BuildingHeating.mo @@ -5,17 +5,14 @@ model BuildingHeating ThermalZones.ReducedOrder.ThermalZone.ThermalZone thermalZone(zoneParam= - DataBase.ThermalZones.OfficePassiveHouse.OPH_1_Office(), redeclare + DataBase.ThermalZones.OfficePassiveHouse.OPH_1_OfficeNoHeaterCooler(), + redeclare package Medium = Modelica.Media.Air.SimpleAir) annotation(Placement(transformation(extent={{-60,58}, {-34,84}}))); - Modelica.Blocks.Sources.Constant infiltrationRate(k=0) annotation(Placement(transformation(extent={{-138,40}, - {-124,54}}))); - Modelica.Blocks.Sources.Constant infiltrationTemperature(k = 288.15) annotation(Placement(transformation(extent={{-138,62}, - {-124,76}}))); ThermalZones.ReducedOrder.ThermalZone.ThermalZone thermalZone1(redeclare package Medium = Modelica.Media.Air.SimpleAir, zoneParam= - DataBase.ThermalZones.OfficePassiveHouse.OPH_1_Office()) annotation(Placement(transformation(extent={{22,58}, + DataBase.ThermalZones.OfficePassiveHouse.OPH_1_OfficeNoHeaterCooler()) annotation(Placement(transformation(extent={{22,58}, {48,84}}))); AixLib.Fluid.Movers.FlowControlled_m_flow fan(redeclare package Medium = Modelica.Media.Water.ConstantPropertyLiquidWater, m_flow_nominal=2) @@ -37,7 +34,7 @@ model BuildingHeating Q_flow_nominal=1) annotation (Placement(transformation(extent={{20,-90},{40,-70}}))); - AixLib.Fluid.Sources.FixedBoundary bou(nPorts=1, redeclare package Medium = + Fluid.Sources.Boundary_pT bou(nPorts=1, redeclare package Medium = Modelica.Media.Water.ConstantPropertyLiquidWater) annotation (Placement(transformation(extent={{142,-80},{122,-60}}))); Agents.RoomAgent roomAgent( startTime=60, @@ -316,17 +313,6 @@ equation connect(thermalZone1.intGainsRad, thermalZone1.intGainsConv) annotation (Line( points={{48,69.7},{52,69.7},{52,70},{54,70},{54,64.5},{48,64.5}}, color= {191,0,0})); - connect(thermalZone.ventTemp, infiltrationTemperature.y) annotation (Line( - points={{-61.69,65.93},{-91.845,65.93},{-91.845,69},{-123.3,69}}, color= - {0,0,127})); - connect(thermalZone1.ventTemp, infiltrationTemperature.y) annotation (Line( - points={{20.31,65.93},{-24,65.93},{-24,86},{-72,86},{-72,69},{-100,69}, - {-123.3,69}}, color={0,0,127})); - connect(infiltrationRate.y, thermalZone.ventRate) annotation (Line(points={{ - -123.3,47},{-86,47},{-86,56},{-56.1,56},{-56.1,60.08}}, color={0,0, - 127})); - connect(thermalZone1.ventRate, thermalZone.ventRate) annotation (Line(points= - {{25.9,60.08},{25.9,56},{-56.1,56},{-56.1,60.08}}, color={0,0,127})); connect(thermalZone1.intGains, internalGains.y) annotation (Line(points={{ 45.4,60.08},{45.4,48},{-62,48},{-84,48},{-84,38},{-114,38},{-114,23}, {-123.3,23}}, color={0,0,127})); diff --git a/AixLib/Controls/HVACAgentBasedControl/Examples/BuildingHeatingSystems/BuildingWithPV.mo b/AixLib/Controls/HVACAgentBasedControl/Examples/BuildingHeatingSystems/BuildingWithPV.mo index fad1e51cac..63fc0cb81a 100644 --- a/AixLib/Controls/HVACAgentBasedControl/Examples/BuildingHeatingSystems/BuildingWithPV.mo +++ b/AixLib/Controls/HVACAgentBasedControl/Examples/BuildingHeatingSystems/BuildingWithPV.mo @@ -117,7 +117,7 @@ model BuildingWithPV extent={{-10,-10},{10,10}}, rotation=180, origin={110,-96}))); - AixLib.Fluid.Sources.FixedBoundary bou(nPorts=1, redeclare package Medium = + Fluid.Sources.Boundary_pT bou(nPorts=1, redeclare package Medium = Medium) annotation (Placement(transformation(extent={{100,-140},{80,-120}}))); inner Modelica.Fluid.System system @@ -170,21 +170,17 @@ model BuildingWithPV ThermalZones.ReducedOrder.ThermalZone.ThermalZone thermalZone(redeclare package Medium = Modelica.Media.Air.SimpleAir, zoneParam= - DataBase.ThermalZones.OfficePassiveHouse.OPH_1_Office()) annotation(Placement(transformation(extent={{-18,70}, + DataBase.ThermalZones.OfficePassiveHouse.OPH_1_OfficeNoHeaterCooler()) annotation(Placement(transformation(extent={{-18,70}, {8,96}}))); ThermalZones.ReducedOrder.ThermalZone.ThermalZone thermalZone1(redeclare package Medium = Modelica.Media.Air.SimpleAir, zoneParam= - DataBase.ThermalZones.OfficePassiveHouse.OPH_1_Office()) annotation(Placement(transformation(extent={{64,70}, + DataBase.ThermalZones.OfficePassiveHouse.OPH_1_OfficeNoHeaterCooler()) annotation(Placement(transformation(extent={{64,70}, {90,96}}))); BoundaryConditions.WeatherData.Bus weaBus "Weather data bus" annotation (Placement(transformation(extent={{18,112},{52,144}}), iconTransformation(extent={{-70,-12},{-50,8}}))); - Modelica.Blocks.Sources.Constant infiltrationRate(k=0) annotation(Placement(transformation(extent={{-92,60}, - {-78,74}}))); - Modelica.Blocks.Sources.Constant infiltrationTemperature(k = 288.15) annotation(Placement(transformation(extent={{-92,82}, - {-78,96}}))); Modelica.Blocks.Sources.Constant internalGains[3](k={0,0,0}) annotation (Placement(transformation(extent={{-92,36},{-78,50}}))); Fluid.FixedResistances.HydraulicResistance hydraulicResistance1( @@ -332,14 +328,6 @@ equation 38,20},{50,20},{50,68},{96,68},{96,76.5},{90,76.5}}, color={191,0,0})); connect(vol1.heatPort, thermalZone1.intGainsRad) annotation (Line(points={{38, 20},{50,20},{50,68},{98,68},{98,81.7},{90,81.7}}, color={191,0,0})); - connect(thermalZone.ventTemp, infiltrationTemperature.y) annotation (Line( - points={{-19.69,77.93},{-47.845,77.93},{-47.845,89},{-77.3,89}}, color= - {0,0,127})); - connect(thermalZone1.ventTemp, infiltrationTemperature.y) annotation (Line( - points={{62.31,77.93},{20,77.93},{20,106},{-28,106},{-28,89},{-77.3,89}}, - color={0,0,127})); - connect(infiltrationRate.y, thermalZone.ventRate) annotation (Line(points={{ - -77.3,67},{-42,67},{-42,76},{-14.1,76},{-14.1,72.08}}, color={0,0,127})); connect(thermalZone.intGains, internalGains.y) annotation (Line(points={{5.4, 72.08},{5.4,68},{-40,68},{-40,58},{-70,58},{-70,43},{-77.3,43}}, color={0,0,127})); @@ -361,9 +349,6 @@ equation {-102,-4},{-102,36},{-116,36},{-116,30}}, color={0,0,127})); connect(to_degC2.u, roomAgent1.T) annotation (Line(points={{-120,-36},{-108, -36},{-108,-28},{80,-28},{80,40},{108,40},{108,32}}, color={0,0,127})); - connect(thermalZone1.ventRate, thermalZone.ventRate) annotation (Line(points= - {{67.9,72.08},{28,72.08},{28,64},{-42,64},{-42,68},{-42,68},{-42,76}, - {-14.1,76},{-14.1,72.08}}, color={0,0,127})); connect(fan.port_b, hydraulicResistance1.port_a) annotation (Line(points={{72, -86},{72,-86},{72,-38},{-40,-38}}, color={0,127,255})); connect(hydraulicResistance1.port_b, hea.port_a) annotation (Line(points={{ diff --git a/AixLib/Controls/HeatPump/AntiLegionella.mo b/AixLib/Controls/HeatPump/AntiLegionella.mo index 136c4ecc27..539bd65a95 100644 --- a/AixLib/Controls/HeatPump/AntiLegionella.mo +++ b/AixLib/Controls/HeatPump/AntiLegionella.mo @@ -6,8 +6,12 @@ model AntiLegionella "Control to avoid Legionella in the DHW" parameter Modelica.SIunits.Time minTimeAntLeg "Minimal duration of antilegionella control"; - - parameter Integer trigWeekDay "Day of the week at which control is triggered"; + parameter Boolean weekly=true + "Switch between a daily or weekly trigger approach" annotation(Dialog(descriptionLabel=true), choices(choice=true "Weekly", + choice=false "Daily", + radioButtons=true)); + parameter Integer trigWeekDay "Day of the week at which control is triggered" + annotation (Dialog(enable=weekly)); parameter Integer trigHour "Hour of the day at which control is triggered"; parameter AixLib.Utilities.Time.Types.ZeroTime zerTim "Enumeration for choosing how reference time (time = 0) should be defined"; @@ -150,8 +154,13 @@ Hour of Day: %trigHour", textString="%name")}), Diagram( coordinateSystem(preserveAspectRatio=false)), Documentation(info=" -
This control Block checks if the current condenser outlet Temperature(TCon) is below a minimal Temperature(TLegMin) at which Legionella die (Typically 60 °C).
-To asure that all Legionella in the DHW-System die, a certain amount of time is needed, in which TCon does not fall below TLegMin.
-As the HP has to kill all Legionella every few days/weeks, the control will only start if a given daytime is matched with current simulation daytime.
+This model represents the anti legionella control of a real heat pump. Based on a daily or weekly approach, the given supply temperature is raised above the minimal temperature required for the thermal desinfection (at least 60 °C) for a given duration minTimeAntLeg.
+", revisions=" +Model of a heat pump controller, setting a compressor signal and heat pump mode based on a given input temperarute. A heating curve is used to determine the supply temperature. This TSet is later converted to a signal nSet based on the acutal temperature in the system. Futhermore, a legionella protection for DHW-Simulation is implemented.
+Using the control bus, more complex control strategies can easily be adapted.
+Looking at the HeatPumpSystem, the task of the control block is also to control the pumps or fans and second heat generator if necessary.
+")); end HPControl; diff --git a/AixLib/Controls/HeatPump/ModularHeatPumps/BaseClasses/PartialModularController.mo b/AixLib/Controls/HeatPump/ModularHeatPumps/BaseClasses/PartialModularController.mo index 76e3b88ee5..3393b18ce8 100644 --- a/AixLib/Controls/HeatPump/ModularHeatPumps/BaseClasses/PartialModularController.mo +++ b/AixLib/Controls/HeatPump/ModularHeatPumps/BaseClasses/PartialModularController.mo @@ -206,7 +206,9 @@ partial model PartialModularController Documentation(revisions="
+This a controller block used for modular compressor models as presented in
+
+AixLib.Fluid.Movers.Compressors.ModularCompressors. The controller block
+consists of simple PID controllers for each compressor and no further control
+strategy is implemented yet. However, these PID controller are only initialised a
+nd activated if no external controller is provided (i.g. if
+useExt = false).
+
+If the controller block is implemented, appropriate values must be applied +for all parameters describing the PID controller. Furthermore, a sensible +control strategy must be applied to determine the set signals of the compressors +if more than one compressor is used. +
+")); +end ModularCompressorController; diff --git a/AixLib/Controls/HeatPump/ModularHeatPumps/package.mo b/AixLib/Controls/HeatPump/ModularHeatPumps/package.mo index 7c6547962c..17d12f5a02 100644 --- a/AixLib/Controls/HeatPump/ModularHeatPumps/package.mo +++ b/AixLib/Controls/HeatPump/ModularHeatPumps/package.mo @@ -7,7 +7,9 @@ package ModularHeatPumps "Package that contains controllers used for modular hea annotation (Documentation(revisions="This models takes the minimum of the two temperatures evaporator outlet and condenser inlet. If this minimal temperature falls below the given lower boundary, the hystereses will trigger an error and cause the device to switch off.
+Assuming that the outlet temperature of an evaporator is always lower than the inlet temperature(for the condenser vice versa).
+")); end AntiFreeze; diff --git a/AixLib/Controls/HeatPump/SecurityControls/BaseClasses/BoundaryMap.mo b/AixLib/Controls/HeatPump/SecurityControls/BaseClasses/BoundaryMap.mo index 380071ac11..f38fe72fcc 100644 --- a/AixLib/Controls/HeatPump/SecurityControls/BaseClasses/BoundaryMap.mo +++ b/AixLib/Controls/HeatPump/SecurityControls/BaseClasses/BoundaryMap.mo @@ -1,21 +1,10 @@ -within AixLib.Controls.HeatPump.SecurityControls.BaseClasses; +within AixLib.Controls.HeatPump.SecurityControls.BaseClasses; block BoundaryMap - "A function yielding true if input parameters are out of the charasteristic map" - parameter Boolean use_opeEnvFroRec=true - "Use a the operational envelope given in the datasheet" annotation(choices(checkBox=true)); - parameter DataBase.HeatPump.HeatPumpBaseDataDefinition dataTable "Data Table of HP" - annotation(choicesAllMatching = true, Dialog(enable= - use_opeEnvFroRec)); - parameter Real tableLow[:,2]=fill( - 0.0, - 0, - 2) "Table matrix (grid = first column; e.g., table=[0,2])" annotation(choicesAllMatchning=true, Dialog( - enable=not use_opeEnvFroRec)); - parameter Real tableUpp[:,2]=fill( - 0.0, - 0, - 2) "Table matrix (grid = first column; e.g., table=[0,2])" - annotation (Dialog(enable=not use_opeEnvFroRec)); + "Block which returns false if the input parameters are out of the given charasteristic map. +For the boundaries of the y-input value, a dynamic hysteresis is used to ensure a used device will stay off a certain time after shutdown." + extends AixLib.Controls.HeatPump.SecurityControls.BaseClasses.BoundaryMapIcon( + final iconMin=-70, final iconMax=70); + parameter Real dx = 1 "Delta value used for both upper and lower hysteresis. Used to avoid state-events when used as a security control."; Modelica.Blocks.Interfaces.BooleanOutput noErr "If an error occurs, this will be false" annotation (Placement(transformation(extent={{100,-10},{120,10}}))); @@ -25,110 +14,78 @@ block BoundaryMap annotation (Placement(transformation(extent={{-128,-74},{-100,-46}}))); Modelica.Blocks.Tables.CombiTable1Ds uppCombiTable1Ds(final table=tableUpp, smoothness= - Modelica.Blocks.Types.Smoothness.LinearSegments) - annotation (Placement(transformation(extent={{-52,50},{-32,70}}))); - Modelica.Blocks.Tables.CombiTable1Ds lowCombiTable1Ds(final smoothness=Modelica.Blocks.Types.Smoothness.LinearSegments, - table=tableLow) - annotation (Placement(transformation(extent={{-52,16},{-32,36}}))); + Modelica.Blocks.Types.Smoothness.LinearSegments, + final tableOnFile=false) + annotation (Placement(transformation(extent={{-48,68},{-28,88}}))); Modelica.Blocks.MathBoolean.Nor nor1( - nu=4) - annotation (Placement(transformation(extent={{44,-10},{64,10}}))); - Modelica.Blocks.Logical.Greater greaterLow - annotation (Placement(transformation(extent={{-6,16},{14,36}}))); - Modelica.Blocks.Logical.Less lessUpp - annotation (Placement(transformation(extent={{-6,50},{14,70}}))); + nu=3) + annotation (Placement(transformation(extent={{72,-10},{92,10}}))); + AixLib.Utilities.Logical.DynamicHysteresis lessUpp(final pre_y_start=false) + annotation (Placement(transformation(extent={{30,68},{50,88}}))); Modelica.Blocks.Logical.Less lessLef - annotation (Placement(transformation(extent={{-6,-40},{14,-20}}))); + annotation (Placement(transformation(extent={{26,-40},{46,-20}}))); Modelica.Blocks.Logical.Greater greaterRig - annotation (Placement(transformation(extent={{-6,-70},{14,-50}}))); + annotation (Placement(transformation(extent={{26,-70},{46,-50}}))); Modelica.Blocks.Sources.Constant conXMin(k=xMin) annotation (Placement(transformation(extent={{-50,-46},{-38,-34}}))); Modelica.Blocks.Sources.Constant conXMax(k=xMax) annotation (Placement(transformation(extent={{-50,-76},{-38,-64}}))); -protected - parameter Real tableLow_internal[:,2] = if use_opeEnvFroRec then dataTable.tableLowBou else tableLow; - parameter Real tableUpp_internal[:,2] = if use_opeEnvFroRec then dataTable.tableUppBou else tableUpp; - parameter Real xMax=min(tableLow_internal[end, 1], tableUpp_internal[end, 1]) - "Minimal value of lower and upper table data"; - parameter Real xMin=max(tableLow_internal[1, 1], tableUpp_internal[1, 1]) - "Maximal value of lower and upper table data"; - parameter Real yMax=max(tableUpp_internal[:, 2]) - "Minimal value of lower and upper table data"; - parameter Real yMin=min(tableLow_internal[:, 2]) - "Maximal value of lower and upper table data"; - final Real[size(scaledX, 1), 2] points=transpose({unScaledX,unScaledY}) annotation(Hide=false); - Real tableMerge[:,2] = [tableLow_internal[1,1],tableLow_internal[1,2];tableUpp_internal;[Modelica.Math.Vectors.reverse(tableLow_internal[:,1]),Modelica.Math.Vectors.reverse(tableLow_internal[:,2])]]; - input Real scaledX[:] = tableMerge[:,1]; - input Real scaledY[:] = tableMerge[:,2]; - Real unScaledX[size(scaledX, 1)](min=-100, max=100); - Real unScaledY[size(scaledX, 1)](min=-100, max=100); - Real iconMin = -70; - Real iconMax = 70; -initial equation - assert(tableLow_internal[end,1]==tableUpp_internal[end,1],"The boundary values have to be the same. For now the value to the safe operational side has been selected.", level = AssertionLevel.error); - assert(tableLow_internal[1,1]==tableUpp_internal[1,1],"The boundary values have to be the same. For now the value to the safe operational side has been selected.", level = AssertionLevel.error); + + Modelica.Blocks.Math.Add addUpp(final k2=-1) + annotation (Placement(transformation(extent={{-18,56},{-8,66}}))); + Modelica.Blocks.Sources.Constant constDx(final k=dx) + annotation (Placement(transformation(extent={{-50,46},{-36,60}}))); equation - scaledX = (unScaledX-fill(iconMin, size(scaledX,1)))*(xMax - xMin)/(iconMax-iconMin) + fill(xMin, size(scaledX, 1)); - scaledY = (unScaledY-fill(iconMin, size(scaledX,1)))*(yMax - yMin)/(iconMax-iconMin) + fill(yMin, size(scaledY, 1)); connect(x_in, uppCombiTable1Ds.u) - annotation (Line(points={{-114,60},{-54,60}}, color={0,0,127})); - connect(x_in, lowCombiTable1Ds.u) annotation (Line(points={{-114,60},{-72,60},{-72,26}, - {-54,26}}, color={0,0,127})); + annotation (Line(points={{-114,60},{-84,60},{-84,78},{-50,78}}, + color={0,0,127})); connect(nor1.y, noErr) - annotation (Line(points={{65.5,0},{110,0}}, color={255,0,255})); - connect(y_in, greaterLow.u2) annotation (Line(points={{-114,-60},{-20,-60},{-20,18}, - {-8,18}}, color={0,0,127})); - connect(lowCombiTable1Ds.y[1], greaterLow.u1) - annotation (Line(points={{-31,26},{-8,26}}, color={0,0,127})); - connect(y_in, lessUpp.u2) annotation (Line(points={{-114,-60},{-22,-60},{-22,52},{-8, - 52}}, color={0,0,127})); - connect(uppCombiTable1Ds.y[1], lessUpp.u1) - annotation (Line(points={{-31,60},{-8,60}}, color={0,0,127})); - connect(lessUpp.y, nor1.u[1]) annotation (Line(points={{15,60},{32,60},{32,5.25}, - {44,5.25}}, color={255,0,255})); - connect(greaterLow.y, nor1.u[2]) annotation (Line(points={{15,26},{32,26},{32, - 1.75},{44,1.75}}, color={255,0,255})); - connect(lessLef.y, nor1.u[3]) annotation (Line(points={{15,-30},{32,-30},{32, - -1.75},{44,-1.75}}, color={255,0,255})); - connect(greaterRig.y, nor1.u[4]) annotation (Line(points={{15,-60},{32,-60}, - {32,-5.25},{44,-5.25}}, color={255,0,255})); - connect(x_in, lessLef.u1) annotation (Line(points={{-114,60},{-72,60},{-72,-30},{-8, - -30}}, color={0,0,127})); - connect(x_in, greaterRig.u1) annotation (Line(points={{-114,60},{-72,60},{-72,-60}, - {-8,-60}}, color={0,0,127})); - connect(conXMax.y, greaterRig.u2) annotation (Line(points={{-37.4,-70},{-22,-70},{-22, - -68},{-8,-68}}, color={0,0,127})); - connect(conXMin.y, lessLef.u2) annotation (Line(points={{-37.4,-40},{-24,-40},{-24, - -38},{-8,-38}}, color={0,0,127})); - annotation (Icon(coordinateSystem(preserveAspectRatio=false, extent={{-100,-100}, - {100,100}}), graphics={ - Rectangle( - extent={{-100,100},{100,-100}}, - lineColor={28,108,200}, - fillColor={255,255,255}, - fillPattern=FillPattern.Solid), Line(points=DynamicSelect({{-76,-74},{-76,46},{-44,66}, - {70,66},{70,-74},{-76,-74}},points), color={238,46,47}, - thickness=0.5), - Text( - extent={{-100,100},{100,84}}, - lineColor={28,108,200}, - textString="%name"), - Polygon( - points={{-90,90},{-96,68},{-84,68},{-90,90}}, - lineColor={95,95,95}, - fillColor={95,95,95}, - fillPattern=FillPattern.Solid), - Polygon( - points={{98,-86},{76,-80},{76,-92},{98,-86}}, - lineColor={95,95,95}, - fillColor={95,95,95}, - fillPattern=FillPattern.Solid), - Line(points={{-90,68},{-90,-92}}, color={95,95,95}), - Line(points={{-98,-86},{80,-86}}, color={95,95,95})}), Diagram( + annotation (Line(points={{93.5,0},{110,0}}, color={255,0,255})); + connect(lessUpp.y, nor1.u[1]) annotation (Line(points={{51,78},{64,78},{64,4.66667}, + {72,4.66667}}, + color={255,0,255})); + connect(lessLef.y, nor1.u[2]) annotation (Line(points={{47,-30},{64,-30},{64,2.22045e-16}, + {72,2.22045e-16}}, color={255,0,255})); + connect(greaterRig.y, nor1.u[3]) annotation (Line(points={{47,-60},{64,-60},{64, + -4.66667},{72,-4.66667}}, + color={255,0,255})); + connect(x_in, lessLef.u1) annotation (Line(points={{-114,60},{-72,60},{-72,-30}, + {24,-30}}, + color={0,0,127})); + connect(x_in, greaterRig.u1) annotation (Line(points={{-114,60},{-72,60},{-72, + -60},{24,-60}}, + color={0,0,127})); + connect(conXMax.y, greaterRig.u2) annotation (Line(points={{-37.4,-70},{-22,-70}, + {-22,-68},{24,-68}}, + color={0,0,127})); + connect(conXMin.y, lessLef.u2) annotation (Line(points={{-37.4,-40},{-24,-40}, + {-24,-38},{24,-38}}, + color={0,0,127})); + connect(y_in, lessUpp.u) annotation (Line(points={{-114,-60},{-114,-60},{-94,-60}, + {-94,-60},{-90,-60},{-90,100},{16,100},{16,78},{16,78},{16,78},{28,78}, + {28,78}},color={0,0,127})); + connect(uppCombiTable1Ds.y[1], lessUpp.uHigh) annotation (Line(points={{-27,78}, + {6,78},{6,60},{43,60},{43,66}}, color={0,0,127})); + connect(lessUpp.uLow, addUpp.y) annotation (Line(points={{35,66},{32,66},{32,61}, + {-7.5,61}}, color={0,0,127})); + connect(uppCombiTable1Ds.y[1], addUpp.u1) annotation (Line(points={{-27,78},{-24, + 78},{-24,64},{-19,64}}, color={0,0,127})); + connect(addUpp.u2, constDx.y) annotation (Line(points={{-19,58},{-26,58},{-26, + 53},{-35.3,53}}, color={0,0,127})); + annotation (Diagram( coordinateSystem(preserveAspectRatio=false, extent={{-100,-100},{100,100}})), Documentation(info=" -Given an input of the x and y-Axis, the block returns true if the given point is outside of the given envelope.
The maximal and minmal y-value depend on the x-Value and are defined by the upper and lower boundaries in form of 1Ds-Tables. The maximal and minimal x-values are obtained trough the table and are constant.
-")); +Given an input of the x and y-Axis, the block returns true if the given point is outside of the given envelope.
+The maximal and minmal y-value depend on the x-Value and are defined by the upper and lower boundaries in form of 1Ds-Tables. The maximal and minimal x-values are obtained trough the table and are constant.
+", revisions=" +Icon block used for the icon of the dynamic icon of the model BoundaryMap. Extending this model will display the used operational envelope in the top-layer of the used models.
+")); +end BoundaryMapIcon; diff --git a/AixLib/Controls/HeatPump/SecurityControls/BaseClasses/PartialSecurityControl.mo b/AixLib/Controls/HeatPump/SecurityControls/BaseClasses/PartialSecurityControl.mo index cbe4a34368..df4ee9c27b 100644 --- a/AixLib/Controls/HeatPump/SecurityControls/BaseClasses/PartialSecurityControl.mo +++ b/AixLib/Controls/HeatPump/SecurityControls/BaseClasses/PartialSecurityControl.mo @@ -1,4 +1,4 @@ -within AixLib.Controls.HeatPump.SecurityControls.BaseClasses; +within AixLib.Controls.HeatPump.SecurityControls.BaseClasses; partial block PartialSecurityControl "Base Block" Modelica.Blocks.Interfaces.RealInput nSet "Set value relative speed of compressor. Analog from 0 to 1" @@ -12,11 +12,13 @@ partial block PartialSecurityControl "Base Block" Modelica.Blocks.Sources.Constant conZer(final k=0) "If an error occurs, the compressor speed is set to zero" annotation (Placement(transformation(extent={{58,-24},{70,-12}}))); - Controls.Interfaces.HeatPumpControlBus sigBusHP + Interfaces.ThermalMachineControlBus sigBusHP + "Bus-connector for the heat pump" annotation (Placement(transformation(extent={{-152,-84},{-118,-54}}))); Modelica.Blocks.Interfaces.BooleanOutput modeOut + "Heat pump mode, =true: heating, =false: chilling" annotation (Placement(transformation(extent={{120,-30},{140,-10}}))); - Modelica.Blocks.Interfaces.BooleanInput modeSet "Set value of HP mode" + Modelica.Blocks.Interfaces.BooleanInput modeSet "Set value of heat pump mode" annotation (Placement(transformation(extent={{-152,-36},{-120,-4}}))); Modelica.Blocks.MathInteger.TriggeredAdd disErr( y_start=0, @@ -27,7 +29,9 @@ partial block PartialSecurityControl "Base Block" extent={{-8,-8},{8,8}}, rotation=270, origin={0,-80}))); - Modelica.Blocks.Interfaces.IntegerOutput ERR annotation (Placement( + Modelica.Blocks.Interfaces.IntegerOutput ERR + "Integer for displaying number off Errors during simulation" + annotation (Placement( transformation( extent={{-10,-10},{10,10}}, rotation=270, @@ -42,9 +46,8 @@ partial block PartialSecurityControl "Base Block" equation connect(conZer.y,swiErr. u3) annotation (Line(points={{70.6,-18},{78,-18}, {78,-8},{84,-8}}, color={0,0,127})); - connect(swiErr.y, nOut) - annotation (Line(points={{107,0},{118,0},{118,20},{130,20}}, - color={0,0,127})); + connect(swiErr.y, nOut) annotation (Line(points={{107,0},{118,0},{118,20},{ + 130,20}}, color={0,0,127})); connect(disErr.y, ERR) annotation (Line(points={{-1.77636e-15,-89.6},{ -1.77636e-15,-100},{0,-100},{0,-110}}, color={255,127,0})); connect(not1.y, disErr.trigger) annotation (Line(points={{-21,-74.5},{-21, @@ -97,5 +100,16 @@ equation fillColor={255,255,255}, fillPattern=FillPattern.None)}), Diagram(coordinateSystem( - preserveAspectRatio=false, extent={{-120,-100},{120,100}}))); + preserveAspectRatio=false, extent={{-120,-100},{120,100}})), + Documentation(revisions=" +Partial block for a security control. Based on the signals in the sigBusHP either the input signals are equal to the output signals or, if an error occurs, set to 0.
+The Output ERR informs about the number of errors in the specific security block.
+")); end PartialSecurityControl; diff --git a/AixLib/Controls/HeatPump/SecurityControls/BaseClasses/RunPerHouBoundary.mo b/AixLib/Controls/HeatPump/SecurityControls/BaseClasses/RunPerHouBoundary.mo index 4656651aa1..8342a0c0de 100644 --- a/AixLib/Controls/HeatPump/SecurityControls/BaseClasses/RunPerHouBoundary.mo +++ b/AixLib/Controls/HeatPump/SecurityControls/BaseClasses/RunPerHouBoundary.mo @@ -1,73 +1,76 @@ -within AixLib.Controls.HeatPump.SecurityControls.BaseClasses; -block RunPerHouBoundary "Checks if a maximal run per hour value is in boundary" - extends Modelica.Blocks.Interfaces.BooleanSISO; - parameter Real maxRunPer_h "Number of maximal on/off cycles per hour"; - parameter Modelica.SIunits.Time delayTime(displayUnit="h") = 3600 - "Delay time of output with respect to input signal"; - Modelica.Blocks.Logical.Less runCouLesMax - "Checks if the count of total runs is lower than the maximal value" - annotation (Placement(transformation(extent={{74,-8},{90,8}}))); - Modelica.Blocks.Sources.Constant inputRunPerHou(final k=maxRunPer_h) - "Maximal number of on/off cycles in one hour" - annotation (Placement(transformation(extent={{44,-22},{60,-6}}))); - Modelica.Blocks.MathInteger.TriggeredAdd triggeredAdd - annotation (Placement(transformation(extent={{-36,6},{-24,-6}}))); - Modelica.Blocks.Sources.IntegerConstant intConPluOne(final k=1) - "Value for counting" - annotation (Placement(transformation(extent={{-62,-6},{-50,6}}))); - Modelica.Blocks.Math.IntegerToReal intToReal - annotation (Placement(transformation(extent={{-14,-6},{-2,6}}))); - Modelica.Blocks.Math.Add sub(k2=-1) - annotation (Placement(transformation(extent={{44,0},{60,16}}))); - Modelica.Blocks.Nonlinear.FixedDelay fixedDelay(final delayTime(displayUnit= - "h") = delayTime) - annotation (Placement(transformation(extent={{14,-14},{24,-4}}))); -equation - connect(inputRunPerHou.y, runCouLesMax.u2) annotation (Line(points={{60.8,-14}, - {66,-14},{66,-6.4},{72.4,-6.4}}, color={0,0,127})); - connect(intConPluOne.y, triggeredAdd.u) - annotation (Line(points={{-49.4,0},{-38.4,0}}, color={255,127,0})); - connect(intToReal.u, triggeredAdd.y) - annotation (Line(points={{-15.2,0},{-22.8,0}}, color={255,127,0})); - connect(intToReal.y, sub.u1) annotation (Line(points={{-1.4,0},{0.15,0},{0.15, - 12.8},{42.4,12.8}}, color={0,0,127})); - connect(sub.y, runCouLesMax.u1) annotation (Line(points={{60.8,8},{66,8},{66, - 0},{72.4,0}}, color={0,0,127})); - connect(intToReal.y, fixedDelay.u) - annotation (Line(points={{-1.4,0},{0,0},{0,-9},{13,-9}}, color={0,0,127})); - connect(fixedDelay.y, sub.u2) annotation (Line(points={{24.5,-9},{34,-9},{34,3.2}, - {42.4,3.2}}, color={0,0,127})); - connect(runCouLesMax.y, y) - annotation (Line(points={{90.8,0},{110,0},{110,0}}, color={255,0,255})); - connect(u, triggeredAdd.trigger) annotation (Line(points={{-120,0},{-82,0},{ - -82,24},{-33.6,24},{-33.6,7.2}}, color={255,0,255})); - annotation (Icon(coordinateSystem(preserveAspectRatio=false), graphics={ - Rectangle( - extent={{-100,-100},{100,100}}, - lineColor={0,0,127}, - fillColor={255,255,255}, - fillPattern=FillPattern.Solid), - Ellipse(extent={{-80,80},{80,-80}}, lineColor={160,160,164}), - Line(points={{0,80},{0,60}}, color={160,160,164}), - Line(points={{80,0},{60,0}}, color={160,160,164}), - Line(points={{0,-80},{0,-60}}, color={160,160,164}), - Line(points={{-80,0},{-60,0}}, color={160,160,164}), - Line(points={{37,70},{26,50}}, color={160,160,164}), - Line(points={{70,38},{49,26}}, color={160,160,164}), - Line(points={{71,-37},{52,-27}}, color={160,160,164}), - Line(points={{39,-70},{29,-51}}, color={160,160,164}), - Line(points={{-39,-70},{-29,-52}}, color={160,160,164}), - Line(points={{-71,-37},{-50,-26}}, color={160,160,164}), - Line(points={{-71,37},{-54,28}}, color={160,160,164}), - Line(points={{-38,70},{-28,51}}, color={160,160,164}), - Line( - points={{0,0},{-50,50}}, - thickness=0.5), - Line( - points={{0,0},{40,0}}, - thickness=0.5)}), Diagram( - coordinateSystem(preserveAspectRatio=false)), - Documentation(info=" -Everytime the boolean input signal has a rising edge, a counter is triggered and adds 1 to the total sum. This represents an on-turning of a certain device. With a delay this number is being substracted again, as this block counts the number of rising edges in a given amount of time(e.g. 1 hour). If this value is higher than a given maximal value, the output turns to false.
-")); -end RunPerHouBoundary; +within AixLib.Controls.HeatPump.SecurityControls.BaseClasses; +block RunPerHouBoundary "Checks if a maximal run per hour value is in boundary" + extends Modelica.Blocks.Interfaces.BooleanSISO; + parameter Integer maxRunPer_h "Number of maximal on/off cycles per hour"; + parameter Modelica.SIunits.Time delayTime(displayUnit="h") = 3600 + "Delay time of output with respect to input signal"; + Modelica.Blocks.Logical.LessThreshold + runCouLesMax(threshold=maxRunPer_h) + "Checks if the count of total runs is lower than the maximal value" + annotation (Placement(transformation(extent={{74,-8},{90,8}}))); + Modelica.Blocks.MathInteger.TriggeredAdd triggeredAdd + annotation (Placement(transformation(extent={{-36,6},{-24,-6}}))); + Modelica.Blocks.Sources.IntegerConstant intConPluOne(final k=1) + "Value for counting" + annotation (Placement(transformation(extent={{-62,-6},{-50,6}}))); + Modelica.Blocks.Math.IntegerToReal intToReal + annotation (Placement(transformation(extent={{-14,-6},{-2,6}}))); + Modelica.Blocks.Math.Add sub(k2=-1) + annotation (Placement(transformation(extent={{44,0},{60,16}}))); + Modelica.Blocks.Nonlinear.FixedDelay fixedDelay(final delayTime(displayUnit= + "h") = delayTime) + annotation (Placement(transformation(extent={{14,-14},{24,-4}}))); +equation + connect(intConPluOne.y, triggeredAdd.u) + annotation (Line(points={{-49.4,0},{-38.4,0}}, color={255,127,0})); + connect(intToReal.u, triggeredAdd.y) + annotation (Line(points={{-15.2,0},{-22.8,0}}, color={255,127,0})); + connect(intToReal.y, sub.u1) annotation (Line(points={{-1.4,0},{0.15,0},{0.15, + 12.8},{42.4,12.8}}, color={0,0,127})); + connect(intToReal.y, fixedDelay.u) + annotation (Line(points={{-1.4,0},{0,0},{0,-9},{13,-9}}, color={0,0,127})); + connect(fixedDelay.y, sub.u2) annotation (Line(points={{24.5,-9},{34,-9},{34,3.2}, + {42.4,3.2}}, color={0,0,127})); + connect(runCouLesMax.y, y) + annotation (Line(points={{90.8,0},{110,0},{110,0}}, color={255,0,255})); + connect(u, triggeredAdd.trigger) annotation (Line(points={{-120,0},{-82,0},{ + -82,24},{-33.6,24},{-33.6,7.2}}, color={255,0,255})); + connect(sub.y, runCouLesMax.u) annotation (Line(points={{60.8,8},{68,8},{68,0}, + {72.4,0}}, color={0,0,127})); + annotation (Icon(coordinateSystem(preserveAspectRatio=false), graphics={ + Rectangle( + extent={{-100,-100},{100,100}}, + lineColor={0,0,127}, + fillColor={255,255,255}, + fillPattern=FillPattern.Solid), + Ellipse(extent={{-80,80},{80,-80}}, lineColor={160,160,164}), + Line(points={{0,80},{0,60}}, color={160,160,164}), + Line(points={{80,0},{60,0}}, color={160,160,164}), + Line(points={{0,-80},{0,-60}}, color={160,160,164}), + Line(points={{-80,0},{-60,0}}, color={160,160,164}), + Line(points={{37,70},{26,50}}, color={160,160,164}), + Line(points={{70,38},{49,26}}, color={160,160,164}), + Line(points={{71,-37},{52,-27}}, color={160,160,164}), + Line(points={{39,-70},{29,-51}}, color={160,160,164}), + Line(points={{-39,-70},{-29,-52}}, color={160,160,164}), + Line(points={{-71,-37},{-50,-26}}, color={160,160,164}), + Line(points={{-71,37},{-54,28}}, color={160,160,164}), + Line(points={{-38,70},{-28,51}}, color={160,160,164}), + Line( + points={{0,0},{-50,50}}, + thickness=0.5), + Line( + points={{0,0},{40,0}}, + thickness=0.5)}), Diagram( + coordinateSystem(preserveAspectRatio=false)), + Documentation(info=" +Everytime the boolean input signal has a rising edge, a counter is triggered and adds 1 to the total sum. This represents an on-turning of a certain device. With a delay this number is being substracted again, as this block counts the number of rising edges in a given amount of time(e.g. 1 hour). If this value is higher than a given maximal value, the output turns to false.
+", revisions=" +When the input is true, a timer thats counting seconds until it is false again. As long as the counted time is smaller than a given minimal time, the block yields false.
This block is used to validate a mimimal run- or loctime of a device.
+When the input is true, a timer thats counting seconds until it is false again. As long as the counted time is smaller than a given minimal time, the block yields false.
+This block is used to check the mimimal run- or loctime of a device.
+", revisions=" +This package contains base classes that are used to construct the models in SecurityControls
+")); end BaseClasses; diff --git a/AixLib/Controls/HeatPump/SecurityControls/BaseClasses/package.order b/AixLib/Controls/HeatPump/SecurityControls/BaseClasses/package.order index eb1f6f087d..24db92909f 100644 --- a/AixLib/Controls/HeatPump/SecurityControls/BaseClasses/package.order +++ b/AixLib/Controls/HeatPump/SecurityControls/BaseClasses/package.order @@ -1,4 +1,5 @@ BoundaryMap +BoundaryMapIcon PartialSecurityControl RunPerHouBoundary TimeControl diff --git a/AixLib/Controls/HeatPump/SecurityControls/DefrostControl.mo b/AixLib/Controls/HeatPump/SecurityControls/DefrostControl.mo index 6dfdcbf2cd..29a27895b2 100644 --- a/AixLib/Controls/HeatPump/SecurityControls/DefrostControl.mo +++ b/AixLib/Controls/HeatPump/SecurityControls/DefrostControl.mo @@ -1,19 +1,23 @@ -within AixLib.Controls.HeatPump.SecurityControls; +within AixLib.Controls.HeatPump.SecurityControls; block DefrostControl "Control block to ensure no frost limits heat flow at the evaporator" parameter Real minIceFac "Minimal value above which no defrost is necessary"; parameter Boolean use_chiller=true - "True if ice is defrost operates by changing mode to cooling. False to use an electrical heater" annotation(choices(checkBox=true)); + "True if defrost operates by changing mode to cooling. False to use an electrical heater" annotation(choices(checkBox=true)); parameter Modelica.SIunits.Power calcPel_deFro "Calculate how much eletrical energy is used to melt ice" annotation (Dialog(enable=not use_chiller)); - Modelica.Blocks.Logical.GreaterEqualThreshold iceFacGreMinHea(final threshold= - minIceFac) if not use_chiller + parameter Real deltaIceFac = 0.1 "Bandwitdth for hystereses. If the icing factor is based on the duration of defrost, this value is necessary to avoid state-events."; + Modelica.Blocks.Logical.Hysteresis iceFacGreMinHea( + final uLow=minIceFac, + final uHigh=minIceFac + deltaIceFac, + final pre_y_start=true) if + not use_chiller "Check if icing factor is greater than a boundary" annotation (Placement( transformation( extent={{-8,-9},{8,9}}, rotation=0, - origin={-31,-76}))); + origin={-31,-78}))); Modelica.Blocks.Interfaces.RealOutput Pel_deFro if not use_chiller "Relative speed of compressor. From 0 to 1" annotation (Placement( transformation( @@ -47,7 +51,7 @@ block DefrostControl annotation (Placement(transformation(extent={{100,10},{120,30}}))); Modelica.Blocks.Interfaces.BooleanOutput modeOut annotation (Placement(transformation(extent={{100,-30},{120,-10}}))); - Controls.Interfaces.HeatPumpControlBus sigBusHP + Interfaces.ThermalMachineControlBus sigBusHP annotation (Placement(transformation(extent={{-120,-76},{-92,-48}}))); Utilities.Logical.SmoothSwitch swiPel if not use_chiller "If defrost is on, output will be positive" annotation (Placement( @@ -60,24 +64,25 @@ block DefrostControl annotation (Placement(transformation(extent={{-6,-6},{6,6}}, rotation=90, origin={-12,52}))); - Modelica.Blocks.Logical.GreaterEqualThreshold iceFacGreMinChi(final threshold= - minIceFac) if use_chiller + Modelica.Blocks.Logical.Hysteresis iceFacGreMinChi( + final uLow=minIceFac, + final uHigh=minIceFac + deltaIceFac, + final pre_y_start=true) if + use_chiller "Check if icing factor is greater than a boundary" annotation (Placement( transformation( extent={{-8,-9},{8,9}}, rotation=0, - origin={-31,-50}))); + origin={-31,-46}))); Modelica.Blocks.Logical.LogicalSwitch logicalSwitch "If a chiller is used to defrost, mode will be false" annotation (Placement(transformation(extent={{58,-42},{78,-22}}))); - Modelica.Blocks.Sources.BooleanConstant conFalseNotUseChi(final k=false) if + Modelica.Blocks.Sources.BooleanConstant conFalseNotUseChi(final k=true) if not - use_chiller - "If ice is melted with an additional heater, HP can continue running" + use_chiller "Just to omit warnings" annotation (Placement(transformation(extent={{28,-48},{38,-38}}))); - Modelica.Blocks.Sources.BooleanConstant conTrueUseChi(final k=true) if - use_chiller - "If ice is melted with an additional heater, HP can continue running" + Modelica.Blocks.Sources.BooleanConstant conTrueUseChi(final k=false) if + use_chiller "Set mode to false to simulate the defrost cycle" annotation (Placement(transformation(extent={{28,-66},{38,-56}}))); equation connect(conOne.y, swiErr.u3) annotation (Line(points={{36.6,-6},{38,-6},{38,4}, @@ -87,7 +92,7 @@ equation connect(nSet, swiErr.u1) annotation (Line(points={{-116,20},{56,20}}, color={0,0,127})); connect(sigBusHP.iceFac, iceFacGreMinHea.u) annotation (Line( - points={{-105.93,-61.93},{-68,-61.93},{-68,-76},{-40.6,-76}}, + points={{-105.93,-61.93},{-68,-61.93},{-68,-78},{-40.6,-78}}, color={255,204,51}, thickness=0.5, pattern=LinePattern.Dash), Text( @@ -102,7 +107,7 @@ equation color={255,0,255}, pattern=LinePattern.Dash)); connect(iceFacGreMinHea.y, swiPel.u2) annotation (Line( - points={{-22.2,-76},{-10,-76},{-10,34},{-6.66134e-16,34},{-6.66134e-16,72}}, + points={{-22.2,-78},{-10,-78},{-10,34},{-6.66134e-16,34},{-6.66134e-16,72}}, color={255,0,255}, pattern=LinePattern.Dash)); @@ -115,7 +120,7 @@ equation color={0,0,127}, pattern=LinePattern.Dash)); connect(sigBusHP.iceFac, iceFacGreMinChi.u) annotation (Line( - points={{-105.93,-61.93},{-68,-61.93},{-68,-50},{-40.6,-50}}, + points={{-105.93,-61.93},{-68,-61.93},{-68,-46},{-40.6,-46}}, color={255,204,51}, thickness=0.5, pattern=LinePattern.Dash), Text( @@ -124,7 +129,7 @@ equation extent={{-6,3},{-6,3}}, horizontalAlignment=TextAlignment.Right)); connect(iceFacGreMinChi.y, swiErr.u2) annotation (Line( - points={{-22.2,-50},{8,-50},{8,12},{56,12}}, + points={{-22.2,-46},{8,-46},{8,12},{56,12}}, color={255,0,255}, pattern=LinePattern.Dash)); connect(logicalSwitch.y, modeOut) annotation (Line(points={{79,-32},{84,-32}, @@ -140,7 +145,7 @@ equation color={255,0,255}, pattern=LinePattern.Dash)); connect(iceFacGreMinChi.y, logicalSwitch.u2) annotation (Line( - points={{-22.2,-50},{8,-50},{8,-32},{56,-32}}, + points={{-22.2,-46},{8,-46},{8,-32},{56,-32}}, color={255,0,255}, pattern=LinePattern.Dash)); connect(conTrueUseChi.y, logicalSwitch.u3) annotation (Line( @@ -238,5 +243,12 @@ equation Documentation(info="Basic model for a defrost control. The icing factor is calculated in the heat pump based on functions or other models.
If a given lower boundary is surpassed, the mode of the heat pump will be set to false(eq. Chilling) and the compressor speed is set to 1 to make the defrost process as fast as possible.
+", revisions=" +Checks if the nSet value is legal by checking if the device can either be turned on or off, depending on which state it was in.
E.g. If it is turned on, and the new nSet value is 0, it will only turn off if current runtime is longer than the minimal runtime. Else it will keep the current rotating speed.
+", revisions=" +Model for checking if the given condenser return temperature and evaporator inlet temperature are in the given boundaries. If not, the heat pump will switch off.
+")); end OperationalEnvelope; diff --git a/AixLib/Controls/HeatPump/SecurityControls/SecurityControl.mo b/AixLib/Controls/HeatPump/SecurityControls/SecurityControl.mo index 562626a45c..a154c660d9 100644 --- a/AixLib/Controls/HeatPump/SecurityControls/SecurityControl.mo +++ b/AixLib/Controls/HeatPump/SecurityControls/SecurityControl.mo @@ -1,4 +1,4 @@ -within AixLib.Controls.HeatPump.SecurityControls; +within AixLib.Controls.HeatPump.SecurityControls; block SecurityControl "Block including all security levels" extends BaseClasses.PartialSecurityControl; @@ -15,7 +15,7 @@ block SecurityControl "Block including all security levels" parameter Boolean use_runPerHou=true "False if maximal runs per hour HP are not considered" annotation (Dialog(group="OnOffControl"), choices(checkBox=true)); - parameter Real maxRunPerHou "Maximal number of on/off cycles in one hour" + parameter Integer maxRunPerHou "Maximal number of on/off cycles in one hour" annotation (Dialog(group="OnOffControl",enable=use_runPerHou)); parameter Boolean use_opeEnv=true "False to allow HP to run out of operational envelope" @@ -23,11 +23,10 @@ block SecurityControl "Block including all security levels" parameter Boolean use_opeEnvFroRec=true "Use a the operational envelope given in the datasheet" annotation (Dialog(group="Operational Envelope", enable=use_opeEnv),choices(checkBox=true)); - parameter DataBase.HeatPump.HeatPumpBaseDataDefinition dataTable - "Data Table of HP" annotation (Dialog(group="Operational Envelope", enable= - use_opeEnv and use_opeEnvFroRec),choicesAllMatching=true); - parameter Real tableLow[:,2] "Lower boundary of envelope" - annotation (Dialog(group="Operational Envelope", enable=use_opeEnv and not use_opeEnvFroRec)); + parameter DataBase.ThermalMachines.HeatPump.HeatPumpBaseDataDefinition + dataTable "Data Table of HP" annotation (Dialog(group= + "Operational Envelope", enable=use_opeEnv and use_opeEnvFroRec), + choicesAllMatching=true); parameter Real tableUpp[:,2] "Upper boundary of envelope" annotation (Dialog(group="Operational Envelope", enable=use_opeEnv and not use_opeEnvFroRec)); parameter Boolean pre_n_start=true "Start value of pre(n) at initial time" @@ -37,13 +36,14 @@ block SecurityControl "Block including all security levels" annotation (Dialog(group="Defrost"), choices(checkBox=true)); parameter Real minIceFac "Minimal value above which no defrost is necessary" annotation (Dialog(group="Defrost", enable=use_deFro)); + parameter Real deltaIceFac = 0.1 "Bandwitdth for hystereses. If the icing factor is based on the duration of defrost, this value is necessary to avoid state-events." annotation (Dialog(group="Defrost", enable=use_deFro)); parameter Boolean use_chiller=true - "True if ice is defrost operates by changing mode to cooling. False to use an electrical heater" + "True if defrost operates by changing mode to cooling. False to use an electrical heater" annotation (Dialog(group="Defrost", enable=use_deFro), choices(checkBox=true)); parameter Modelica.SIunits.Power calcPel_deFro "Calculate how much eletrical energy is used to melt ice" - annotation (Dialog(enable=use_chiller and use_deFro, group="Defrost")); + annotation (Dialog(enable=not use_chiller and use_deFro, group="Defrost")); parameter Boolean use_antFre=true "True if anti freeze control is part of security control" annotation (Dialog(group="Anti Freeze Control"), choices(checkBox=true)); @@ -53,7 +53,6 @@ block SecurityControl "Block including all security levels" OperationalEnvelope operationalEnvelope( final use_opeEnv=use_opeEnv, - final tableLow=tableLow, final tableUpp=tableUpp, final use_opeEnvFroRec=use_opeEnvFroRec, final dataTable=dataTable) @@ -61,11 +60,11 @@ block SecurityControl "Block including all security levels" OnOffControl onOffController( final minRunTime=minRunTime, final minLocTime=minLocTime, - use_minRunTime=use_minRunTime, - use_minLocTime=use_minLocTime, - use_runPerHou=use_runPerHou, - maxRunPerHou=maxRunPerHou, - pre_n_start=pre_n_start) + final use_minRunTime=use_minRunTime, + final use_minLocTime=use_minLocTime, + final use_runPerHou=use_runPerHou, + final maxRunPerHou=maxRunPerHou, + final pre_n_start=pre_n_start) annotation (Placement(transformation(extent={{-62,-18},{-26,18}}))); DefrostControl defrostControl( @@ -198,4 +197,22 @@ equation {100,-50},{100,-110}}, color={255,127,0})); connect(operationalEnvelope.ERR, ERR_opeEnv) annotation (Line(points={{2,-11.1}, {2,-50},{60,-50},{60,-110}}, color={255,127,0})); + annotation (Documentation(revisions=" +Aggregation of the four main security measurements of a heat pump. The order is based on the relevance to the real system. Only the AntiFreeze-Control is put last because of the relevance for the simulation. If the medium temperature falls below the critical value, the simulation will fail.
+All used functions are optional. See the used models for more info on each security function:
+ +The security function for the anti legionella control is placed inside the model HPControl
+")); end SecurityControl; diff --git a/AixLib/Controls/HeatPump/SecurityControls/package.mo b/AixLib/Controls/HeatPump/SecurityControls/package.mo index 58c5b42773..ed0f7dfa65 100644 --- a/AixLib/Controls/HeatPump/SecurityControls/package.mo +++ b/AixLib/Controls/HeatPump/SecurityControls/package.mo @@ -1,7 +1,17 @@ -within AixLib.Controls.HeatPump; +within AixLib.Controls.HeatPump; package SecurityControls +annotation (Documentation(revisions=" +Package with models for simulation of heat pump relevant security control strategies.
+")); end SecurityControls; diff --git a/AixLib/Controls/HydraulicModules/CtrAdmix.mo b/AixLib/Controls/HydraulicModules/CtrAdmix.mo deleted file mode 100644 index bd4deab3c4..0000000000 --- a/AixLib/Controls/HydraulicModules/CtrAdmix.mo +++ /dev/null @@ -1,97 +0,0 @@ -within AixLib.Controls.HydraulicModules; -block CtrAdmix "controller for mixed cooling circuit " - //Boolean choice; - - parameter Modelica.SIunits.Temperature TflowSet = 289.15 "Flow temperature set point of consumer"; - parameter Real k(min=0, unit="1") = 0.025 "Gain of controller"; - parameter Modelica.SIunits.Time Ti(min=Modelica.Constants.small)=130 - "Time constant of Integrator block"; - parameter Modelica.SIunits.Time Td(min=0)= 4 "Time constant of Derivative block"; - parameter Modelica.SIunits.Temperature T_amb = 293.15 "ambient temperature"; - parameter Real rpm_pump(min=0, unit="1") = 2000 "Rpm of the Pump"; - - Modelica.Blocks.Continuous.LimPID PID( - yMax=1, - yMin=0, - xi_start=0.5, - controllerType=Modelica.Blocks.Types.SimpleController.PID, - k=k, - Ti=Ti, - Td=Td) annotation (Placement(transformation(extent={{-16,-60},{4,-40}}))); - Fluid.HydraulicModules.BaseClasses.HydraulicBus hydraulicBus - annotation (Placement(transformation(extent={{66,-38},{120,16}}))); - Modelica.Blocks.Sources.RealExpression realExpression(y=TflowSet) - annotation (Placement(transformation(extent={{-84,-60},{-64,-40}}))); - Modelica.Blocks.Math.Gain gain(k=-1) - annotation (Placement(transformation(extent={{-46,-56},{-34,-44}}))); - Modelica.Blocks.Math.Gain gain1(k=-1) annotation (Placement(transformation( - extent={{-5,-5},{5,5}}, - rotation=90, - origin={-5,-77}))); - Modelica.Blocks.Sources.RealExpression realExpression1( - y=rpm_pump) - annotation (Placement(transformation(extent={{-10,-10},{10,10}}))); - Modelica.Blocks.Sources.Constant const(k=T_amb) - annotation (Placement(transformation(extent={{22,44},{42,64}}))); -equation - connect(PID.y, hydraulicBus.valSet) annotation (Line(points={{5,-50},{48,-50}, - {48,-10.865},{93.135,-10.865}}, - color={0,0,127}), Text( - string="%second", - index=1, - extent={{6,3},{6,3}})); - connect(gain1.y, PID.u_m) annotation (Line(points={{-5,-71.5},{-5,-66.75},{-6, - -66.75},{-6,-62}}, color={0,0,127})); - connect(realExpression.y, gain.u) - annotation (Line(points={{-63,-50},{-47.2,-50}}, color={0,0,127})); - connect(gain.y, PID.u_s) - annotation (Line(points={{-33.4,-50},{-18,-50}}, color={0,0,127})); - connect(realExpression1.y, hydraulicBus.pumpBus.rpm_Input) annotation (Line( - points={{11,0},{52,0},{52,-10.865},{93.135,-10.865}}, color={0,0,127}), - Text( - string="%second", - index=1, - extent={{6,3},{6,3}})); - connect(const.y, hydraulicBus.T_amb) annotation (Line(points={{43,54},{93,54}, - {93,-11}}, color={0,0,127}), Text( - string="%second", - index=1, - extent={{6,3},{6,3}})); - connect(gain1.u, hydraulicBus.TFwrd_out) annotation (Line(points={{-5,-83}, - {93.135,-83},{93.135,-10.865}}, color={0,0,127}), Text( - string="%second", - index=1, - extent={{6,3},{6,3}})); - annotation (Icon(coordinateSystem(preserveAspectRatio=false), graphics={ - Text( - extent={{-90,20},{56,-20}}, - lineColor={95,95,95}, - lineThickness=0.5, - fillColor={215,215,215}, - fillPattern=FillPattern.Solid, - textString="HCMI"), - Rectangle( - extent={{-90,80},{70,-80}}, - lineColor={95,95,95}, - lineThickness=0.5, - fillColor={215,215,215}, - fillPattern=FillPattern.Solid),Line( - points={{10,80},{70,0},{30,-80}}, - color={95,95,95}, - thickness=0.5), - Text( - extent={{-90,20},{56,-20}}, - lineColor={95,95,95}, - lineThickness=0.5, - fillColor={215,215,215}, - fillPattern=FillPattern.Solid, - textString="Admix")}),Diagram(coordinateSystem(preserveAspectRatio= - false)), - Documentation(revisions=" -Simple controller for admix circuit.
-")); -end CtrAdmix; diff --git a/AixLib/Controls/HydraulicModules/CtrUnmixed.mo b/AixLib/Controls/HydraulicModules/CtrUnmixed.mo deleted file mode 100644 index 0aa2f3ce74..0000000000 --- a/AixLib/Controls/HydraulicModules/CtrUnmixed.mo +++ /dev/null @@ -1,60 +0,0 @@ -within AixLib.Controls.HydraulicModules; -block CtrUnmixed "controller for unmixed circuit" - import Zugabe; - //Boolean choice; - - parameter Real rpm_pump(min=0, unit="1") = 2000 "Rpm of the Pump"; - parameter Modelica.SIunits.Temperature T_amb = 293.15 "ambient temperature"; - - Modelica.Blocks.Sources.RealExpression realExpression(y=rpm_pump) - annotation (Placement(transformation(extent={{-10,-10},{10,10}}))); - Fluid.HydraulicModules.BaseClasses.HydraulicBus hydraulicBus annotation (Placement( - transformation(extent={{78,-24},{124,24}}), iconTransformation(extent={{ - 78,-24},{124,24}}))); - Modelica.Blocks.Sources.Constant const(k=T_amb) - annotation (Placement(transformation(extent={{22,44},{42,64}}))); -equation - connect(realExpression.y, hydraulicBus.pumpBus.rpm_Input) annotation (Line( - points={{11,0},{101.115,0},{101.115,0.12}}, color={0,0,127}), Text( - string="%second", - index=1, - extent={{6,3},{6,3}})); - connect(const.y, hydraulicBus.T_amb) annotation (Line(points={{43,54},{101,54}, - {101,0}}, color={0,0,127}), Text( - string="%second", - index=1, - extent={{6,3},{6,3}})); - annotation (Icon(coordinateSystem(preserveAspectRatio=false), graphics={ - Text( - extent={{-90,20},{56,-20}}, - lineColor={95,95,95}, - lineThickness=0.5, - fillColor={215,215,215}, - fillPattern=FillPattern.Solid, - textString="HCMI"), - Rectangle( - extent={{-90,80},{80,-80}}, - lineColor={95,95,95}, - lineThickness=0.5, - fillColor={215,215,215}, - fillPattern=FillPattern.Solid),Line( - points={{10,80},{78,0},{30,-80}}, - color={95,95,95}, - thickness=0.5), - Text( - extent={{-90,20},{56,-20}}, - lineColor={95,95,95}, - lineThickness=0.5, - fillColor={215,215,215}, - fillPattern=FillPattern.Solid, - textString="Unmixed")}), - Diagram(coordinateSystem(preserveAspectRatio= - false)), - Documentation(revisions=" -Simple controller for unmixed circuit.
-")); -end CtrUnmixed; diff --git a/AixLib/Controls/HydraulicModules/package.order b/AixLib/Controls/HydraulicModules/package.order deleted file mode 100644 index 8a852a1243..0000000000 --- a/AixLib/Controls/HydraulicModules/package.order +++ /dev/null @@ -1,2 +0,0 @@ -CtrAdmix -CtrUnmixed diff --git a/AixLib/Controls/Interfaces/CHPControlBus.mo b/AixLib/Controls/Interfaces/CHPControlBus.mo new file mode 100644 index 0000000000..ebb21286d0 --- /dev/null +++ b/AixLib/Controls/Interfaces/CHPControlBus.mo @@ -0,0 +1,171 @@ +within AixLib.Controls.Interfaces; +expandable connector CHPControlBus + "Connector used for modular CHP models" + extends Modelica.Icons.SignalBus; + + type RotationSpeed=Real(final unit="1/s", min=0); + type SpecificEmission=Real(final unit="g/(kW.h)", min=0.0001); + + // Definition of variables describing combustion engines + // + RotationSpeed meaRotEng "Measured engines' speed" + annotation(Dialog(tab="Operation point", + group="Combustion Engine")); + Modelica.SIunits.Power meaFuePowEng + "Needed fuel power at combustion engines'" + annotation(Dialog(tab="Operation point", + group="Combustion Engine")); + Modelica.SIunits.Power meaThePowEng + "Thermal power output at combustion engines'" + annotation(Dialog(tab="Operation point", + group="Combustion Engine")); + Modelica.SIunits.Torque meaTorEng + "Engine torque at combustion engines'" + annotation(Dialog(tab="Operation point", + group="Combustion Engine")); + Modelica.SIunits.MassFlowRate meaMasFloFueEng + "Fuel consumption at engines' inlets" + annotation(Dialog(tab="Operation point", + group="Combustion Engine")); + Modelica.SIunits.MassFlowRate meaMasFloAirEng + "Air consumption at engines' inlets" + annotation(Dialog(tab="Operation point", + group="Combustion Engine")); + Modelica.SIunits.MassFlowRate meaMasFloCO2Eng + "CO2 mass flow rates at engines' exhaust outlets" + annotation(Dialog(tab="Operation point", + group="Combustion Engine")); + Modelica.SIunits.SpecificHeatCapacity calMeaCpExh + "Calculated mean specific heat capacity of the exhaust gas flow" + annotation (Dialog(tab="Operation point", group="Combustion Engine")); + Modelica.SIunits.Temperature meaTemInEng + "Measured coolant temperature at engines' inlets" + annotation(Dialog(tab="Operation point", + group="Combustion Engine")); + Modelica.SIunits.Temperature meaTemOutEng + "Measured coolant temperature at engines' outlets" + annotation(Dialog(tab="Operation point", + group="Combustion Engine")); + + // Definition of variables describing generators + // + Modelica.SIunits.Power meaElPowGen + "Electric power at generators' clamps" + annotation(Dialog(tab="Operation point", + group="Generator")); + Modelica.SIunits.Current meaCurGen + "Electric current at generators' clamps" + annotation(Dialog(tab="Operation point", + group="Generator")); + Modelica.SIunits.Torque meaTorGen + "Generators' torque" + annotation(Dialog(tab="Operation point", + group="Generator")); + Real calEtaGen(unit="1") + "Calculated generators' efficiency" + annotation(Dialog(tab="Operation point", + group="Generator")); + Modelica.SIunits.Power calThePowGen + "Thermal loss power" + annotation(Dialog(tab="Operation point", + group="Generator")); + + // Definition of variables describing exhaust heat exchangers + // + Modelica.SIunits.Temperature meaTemExhHexOut + "Measured exhaust gas temperatures at exhaust heat exchangers' outlets" + annotation (Dialog(tab="Operation point", + group="Exhaust Heat Exchanger")); + Modelica.SIunits.Temperature meaTemExhHexIn + "Measured exhaust gas temperatures at exhaust heat exchangers' inlets" + annotation (Dialog(tab="Operation point", + group="Exhaust Heat Exchanger")); + Modelica.SIunits.Power meaThePowOutHex + "Measured thermal power of exhaust heat exchangers'" + annotation (Dialog(tab="Operation point", + group="Exhaust Heat Exchanger")); + Modelica.SIunits.MassFlowRate meaMasFloConHex + "Measured condensed water mass flow rates at exhaust heat exchangers' outlets" + annotation (Dialog(tab="Operation point", + group="Exhaust Heat Exchanger")); + Modelica.SIunits.Temperature meaTemInHex + "Measured coolant temperature at exhaust heat exchangers' inlets" + annotation(Dialog(tab="Operation point", + group="Exhaust Heat Exchanger")); + Modelica.SIunits.Temperature meaTemOutHex + "Measured coolant temperature at exhaust heat exchangers' outlets" + annotation(Dialog(tab="Operation point", + group="Exhaust Heat Exchanger")); + + // Definition of variables describing CHP units in general + // + Modelica.SIunits.Power meaThePowChp + "Measured thermal power at CHP units' outlets" + annotation(Dialog(tab="Operation point", + group="CHP Unit")); + Modelica.SIunits.Temperature meaTemRetCooChp + "Measured temperatures at CHP units' coolant return flow" + annotation(Dialog(tab="Operation point", + group="CHP Unit")); + Modelica.SIunits.Temperature meaTemSupCooChp + "Measured temperatures at CHP units' coolant supply flow" + annotation(Dialog(tab="Operation point", + group="CHP Unit")); + Modelica.SIunits.VolumeFlowRate preVolFloHea + "Prescribed coolant volume flow rate inside primary cooling circuit" + annotation (Dialog(tab="Operation point", + group="CHP Unit")); + SpecificEmission calEmiCO2Chp + "Calculated specific CO2 emissions of CHP units" + annotation(Dialog(tab="Operation point", + group="CHP Unit")); + SpecificEmission calFueChp + "Calculated specific fuel consumption of CHP units" + annotation(Dialog(tab="Operation point", + group="CHP Unit")); + Real calEtaTheChp(unit="1") + "Calculated thermal efficiency of CHP units" + annotation(Dialog(tab="Operation point", + group="CHP Unit")); + Real calEtaElChp(unit="1") + "Calculated electric efficiency of CHP units" + annotation(Dialog(tab="Operation point", + group="CHP Unit")); + Real calFueUtiChp(unit="1") + "Calculated fuel utilization rate of CHP units" + annotation(Dialog(tab="Operation point", + group="CHP Unit")); + Real modFac(unit="1") + "Modulation factor of CHP units" + annotation (Dialog(tab="Operation point", group="CHP Unit")); + Boolean isOn + "Indicator if Chp unit is in operation or not (true=On, false=Off)" + annotation (Dialog(tab="Operation point", group="CHP Unit")); + Boolean isOnPump + "Indicator if Chp pump inside the primary cooling circuit is in operation or not (true=On, false=Off)" + annotation (Dialog(tab="Operation point", group="CHP Unit")); + Boolean volFlowControlHeating + "= false to use a prescibed heating circuit mass flow, = true to use a prescribed volume flow" + annotation (Dialog(tab="Operation point", group="CHP Unit")); + + annotation (Documentation(revisions="+ This connector is a base connector used forcombined heat and power + units and contains typical variables that may be measured in the + modular Chp models. +
++ Typically, a Chp unit consists of three main components: Combustion + engine, a exhaust heat exchanger and a generator. The controlled + parameters are listed below. +
+")); + +end CHPControlBus; diff --git a/AixLib/Controls/Interfaces/HeatPumpControlBus.mo b/AixLib/Controls/Interfaces/ThermalMachineControlBus.mo similarity index 88% rename from AixLib/Controls/Interfaces/HeatPumpControlBus.mo rename to AixLib/Controls/Interfaces/ThermalMachineControlBus.mo index f0dc76433d..f80a7e8c7b 100644 --- a/AixLib/Controls/Interfaces/HeatPumpControlBus.mo +++ b/AixLib/Controls/Interfaces/ThermalMachineControlBus.mo @@ -1,13 +1,13 @@ within AixLib.Controls.Interfaces; -expandable connector HeatPumpControlBus -"Standard data bus with heat pump information" +expandable connector ThermalMachineControlBus + "Standard data bus with heat pump or chiller information" extends Modelica.Icons.SignalBus; Modelica.SIunits.Conversions.NonSIunits.AngularVelocity_rpm N "rotational speed compressor" annotation (HideResult=false); Boolean onOff "true: on" annotation (HideResult=false); -Boolean mode "true: heat pump, false: chiller"; +Boolean mode "true: main operation mode, false: reversible operation mode"; Modelica.SIunits.ThermodynamicTemperature T_flow_ev "temperature of flow into evaporator"; @@ -44,4 +44,4 @@ annotation (First implementation.
")); -end HeatPumpControlBus; +end ThermalMachineControlBus; diff --git a/AixLib/Controls/Interfaces/package.order b/AixLib/Controls/Interfaces/package.order index f692bfb274..89f6d144b0 100644 --- a/AixLib/Controls/Interfaces/package.order +++ b/AixLib/Controls/Interfaces/package.order @@ -1,7 +1,8 @@ BoilerControlBus +CHPControlBus FVUControlBus -HeatPumpControlBus ModularCompressorControlBus ModularExpansionValveControlBus ModularHeatPumpControlBus ModularSensorControlBus +ThermalMachineControlBus diff --git a/AixLib/Controls/SetPoints/Examples/HotWaterTemperatureReset.mo b/AixLib/Controls/SetPoints/Examples/SupplyReturnTemperatureReset.mo similarity index 79% rename from AixLib/Controls/SetPoints/Examples/HotWaterTemperatureReset.mo rename to AixLib/Controls/SetPoints/Examples/SupplyReturnTemperatureReset.mo index 64dfa5de6f..a98e86e317 100644 --- a/AixLib/Controls/SetPoints/Examples/HotWaterTemperatureReset.mo +++ b/AixLib/Controls/SetPoints/Examples/SupplyReturnTemperatureReset.mo @@ -1,24 +1,27 @@ within AixLib.Controls.SetPoints.Examples; -model HotWaterTemperatureReset "Test model for the heating curve" +model SupplyReturnTemperatureReset "Test model for the heating curve" extends Modelica.Icons.Example; - AixLib.Controls.SetPoints.HotWaterTemperatureReset heaCur( + AixLib.Controls.SetPoints.SupplyReturnTemperatureReset heaCur( m=1, TSup_nominal=333.15, TRet_nominal=313.15, TOut_nominal=263.15) + "Temperature reset" annotation (Placement(transformation(extent={{-40,40},{-20,60}}))); Modelica.Blocks.Sources.Ramp TOut( height=40, duration=1, offset=263.15) + "Signal for outside air temperature" annotation (Placement(transformation(extent={{-80,40},{-60,60}}))); - AixLib.Controls.SetPoints.HotWaterTemperatureReset heaCur1( + AixLib.Controls.SetPoints.SupplyReturnTemperatureReset heaCur1( m=1, use_TRoo_in=true, TSup_nominal=333.15, TRet_nominal=313.15, TOut_nominal=263.15, dTOutHeaBal=15) + "Temperature reset that uses room temperature as input" annotation (Placement(transformation(extent={{-40,0},{-20,20}}))); Modelica.Blocks.Sources.Step TRoo( offset=273.15 + 20, @@ -26,6 +29,7 @@ model HotWaterTemperatureReset "Test model for the heating curve" height=-5) "Night set back from 20 to 15 deg C" annotation (Placement(transformation(extent={{-80,-40},{-60,-20}}))); Modelica.Blocks.Sources.Constant TOut2(k=273.15 - 10) + "Constant signal for outdoor air temperature" annotation (Placement(transformation(extent={{-80,0},{-60,20}}))); equation connect(TOut.y, heaCur.TOut) annotation (Line( @@ -38,7 +42,7 @@ equation points={{-59,-30},{-50,-30},{-50,4},{-41.9,4}}, color={0,0,127})); annotation (experiment(Tolerance=1e-6, StopTime=1.0), -__Dymola_Commands(file="modelica://AixLib/Resources/Scripts/Dymola/Controls/SetPoints/Examples/HotWaterTemperatureReset.mos" +__Dymola_Commands(file="modelica://AixLib/Resources/Scripts/Dymola/Controls/SetPoints/Examples/SupplyReturnTemperatureReset.mos" "Simulate and plot"), Documentation(info="@@ -56,7 +60,7 @@ an outside temperature of The figure below shows the computed supply and return water temperatures.
-![\"Supply](\"modelica://AixLib/Resources/Images/Controls/SetPoints/Examples/HotWaterTemperatureReset.png\")
+![\"Supply](\"modelica://AixLib/Resources/Images/Controls/SetPoints/Examples/SupplyReturnTemperatureReset.png\")
Calculate the set temperature with a linear approach. The room temperature serves as the set point(e.g. 20°C).
+")); end HeatingCurveFunction; diff --git a/AixLib/Controls/SetPoints/Functions/PartialBaseFct.mo b/AixLib/Controls/SetPoints/Functions/PartialBaseFct.mo index dfd4fd9b64..cce6d004c3 100644 --- a/AixLib/Controls/SetPoints/Functions/PartialBaseFct.mo +++ b/AixLib/Controls/SetPoints/Functions/PartialBaseFct.mo @@ -1,10 +1,21 @@ -within AixLib.Controls.SetPoints.Functions; +within AixLib.Controls.SetPoints.Functions; partial function PartialBaseFct "Base function of a heating curve" extends Modelica.Icons.Function; - input Modelica.SIunits.ThermodynamicTemperature T_oda; - input Modelica.SIunits.ThermodynamicTemperature TRoom; - input Boolean isDay; - output Modelica.SIunits.ThermodynamicTemperature TSet; + input Modelica.SIunits.ThermodynamicTemperature T_oda "Outdoor air temperature"; + input Modelica.SIunits.ThermodynamicTemperature TRoom "Room temperature"; + input Boolean isDay "Boolean to evaulate if it is day or night"; + output Modelica.SIunits.ThermodynamicTemperature TSet "Set temperature for the heat generator"; + annotation (Documentation(revisions=" +Calculate a set temperature based on the outdoor air and room temperature. The boolean isDay enables day/night dependent set temperatures.
+Used in model HeatingCurve.
+")); end PartialBaseFct; diff --git a/AixLib/Controls/SetPoints/Functions/package.mo b/AixLib/Controls/SetPoints/Functions/package.mo index 9b01015759..29850374e6 100644 --- a/AixLib/Controls/SetPoints/Functions/package.mo +++ b/AixLib/Controls/SetPoints/Functions/package.mo @@ -1,4 +1,14 @@ -within AixLib.Controls.SetPoints; +within AixLib.Controls.SetPoints; package Functions "Package with functions for pacakge AixLib.Controls.HeatPump" +annotation (Documentation(revisions=" +Package with functions for the model HeatingCurve.
+")); end Functions; diff --git a/AixLib/Controls/SetPoints/HeatingCurve.mo b/AixLib/Controls/SetPoints/HeatingCurve.mo index 61ad1c5935..e63e906a86 100644 --- a/AixLib/Controls/SetPoints/HeatingCurve.mo +++ b/AixLib/Controls/SetPoints/HeatingCurve.mo @@ -1,4 +1,4 @@ -within AixLib.Controls.SetPoints; +within AixLib.Controls.SetPoints; model HeatingCurve "Model of a heating curve" //General parameter Boolean use_tableData=true "Choose between tables or function to calculate TSet" annotation ( @@ -55,7 +55,8 @@ protected Modelica.Blocks.Sources.Constant dec(k=declination) "Declination constant for connectors"; AixLib.Utilities.Time.CalendarTime calTime(zerTim = zerTim) "Calendar-time to get current hour"; Modelica.Blocks.Interfaces.RealInput TRoom_internal "Actual room temperature to calculate with"; - Modelica.Blocks.Math.UnitConversions.To_degC to_degC "Convert Kelvin to degC"; + Modelica.Blocks.Math.UnitConversions.To_degC to_degC if use_tableData + "Convert Kelvin to degC"; AixLib.Utilities.Logical.SmoothSwitch dayNightSwitch if use_tableData "Switch between day and night mode"; Modelica.Blocks.Interfaces.BooleanOutput isDay "Boolean to evaluate whether it is daytime or nighttime"; @@ -73,9 +74,9 @@ equation isDay = false; end if; //Convert Kelvin to degC for tables and function - connect(T_oda, to_degC.u); //Connect all models if tables are used, else use the function to calculate the internal set temperature if use_tableData then + connect(T_oda, to_degC.u); connect(dec.y, tableDay.u2); connect(dec.y, tableNight.u2); connect(to_degC.y, tableDay.u1); @@ -86,7 +87,7 @@ equation connect(dayNightSwitch.y, TSet_internal); else TSet_internal = HeatingCurveFunction( - to_degC.y, + T_oda, TRoom_internal, isDay); end if; @@ -155,5 +156,19 @@ equation fillColor={255,255,255}, fillPattern=FillPattern.Solid, textString="- TOda", - visible = use_tableData)})); + visible = use_tableData)}), Documentation(revisions=" +Model of a heating curve. Either based on table input data or with a function, the set temperature for the heating system is calculated.
+This model is capable of:
+This block computes the set point temperatures for the -supply and return temperature of a heating system. +supply and return water temperature. The set point for the room air temperature can either be specified by a parameter, or it can be an input to the model. The latter allows to use this model with systems that have night set back.
-The parameter dTOutHeaBal can be used to shift the heating curve
+If used to reset the temperature in a heating system,
+the parameter dTOutHeaBal can be used to shift the heating curve
to take into account that heat gains from solar, equipment and people
make up for some of the transmission losses.
For example, in energy efficient houses, the heating may not be switched on if
@@ -85,6 +86,13 @@ shift the heating curve.
", revisions="
HotWaterTemperatureReset to
+SupplyReturnTemperatureReset.Evaluate=true.
+ Data base record for CHP power units. The nominal / rated operation + point most likely corresponds to the given full load performance. +
++ These quantities must be known for reliable simulation + (by value, variable relation etc.): +
++ - Heat and Power: Q_MaxHea, etaCHP(Hi) +
++ - Engine Geometry: hStr, dCyl, z, + i +
++ - Generator specification: p or n0, n_nominal, U_1, + P_elNominal, f_1 +
++ - Lambda or xO2Exh: Required for calculation of the + engine combustion, heat flow and the exhaust gas composition (Lambda + = 0.21 / (0.21 - xO2Exh)) +
++ - nEngNominal +
++ - dInn (typical values around 0.005m, important for heat + transfer from engine to cooling) +
++ These are the default values or relations in case that there is no + information available: +
++ - nEngMax: Engine speed at full load + (=nEngNominal) +
++ - etaGen: Generator efficiency (default=0.92) +
++ - I_elNominal (=P_elNominal/(sqrt(3)*U_1*cosPhi)) +
++ - P_mecNominal (=P_elNominal/etaGen) +
++ - P_FueNominal (=(P_elNominal+Q_MaxHea)/etaCHP) +
++ - VEng (default=0.25*hStr*Modelica.Constants.pi*dCyl^2*z) +
++ - mEng (default=70389*VEng+17.913, for first appraisal of the + heat capacities of engine housing, should be calibrated) +
++ - eps (typical values around 12 (SI) and 21 (DI)) +
++ - T_ExhPowOut (default=373.15K) +
++ - gearRatio (default=1) +
++ - cosPhi (default=0.8) +
++ - useGenHeat (default=false) +
++ - Exhaust and Coolant: dExh(default=0.06m), + dCoo(default=0.04m), dp_Coo(default=0.15bar), + m_flowCooNominal(default=0.00003*Q_MaxHea-0.2043) +
++ - Engine material: lambda, rhoEngWall, c + (default is cast iron(most common)) +
+")); +end CHPEngDataBaseRecord; diff --git a/AixLib/DataBase/CHP/ModularCHPEngineData/CHP_ECPowerXRGI15.mo b/AixLib/DataBase/CHP/ModularCHPEngineData/CHP_ECPowerXRGI15.mo new file mode 100644 index 0000000000..f855fbf932 --- /dev/null +++ b/AixLib/DataBase/CHP/ModularCHPEngineData/CHP_ECPowerXRGI15.mo @@ -0,0 +1,33 @@ +within AixLib.DataBase.CHP.ModularCHPEngineData; +record CHP_ECPowerXRGI15 + extends AixLib.DataBase.CHP.ModularCHPEngineData.CHPEngDataBaseRecord( + SIEngine=true, + EngMat = "CastIron", + VEng=0.002237, + hStr=0.086, + dCyl=0.091, + dExh=0.06, + dCoo=0.0418, + dInn=0.005, + nEngNominal=25.583, + xO2Exh=0.05, + z=4, + eps=10.5, + mEng=122, + m_floCooNominal=0.55, + p_meNominal=540000, + dp_Coo=15000, + etaCHP=0.92, + P_elNominal=15000, + P_mecNominal=16200, + P_FueNominal=49000, + Q_MaxHea=30400, + T_ExhPowUniOut=383.15, + i=0.5, + p=2, + n_nominal=1530/60, + f_1=50, + U_1=400, + useHeat=true); + +end CHP_ECPowerXRGI15; diff --git a/AixLib/DataBase/CHP/ModularCHPEngineData/CHP_ECPowerXRGI9.mo b/AixLib/DataBase/CHP/ModularCHPEngineData/CHP_ECPowerXRGI9.mo new file mode 100644 index 0000000000..0a225f4723 --- /dev/null +++ b/AixLib/DataBase/CHP/ModularCHPEngineData/CHP_ECPowerXRGI9.mo @@ -0,0 +1,29 @@ +within AixLib.DataBase.CHP.ModularCHPEngineData; +record CHP_ECPowerXRGI9 + extends AixLib.DataBase.CHP.ModularCHPEngineData.CHPEngDataBaseRecord( + SIEngine=true, + VEng=0.000952, + hStr=0.078, + dCyl=0.072, + dExh=0.06, + dCoo=0.0272, + dInn=0.005, + nEngNominal=40.833, + xO2Exh=0.05, + z=3, + eps=12, + mEng=52, + m_floCooNominal=0.4167, + etaCHP=0.925, + etaGen=0.908, + P_elNominal=9000, + Q_MaxHea=20000, + T_ExhPowUniOut=373.15, + i=0.5, + p=2, + n_nominal=1550/60, + f_1=50, + U_1=400, + useHeat=true); + +end CHP_ECPowerXRGI9; diff --git a/AixLib/DataBase/CHP/ModularCHPEngineData/CHP_Kirsch_L4_12.mo b/AixLib/DataBase/CHP/ModularCHPEngineData/CHP_Kirsch_L4_12.mo new file mode 100644 index 0000000000..bfa06b245a --- /dev/null +++ b/AixLib/DataBase/CHP/ModularCHPEngineData/CHP_Kirsch_L4_12.mo @@ -0,0 +1,28 @@ +within AixLib.DataBase.CHP.ModularCHPEngineData; +record CHP_Kirsch_L4_12 + extends CHPEngDataBaseRecord( + SIEngine=true, + VEng=0.000479, + hStr=0.066, + dCyl=0.068, + dInn=0.005, + nEngNominal=31.667, + mEng=32.66, + Lambda=1.01, + z=2, + eps=8.2, + etaCHP=0.95, + etaGen=0.823, + P_elNominal=4000, + Q_MaxHea=12000, + i=0.5, + n0=1500/60, + n_nominal=1531/60, + cosPhi=0.66, + f_1=50, + U_1=400, + gearRatio=1900/1531); + + + +end CHP_Kirsch_L4_12; diff --git a/AixLib/DataBase/CHP/ModularCHPEngineData/CHP_SenerTecDachsG5_5.mo b/AixLib/DataBase/CHP/ModularCHPEngineData/CHP_SenerTecDachsG5_5.mo new file mode 100644 index 0000000000..c8450ca3af --- /dev/null +++ b/AixLib/DataBase/CHP/ModularCHPEngineData/CHP_SenerTecDachsG5_5.mo @@ -0,0 +1,27 @@ +within AixLib.DataBase.CHP.ModularCHPEngineData; +record CHP_SenerTecDachsG5_5 + extends AixLib.DataBase.CHP.ModularCHPEngineData.CHPEngDataBaseRecord( + SIEngine=true, + VEng=0.000578, + hStr=0.0897, + dCyl=0.0906, + dExh=0.129, + dCoo=0.04, + dInn=0.005, + nEngNominal=40.833, + Lambda=1.57, + z=1, + eps=13.2, + etaCHP=0.88, + etaGen=0.91, + P_elNominal=5500, + Q_MaxHea=12500, + T_ExhPowUniOut=423.15, + i=0.5, + n0=3000/60, + n_nominal=3045/60, + f_1=50, + U_1=400, + gearRatio=2450/3045); + +end CHP_SenerTecDachsG5_5; diff --git a/AixLib/DataBase/CHP/ModularCHPEngineData/CHP_Vitoblock200_EM5_13.mo b/AixLib/DataBase/CHP/ModularCHPEngineData/CHP_Vitoblock200_EM5_13.mo new file mode 100644 index 0000000000..24dcaa110c --- /dev/null +++ b/AixLib/DataBase/CHP/ModularCHPEngineData/CHP_Vitoblock200_EM5_13.mo @@ -0,0 +1,28 @@ +within AixLib.DataBase.CHP.ModularCHPEngineData; +record CHP_Vitoblock200_EM5_13 "Noch nicht möglich, da Brennwert-Nutzung(T_ExhPowUniOut=?<90°C) Ansonsten aktuell" + extends AixLib.DataBase.CHP.ModularCHPEngineData.CHPEngDataBaseRecord( + SIEngine=true, + VEng=0.001, + hStr=0.078, + dCyl=0.072, + dExh=0.053, + dCoo=0.0216, + dInn=0.005, + nEngNominal=25.583, + Lambda=1, + z=3, + eps=12, + mEng=70, + etaCHP=0.94, + etaGen=0.888, + P_elNominal=5500, + Q_MaxHea=13500, + T_ExhPowUniOut=333.15, + i=0.5, + p=2, + n_nominal=1550/60, + f_1=50, + U_1=400, + I_elNominal=8.5); + +end CHP_Vitoblock200_EM5_13; diff --git a/AixLib/DataBase/CHP/ModularCHPEngineData/package.mo b/AixLib/DataBase/CHP/ModularCHPEngineData/package.mo new file mode 100644 index 0000000000..f6f1789d00 --- /dev/null +++ b/AixLib/DataBase/CHP/ModularCHPEngineData/package.mo @@ -0,0 +1,4 @@ +within AixLib.DataBase.CHP; +package ModularCHPEngineData + +end ModularCHPEngineData; diff --git a/AixLib/DataBase/CHP/ModularCHPEngineData/package.order b/AixLib/DataBase/CHP/ModularCHPEngineData/package.order new file mode 100644 index 0000000000..a4cb6207a0 --- /dev/null +++ b/AixLib/DataBase/CHP/ModularCHPEngineData/package.order @@ -0,0 +1,6 @@ +CHPEngDataBaseRecord +CHP_ECPowerXRGI15 +CHP_ECPowerXRGI9 +CHP_Kirsch_L4_12 +CHP_SenerTecDachsG5_5 +CHP_Vitoblock200_EM5_13 diff --git a/AixLib/DataBase/CHP/ModularCHPEngineMedia/CHPCombustionMixtureGasNasa.mo b/AixLib/DataBase/CHP/ModularCHPEngineMedia/CHPCombustionMixtureGasNasa.mo new file mode 100644 index 0000000000..7162202822 --- /dev/null +++ b/AixLib/DataBase/CHP/ModularCHPEngineMedia/CHPCombustionMixtureGasNasa.mo @@ -0,0 +1,731 @@ +within AixLib.DataBase.CHP.ModularCHPEngineMedia; +partial package CHPCombustionMixtureGasNasa + "Medium model of a mixture of ideal gases based on NASA source" + + import Modelica.Math; + import Modelica.Media.Interfaces.Choices.ReferenceEnthalpy; + + extends Modelica.Media.Interfaces.PartialMixtureMedium( + ThermoStates=Modelica.Media.Interfaces.Choices.IndependentVariables.pTX, + substanceNames=data[:].name, + reducedX = false, + singleState=false, + reference_X=fill(1/nX,nX), + SpecificEnthalpy(start=if referenceChoice==ReferenceEnthalpy.ZeroAt0K then 3e5 else + if referenceChoice==ReferenceEnthalpy.UserDefined then h_offset else 0, nominal=1.0e5), + Density(start=10, nominal=10), + AbsolutePressure(start=10e5, nominal=10e5), + Temperature(min=200, max=6000, start=500, nominal=500)); + + redeclare record extends ThermodynamicState "Thermodynamic state variables" + end ThermodynamicState; +// redeclare record extends FluidConstants "Fluid constants" +// end FluidConstants; + + constant Modelica.Media.IdealGases.Common.DataRecord[:] data + "Data records of ideal gas substances"; + // ={Common.SingleGasesData.N2,Common.SingleGasesData.O2} + + constant Boolean excludeEnthalpyOfFormation=true + "If true, enthalpy of formation Hf is not included in specific enthalpy h"; + constant ReferenceEnthalpy referenceChoice=ReferenceEnthalpy.ZeroAt0K + "Choice of reference enthalpy"; + constant SpecificEnthalpy h_offset=0.0 + "User defined offset for reference enthalpy, if referenceChoice = UserDefined"; + +// constant FluidConstants[nX] fluidConstants +// "Additional data needed for transport properties"; + constant MolarMass[nX] MMX=data[:].MM "Molar masses of components"; + constant Integer methodForThermalConductivity(min=1,max=2)=1; + redeclare replaceable model extends BaseProperties( + T(stateSelect=if preferredMediumStates then StateSelect.prefer else StateSelect.default), + p(stateSelect=if preferredMediumStates then StateSelect.prefer else StateSelect.default), + Xi(each stateSelect=if preferredMediumStates then StateSelect.prefer else StateSelect.default), + final standardOrderComponents=true) + "Base properties (p, d, T, h, u, R, MM, X, and Xi of NASA mixture gas" + equation + assert(T >= 200 and T <= 6000, " +Temperature T (=" + String(T) + " K = 200 K) is not in the allowed range +200 K <= T <= 6000 K +required from medium model \"" + mediumName + "\"."); + + MM = molarMass(state); + h = h_TX(T, X); + R = data.R*X; + u = h - R*T; + d = p/(R*T); + // connect state with BaseProperties + state.T = T; + state.p = p; + state.X = if fixedX then reference_X else X; + end BaseProperties; + + redeclare function setState_pTX + "Return thermodynamic state as function of p, T and composition X" + extends Modelica.Icons.Function; + input AbsolutePressure p "Pressure"; + input Temperature T "Temperature"; + input MassFraction X[:]=reference_X "Mass fractions"; + output ThermodynamicState state; + algorithm + state := if size(X,1) == 0 then ThermodynamicState(p=p,T=T,X=reference_X) else if size(X,1) == nX then ThermodynamicState(p=p,T=T, X=X) else + ThermodynamicState(p=p,T=T, X=cat(1,X,{1-sum(X)})); + annotation(Inline=true,smoothOrder=2); + end setState_pTX; + + redeclare function setState_phX + "Return thermodynamic state as function of p, h and composition X" + extends Modelica.Icons.Function; + input AbsolutePressure p "Pressure"; + input SpecificEnthalpy h "Specific enthalpy"; + input MassFraction X[:]=reference_X "Mass fractions"; + output ThermodynamicState state; + algorithm + state := if size(X,1) == 0 then ThermodynamicState(p=p,T=T_hX(h,reference_X),X=reference_X) else if size(X,1) == nX then ThermodynamicState(p=p,T=T_hX(h,X),X=X) else + ThermodynamicState(p=p,T=T_hX(h,X), X=cat(1,X,{1-sum(X)})); + annotation(Inline=true,smoothOrder=2); + end setState_phX; + + redeclare function setState_psX + "Return thermodynamic state as function of p, s and composition X" + extends Modelica.Icons.Function; + input AbsolutePressure p "Pressure"; + input SpecificEntropy s "Specific entropy"; + input MassFraction X[:]=reference_X "Mass fractions"; + output ThermodynamicState state; + algorithm + state := if size(X,1) == 0 then ThermodynamicState(p=p,T=T_psX(p,s,reference_X),X=reference_X) else if size(X,1) == nX then ThermodynamicState(p=p,T=T_psX(p,s,X),X=X) else + ThermodynamicState(p=p,T=T_psX(p,s,X), X=cat(1,X,{1-sum(X)})); + annotation(Inline=true,smoothOrder=2); + end setState_psX; + + redeclare function setState_dTX + "Return thermodynamic state as function of d, T and composition X" + extends Modelica.Icons.Function; + input Density d "Density"; + input Temperature T "Temperature"; + input MassFraction X[:]=reference_X "Mass fractions"; + output ThermodynamicState state; + algorithm + state := if size(X,1) == 0 then ThermodynamicState(p=d*(data.R*reference_X)*T,T=T,X=reference_X) else if size(X,1) == nX then ThermodynamicState(p=d*(data.R*X)*T,T=T,X=X) else + ThermodynamicState(p=d*(data.R*cat(1,X,{1-sum(X)}))*T,T=T, X=cat(1,X,{1-sum(X)})); + annotation(Inline=true,smoothOrder=2); + end setState_dTX; + + redeclare function extends setSmoothState + "Return thermodynamic state so that it smoothly approximates: if x > 0 then state_a else state_b" + algorithm + state := ThermodynamicState( + p=Modelica.Media.Common.smoothStep( + x, + state_a.p, + state_b.p, + x_small), + T=Modelica.Media.Common.smoothStep( + x, + state_a.T, + state_b.T, + x_small), + X=Modelica.Media.Common.smoothStep( + x, + state_a.X, + state_b.X, + x_small)); + annotation(Inline=true,smoothOrder=2); + end setSmoothState; + + redeclare function extends pressure "Return pressure of ideal gas" + algorithm + p := state.p; + annotation(Inline=true,smoothOrder=2); + end pressure; + + redeclare function extends temperature "Return temperature of ideal gas" + algorithm + T := state.T; + annotation(Inline=true,smoothOrder=2); + end temperature; + + redeclare function extends density "Return density of ideal gas" + algorithm + d := state.p/((state.X*data.R)*state.T); + annotation(Inline = true, smoothOrder = 3); + end density; + + redeclare function extends specificEnthalpy "Return specific enthalpy" + extends Modelica.Icons.Function; + algorithm + h := h_TX(state.T,state.X); + annotation(Inline=true,smoothOrder=2); + end specificEnthalpy; + + redeclare function extends specificInternalEnergy + "Return specific internal energy" + extends Modelica.Icons.Function; + algorithm + u := h_TX(state.T,state.X) - gasConstant(state)*state.T; + annotation(Inline=true,smoothOrder=2); + end specificInternalEnergy; + + redeclare function extends specificEntropy "Return specific entropy" + protected + Real[nX] Y(unit="mol/mol")=massToMoleFractions(state.X, data.MM) + "Molar fractions"; + algorithm + s := s_TX(state.T, state.X) - sum(state.X[i]*Modelica.Constants.R/MMX[i]* + (if state.X[i]
+ This base properties model is identical to Modelica.Media.Water.ConstantPropertyLiquidWater,
+ except that the equation u = cv_const*(T - reference_T)
+ has been replaced by u=h because
+ cp_const=cv_const. Also, the model checks if the mass
+ fraction of the mixture is within the allowed limits.
+
+ Density of propylene antifreeze-water mixture at specified mass + fraction and temperature, based on Melinder (2010). +
++ Melinder, Åke. 2010. Properties of Secondary Working Fluids + (Secondary Refrigerants or Coolants, Heat Transfer Fluids) for + Indirect Systems. Paris: IIR/IIF. +
+", + revisions="+ Dynamic viscosity of antifreeze-water mixture at specified mass + fraction and temperature, based on Melinder (2010). +
++ Melinder, Åke. 2010. Properties of Secondary Working Fluids + (Secondary Refrigerants or Coolants, Heat Transfer Fluids) for + Indirect Systems. Paris: IIR/IIF. +
+", revisions=" ++ Fusion temperature of antifreeze-water mixture at specified mass + fraction and temperature, based on Melinder (2010). +
++ Melinder, Åke. 2010. Properties of Secondary Working Fluids + (Secondary Refrigerants or Coolants, Heat Transfer Fluids) for + Indirect Systems. Paris: IIR/IIF. +
+", revisions=" ++ Evaluates a thermophysical property of a mixture, based on + correlations proposed by Melinder (2010). +
++ The polynomial has the form +
++ f = a1 (x-xm)0(y-ym)0 + + a2 (x-xm)0(y-ym)1 + ... + + any[1] (x-xm)0(y-ym)ny[1]-1 + ... + + any[1])+1 (x-xm)1(y-ym)0 + ... + + any[1]+ny[2] (x-xm)1(y-ym)ny[2]-1 + + ... +
++ Melinder, Åke. 2010. Properties of Secondary Working Fluids + (Secondary Refrigerants or Coolants, Heat Transfer Fluids) for + Indirect Systems. Paris: IIR/IIF. +
+", revisions=" ++ Specific heat capacity of antifreeze-water mixture at specified mass + fraction and temperature, based on Melinder (2010). +
++ Melinder, Åke. 2010. Properties of Secondary Working Fluids + (Secondary Refrigerants or Coolants, Heat Transfer Fluids) for + Indirect Systems. Paris: IIR/IIF. +
+", revisions=" ++ Thermal conductivity of antifreeze-water mixture at specified mass + fraction and temperature, based on Melinder (2010). +
++ Melinder, Åke. 2010. Properties of Secondary Working Fluids + (Secondary Refrigerants or Coolants, Heat Transfer Fluids) for + Indirect Systems. Paris: IIR/IIF. +
+", revisions=" ++ This medium package models propylene glycol - water mixtures. +
++ The mass density, specific heat capacity, thermal conductivity and + viscosity are assumed constant and evaluated at a set temperature and + mass fraction of propylene glycol within the mixture. The dependence + of the four properties are shown on the figure below. +
+
+
+
+ The accuracy of the thermophysical properties is dependent on the + temperature variations encountered during simulations. The figure + below shows the relative error of the the four properties over a + 10 °C range around the temperature used to evaluate the + constant properties. The maximum errors are 0.8 % for mass + density, 1.5 % for specific heat capacity, 3.2 % for + thermal conductivity and 250 % for dynamic viscosity. +
+
+
+
+ The figure below shows the relative error of the the four properties + over a 20 °C range around the temperature used to evaluate the + constant proepties. The maximum errors are 1.6 % for mass + density, 3.0 % for specific heat capacity, 6.2 % for + thermal conductivity and 950 % for dynamic viscosity. +
+
+
+
+ The enthalpy is computed using the convention that h=0 if + T=0 °C. +
++ Density, specific heat capacity, thermal conductivity and viscosity + are constant. The propylene glycol/water mixture is modeled as an + incompressible liquid. There are no phase changes. The medium is + limited to temperatures below 100 °C and mass fractions below + 0.60. As is the case for AixLib.Media.Water, this medium + package should not be used if the simulation relies on the dynamic + viscosity. +
++ The temperature and mass fraction must be specified for the + evaluation of the constant thermophysical properties. A typical use + of the package is (e.g. for a temperature of 20 °C and a mass + fraction of 0.40): +
+
+ Medium =
+ AixLib.Media.Antifreeze.PropyleneGlycolWater(property_T=293.15,
+ X_a=0.40)
+
+ Gasoline model for liquid diesel fuel. +
++ NOTE: +
++ The calculation of the engine combustion is partly based on an + empirical approach that uses exhaust gas measurements from an + SI-engine. This might result in limitations of the model output + accuracy! +
+")); +end LiquidFuel_Diesel; diff --git a/AixLib/DataBase/CHP/ModularCHPEngineMedia/LiquidFuel_LPG.mo b/AixLib/DataBase/CHP/ModularCHPEngineMedia/LiquidFuel_LPG.mo new file mode 100644 index 0000000000..899a07a220 --- /dev/null +++ b/AixLib/DataBase/CHP/ModularCHPEngineMedia/LiquidFuel_LPG.mo @@ -0,0 +1,49 @@ +within AixLib.DataBase.CHP.ModularCHPEngineMedia; +package LiquidFuel_LPG "Simple LPG fuel for CHP-engine combustion" + + extends AixLib.DataBase.CHP.ModularCHPEngineMedia.CHPCombustionMixtureGasNasa( + mediumName="Just dummy data and no use for calculation", + data={Modelica.Media.IdealGases.Common.SingleGasesData.N2,Modelica.Media.IdealGases.Common.SingleGasesData.CH4, + Modelica.Media.IdealGases.Common.SingleGasesData.C2H4,Modelica.Media.IdealGases.Common.SingleGasesData.C2H6, + Modelica.Media.IdealGases.Common.SingleGasesData.C3H8,Modelica.Media.IdealGases.Common.SingleGasesData.C4H10_n_butane, + Modelica.Media.IdealGases.Common.SingleGasesData.C5H12_n_pentane, + Modelica.Media.IdealGases.Common.SingleGasesData.C6H14_n_hexane, + Modelica.Media.IdealGases.Common.SingleGasesData.CO2}, + fluidConstants={Modelica.Media.IdealGases.Common.FluidData.N2,Modelica.Media.IdealGases.Common.FluidData.CH4, + Modelica.Media.IdealGases.Common.FluidData.C2H4,Modelica.Media.IdealGases.Common.FluidData.C2H6, + Modelica.Media.IdealGases.Common.FluidData.C3H8,Modelica.Media.IdealGases.Common.FluidData.C4H10_n_butane, + Modelica.Media.IdealGases.Common.FluidData.C5H12_n_pentane,Modelica.Media.IdealGases.Common.FluidData.C6H14_n_hexane, + Modelica.Media.IdealGases.Common.FluidData.CO2}, + substanceNames={"Nitrogen","Methane","Ethene","Ethane","Propane", + "n-Butane","n-Pentane","n-Hexane","Carbondioxide"}); + + constant + AixLib.DataBase.CHP.ModularCHPEngineMedia.CombustionEngineFuelDataBaseRecord + Fuel=LPGFuel() "Needed fuel data for combustion calculations" + annotation (choicesAllMatching=true, Dialog(group="Natural gas type")); + + import Modelica.SIunits.*; + + constant Boolean isGas = Fuel.isGasoline "True = Gasoline fuel, False = Liquid fuel"; + constant MolarMass MM = Fuel.MM_liq "Molar mass of the fuel"; + constant SpecificEnergy H_U = Fuel.H_U "Calorific Value of the fuel gas"; + constant Real l_min = L_st*MM/0.02885; + constant Real L_st = 4.31034*(2.664*Fuel.Xi_liq[1]+7.937*Fuel.Xi_liq[2]-Fuel.Xi_liq[3]) "Stoichiometric air consumption"; + //Unused information for simulation stability + constant MoleFraction moleFractions_Gas[:] = Fuel.Xi_mole; + + record LPGFuel "Data record for simple LPG fuel" + extends + AixLib.DataBase.CHP.ModularCHPEngineMedia.CombustionEngineFuelDataBaseRecord( + fuelType = "Simple LPG fuel", + isGasoline = false, + H_U = 45330000, + MM_liq = 0.048, + Xi_liq = {0.82,0.18,0.00}); + + end LPGFuel; + annotation (Documentation(info="+ Gasoline model for natural gas type H. +
+")); +end LiquidFuel_LPG; diff --git a/AixLib/DataBase/CHP/ModularCHPEngineMedia/LiquidFuel_Petrol.mo b/AixLib/DataBase/CHP/ModularCHPEngineMedia/LiquidFuel_Petrol.mo new file mode 100644 index 0000000000..c1148c1cae --- /dev/null +++ b/AixLib/DataBase/CHP/ModularCHPEngineMedia/LiquidFuel_Petrol.mo @@ -0,0 +1,49 @@ +within AixLib.DataBase.CHP.ModularCHPEngineMedia; +package LiquidFuel_Petrol "Simple petrol fuel for CHP-engine combustion" + + extends AixLib.DataBase.CHP.ModularCHPEngineMedia.CHPCombustionMixtureGasNasa( + mediumName="Just dummy data and no use for calculation", + data={Modelica.Media.IdealGases.Common.SingleGasesData.N2,Modelica.Media.IdealGases.Common.SingleGasesData.CH4, + Modelica.Media.IdealGases.Common.SingleGasesData.C2H4,Modelica.Media.IdealGases.Common.SingleGasesData.C2H6, + Modelica.Media.IdealGases.Common.SingleGasesData.C3H8,Modelica.Media.IdealGases.Common.SingleGasesData.C4H10_n_butane, + Modelica.Media.IdealGases.Common.SingleGasesData.C5H12_n_pentane, + Modelica.Media.IdealGases.Common.SingleGasesData.C6H14_n_hexane, + Modelica.Media.IdealGases.Common.SingleGasesData.CO2}, + fluidConstants={Modelica.Media.IdealGases.Common.FluidData.N2,Modelica.Media.IdealGases.Common.FluidData.CH4, + Modelica.Media.IdealGases.Common.FluidData.C2H4,Modelica.Media.IdealGases.Common.FluidData.C2H6, + Modelica.Media.IdealGases.Common.FluidData.C3H8,Modelica.Media.IdealGases.Common.FluidData.C4H10_n_butane, + Modelica.Media.IdealGases.Common.FluidData.C5H12_n_pentane,Modelica.Media.IdealGases.Common.FluidData.C6H14_n_hexane, + Modelica.Media.IdealGases.Common.FluidData.CO2}, + substanceNames={"Nitrogen","Methane","Ethene","Ethane","Propane", + "n-Butane","n-Pentane","n-Hexane","Carbondioxide"}); + + constant + AixLib.DataBase.CHP.ModularCHPEngineMedia.CombustionEngineFuelDataBaseRecord + Fuel=PetrolFuel() "Needed fuel data for combustion calculations" + annotation (choicesAllMatching=true, Dialog(group="Natural gas type")); + + import Modelica.SIunits.*; + + constant Boolean isGas = Fuel.isGasoline "True = Gasoline fuel, False = Liquid fuel"; + constant MolarMass MM = Fuel.MM_liq "Molar mass of the fuel"; + constant SpecificEnergy H_U = Fuel.H_U "Calorific Value of the fuel gas"; + constant Real l_min = L_st*MM/0.02885; + constant Real L_st = 4.31034*(2.664*Fuel.Xi_liq[1]+7.937*Fuel.Xi_liq[2]-Fuel.Xi_liq[3]) "Stoichiometric air consumption"; + //Unused information for simulation stability + constant MoleFraction moleFractions_Gas[:] = Fuel.Xi_mole; + + record PetrolFuel "Data record for simple petrol fuel" + extends + AixLib.DataBase.CHP.ModularCHPEngineMedia.CombustionEngineFuelDataBaseRecord( + fuelType = "Simple petrol fuel", + isGasoline = false, + H_U = 42000000, + MM_liq = 0.098, + Xi_liq = {0.84,0.14,0.02}); + + end PetrolFuel; + annotation (Documentation(info="+ Gasoline model for natural gas type H. +
+")); +end LiquidFuel_Petrol; diff --git a/AixLib/DataBase/CHP/ModularCHPEngineMedia/NaturalGasMixture_GeneralType.mo b/AixLib/DataBase/CHP/ModularCHPEngineMedia/NaturalGasMixture_GeneralType.mo new file mode 100644 index 0000000000..dcfc0c6d96 --- /dev/null +++ b/AixLib/DataBase/CHP/ModularCHPEngineMedia/NaturalGasMixture_GeneralType.mo @@ -0,0 +1,50 @@ +within AixLib.DataBase.CHP.ModularCHPEngineMedia; +package NaturalGasMixture_GeneralType + "Simple natural gas mixture for CHP-engine combustion" + + extends + AixLib.DataBase.CHP.ModularCHPEngineMedia.CHPCombustionMixtureGasNasa( + mediumName="NaturalGasMixture_SelectableVolumetricProportions", + data={Modelica.Media.IdealGases.Common.SingleGasesData.N2,Modelica.Media.IdealGases.Common.SingleGasesData.CH4, + Modelica.Media.IdealGases.Common.SingleGasesData.C2H4,Modelica.Media.IdealGases.Common.SingleGasesData.C2H6, + Modelica.Media.IdealGases.Common.SingleGasesData.C3H8,Modelica.Media.IdealGases.Common.SingleGasesData.C4H10_n_butane, + Modelica.Media.IdealGases.Common.SingleGasesData.C5H12_n_pentane, + Modelica.Media.IdealGases.Common.SingleGasesData.C6H14_n_hexane, + Modelica.Media.IdealGases.Common.SingleGasesData.CO2}, + fluidConstants={Modelica.Media.IdealGases.Common.FluidData.N2,Modelica.Media.IdealGases.Common.FluidData.CH4, + Modelica.Media.IdealGases.Common.FluidData.C2H4,Modelica.Media.IdealGases.Common.FluidData.C2H6, + Modelica.Media.IdealGases.Common.FluidData.C3H8,Modelica.Media.IdealGases.Common.FluidData.C4H10_n_butane, + Modelica.Media.IdealGases.Common.FluidData.C5H12_n_pentane,Modelica.Media.IdealGases.Common.FluidData.C6H14_n_hexane, + Modelica.Media.IdealGases.Common.FluidData.CO2}, + substanceNames={"Nitrogen","Methane","Ethene","Ethane","Propane", + "n-Butane","n-Pentane","n-Hexane","Carbondioxide"}); + + constant + AixLib.DataBase.CHP.ModularCHPEngineMedia.CombustionEngineFuelDataBaseRecord + Fuel=NaturalGas_GeneralDefinition() + "Needed natural gas data for calculations, manual redefinition of volumetric proportions of the gas components (Xi_mole) required (default:{1/9,1/9,...})!" + annotation (choicesAllMatching=true, Dialog(group="Natural gas type")); + + import Modelica.SIunits.*; + + constant Boolean isGas = Fuel.isGasoline "True = Gasoline fuel, False = Liquid fuel"; + constant MoleFraction moleFractions_Gas[:] = Fuel.Xi_mole; + constant MolarMass MM = sum(Fuel.Xi_mole[i]*Fuel.MMi[i] for i in 1:size(Fuel.MMi, 1)) "Molar mass of natural gas type from its composition"; + constant MassFraction massFractions_Gas[:] = Modelica.Media.Interfaces.PartialMixtureMedium.moleToMassFractions(Fuel.Xi_mole, Fuel.MMi); + constant SpecificEnergy H_U = sum(massFractions_Gas[i]*Fuel.H_Ui[i] for i in 1:size(Fuel.MMi, 1)) "Calorific Value of the fuel gas"; + constant Real l_min = sum(Fuel.Xi_mole[i]*Fuel.nue_min[i] for i in 1:size(Fuel.MMi, 1))/0.21; + constant Real L_st = l_min*0.02885/MM "Stoichiometric air consumption"; + + record NaturalGas_GeneralDefinition + extends + AixLib.DataBase.CHP.ModularCHPEngineMedia.CombustionEngineFuelDataBaseRecord( + fuelType="GeneralTypeForRedefinition", + isGasoline = true, + Xi_mole={1/9,1/9,1/9,1/9, + 1/9,1/9,1/9,1/9,1/9}); + end NaturalGas_GeneralDefinition; + annotation (Documentation(info="+ Gasoline model for natural gas type H. +
+")); +end NaturalGasMixture_GeneralType; diff --git a/AixLib/DataBase/CHP/ModularCHPEngineMedia/NaturalGasMixture_TypeAachen.mo b/AixLib/DataBase/CHP/ModularCHPEngineMedia/NaturalGasMixture_TypeAachen.mo new file mode 100644 index 0000000000..098b24c8cd --- /dev/null +++ b/AixLib/DataBase/CHP/ModularCHPEngineMedia/NaturalGasMixture_TypeAachen.mo @@ -0,0 +1,48 @@ +within AixLib.DataBase.CHP.ModularCHPEngineMedia; +package NaturalGasMixture_TypeAachen + "Simple natural gas mixture (type Aachen) for CHP-engine combustion" + + extends + AixLib.DataBase.CHP.ModularCHPEngineMedia.CHPCombustionMixtureGasNasa( + mediumName="NaturalGasMixtureForAachen", + data={Modelica.Media.IdealGases.Common.SingleGasesData.N2,Modelica.Media.IdealGases.Common.SingleGasesData.CH4, + Modelica.Media.IdealGases.Common.SingleGasesData.C2H4,Modelica.Media.IdealGases.Common.SingleGasesData.C2H6, + Modelica.Media.IdealGases.Common.SingleGasesData.C3H8,Modelica.Media.IdealGases.Common.SingleGasesData.C4H10_n_butane, + Modelica.Media.IdealGases.Common.SingleGasesData.C5H12_n_pentane, + Modelica.Media.IdealGases.Common.SingleGasesData.C6H14_n_hexane, + Modelica.Media.IdealGases.Common.SingleGasesData.CO2}, + fluidConstants={Modelica.Media.IdealGases.Common.FluidData.N2,Modelica.Media.IdealGases.Common.FluidData.CH4, + Modelica.Media.IdealGases.Common.FluidData.C2H4,Modelica.Media.IdealGases.Common.FluidData.C2H6, + Modelica.Media.IdealGases.Common.FluidData.C3H8,Modelica.Media.IdealGases.Common.FluidData.C4H10_n_butane, + Modelica.Media.IdealGases.Common.FluidData.C5H12_n_pentane,Modelica.Media.IdealGases.Common.FluidData.C6H14_n_hexane, + Modelica.Media.IdealGases.Common.FluidData.CO2}, + substanceNames={"Nitrogen","Methane","Ethene","Ethane","Propane", + "n-Butane","n-Pentane","n-Hexane","Carbondioxide"}); + + constant + AixLib.DataBase.CHP.ModularCHPEngineMedia.CombustionEngineFuelDataBaseRecord + Fuel=NaturalGasTypeAachen() "Needed natural gas data for calculations" + annotation (choicesAllMatching=true, Dialog(group="Natural gas type")); + + import Modelica.SIunits.*; + + constant Boolean isGas = Fuel.isGasoline "True = Gasoline fuel, False = Liquid fuel"; + constant MoleFraction moleFractions_Gas[:] = Fuel.Xi_mole; + constant MolarMass MM = sum(Fuel.Xi_mole[i]*Fuel.MMi[i] for i in 1:size(Fuel.MMi, 1)) "Molar mass of natural gas type from its composition"; + constant MassFraction massFractions_Gas[:] = Modelica.Media.Interfaces.PartialMixtureMedium.moleToMassFractions(Fuel.Xi_mole, Fuel.MMi); + constant SpecificEnergy H_U = sum(massFractions_Gas[i]*Fuel.H_Ui[i] for i in 1:size(Fuel.MMi, 1)) "Calorific Value of the fuel gas"; + constant Real l_min = sum(Fuel.Xi_mole[i]*Fuel.nue_min[i] for i in 1:size(Fuel.MMi, 1))/0.21; + constant Real L_st = l_min*0.02885/MM "Stoichiometric air consumption"; + + record NaturalGasTypeAachen + extends + AixLib.DataBase.CHP.ModularCHPEngineMedia.CombustionEngineFuelDataBaseRecord( + fuelType="TypeAachen", + isGasoline = true, + Xi_mole={0.0089,0.9255,0,0.045,0.0063,0.0019,0.0004,0.0001,0.0119}); + end NaturalGasTypeAachen; + annotation (Documentation(info="+ Gasoline model for natural gas type H. +
+")); +end NaturalGasMixture_TypeAachen; diff --git a/AixLib/DataBase/CHP/ModularCHPEngineMedia/NaturalGasMixture_TypeH.mo b/AixLib/DataBase/CHP/ModularCHPEngineMedia/NaturalGasMixture_TypeH.mo new file mode 100644 index 0000000000..c969f69f4c --- /dev/null +++ b/AixLib/DataBase/CHP/ModularCHPEngineMedia/NaturalGasMixture_TypeH.mo @@ -0,0 +1,49 @@ +within AixLib.DataBase.CHP.ModularCHPEngineMedia; +package NaturalGasMixture_TypeH + "Simple natural gas mixture (type H) for CHP-engine combustion" + + extends + AixLib.DataBase.CHP.ModularCHPEngineMedia.CHPCombustionMixtureGasNasa( + mediumName="NaturalGasMixtureTypeH", + data={Modelica.Media.IdealGases.Common.SingleGasesData.N2,Modelica.Media.IdealGases.Common.SingleGasesData.CH4, + Modelica.Media.IdealGases.Common.SingleGasesData.C2H4,Modelica.Media.IdealGases.Common.SingleGasesData.C2H6, + Modelica.Media.IdealGases.Common.SingleGasesData.C3H8,Modelica.Media.IdealGases.Common.SingleGasesData.C4H10_n_butane, + Modelica.Media.IdealGases.Common.SingleGasesData.C5H12_n_pentane, + Modelica.Media.IdealGases.Common.SingleGasesData.C6H14_n_hexane, + Modelica.Media.IdealGases.Common.SingleGasesData.CO2}, + fluidConstants={Modelica.Media.IdealGases.Common.FluidData.N2,Modelica.Media.IdealGases.Common.FluidData.CH4, + Modelica.Media.IdealGases.Common.FluidData.C2H4,Modelica.Media.IdealGases.Common.FluidData.C2H6, + Modelica.Media.IdealGases.Common.FluidData.C3H8,Modelica.Media.IdealGases.Common.FluidData.C4H10_n_butane, + Modelica.Media.IdealGases.Common.FluidData.C5H12_n_pentane,Modelica.Media.IdealGases.Common.FluidData.C6H14_n_hexane, + Modelica.Media.IdealGases.Common.FluidData.CO2}, + substanceNames={"Nitrogen","Methane","Ethene","Ethane","Propane", + "n-Butane","n-Pentane","n-Hexane","Carbondioxide"}); + + constant + AixLib.DataBase.CHP.ModularCHPEngineMedia.CombustionEngineFuelDataBaseRecord + Fuel=NaturalGasTypeH() "Needed natural gas data for calculations" + annotation (choicesAllMatching=true, Dialog(group="Natural gas type")); + + import Modelica.SIunits.*; + + constant Boolean isGas = Fuel.isGasoline "True = Gasoline fuel, False = Liquid fuel"; + constant MoleFraction moleFractions_Gas[:] = Fuel.Xi_mole; + constant MolarMass MM = sum(Fuel.Xi_mole[i]*Fuel.MMi[i] for i in 1:size(Fuel.MMi, 1)) "Molar mass of natural gas type from its composition"; + constant MassFraction massFractions_Gas[:] = Modelica.Media.Interfaces.PartialMixtureMedium.moleToMassFractions(Fuel.Xi_mole, Fuel.MMi); + constant SpecificEnergy H_U = sum(massFractions_Gas[i]*Fuel.H_Ui[i] for i in 1:size(Fuel.MMi, 1)) "Calorific Value of the fuel gas"; + constant Real l_min = sum(Fuel.Xi_mole[i]*Fuel.nue_min[i] for i in 1:size(Fuel.MMi, 1))/0.21; + constant Real L_st = l_min*0.02885/MM "Stoichiometric air consumption"; + + record NaturalGasTypeH + extends + AixLib.DataBase.CHP.ModularCHPEngineMedia.CombustionEngineFuelDataBaseRecord( + fuelType="TypeH", + isGasoline = true, + Xi_mole={0.007,0.854,0,0.08,0.029,0.01,0,0, + 0.02}); + end NaturalGasTypeH; + annotation (Documentation(info="+ Gasoline model for natural gas type H. +
+")); +end NaturalGasMixture_TypeH; diff --git a/AixLib/DataBase/CHP/ModularCHPEngineMedia/NaturalGasMixture_TypeL.mo b/AixLib/DataBase/CHP/ModularCHPEngineMedia/NaturalGasMixture_TypeL.mo new file mode 100644 index 0000000000..2b08b4eea4 --- /dev/null +++ b/AixLib/DataBase/CHP/ModularCHPEngineMedia/NaturalGasMixture_TypeL.mo @@ -0,0 +1,49 @@ +within AixLib.DataBase.CHP.ModularCHPEngineMedia; +package NaturalGasMixture_TypeL + "Simple natural gas mixture (type L) for CHP-engine combustion" + + extends + AixLib.DataBase.CHP.ModularCHPEngineMedia.CHPCombustionMixtureGasNasa( + mediumName="NaturalGasMixtureTypeL", + data={Modelica.Media.IdealGases.Common.SingleGasesData.N2,Modelica.Media.IdealGases.Common.SingleGasesData.CH4, + Modelica.Media.IdealGases.Common.SingleGasesData.C2H4,Modelica.Media.IdealGases.Common.SingleGasesData.C2H6, + Modelica.Media.IdealGases.Common.SingleGasesData.C3H8,Modelica.Media.IdealGases.Common.SingleGasesData.C4H10_n_butane, + Modelica.Media.IdealGases.Common.SingleGasesData.C5H12_n_pentane, + Modelica.Media.IdealGases.Common.SingleGasesData.C6H14_n_hexane, + Modelica.Media.IdealGases.Common.SingleGasesData.CO2}, + fluidConstants={Modelica.Media.IdealGases.Common.FluidData.N2,Modelica.Media.IdealGases.Common.FluidData.CH4, + Modelica.Media.IdealGases.Common.FluidData.C2H4,Modelica.Media.IdealGases.Common.FluidData.C2H6, + Modelica.Media.IdealGases.Common.FluidData.C3H8,Modelica.Media.IdealGases.Common.FluidData.C4H10_n_butane, + Modelica.Media.IdealGases.Common.FluidData.C5H12_n_pentane,Modelica.Media.IdealGases.Common.FluidData.C6H14_n_hexane, + Modelica.Media.IdealGases.Common.FluidData.CO2}, + substanceNames={"Nitrogen","Methane","Ethene","Ethane","Propane", + "n-Butane","n-Pentane","n-Hexane","Carbondioxide"}); + + constant + AixLib.DataBase.CHP.ModularCHPEngineMedia.CombustionEngineFuelDataBaseRecord + Fuel=NaturalGasTypeL() "Needed natural gas data for calculations" + annotation (choicesAllMatching=true, Dialog(group="Natural gas type")); + + import Modelica.SIunits.*; + + constant Boolean isGas = Fuel.isGasoline "True = Gasoline fuel, False = Liquid fuel"; + constant MoleFraction moleFractions_Gas[:] = Fuel.Xi_mole; + constant MolarMass MM = sum(Fuel.Xi_mole[i]*Fuel.MMi[i] for i in 1:size(Fuel.MMi, 1)) "Molar mass of natural gas type from its composition"; + constant MassFraction massFractions_Gas[:] = Modelica.Media.Interfaces.PartialMixtureMedium.moleToMassFractions(Fuel.Xi_mole, Fuel.MMi); + constant SpecificEnergy H_U = sum(massFractions_Gas[i]*Fuel.H_Ui[i] for i in 1:size(Fuel.MMi, 1)) "Calorific Value of the fuel gas"; + constant Real l_min = sum(Fuel.Xi_mole[i]*Fuel.nue_min[i] for i in 1:size(Fuel.MMi, 1))/0.21; + constant Real L_st = l_min*0.02885/MM "Stoichiometric air consumption"; + + record NaturalGasTypeL + extends + AixLib.DataBase.CHP.ModularCHPEngineMedia.CombustionEngineFuelDataBaseRecord( + fuelType="TypeL", + isGasoline = true, + Xi_mole={0.126,0.82,0,0.033,0.006,0.003,0,0, + 0.012}); + end NaturalGasTypeL; + annotation (Documentation(info="+ Gasoline model for natural gas type H. +
+")); +end NaturalGasMixture_TypeL; diff --git a/AixLib/DataBase/CHP/ModularCHPEngineMedia/package.mo b/AixLib/DataBase/CHP/ModularCHPEngineMedia/package.mo new file mode 100644 index 0000000000..79c4b118a9 --- /dev/null +++ b/AixLib/DataBase/CHP/ModularCHPEngineMedia/package.mo @@ -0,0 +1,11 @@ +within AixLib.DataBase.CHP; +package ModularCHPEngineMedia + + + + + + + + +end ModularCHPEngineMedia; diff --git a/AixLib/DataBase/CHP/ModularCHPEngineMedia/package.order b/AixLib/DataBase/CHP/ModularCHPEngineMedia/package.order new file mode 100644 index 0000000000..774752da97 --- /dev/null +++ b/AixLib/DataBase/CHP/ModularCHPEngineMedia/package.order @@ -0,0 +1,12 @@ +CHPCombustionMixtureGasNasa +CHPCoolantPropyleneGlycolWater +CHPFlueGasLambdaOnePlus +EngineCombustionAir +LiquidFuel_Diesel +LiquidFuel_LPG +LiquidFuel_Petrol +NaturalGasMixture_GeneralType +NaturalGasMixture_TypeAachen +NaturalGasMixture_TypeH +NaturalGasMixture_TypeL +CombustionEngineFuelDataBaseRecord diff --git a/AixLib/DataBase/CHP/package.order b/AixLib/DataBase/CHP/package.order index 928b6c10c9..da44eeeef8 100644 --- a/AixLib/DataBase/CHP/package.order +++ b/AixLib/DataBase/CHP/package.order @@ -1,19 +1,3 @@ -CHPBaseDataDefinition -CHP_Cleanergy_C9G -CHP_FMB_1500_GSMK -CHP_FMB_155_GSK -CHP_FMB_2500_GSMK -CHP_FMB_270_GSMK -CHP_FMB_31_GSK -CHP_FMB_410_GSMK -CHP_FMB_65_GSK -CHP_FMB_750_GSMK -CHP_GG_113 -CHP_GG_50 -CHP_GG_70 -CHP_XRGI_9kWel -CHP_mikro_ECO_POWER_1 -CHP_mini_ECO_POWER_3 -CHP_mini_ECO_POWER_3_LiquidGas -CHP_mini_ECO_POWER_5 -CHP_mini_ECO_POWER_5_LiquidGas +CHPDataSimple +ModularCHPEngineData +ModularCHPEngineMedia diff --git a/AixLib/DataBase/HeatPump/EN14511/AlphaInnotec_LW80MA.mo b/AixLib/DataBase/HeatPump/EN14511/AlphaInnotec_LW80MA.mo deleted file mode 100644 index 51d29e0d79..0000000000 --- a/AixLib/DataBase/HeatPump/EN14511/AlphaInnotec_LW80MA.mo +++ /dev/null @@ -1,20 +0,0 @@ -within AixLib.DataBase.HeatPump.EN14511; -record AlphaInnotec_LW80MA "Alpha Innotec LW 80 M-A" - extends AixLib.DataBase.HeatPump.HeatPumpBaseDataDefinition( - tableP_ele=[0,-7,2,7,10,15,20; 35,2625,2424,2410,2395,2347,2322; 45,3136,3053, - 3000,2970,2912,2889; 50,3486,3535,3451,3414,3365,3385], - tableQdot_con=[0,-7,2,7,10,15,20; 35,6300,8000,9400,10300,11850,13190; 45,6167, - 7733,9000,9750,11017,11730; 50,6100,7600,8800,9475,10600,11000], - mFlow_conNom=9400/4180/5, - mFlow_evaNom=1); - - annotation(preferedView="text", DymolaStoredErrors, - Icon, - Documentation(revisions=" -According to manufacturer's data which was inter- and extrapolated linearly; EN14511
-")); -end AlphaInnotec_LW80MA; diff --git a/AixLib/DataBase/HeatPump/EN14511/Dimplex_LA11AS.mo b/AixLib/DataBase/HeatPump/EN14511/Dimplex_LA11AS.mo deleted file mode 100644 index 89811747eb..0000000000 --- a/AixLib/DataBase/HeatPump/EN14511/Dimplex_LA11AS.mo +++ /dev/null @@ -1,20 +0,0 @@ -within AixLib.DataBase.HeatPump.EN14511; -record Dimplex_LA11AS "Dimplex LA 11 AS" - extends AixLib.DataBase.HeatPump.HeatPumpBaseDataDefinition( - tableP_ele=[0,-7,2,7,10; 35,2444,2839,3139,3103; 45,2783,2974,3097,3013], - tableQdot_con=[0,-7,2,7,10; 35,6600,8800,11300,12100; 45,6400,7898,9600,10145], - mFlow_conNom=11300/4180/5, - mFlow_evaNom=1, - tableUppBou=[-25, 58; 35, 58], - tableLowBou=[-25, 18; 35, 18]); - - annotation(preferedView="text", DymolaStoredErrors, - Icon, - Documentation(revisions=" -According to data from Dimplex data sheets; EN14511
-")); -end Dimplex_LA11AS; diff --git a/AixLib/DataBase/HeatPump/EN14511/Ochsner_GMLW_19.mo b/AixLib/DataBase/HeatPump/EN14511/Ochsner_GMLW_19.mo deleted file mode 100644 index a029808e09..0000000000 --- a/AixLib/DataBase/HeatPump/EN14511/Ochsner_GMLW_19.mo +++ /dev/null @@ -1,20 +0,0 @@ -within AixLib.DataBase.HeatPump.EN14511; -record Ochsner_GMLW_19 "Ochsner GMLW 19" - extends AixLib.DataBase.HeatPump.HeatPumpBaseDataDefinition( - tableP_ele=[0,-10,2,7; 35,4300,4400,4600; 50,6300,6400,6600], - tableQdot_con=[0,-10,2,7; 35,11600,17000,20200; 50,10200,15600,18800], - mFlow_conNom=20200/4180/5, - mFlow_evaNom=1, - tableUppBou=[-15,55; 40, 55], - tableLowBou=[-15, 0; 40, 0]); - - annotation(preferedView="text", DymolaStoredErrors, - Icon, - Documentation(revisions=" -According to data from Ochsner data sheets; EN14511
-")); -end Ochsner_GMLW_19; diff --git a/AixLib/DataBase/HeatPump/EN14511/Ochsner_GMLW_19plus.mo b/AixLib/DataBase/HeatPump/EN14511/Ochsner_GMLW_19plus.mo deleted file mode 100644 index 19995c592e..0000000000 --- a/AixLib/DataBase/HeatPump/EN14511/Ochsner_GMLW_19plus.mo +++ /dev/null @@ -1,21 +0,0 @@ -within AixLib.DataBase.HeatPump.EN14511; -record Ochsner_GMLW_19plus "Ochsner GMLW 19 plus" - extends AixLib.DataBase.HeatPump.HeatPumpBaseDataDefinition( - tableP_ele=[0,-10,2,7; 35,4100,4300,4400; 50,5500,5700,5800; 60,6300,6500,6600], - tableQdot_con=[0,-10,2,7; 35,12600,16800,19800; 50,11700,15900,18900; 60,11400, - 15600,18600], - mFlow_conNom=19800/4180/5, - mFlow_evaNom=1, - tableUppBou=[-24,52;-15, 55;-10,65; 40, 65], - tableLowBou=[-24, 0; 40, 0]); - - annotation(preferedView="text", DymolaStoredErrors, - Icon, - Documentation(revisions=" -According to data from Ochsner data sheets; EN14511
-")); -end Ochsner_GMLW_19plus; diff --git a/AixLib/DataBase/HeatPump/EN14511/Ochsner_GMSW_15plus.mo b/AixLib/DataBase/HeatPump/EN14511/Ochsner_GMSW_15plus.mo deleted file mode 100644 index f2fb2df6e0..0000000000 --- a/AixLib/DataBase/HeatPump/EN14511/Ochsner_GMSW_15plus.mo +++ /dev/null @@ -1,21 +0,0 @@ -within AixLib.DataBase.HeatPump.EN14511; -record Ochsner_GMSW_15plus "Ochsner GMSW 15 plus" - extends AixLib.DataBase.HeatPump.HeatPumpBaseDataDefinition( - tableP_ele=[0,-5,0,5; 35,3225,3300,3300; 45,4000,4000,4000; 55,4825,4900,4900], - tableQdot_con=[0,-5,0,5; 35,12762,14500,16100; 45,12100,13900,15600; 55,11513, - 13200,14900], - mFlow_conNom=14500/4180/5, - mFlow_evaNom=(14500 - 3300)/3600/3, - tableUppBou=[-8, 52; 0, 65; 20, 65], - tableLowBou=[-8, 10; 20, 27]); - - annotation(preferedView="text", DymolaStoredErrors, - Icon, - Documentation(revisions=" -According to data from WPZ Buchs, Swiss; EN14511
-")); -end Ochsner_GMSW_15plus; diff --git a/AixLib/DataBase/HeatPump/EN14511/StiebelEltron_WPL18.mo b/AixLib/DataBase/HeatPump/EN14511/StiebelEltron_WPL18.mo deleted file mode 100644 index db2a32eb37..0000000000 --- a/AixLib/DataBase/HeatPump/EN14511/StiebelEltron_WPL18.mo +++ /dev/null @@ -1,20 +0,0 @@ -within AixLib.DataBase.HeatPump.EN14511; -record StiebelEltron_WPL18 "Stiebel Eltron WPL 18" - extends AixLib.DataBase.HeatPump.HeatPumpBaseDataDefinition( - tableP_ele=[0,-7,2,7,10,20; 35,3300,3400,3500,3700,3800; 50,4500,4400,4600,5000, - 5100], - tableQdot_con=[0,-7,2,7,10,20; 35,9700,11600,13000,14800,16300; 50,10000,11200, - 12900,16700,17500], - mFlow_conNom=13000/4180/5, - mFlow_evaNom=1); - - annotation(preferedView="text", DymolaStoredErrors, - Icon, - Documentation(revisions=" -According to data from WPZ Buchs, Swiss; EN14511
-")); -end StiebelEltron_WPL18; diff --git a/AixLib/DataBase/HeatPump/EN14511/Vaillant_VWL_101.mo b/AixLib/DataBase/HeatPump/EN14511/Vaillant_VWL_101.mo deleted file mode 100644 index 1b819dc754..0000000000 --- a/AixLib/DataBase/HeatPump/EN14511/Vaillant_VWL_101.mo +++ /dev/null @@ -1,19 +0,0 @@ -within AixLib.DataBase.HeatPump.EN14511; -record Vaillant_VWL_101 "Vaillant VWL10-1" - extends AixLib.DataBase.HeatPump.HeatPumpBaseDataDefinition( - tableP_ele=[0,-15,-7,2,7; 35,2138,2177,2444,2444; 45,2558,2673,2864,3055; 55, 2902,3131,3360,3513], - tableQdot_con=[0,-15,-7,2,7; 35,5842,7523,9776,10807; 45,5842,7332,9050,10387; 55, 5728,7179,9050,10043], - mFlow_conNom=9776/4180/5, - mFlow_evaNom=1); - - annotation(preferedView="text", DymolaStoredErrors, - Icon, - Documentation(revisions=" -According to data from Vaillant data sheets; EN14511
-")); -end Vaillant_VWL_101; diff --git a/AixLib/DataBase/HeatPump/EN14511/package.mo b/AixLib/DataBase/HeatPump/EN14511/package.mo deleted file mode 100644 index e023ba6c04..0000000000 --- a/AixLib/DataBase/HeatPump/EN14511/package.mo +++ /dev/null @@ -1,10 +0,0 @@ -within AixLib.DataBase.HeatPump; -package EN14511 - - - - - - - -end EN14511; diff --git a/AixLib/DataBase/HeatPump/EN14511/package.order b/AixLib/DataBase/HeatPump/EN14511/package.order deleted file mode 100644 index fefff8d410..0000000000 --- a/AixLib/DataBase/HeatPump/EN14511/package.order +++ /dev/null @@ -1,7 +0,0 @@ -AlphaInnotec_LW80MA -Dimplex_LA11AS -Ochsner_GMLW_19 -Ochsner_GMLW_19plus -Ochsner_GMSW_15plus -StiebelEltron_WPL18 -Vaillant_VWL_101 diff --git a/AixLib/DataBase/HeatPump/EN255/AlphaInnotec_SW170I.mo b/AixLib/DataBase/HeatPump/EN255/AlphaInnotec_SW170I.mo deleted file mode 100644 index f9efb9d87f..0000000000 --- a/AixLib/DataBase/HeatPump/EN255/AlphaInnotec_SW170I.mo +++ /dev/null @@ -1,20 +0,0 @@ -within AixLib.DataBase.HeatPump.EN255; -record AlphaInnotec_SW170I "Alpha Innotec SW 170 I" - extends AixLib.DataBase.HeatPump.HeatPumpBaseDataDefinition( - tableP_ele=[0,-5.0,0.0,5.0; 35,3700,3600,3600; 50,5100,5100,5100], - tableQdot_con=[0,-5.0,0.0,5.0; 35,14800,17200,19100; 50,14400,16400,18300], - mFlow_conNom=17200/4180/10, - mFlow_evaNom=13600/3600/3, - tableUppBou=[-22, 65; 45, 65], - tableLowBou=[-22, 0; 45, 0]); - - annotation(preferedView="text", DymolaStoredErrors, - Icon, - Documentation(info=" -According to data from WPZ Buchs, Swiss; EN 255.
-", revisions=" -According to manufacturer's data; EN 255.
-", revisions=" -Data from manufacturer's data sheet (Viessmann). These exact curves are given in the data sheet for measurement procedure according to EN 255.
-", revisions=" -Data from manufacturer's data sheet (Viessmann). These exact curves are given in the data sheet for measurement procedure according to EN 255.
-", revisions=" -Data from manufacturer's data sheet (Viessmann). These exact curves are given in the data sheet for measurement procedure according to EN 255.
-", revisions=" -2017-11-23 by Peter Matthes
Implemented.
This test can be used to display the maximum and minimum pump curves as defined in the maxMinHeight parameter matrix.
+"), + experiment, + __Dymola_Commands(file(ensureSimulated=true) = "Resources/Scripts/Dymola/DataBase/Pumps/ControlPump/Examples/testMaxMinHeightTable.mos")); +end testMaxMinHeightTable; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Examples/testPumpHeadCalculation.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Examples/testPumpHeadCalculation.mo new file mode 100644 index 0000000000..499ed40048 --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Examples/testPumpHeadCalculation.mo @@ -0,0 +1,85 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased.Examples; +model testPumpHeadCalculation + "Calculates pump head from volume flow rate and pump speed." + extends Modelica.Icons.Example; + + // ************************************************** + // Select pump record here: + // + parameter AixLib.DataBase.Pumps.PumpPolynomialBased.PumpBaseRecord param= + AixLib.DataBase.Pumps.PumpPolynomialBased.Pump_DN25_H1_6_V4() + "new pump record with coefficients."; + // + // ************************************************** + + function headFlowSpeedFuncNew = + AixLib.Fluid.Movers.PumpsPolynomialBased.BaseClasses.polynomial2D + "polynomial evaluator using new aproach with coefficient matrix"; + + function headFlowSpeedFuncNewABC = + AixLib.Fluid.Movers.PumpsPolynomialBased.BaseClasses.polynomialABC + "polynomial evaluator using new aproach with coefficient matrix"; + + parameter Real maxQ(unit="m3/h", displayUnit="m3/h") = param.maxMinHeight[ + size(param.maxMinHeight, 1), 1]; + + Modelica.Blocks.Sources.TimeTable speedTable(table=[ + 0.00, param.nMin + (param.nMax - param.nMin)*0; + 0.99, param.nMin + (param.nMax - param.nMin)*0; + 1.00, param.nMin + (param.nMax - param.nMin)*0.25; + 1.99, param.nMin + (param.nMax - param.nMin)*0.25; + 2.00, param.nMin + (param.nMax - param.nMin)*0.5; + 2.99, param.nMin + (param.nMax - param.nMin)*0.5; + 3.00, param.nMin + (param.nMax - param.nMin)*0.75; + 3.99, param.nMin + (param.nMax - param.nMin)*0.75; + 4.00, param.nMin + (param.nMax - param.nMin)*1.0; + 4.99, param.nMin + (param.nMax - param.nMin)*1.0]) + "selects different pump speeds" + annotation (Placement(transformation(extent={{-80,10},{-60,30}}))); + Modelica.Blocks.Sources.TimeTable volumeFlowTable(table=[ + 0.0, 0.0; + 0.99, maxQ; + 1, 0.0; + 1.99, maxQ; + 2, 0.0; + 2.99, maxQ; + 3, 0.0; + 3.99, maxQ; + 4, 0.0; + 4.99, maxQ]) "selects different pump speeds" + annotation (Placement(transformation(extent={{-80,-30},{-60,-10}}))); + Modelica.Blocks.Sources.RealExpression headNew(y=headFlowSpeedFuncNew( + param.cHQN, + volumeFlowTable.y, + speedTable.y)) if sum(abs(param.cHQN)) <> 0 + annotation (Placement(transformation(extent={{-20,10},{0,30}}))); + + Modelica.Blocks.Sources.RealExpression headNewABC(y=headFlowSpeedFuncNewABC( + {param.cHQN[3,1], param.cHQN[2,2], param.cHQN[1,3]}, + volumeFlowTable.y, + speedTable.y)) if sum(abs({param.cHQN[3,1], param.cHQN[2,2], + param.cHQN[1,3]})) <> 0 + annotation (Placement(transformation(extent={{-20,-30},{0,-10}}))); + + annotation ( + experiment(StopTime=5), + __Dymola_Commands(file(ensureSimulated=true) = "Resources/Scripts/Dymola/DataBase/Pumps/ControlPump/Examples/testPumpHeadCalculation.mos"), + Documentation(info=" +simulate and plot script
+Use this test to check pump head calculation with the polynomial functions and respective coefficients from Zugabe.Zugabe_DB.Pump.PumpBaseRecord.
+This test case makes use of nMin and nMax parameters of the pump record in the table for setting pump speed. Make sure that these values are set properly in the pump record or change the profile in the speed table.
+", revisions=" +simulate and plot script
+Use this test to check pump power calculation with the polynomial function and the cPQN coefficients from Zugabe.Zugabe_DB.Pump.PumpBaseRecord.
+Be aware, that there is no power limitation implemented here. So the results show only the output of the pure polynomial function. In the pump model the power will be limited by the maxMinHeight curves.
+This test case makes use of nMin and nMax parameters of the pump record in the table for setting pump speed. Make sure that these values are set properly in the pump record or change the profile in the speed table.
+", revisions=" +simulate and plot script
+Use this test to test the polynomial functions for pump speed calculation and their respective coefficients from Zugabe.Zugabe_DB.Pump.PumpBaseRecord. As of December 2017 the coefficient matrix cNQH has been disregarded due to the new pump model that only uses pump speed for control and which will limit the pump speed (maxMinSpeedCurves) rather than the pump head. Therefore, a direct calculation using the cNQH coefficients is not possible anymore in the old pump models.
+Currently only the ABC-coefficients may be used to compute pump speed from cHQN coefficients applied to the inverse p-q-formula.
+This test case makes use of nMin and nMax parameters of the pump record in the table for setting pump speed. Make sure that these values are set properly in the pump record or change the profile in the speed table.
+", revisions=" +The following section contains a list of parameters and descriptions.
+The table was taken from the original record pumpTableFlowHeadCharacteristicRecord. It defines the maximum and minimum pump curves for a given volume flow rate in m³/h. The columns are as follows:
+Using pump speed to control pump power instead of using pump head (maxMinHeight) is more meaningful for the new speed controlled pump. Also this is how it would be implemented in a regular pump. It defines the maximum and minimum pump speed curves for a given volume flow rate in m³/h. The columns are as follows:
+In order to limit the electric power consumption of the pump the speed needs to be reduced for high volume flow rates.
+"maxMinSpeed" refers to the original "maxMinHeight" parameter name. The Addition "Curves" should reflect that this is a matrix/table and not a scalar. This should reduce confusion in the presence of the two parameters nMin and nMax which only contain the absolute minumum and maximum speeds. Those parameters can be used in a controller where limits are given as scalar parameters for example.
+Notice that the default data have a range of 0 <= Q <= 10 m³/h! These values might be used in the models, for example in the form max(pumpParam.maxMinSpeedCurves[:,1]) for initialization or nominal values. So take care that the table data really fit to your pump to avoid strange behaviour.
+This table contains measurement data of volume flow (Q), pump head (H), power consumption (P), pump speeds real and setpoint (N) as well as the corresponding pump head as calculated by the abc-formula for reference. From this data the coefficients can be calculated and it can be verified that the pump data in the record all belong together. From this data one can also directly derive the maxMinHeight table.
+The original pump model used polynomial functions of higher order in two dimensional space. For example the pump head could be calculated as a function of volume flow rate and pump speed:
+H = f(Q, n)=sum(c(i,j)*Q^i*n^j)
+with i and j being non-negative Integers. The functions were written down directly for each pump type as a replaceble function for example:
+H := 0.1041 - 1.168*Q - 0.0002526*n - 0.01049*Q^2 + 0.002589*Q*n + 5.614e-007*n^2 ...
+In the current record only stores the coefficients for the functions:
+A special type of formula has been "developed" for stability reasons. High order polynomials showed a good agreement with real pump data but lead to instable simulations (especially initialization) in certain situations. It was not clear what exactly would cause initialization problems with the high order polynomials but that low order polynomials could solve that problem with the disadvantage of lower acuracy of the pump curves. For example:
+H= a*n^2+b*Q*n+c*Q^2"
+
Using the c[i,j]-matrix this would become:
H= c(0,2)*n^2+c(1,1)*Q*n+c(2,0)*Q^2
+
Therefore, the ABC-Formula emerges as a special case out of the general formulation. In order to implement the latter formula directly to speed up the computation and also allow to switch between the precise and the not so precise pump curves without creating a second record for the same pump, there is a second set of coefficients:
Note that the computation of power must not be simplified as this is only a display variable in our simulations - no other states depend on power. Setting the default to [0,0,0] allows to check upon initialization if the selected coefficients can be used for simulation. So if the record misses a redeclaration of cABCeq and those coefficiens were selected be used, then an assert-warning will inform the user that with this record the selected calculation method (abc-formula) cannot be used. The same holds true for the matrix cHQN for example - it cannot be used if all the coefficients are at the default of zero.
+There are no coefficients for the inverse function N = f(Q, H) as the inverse can be calculated with the p-q-formula from cABCeq:
+n_1 = -b*Q/(2*a)+sqrt((b*Q/(2*a))^2 +(H-c*Q^2)/a)
+n_2 = -b*Q/(2*a)-sqrt((b*Q/(2*a))^2 +(H-c*Q^2)/a)
+", revisions=" +Pump for nominal pipe diameter of 100 mm, pump head range between 1 m and 34 m and maximum volume flow rate of 378.24 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN100.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 3.80934e-06;
+0.00000e+00, 1.28859e-05, 0.00000e+00;
+-2.74876e-04, 0.00000e+00, 0.00000e+00
+cPQN:
+2.41585e+02, -5.23760e-01, 6.87057e-04, 1.38862e-07, 3.61130e-11;
+0.00000e+00, 0.00000e+00, 5.57129e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, 4.28832e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-4.01650e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN100; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN100_H1_17.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN100_H1_17.mo new file mode 100644 index 0000000000..9f917ddd18 --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN100_H1_17.mo @@ -0,0 +1,98 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN100_H1_17 "Pump with head 1 to 17m and 136.48m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 19.28, 0.928; + 4.71, 19.26, 0.910; + 9.41, 19.21, 0.852; + 14.12, 19.13, 0.776; + 18.82, 19.02, 0.657; + 23.53, 18.89, 0.517; + 28.24, 18.62, 0.350; + 32.94, 18.36, 0.000; + 37.65, 17.94, 0.000; + 42.35, 17.33, 0.000; + 47.06, 16.81, 0.000; + 51.77, 16.53, 0.000; + 56.47, 16.18, 0.000; + 61.18, 15.77, 0.000; + 65.89, 15.24, 0.000; + 70.59, 14.66, 0.000; + 75.30, 14.10, 0.000; + 80.00, 13.57, 0.000; + 84.71, 12.98, 0.000; + 89.42, 12.33, 0.000; + 94.12, 11.71, 0.000; + 98.83, 11.03, 0.000; + 103.53, 10.32, 0.000; + 108.24, 9.58, 0.000; + 112.95, 8.84, 0.000; + 117.65, 8.15, 0.000; + 122.36, 7.43, 0.000; + 127.06, 6.66, 0.000; + 131.77, 5.85, 0.000; + 136.48, 5.04, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 2300, 500; + 4.71, 2300, 500; + 9.41, 2300, 500; + 14.12, 2300, 500; + 18.82, 2300, 500; + 23.53, 2300, 500; + 28.24, 2300, 500; + 32.94, 2300, 500; + 37.65, 2300, 500; + 42.35, 2300, 500; + 47.06, 2300, 500; + 51.77, 2300, 500; + 56.47, 2300, 500; + 61.18, 2300, 500; + 65.89, 2300, 500; + 70.59, 2300, 500; + 75.30, 2300, 500; + 80.00, 2300, 500; + 84.71, 2300, 500; + 89.42, 2300, 500; + 94.12, 2300, 500; + 98.83, 2300, 500; + 103.53, 2300, 500; + 108.24, 2300, 500; + 112.95, 2300, 500; + 117.65, 2300, 500; + 122.36, 2300, 500; + 127.06, 2300, 500; + 131.77, 2300, 500; + 136.48, 2300, 500] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=500.0, + nMax=2300.0, + cHQN=[ 0.00000e+00, 0.00000e+00, 3.71921e-06; + 0.00000e+00, -1.14576e-05, 0.00000e+00; + -5.96302e-04, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[-5.72417e+01, 3.87631e-01, -4.56731e-04, 4.16084e-07, -4.47479e-11; + 0.00000e+00, 0.00000e+00, 3.80500e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, 7.20835e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -1.79833e-03, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 100 mm, pump head range between 1 m and 17 m and maximum volume flow rate of 136.48 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN100_H1_17.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 3.71921e-06;
+0.00000e+00, -1.14576e-05, 0.00000e+00;
+-5.96302e-04, 0.00000e+00, 0.00000e+00
+cPQN:
+-5.72417e+01, 3.87631e-01, -4.56731e-04, 4.16084e-07, -4.47479e-11;
+0.00000e+00, 0.00000e+00, 3.80500e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, 7.20835e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-1.79833e-03, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN100_H1_17; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN200.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN200.mo new file mode 100644 index 0000000000..d5492539b0 --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN200.mo @@ -0,0 +1,98 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN200 "Pump with head 1 to 18m and 590m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 18.03, 1.181; + 20.34, 17.64, 1.120; + 40.69, 17.38, 1.098; + 61.03, 17.31, 1.043; + 81.38, 17.24, 0.945; + 101.72, 17.11, 0.867; + 122.06, 16.98, 0.697; + 142.41, 16.85, 0.474; + 162.75, 16.73, 0.000; + 183.09, 16.62, 0.000; + 203.44, 16.49, 0.000; + 223.78, 16.15, 0.000; + 244.13, 15.76, 0.000; + 264.47, 15.33, 0.000; + 284.81, 15.02, 0.000; + 305.16, 14.59, 0.000; + 325.50, 14.29, 0.000; + 345.84, 14.13, 0.000; + 366.19, 13.97, 0.000; + 386.53, 13.74, 0.000; + 406.88, 13.19, 0.000; + 427.22, 12.58, 0.000; + 447.56, 11.87, 0.000; + 467.91, 11.06, 0.000; + 488.25, 10.22, 0.000; + 508.59, 9.37, 0.000; + 528.94, 8.49, 0.000; + 549.28, 7.53, 0.000; + 569.63, 6.60, 0.000; + 589.97, 5.58, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 1484, 378; + 20.34, 1482, 378; + 40.69, 1483, 379; + 61.03, 1483, 378; + 81.38, 1482, 378; + 101.72, 1484, 378; + 122.06, 1484, 378; + 142.41, 1484, 378; + 162.75, 1484, 378; + 183.09, 1484, 378; + 203.44, 1484, 378; + 223.78, 1484, 378; + 244.13, 1483, 378; + 264.47, 1484, 378; + 284.81, 1484, 378; + 305.16, 1483, 378; + 325.50, 1484, 378; + 345.84, 1484, 378; + 366.19, 1484, 378; + 386.53, 1484, 378; + 406.88, 1483, 378; + 427.22, 1484, 378; + 447.56, 1484, 378; + 467.91, 1484, 378; + 488.25, 1483, 378; + 508.59, 1483, 378; + 528.94, 1484, 378; + 549.28, 1484, 378; + 569.63, 1483, 378; + 589.97, 1484, 378] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=378.0, + nMax=1484.0, + cHQN=[ 0.00000e+00, 0.00000e+00, 7.85567e-06; + 0.00000e+00, 2.88600e-06, 0.00000e+00; + -3.91145e-05, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[ 6.03247e+02, -2.72597e+00, 5.95903e-03, 3.44847e-07, 1.24204e-09; + 0.00000e+00, 0.00000e+00, -1.25130e-05, 0.00000e+00, 0.00000e+00; + 0.00000e+00, 1.13673e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -1.95620e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 200 mm, pump head range between 1 m and 18 m and maximum volume flow rate of 590 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN200.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 7.85567e-06;
+0.00000e+00, 2.88600e-06, 0.00000e+00;
+-3.91145e-05, 0.00000e+00, 0.00000e+00
+cPQN:
+6.03247e+02, -2.72597e+00, 5.95903e-03, 3.44847e-07, 1.24204e-09;
+0.00000e+00, 0.00000e+00, -1.25130e-05, 0.00000e+00, 0.00000e+00;
+0.00000e+00, 1.13673e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-1.95620e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN200; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN25_H1_4_V3.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN25_H1_4_V3.mo new file mode 100644 index 0000000000..0d05852f37 --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN25_H1_4_V3.mo @@ -0,0 +1,98 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN25_H1_4_V3 "Pump with head 1 to 4m and 3.17m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 0.49, 4.098; + 0.11, 0.48, 3.924; + 0.22, 0.48, 3.751; + 0.33, 0.48, 3.555; + 0.44, 0.46, 3.354; + 0.55, 0.45, 3.158; + 0.65, 0.43, 2.966; + 0.76, 0.41, 2.788; + 0.87, 0.37, 2.621; + 0.98, 0.34, 2.477; + 1.09, 0.30, 2.351; + 1.20, 0.26, 2.224; + 1.31, 0.21, 2.097; + 1.42, 0.16, 1.975; + 1.53, 0.11, 1.864; + 1.64, 0.06, 1.749; + 1.75, 0.02, 1.626; + 1.86, 0.00, 1.504; + 1.96, 0.00, 1.389; + 2.07, 0.00, 1.274; + 2.18, 0.00, 1.158; + 2.29, 0.00, 1.044; + 2.40, 0.00, 0.940; + 2.51, 0.00, 0.837; + 2.62, 0.00, 0.736; + 2.73, 0.00, 0.635; + 2.84, 0.00, 0.547; + 2.95, 0.00, 0.459; + 3.06, 0.00, 0.367; + 3.17, 0.00, 0.275] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 1200, 3494; + 0.11, 1200, 3418; + 0.22, 1200, 3343; + 0.33, 1200, 3251; + 0.44, 1200, 3153; + 0.55, 1200, 3065; + 0.65, 1200, 2981; + 0.76, 1200, 2905; + 0.87, 1200, 2834; + 0.98, 1200, 2772; + 1.09, 1200, 2717; + 1.20, 1200, 2665; + 1.31, 1200, 2616; + 1.42, 1200, 2572; + 1.53, 1200, 2542; + 1.64, 1200, 2510; + 1.75, 1200, 2474; + 1.86, 1200, 2441; + 1.96, 1200, 2420; + 2.07, 1200, 2399; + 2.18, 1200, 2376; + 2.29, 1200, 2354; + 2.40, 1200, 2347; + 2.51, 1200, 2340; + 2.62, 1200, 2335; + 2.73, 1200, 2330; + 2.84, 1200, 2334; + 2.95, 1200, 2339; + 3.06, 1200, 2340; + 3.17, 1200, 2340] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=1200, + nMax=3495, + cHQN=[ 0.00000e+00, 0.00000e+00, 3.36913e-07; + 0.00000e+00, 2.26535e-05, 0.00000e+00; + -1.76844e-01, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[ 2.49482e+00, -1.23598e-03, 1.90957e-06, -2.79676e-10, 5.88841e-14; + 0.00000e+00, 0.00000e+00, 1.10231e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, -4.20700e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -2.26424e-01, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 25 mm, pump head range between 1 m and 4 m and maximum volume flow rate of 3.17 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN25_H1_4_V3.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 3.36913e-07;
+0.00000e+00, 2.26535e-05, 0.00000e+00;
+-1.76844e-01, 0.00000e+00, 0.00000e+00
+cPQN:
+2.49482e+00, -1.23598e-03, 1.90957e-06, -2.79676e-10, 5.88841e-14;
+0.00000e+00, 0.00000e+00, 1.10231e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, -4.20700e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-2.26424e-01, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN25_H1_4_V3; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN25_H1_6_V4.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN25_H1_6_V4.mo new file mode 100644 index 0000000000..33655d5b2c --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN25_H1_6_V4.mo @@ -0,0 +1,73 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN25_H1_6_V4 "Pump with head 1 to 6m and 4.25m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 5.90, 0.466; + 0.25, 5.90, 0.466; + 0.50, 5.90, 0.440; + 0.75, 5.43, 0.391; + 1.00, 4.73, 0.320; + 1.25, 4.27, 0.226; + 1.50, 3.94, 0.109; + 1.75, 3.47, 0.000; + 2.00, 3.19, 0.000; + 2.25, 2.79, 0.000; + 2.50, 2.45, 0.000; + 2.75, 2.14, 0.000; + 3.00, 1.81, 0.000; + 3.25, 1.50, 0.000; + 3.50, 1.20, 0.000; + 3.75, 0.87, 0.000; + 4.00, 0.53, 0.000; + 4.25, 0.21, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 4250, 1200; + 0.25, 4250, 1200; + 0.50, 4250, 1200; + 0.75, 4089, 1200; + 1.00, 3843, 1200; + 1.25, 3688, 1200; + 1.50, 3591, 1200; + 1.75, 3444, 1200; + 2.00, 3387, 1200; + 2.25, 3283, 1200; + 2.50, 3214, 1200; + 2.75, 3173, 1200; + 3.00, 3128, 1200; + 3.25, 3110, 1200; + 3.50, 3104, 1200; + 3.75, 3090, 1200; + 4.00, 3090, 1200; + 4.25, 3104, 1200] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=1200.0, + nMax=4250.0, + cHQN=[ 0.00000e+00, 0.00000e+00, 3.25798e-07; + 0.00000e+00, 2.73726e-05, 0.00000e+00; + -1.82165e-01, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[ 2.60353e-05, 1.85264e-03, -5.34076e-07, 5.03223e-10, -2.76211e-14; + 0.00000e+00, 0.00000e+00, 1.18994e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, -8.47293e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -2.25479e-01, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 25 mm, pump head range between 1 m and 6 m and maximum volume flow rate of 4.25m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN25_H1_6_V4.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 3.25798e-07;
+0.00000e+00, 2.73726e-05, 0.00000e+00;
+-1.82165e-01, 0.00000e+00, 0.00000e+00
+cPQN:
+2.60353e-05, 1.85264e-03, -5.34076e-07, 5.03223e-10, -2.76211e-14;
+0.00000e+00, 0.00000e+00, 1.18994e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, -8.47293e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-2.25479e-01, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN25_H1_6_V4; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN25_H1_6_V8.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN25_H1_6_V8.mo new file mode 100644 index 0000000000..70592562d2 --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN25_H1_6_V8.mo @@ -0,0 +1,99 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN25_H1_6_V8 + "Pump with head 1 to 6m and 8.87m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 7.53, 1.123; + 0.31, 7.59, 1.139; + 0.61, 7.62, 1.144; + 0.92, 7.65, 1.144; + 1.22, 7.65, 1.133; + 1.53, 7.66, 1.095; + 1.84, 7.65, 1.031; + 2.14, 7.64, 0.953; + 2.45, 7.64, 0.862; + 2.75, 7.64, 0.758; + 3.06, 7.44, 0.623; + 3.37, 7.02, 0.483; + 3.67, 6.62, 0.306; + 3.98, 6.31, 0.000; + 4.28, 5.82, 0.000; + 4.59, 5.38, 0.000; + 4.90, 5.15, 0.000; + 5.20, 4.74, 0.000; + 5.51, 4.43, 0.000; + 5.81, 4.02, 0.000; + 6.12, 3.70, 0.000; + 6.43, 3.40, 0.000; + 6.73, 3.06, 0.000; + 7.04, 2.60, 0.000; + 7.34, 2.30, 0.000; + 7.65, 1.92, 0.000; + 7.96, 1.58, 0.000; + 8.26, 1.28, 0.000; + 8.57, 0.93, 0.000; + 8.87, 0.54, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 3700, 1400; + 0.31, 3700, 1400; + 0.61, 3700, 1400; + 0.92, 3700, 1400; + 1.22, 3700, 1400; + 1.53, 3700, 1400; + 1.84, 3700, 1400; + 2.14, 3700, 1400; + 2.45, 3700, 1400; + 2.75, 3699, 1400; + 3.06, 3658, 1400; + 3.37, 3570, 1400; + 3.67, 3489, 1400; + 3.98, 3438, 1400; + 4.28, 3366, 1400; + 4.59, 3305, 1400; + 4.90, 3277, 1400; + 5.20, 3231, 1400; + 5.51, 3201, 1400; + 5.81, 3168, 1400; + 6.12, 3152, 1400; + 6.43, 3137, 1400; + 6.73, 3126, 1400; + 7.04, 3112, 1400; + 7.34, 3110, 1400; + 7.65, 3103, 1400; + 7.96, 3094, 1400; + 8.26, 3101, 1400; + 8.57, 3103, 1400; + 8.87, 3100, 1400] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=1400.0, + nMax=3700.0, + cHQN=[ 0.00000e+00, 0.00000e+00, 5.42547e-07; + 0.00000e+00, 9.73525e-05, 0.00000e+00; + -9.44653e-02, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[ 1.85342e-05, 1.14960e-02, -9.47363e-06, 4.22744e-09, -3.82959e-13; + 0.00000e+00, 0.00000e+00, 1.53784e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, 1.22375e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -1.07729e-01, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 25 mm, pump head range between 1 m and 6 m and maximum volume flow rate of 8.87 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN25_H1_6_V8.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 5.42547e-07;
+0.00000e+00, 9.73525e-05, 0.00000e+00;
+-9.44653e-02, 0.00000e+00, 0.00000e+00
+cPQN:
+1.85342e-05, 1.14960e-02, -9.47363e-06, 4.22744e-09, -3.82959e-13;
+0.00000e+00, 0.00000e+00, 1.53784e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, 1.22375e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-1.07729e-01, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN25_H1_6_V8; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN25_H1_8_V9.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN25_H1_8_V9.mo new file mode 100644 index 0000000000..d61be7431b --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN25_H1_8_V9.mo @@ -0,0 +1,99 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN25_H1_8_V9 + "Pump with head 1 to 8m and 9m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 7.52, 1.122; + 0.31, 7.59, 1.142; + 0.62, 7.61, 1.142; + 0.93, 7.64, 1.142; + 1.24, 7.64, 1.132; + 1.55, 7.65, 1.084; + 1.86, 7.64, 1.028; + 2.17, 7.63, 0.931; + 2.49, 7.63, 0.845; + 2.80, 7.65, 0.755; + 3.11, 7.34, 0.603; + 3.42, 6.94, 0.389; + 3.73, 6.55, 0.228; + 4.04, 6.22, 0.173; + 4.35, 5.74, 0.173; + 4.66, 5.36, 0.173; + 4.97, 5.14, 0.173; + 5.28, 4.68, 0.173; + 5.59, 4.22, 0.173; + 5.90, 3.94, 0.173; + 6.21, 3.59, 0.173; + 6.52, 3.37, 0.173; + 6.84, 2.81, 0.173; + 7.15, 2.61, 0.173; + 7.46, 2.19, 0.173; + 7.77, 1.81, 0.173; + 8.08, 1.47, 0.173; + 8.39, 1.35, 0.173; + 8.70, 0.74, 0.173; + 9.01, 0.52, 0.173] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 3700, 1400; + 0.31, 3700, 1400; + 0.62, 3700, 1400; + 0.93, 3700, 1400; + 1.24, 3700, 1400; + 1.55, 3700, 1400; + 1.86, 3700, 1400; + 2.17, 3700, 1400; + 2.49, 3700, 1400; + 2.80, 3697, 1400; + 3.11, 3645, 1400; + 3.42, 3554, 1400; + 3.73, 3484, 1400; + 4.04, 3424, 1400; + 4.35, 3351, 1400; + 4.66, 3308, 1400; + 4.97, 3276, 1400; + 5.28, 3227, 1400; + 5.59, 3180, 1400; + 5.90, 3162, 1400; + 6.21, 3150, 1400; + 6.52, 3132, 1400; + 6.84, 3121, 1400; + 7.15, 3111, 1400; + 7.46, 3109, 1400; + 7.77, 3096, 1400; + 8.08, 3097, 1400; + 8.39, 3106, 1400; + 8.70, 3101, 1400; + 9.01, 3116, 1400] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=1400.0, + nMax=3700.0, + cHQN=[ 0.00000e+00, 0.00000e+00, 5.42119e-07; + 0.00000e+00, 9.63893e-05, 0.00000e+00; + -9.40049e-02, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[ 1.86404e-05, 1.15429e-02, -9.54392e-06, 4.26061e-09, -3.87948e-13; + 0.00000e+00, 0.00000e+00, 1.54239e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, 1.16734e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -1.06179e-01, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 25 mm, pump head range between 1 m and 8 m and maximum volume flow rate of 9 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN25_H1_8_V9.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 5.42119e-07;
+0.00000e+00, 9.63893e-05, 0.00000e+00;
+-9.40049e-02, 0.00000e+00, 0.00000e+00
+cPQN:
+1.86404e-05, 1.15429e-02, -9.54392e-06, 4.26061e-09, -3.87948e-13;
+0.00000e+00, 0.00000e+00, 1.54239e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, 1.16734e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-1.06179e-01, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN25_H1_8_V9; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN30_H1_12_V13.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN30_H1_12_V13.mo new file mode 100644 index 0000000000..6b546faef7 --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN30_H1_12_V13.mo @@ -0,0 +1,99 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN30_H1_12_V13 + "Pump with head 1 to 12m and 13.5m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 11.52, 0.979; + 0.47, 11.64, 0.999; + 0.93, 11.72, 1.010; + 1.40, 11.77, 1.004; + 1.86, 11.85, 0.959; + 2.33, 11.99, 0.897; + 2.79, 12.06, 0.780; + 3.26, 12.13, 0.642; + 3.72, 12.18, 0.409; + 4.19, 12.14, 0.197; + 4.65, 12.03, 0.000; + 5.12, 11.63, 0.000; + 5.58, 10.89, 0.000; + 6.05, 10.44, 0.000; + 6.51, 9.86, 0.000; + 6.98, 9.26, 0.000; + 7.44, 8.91, 0.000; + 7.91, 8.31, 0.000; + 8.37, 7.70, 0.000; + 8.84, 7.19, 0.000; + 9.30, 6.55, 0.000; + 9.77, 6.01, 0.000; + 10.23, 5.31, 0.000; + 10.70, 4.92, 0.000; + 11.16, 4.11, 0.000; + 11.63, 3.47, 0.000; + 12.09, 3.21, 0.000; + 12.56, 2.38, 0.000; + 13.02, 1.65, 0.000; + 13.49, 1.18, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 4800, 1400; + 0.47, 4800, 1400; + 0.93, 4800, 1400; + 1.40, 4800, 1400; + 1.86, 4800, 1400; + 2.33, 4800, 1400; + 2.79, 4800, 1400; + 3.26, 4800, 1400; + 3.72, 4800, 1400; + 4.19, 4800, 1400; + 4.65, 4799, 1400; + 5.12, 4744, 1400; + 5.58, 4629, 1400; + 6.05, 4573, 1400; + 6.51, 4502, 1400; + 6.98, 4414, 1400; + 7.44, 4396, 1400; + 7.91, 4343, 1400; + 8.37, 4318, 1400; + 8.84, 4294, 1400; + 9.30, 4274, 1400; + 9.77, 4257, 1400; + 10.23, 4245, 1400; + 10.70, 4239, 1400; + 11.16, 4235, 1400; + 11.63, 4227, 1400; + 12.09, 4228, 1400; + 12.56, 4250, 1400; + 13.02, 4269, 1400; + 13.49, 4282, 1400] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=1400.0, + nMax=4800.0, + cHQN=[ 0.00000e+00, 0.00000e+00, 4.88348e-07; + 0.00000e+00, 1.15190e-04, 0.00000e+00; + -8.00446e-02, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[ 2.53904e-05, 1.86083e-02, -9.28813e-06, 3.15573e-09, -1.57051e-13; + 0.00000e+00, 0.00000e+00, 1.43568e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, 1.16467e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -9.73911e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 30 mm, pump head range between 1 m and 12 m and maximum volume flow rate of 13.5 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN30_H1_12_V13.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 4.88348e-07;
+0.00000e+00, 1.15190e-04, 0.00000e+00;
+-8.00446e-02, 0.00000e+00, 0.00000e+00
+cPQN:
+2.53904e-05, 1.86083e-02, -9.28813e-06, 3.15573e-09, -1.57051e-13;
+0.00000e+00, 0.00000e+00, 1.43568e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, 1.16467e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-9.73911e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN30_H1_12_V13; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN32.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN32.mo new file mode 100644 index 0000000000..9cf9149c0b --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN32.mo @@ -0,0 +1,98 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN32 "Pump with head 1 to 24m and 22.34m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 24.27, 1.470; + 0.77, 24.24, 1.470; + 1.54, 24.28, 1.457; + 2.31, 24.35, 1.387; + 3.08, 24.35, 1.194; + 3.85, 24.27, 1.000; + 4.62, 24.15, 0.723; + 5.39, 23.89, 0.369; + 6.16, 23.63, 0.000; + 6.93, 23.30, 0.000; + 7.70, 22.87, 0.000; + 8.47, 22.37, 0.000; + 9.24, 21.87, 0.000; + 10.01, 21.31, 0.000; + 10.78, 20.70, 0.000; + 11.56, 19.97, 0.000; + 12.33, 19.24, 0.000; + 13.10, 18.45, 0.000; + 13.87, 17.61, 0.000; + 14.64, 16.75, 0.000; + 15.41, 15.82, 0.000; + 16.18, 14.87, 0.000; + 16.95, 13.78, 0.000; + 17.72, 12.71, 0.000; + 18.49, 11.64, 0.000; + 19.26, 10.46, 0.000; + 20.03, 9.20, 0.000; + 20.80, 7.86, 0.000; + 21.57, 6.55, 0.000; + 22.34, 4.98, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 2913, 760; + 0.77, 2912, 760; + 1.54, 2911, 760; + 2.31, 2911, 761; + 3.08, 2911, 761; + 3.85, 2912, 761; + 4.62, 2912, 762; + 5.39, 2912, 762; + 6.16, 2912, 762; + 6.93, 2913, 762; + 7.70, 2914, 762; + 8.47, 2913, 762; + 9.24, 2912, 762; + 10.01, 2911, 762; + 10.78, 2911, 762; + 11.56, 2911, 762; + 12.33, 2911, 762; + 13.10, 2911, 762; + 13.87, 2911, 762; + 14.64, 2911, 762; + 15.41, 2911, 762; + 16.18, 2911, 762; + 16.95, 2910, 762; + 17.72, 2910, 762; + 18.49, 2911, 762; + 19.26, 2912, 762; + 20.03, 2911, 762; + 20.80, 2913, 762; + 21.57, 2913, 762; + 22.34, 2917, 762] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=760.0, + nMax=2920.0, + cHQN=[ 0.00000e+00, 0.00000e+00, 2.84006e-06; + 0.00000e+00, 6.77095e-05, 0.00000e+00; + -4.75300e-02, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[ 5.15586e-01, 1.69173e-01, -1.41779e-04, 8.36830e-08, -8.50026e-12; + 0.00000e+00, 0.00000e+00, 8.11074e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, -9.51449e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -3.06692e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 32 mm, pump head range between 1 m and 24 m and maximum volume flow rate of 22.23 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN32.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 2.84006e-06;
+0.00000e+00, 6.77095e-05, 0.00000e+00;
+-4.75300e-02, 0.00000e+00, 0.00000e+00
+cPQN:
+5.15586e-01, 1.69173e-01, -1.41779e-04, 8.36830e-08, -8.50026e-12;
+0.00000e+00, 0.00000e+00, 8.11074e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, -9.51449e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-3.06692e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN32; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN40.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN40.mo new file mode 100644 index 0000000000..e1e8658ab4 --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN40.mo @@ -0,0 +1,98 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN40 "Pump with head 1 to 12m and 21m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 11.89, 0.789; + 0.73, 11.88, 0.773; + 1.45, 11.88, 0.754; + 2.18, 11.90, 0.702; + 2.91, 11.91, 0.625; + 3.63, 11.91, 0.528; + 4.36, 11.88, 0.416; + 5.09, 11.79, 0.271; + 5.81, 11.69, 0.000; + 6.54, 11.53, 0.000; + 7.27, 11.30, 0.000; + 7.99, 11.07, 0.000; + 8.72, 10.78, 0.000; + 9.45, 10.44, 0.000; + 10.17, 10.11, 0.000; + 10.90, 9.80, 0.000; + 11.63, 9.45, 0.000; + 12.35, 9.09, 0.000; + 13.08, 8.63, 0.000; + 13.81, 8.17, 0.000; + 14.53, 7.69, 0.000; + 15.26, 7.19, 0.000; + 15.99, 6.66, 0.000; + 16.71, 6.12, 0.000; + 17.44, 5.57, 0.000; + 18.17, 5.01, 0.000; + 18.89, 4.41, 0.000; + 19.62, 3.78, 0.000; + 20.35, 3.16, 0.000; + 21.08, 2.55, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 2933, 768; + 0.73, 2931, 767; + 1.45, 2930, 767; + 2.18, 2929, 766; + 2.91, 2929, 767; + 3.63, 2928, 766; + 4.36, 2928, 766; + 5.09, 2927, 766; + 5.81, 2927, 766; + 6.54, 2927, 766; + 7.27, 2926, 766; + 7.99, 2926, 766; + 8.72, 2925, 766; + 9.45, 2924, 766; + 10.17, 2923, 766; + 10.90, 2922, 766; + 11.63, 2922, 766; + 12.35, 2922, 766; + 13.08, 2915, 766; + 13.81, 2908, 766; + 14.53, 2899, 766; + 15.26, 2887, 766; + 15.99, 2883, 766; + 16.71, 2884, 766; + 17.44, 2884, 766; + 18.17, 2885, 766; + 18.89, 2885, 766; + 19.62, 2886, 766; + 20.35, 2887, 766; + 21.08, 2889, 766] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=765.0, + nMax=2930.0, + cHQN=[ 0.00000e+00, 0.00000e+00, 1.38228e-06; + 0.00000e+00, 2.99931e-05, 0.00000e+00; + -2.43139e-02, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[ 7.76957e+00, 7.17032e-02, -5.12390e-05, 3.36215e-08, -3.02196e-12; + 0.00000e+00, 0.00000e+00, 4.75172e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, -2.61724e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -9.99727e-03, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 40 mm, pump head range between 1 m and 12 m and maximum volume flow rate of 21 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN40.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 1.38228e-06;
+0.00000e+00, 2.99931e-05, 0.00000e+00;
+-2.43139e-02, 0.00000e+00, 0.00000e+00
+cPQN:
+7.76957e+00, 7.17032e-02, -5.12390e-05, 3.36215e-08, -3.02196e-12;
+0.00000e+00, 0.00000e+00, 4.75172e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, -2.61724e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-9.99727e-03, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN40; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN40_H10.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN40_H10.mo new file mode 100644 index 0000000000..4008c4727d --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN40_H10.mo @@ -0,0 +1,98 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN40_H10 "Pump with head 10m and 21m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 9.71, 7.841; + 0.73, 9.74, 7.652; + 1.45, 9.74, 7.467; + 2.18, 9.68, 7.283; + 2.90, 9.60, 7.071; + 3.63, 9.51, 6.823; + 4.36, 9.42, 6.542; + 5.08, 9.34, 6.246; + 5.81, 9.21, 5.933; + 6.53, 9.08, 5.618; + 7.26, 8.93, 5.329; + 7.99, 8.76, 5.033; + 8.71, 8.58, 4.699; + 9.44, 8.38, 4.370; + 10.16, 8.16, 4.052; + 10.89, 7.90, 3.716; + 11.62, 7.62, 3.380; + 12.34, 7.32, 3.045; + 13.07, 6.99, 2.708; + 13.80, 6.64, 2.370; + 14.52, 6.29, 2.034; + 15.25, 5.92, 1.699; + 15.97, 5.51, 0.000; + 16.70, 5.09, 0.000; + 17.43, 4.65, 0.000; + 18.15, 4.23, 0.000; + 18.88, 3.88, 0.000; + 19.60, 3.44, 0.000; + 20.33, 2.96, 0.000; + 21.06, 2.46, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 2901, 2604; + 0.73, 2892, 2570; + 1.45, 2884, 2534; + 2.18, 2876, 2495; + 2.90, 2867, 2458; + 3.63, 2860, 2420; + 4.36, 2853, 2376; + 5.08, 2842, 2330; + 5.81, 2832, 2286; + 6.53, 2823, 2246; + 7.26, 2815, 2211; + 7.99, 2805, 2181; + 8.71, 2798, 2154; + 9.44, 2790, 2129; + 10.16, 2782, 2109; + 10.89, 2776, 2089; + 11.62, 2770, 2075; + 12.34, 2764, 2066; + 13.07, 2757, 2062; + 13.80, 2753, 2061; + 14.52, 2749, 2062; + 15.25, 2745, 2063; + 15.97, 2740, 2064; + 16.70, 2739, 2064; + 17.43, 2738, 2064; + 18.15, 2736, 2064; + 18.88, 2738, 2064; + 19.60, 2739, 2064; + 20.33, 2739, 2064; + 21.06, 2742, 2064] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=2061, + nMax=2901, + cHQN=[ 0.00000e+00, 0.00000e+00, 1.14499e-06; + 0.00000e+00, 4.66276e-05, 0.00000e+00; + -1.99893e-02, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[-6.16143e-03, -3.78851e+00, 4.98972e-03, -2.11796e-06, 2.96335e-10; + 0.00000e+00, 0.00000e+00, 3.30189e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, 2.03751e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -4.40060e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 40 mm, pump head 10 m and maximum volume flow rate of 21 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/WetRunner_Solar_40_10.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 1.14499e-06;
+0.00000e+00, 4.66276e-05, 0.00000e+00;
+-1.99893e-02, 0.00000e+00, 0.00000e+00
+cPQN:
+-6.16143e-03, -3.78851e+00, 4.98972e-03, -2.11796e-06, 2.96335e-10;
+0.00000e+00, 0.00000e+00, 3.30189e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, 2.03751e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-4.40060e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN40_H10; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN40_H1_12_V24.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN40_H1_12_V24.mo new file mode 100644 index 0000000000..66708613c1 --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN40_H1_12_V24.mo @@ -0,0 +1,98 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN40_H1_12_V24 "Pump with head 1 to 12m and 24m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 12.39, 1.142; + 0.83, 12.49, 1.179; + 1.65, 12.54, 1.183; + 2.48, 12.70, 1.175; + 3.31, 12.82, 1.165; + 4.13, 12.83, 1.086; + 4.96, 12.86, 0.958; + 5.79, 12.79, 0.795; + 6.61, 12.83, 0.616; + 7.44, 12.81, 0.418; + 8.27, 12.79, 0.000; + 9.09, 12.74, 0.000; + 9.92, 12.70, 0.000; + 10.75, 12.29, 0.000; + 11.57, 11.67, 0.000; + 12.40, 11.08, 0.000; + 13.23, 10.51, 0.000; + 14.05, 9.91, 0.000; + 14.88, 9.41, 0.000; + 15.71, 8.59, 0.000; + 16.53, 7.90, 0.000; + 17.36, 7.47, 0.000; + 18.19, 7.08, 0.000; + 19.01, 6.50, 0.000; + 19.84, 5.68, 0.000; + 20.67, 5.06, 0.000; + 21.49, 4.58, 0.000; + 22.32, 3.91, 0.000; + 23.15, 3.44, 0.000; + 23.97, 2.78, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 4600, 1400; + 0.83, 4600, 1400; + 1.65, 4600, 1400; + 2.48, 4600, 1400; + 3.31, 4600, 1400; + 4.13, 4600, 1400; + 4.96, 4600, 1400; + 5.79, 4600, 1400; + 6.61, 4600, 1400; + 7.44, 4600, 1400; + 8.27, 4600, 1400; + 9.09, 4600, 1400; + 9.92, 4597, 1400; + 10.75, 4547, 1400; + 11.57, 4471, 1400; + 12.40, 4409, 1400; + 13.23, 4361, 1400; + 14.05, 4326, 1400; + 14.88, 4303, 1400; + 15.71, 4266, 1400; + 16.53, 4234, 1400; + 17.36, 4222, 1400; + 18.19, 4207, 1400; + 19.01, 4188, 1400; + 19.84, 4185, 1400; + 20.67, 4188, 1400; + 21.49, 4193, 1400; + 22.32, 4198, 1400; + 23.15, 4204, 1400; + 23.97, 4204, 1400] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=1400.0, + nMax=4600.0, + cHQN=[ 0.00000e+00, 0.00000e+00, 5.73723e-07; + 0.00000e+00, 6.28260e-05, 0.00000e+00; + -2.41203e-02, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[ 1.88139e-05, 1.23610e-02, 4.55839e-07, 1.72215e-09, 1.78291e-13; + 0.00000e+00, 0.00000e+00, 1.09900e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, 1.89239e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -4.07739e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 40 mm, pump head range between 1 m and 12 m and maximum volume flow rate of 24 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN40_H1_12_V24.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 5.73723e-07;
+0.00000e+00, 6.28260e-05, 0.00000e+00;
+-2.41203e-02, 0.00000e+00, 0.00000e+00
+cPQN:
+1.88139e-05, 1.23610e-02, 4.55839e-07, 1.72215e-09, 1.78291e-13;
+0.00000e+00, 0.00000e+00, 1.09900e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, 1.89239e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-4.07739e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN40_H1_12_V24; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN40_H1_16_V29.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN40_H1_16_V29.mo new file mode 100644 index 0000000000..f55e47edcb --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN40_H1_16_V29.mo @@ -0,0 +1,98 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN40_H1_16_V29 "Pump with head 1 to 16m and 28.9m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 17.21, 1.244; + 1.00, 17.31, 1.264; + 1.99, 17.33, 1.264; + 2.99, 17.23, 1.274; + 3.99, 17.30, 1.252; + 4.98, 16.92, 1.208; + 5.98, 16.26, 1.130; + 6.98, 15.48, 1.006; + 7.97, 14.73, 0.877; + 8.97, 13.97, 0.738; + 9.97, 13.33, 0.530; + 10.96, 12.80, 0.000; + 11.96, 12.12, 0.000; + 12.96, 11.53, 0.000; + 13.95, 10.89, 0.000; + 14.95, 10.35, 0.000; + 15.95, 9.92, 0.000; + 16.94, 9.40, 0.000; + 17.94, 8.95, 0.000; + 18.94, 8.68, 0.000; + 19.93, 8.09, 0.000; + 20.93, 7.74, 0.000; + 21.93, 7.43, 0.000; + 22.92, 6.88, 0.000; + 23.92, 6.46, 0.000; + 24.92, 5.97, 0.000; + 25.91, 5.43, 0.000; + 26.91, 4.88, 0.000; + 27.91, 4.34, 0.000; + 28.90, 3.97, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 3500, 950; + 1.00, 3500, 950; + 1.99, 3500, 950; + 2.99, 3500, 950; + 3.99, 3500, 950; + 4.98, 3465, 950; + 5.98, 3401, 950; + 6.98, 3313, 950; + 7.97, 3219, 950; + 8.97, 3143, 950; + 9.97, 3052, 950; + 10.96, 2997, 950; + 11.96, 2928, 950; + 12.96, 2864, 950; + 13.95, 2821, 950; + 14.95, 2755, 950; + 15.95, 2738, 950; + 16.94, 2720, 950; + 17.94, 2706, 950; + 18.94, 2687, 950; + 19.93, 2674, 950; + 20.93, 2665, 950; + 21.93, 2656, 950; + 22.92, 2652, 950; + 23.92, 2649, 950; + 24.92, 2644, 950; + 25.91, 2641, 950; + 26.91, 2635, 950; + 27.91, 2624, 950; + 28.90, 2615, 950] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=950.0, + nMax=3500.0, + cHQN=[ 0.00000e+00, 0.00000e+00, 1.37376e-06; + 0.00000e+00, 5.53270e-05, 0.00000e+00; + -1.16039e-02, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[-2.01304e+01, 7.18841e-02, -3.93834e-05, 2.34207e-08, -1.61762e-12; + 0.00000e+00, 0.00000e+00, 3.13936e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, 1.94557e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -2.08205e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 40 mm, pump head range between 1 m and 16 m and maximum volume flow rate of 28.9 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN40_H1_16_V29.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 1.37376e-06;
+0.00000e+00, 5.53270e-05, 0.00000e+00;
+-1.16039e-02, 0.00000e+00, 0.00000e+00
+cPQN:
+-2.01304e+01, 7.18841e-02, -3.93834e-05, 2.34207e-08, -1.61762e-12;
+0.00000e+00, 0.00000e+00, 3.13936e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, 1.94557e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-2.08205e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN40_H1_16_V29; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN40_H1_45.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN40_H1_45.mo new file mode 100644 index 0000000000..5885cb5aa0 --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN40_H1_45.mo @@ -0,0 +1,98 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN40_H1_45 "Pump with head 1 to 45m and 47.5m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 46.52, 0.498; + 1.64, 46.26, 0.473; + 3.28, 45.85, 0.367; + 4.91, 45.62, 0.144; + 6.55, 45.32, 0.000; + 8.19, 44.98, 0.000; + 9.83, 44.42, 0.000; + 11.47, 43.76, 0.000; + 13.10, 43.11, 0.000; + 14.74, 42.35, 0.000; + 16.38, 41.62, 0.000; + 18.02, 40.78, 0.000; + 19.66, 39.81, 0.000; + 21.29, 38.73, 0.000; + 22.93, 37.56, 0.000; + 24.57, 36.50, 0.000; + 26.21, 35.34, 0.000; + 27.84, 33.97, 0.000; + 29.48, 32.47, 0.000; + 31.12, 30.93, 0.000; + 32.76, 29.32, 0.000; + 34.40, 27.62, 0.000; + 36.03, 25.90, 0.000; + 37.67, 23.96, 0.000; + 39.31, 21.69, 0.000; + 40.95, 19.40, 0.000; + 42.59, 16.82, 0.000; + 44.22, 13.65, 0.000; + 45.86, 10.55, 0.000; + 47.50, 7.49, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 4850, 500; + 1.64, 4850, 500; + 3.28, 4850, 500; + 4.91, 4850, 500; + 6.55, 4850, 500; + 8.19, 4850, 500; + 9.83, 4850, 500; + 11.47, 4850, 500; + 13.10, 4850, 500; + 14.74, 4850, 500; + 16.38, 4850, 500; + 18.02, 4850, 500; + 19.66, 4850, 500; + 21.29, 4850, 500; + 22.93, 4850, 500; + 24.57, 4850, 500; + 26.21, 4850, 500; + 27.84, 4850, 500; + 29.48, 4850, 500; + 31.12, 4850, 500; + 32.76, 4850, 500; + 34.40, 4850, 500; + 36.03, 4850, 500; + 37.67, 4850, 500; + 39.31, 4850, 500; + 40.95, 4850, 500; + 42.59, 4850, 500; + 44.22, 4850, 500; + 45.86, 4850, 500; + 47.50, 4850, 500] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=500.0, + nMax=4850.0, + cHQN=[ 0.00000e+00, 0.00000e+00, 1.94791e-06; + 0.00000e+00, 8.44521e-06, 0.00000e+00; + -1.67798e-02, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[ 3.71377e+01, -1.28941e-02, 3.53022e-05, 2.55435e-09, 7.06236e-13; + 0.00000e+00, 0.00000e+00, 4.29325e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, -2.25316e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -1.71349e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 40 mm, pump head range between 1 m and 45 m and maximum volume flow rate of 47.5 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN40_H1_45.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 1.94791e-06;
+0.00000e+00, 8.44521e-06, 0.00000e+00;
+-1.67798e-02, 0.00000e+00, 0.00000e+00
+cPQN:
+3.71377e+01, -1.28941e-02, 3.53022e-05, 2.55435e-09, 7.06236e-13;
+0.00000e+00, 0.00000e+00, 4.29325e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, -2.25316e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-1.71349e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN40_H1_45; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN40_H1_8_V17.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN40_H1_8_V17.mo new file mode 100644 index 0000000000..50b0514104 --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN40_H1_8_V17.mo @@ -0,0 +1,98 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN40_H1_8_V17 "Pump with head 1 to 8m and 17.5m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 7.91, 0.683; + 0.60, 8.05, 0.704; + 1.21, 8.03, 0.713; + 1.81, 8.03, 0.710; + 2.41, 8.09, 0.704; + 3.01, 8.12, 0.686; + 3.62, 8.20, 0.594; + 4.22, 8.25, 0.491; + 4.82, 8.19, 0.372; + 5.43, 7.83, 0.183; + 6.03, 7.48, 0.000; + 6.63, 7.17, 0.000; + 7.24, 6.93, 0.000; + 7.84, 6.74, 0.000; + 8.44, 6.49, 0.000; + 9.04, 6.11, 0.000; + 9.65, 6.02, 0.000; + 10.25, 5.84, 0.000; + 10.85, 5.60, 0.000; + 11.46, 5.47, 0.000; + 12.06, 5.04, 0.000; + 12.66, 4.81, 0.000; + 13.27, 4.48, 0.000; + 13.87, 4.01, 0.000; + 14.47, 3.69, 0.000; + 15.07, 3.40, 0.000; + 15.68, 2.83, 0.000; + 16.28, 2.40, 0.000; + 16.88, 2.02, 0.000; + 17.49, 1.69, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 4800, 1400; + 0.60, 4800, 1400; + 1.21, 4800, 1400; + 1.81, 4800, 1400; + 2.41, 4800, 1400; + 3.01, 4800, 1400; + 3.62, 4800, 1400; + 4.22, 4800, 1400; + 4.82, 4755, 1400; + 5.43, 4631, 1400; + 6.03, 4548, 1400; + 6.63, 4458, 1400; + 7.24, 4372, 1400; + 7.84, 4313, 1400; + 8.44, 4251, 1400; + 9.04, 4205, 1400; + 9.65, 4209, 1400; + 10.25, 4212, 1400; + 10.85, 4216, 1400; + 11.46, 4225, 1400; + 12.06, 4228, 1400; + 12.66, 4232, 1400; + 13.27, 4213, 1400; + 13.87, 4213, 1400; + 14.47, 4189, 1400; + 15.07, 4181, 1400; + 15.68, 4184, 1400; + 16.28, 4192, 1400; + 16.88, 4207, 1400; + 17.49, 4215, 1400] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=1400.0, + nMax=4800.0, + cHQN=[ 0.00000e+00, 0.00000e+00, 3.27983e-07; + 0.00000e+00, 7.36465e-05, 0.00000e+00; + -3.14521e-02, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[ 2.33926e-05, 1.61643e-02, -8.64452e-06, 3.55112e-09, -1.90733e-13; + 0.00000e+00, 0.00000e+00, 7.43369e-07, 0.00000e+00, 0.00000e+00; + 0.00000e+00, 1.55677e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -4.84242e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 40 mm, pump head range between 1 m and 8 m and maximum volume flow rate of 17.5 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN40_H1_8_V17.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 3.27983e-07;
+0.00000e+00, 7.36465e-05, 0.00000e+00;
+-3.14521e-02, 0.00000e+00, 0.00000e+00
+cPQN:
+2.33926e-05, 1.61643e-02, -8.64452e-06, 3.55112e-09, -1.90733e-13;
+0.00000e+00, 0.00000e+00, 7.43369e-07, 0.00000e+00, 0.00000e+00;
+0.00000e+00, 1.55677e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-4.84242e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN40_H1_8_V17; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN50.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN50.mo new file mode 100644 index 0000000000..74c93fd60e --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN50.mo @@ -0,0 +1,59 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN50 "Pump with head 1 to 12m and 43m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + -0.010, 11.735, 0.767; + 0.000, 11.735, 0.767; + 2.847, 11.545, 0.758; + 5.771, 11.475, 0.695; + 8.532, 11.432, 0.586; + 9.410, 11.409, 0.329; + 12.117, 11.336, 0.000; + 14.509, 11.209, 0.000; + 17.326, 11.020, 0.000; + 19.589, 10.826, 0.000; + 23.687, 10.406, 0.000; + 25.928, 10.160, 0.000; + 28.241, 9.838, 0.000; + 31.651, 9.227, 0.000; + 35.213, 8.500, 0.000; + 37.925, 7.805, 0.000; + 40.516, 7.075, 0.000; + 43.484, 6.358, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0, nMax, nMin; + 9.41, nMax, nMin; + 10.00, nMax, 0; + 43.484, nMax, 0] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=765, + nMax=2960, + cHQN=[ 0, 0, 1.31E-06; + 0, 7.59E-06, 0; + -0.00316, 0, 0], + cPQN=[-2.45477E+01, 2.82590E-01, -2.38897E-04, 1.27064E-07, -1.27494E-11; + 0, 0, 3.23573E-06, 0, 0; + 0, 8.70834E-05, 0, 0, 0; + -8.39000E-03, 0, 0, 0, 0] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 50 mm, pump head range between 1 m and 12 m and maximum volume flow rate of 43 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN50.png\")
cHQN:
+0.00000000e+00 0.00000000e+00 1.31089345e-06;
+0.00000000e+00 7.58844493e-06 0.00000000e+00;
+-3.15754820e-03 0.00000000e+00 0.00000000e+00
+cPQN:
+-2.45505545e+01 2.82587745e-01 -2.38896170e-04 1.27063407e-07 -1.27493571e-11;
+0.00000000e+00 0.00000000e+00 3.23573346e-06 0.00000000e+00 0.00000000e+00;
+0.00000000e+00 8.70833575e-05 0.00000000e+00 0.00000000e+00 0.00000000e+00;
+-8.39308427e-03 0.00000000e+00 0.00000000e+00 0.00000000e+00 0.00000000e+00
+")); +end Pump_DN50; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN50_H10.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN50_H10.mo new file mode 100644 index 0000000000..55c54404f8 --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN50_H10.mo @@ -0,0 +1,98 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN50_H10 "Pump with head 10m and 32.23m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 9.13, 8.562; + 1.11, 9.13, 8.480; + 2.22, 9.14, 8.392; + 3.33, 9.14, 8.294; + 4.45, 9.15, 8.182; + 5.56, 9.17, 8.067; + 6.67, 9.13, 7.940; + 7.78, 9.08, 7.739; + 8.89, 9.04, 7.534; + 10.00, 8.97, 7.257; + 11.11, 8.88, 6.943; + 12.23, 8.76, 6.595; + 13.34, 8.59, 6.176; + 14.45, 8.38, 5.751; + 15.56, 8.10, 5.288; + 16.67, 7.73, 4.844; + 17.78, 7.36, 4.429; + 18.89, 7.00, 4.036; + 20.00, 6.63, 3.657; + 21.12, 6.22, 3.283; + 22.23, 5.81, 2.904; + 23.34, 5.39, 2.505; + 24.45, 4.96, 2.104; + 25.56, 4.48, 1.678; + 26.67, 3.97, 1.252; + 27.78, 3.40, 0.807; + 28.90, 2.82, 0.000; + 30.01, 2.21, 0.000; + 31.12, 1.59, 0.000; + 32.23, 0.93, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 2916, 2820; + 1.11, 2908, 2797; + 2.22, 2898, 2773; + 3.33, 2888, 2748; + 4.45, 2878, 2719; + 5.56, 2869, 2689; + 6.67, 2861, 2661; + 7.78, 2853, 2632; + 8.89, 2845, 2595; + 10.00, 2834, 2554; + 11.11, 2823, 2512; + 12.23, 2813, 2470; + 13.34, 2804, 2430; + 14.45, 2795, 2392; + 15.56, 2788, 2369; + 16.67, 2782, 2349; + 17.78, 2777, 2332; + 18.89, 2772, 2323; + 20.00, 2769, 2319; + 21.12, 2768, 2319; + 22.23, 2766, 2323; + 23.34, 2765, 2337; + 24.45, 2763, 2350; + 25.56, 2765, 2370; + 26.67, 2767, 2389; + 27.78, 2770, 2414; + 28.90, 2774, 2419; + 30.01, 2779, 2419; + 31.12, 2778, 2419; + 32.23, 2742, 2419] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=2318, + nMax=2916, + cHQN=[ 0.00000e+00, 0.00000e+00, 1.05131e-06; + 0.00000e+00, 6.36015e-05, 0.00000e+00; + -1.23177e-02, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[-2.81160e-02, -1.82546e+01, 2.31237e-02, -9.57285e-06, 1.30624e-09; + 0.00000e+00, 0.00000e+00, 4.55386e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, -1.05488e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -1.11489e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 50 mm, pump head 10 m and maximum volume flow rate of 32.23 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/WetRunner_Solar_50_10.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 1.05131e-06;
+0.00000e+00, 6.36015e-05, 0.00000e+00;
+-1.23177e-02, 0.00000e+00, 0.00000e+00
+cPQN:
+-2.81160e-02, -1.82546e+01, 2.31237e-02, -9.57285e-06, 1.30624e-09;
+0.00000e+00, 0.00000e+00, 4.55386e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, -1.05488e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-1.11489e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN50_H10; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN50_H1_38.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN50_H1_38.mo new file mode 100644 index 0000000000..e333e8e698 --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN50_H1_38.mo @@ -0,0 +1,98 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN50_H1_38 "Pump with head 1 to 38m and 52.14m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 38.00, 0.479; + 1.80, 37.78, 0.444; + 3.60, 37.38, 0.333; + 5.39, 36.97, 0.135; + 7.19, 36.52, 0.000; + 8.99, 36.07, 0.000; + 10.79, 35.59, 0.000; + 12.59, 34.95, 0.000; + 14.38, 34.00, 0.000; + 16.18, 32.95, 0.000; + 17.98, 32.03, 0.000; + 19.78, 31.23, 0.000; + 21.57, 30.40, 0.000; + 23.37, 29.42, 0.000; + 25.17, 28.30, 0.000; + 26.97, 27.15, 0.000; + 28.77, 25.96, 0.000; + 30.56, 24.68, 0.000; + 32.36, 23.29, 0.000; + 34.16, 21.94, 0.000; + 35.96, 20.52, 0.000; + 37.76, 19.08, 0.000; + 39.55, 17.58, 0.000; + 41.35, 15.97, 0.000; + 43.15, 13.88, 0.000; + 44.95, 12.31, 0.000; + 46.74, 10.67, 0.000; + 48.54, 8.98, 0.000; + 50.34, 7.00, 0.000; + 52.14, 3.81, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 4600, 500; + 1.80, 4600, 500; + 3.60, 4600, 500; + 5.39, 4600, 500; + 7.19, 4600, 500; + 8.99, 4600, 500; + 10.79, 4600, 500; + 12.59, 4600, 500; + 14.38, 4600, 500; + 16.18, 4600, 500; + 17.98, 4600, 500; + 19.78, 4600, 500; + 21.57, 4600, 500; + 23.37, 4600, 500; + 25.17, 4600, 500; + 26.97, 4600, 500; + 28.77, 4600, 500; + 30.56, 4600, 500; + 32.36, 4600, 500; + 34.16, 4600, 500; + 35.96, 4600, 500; + 37.76, 4600, 500; + 39.55, 4600, 500; + 41.35, 4600, 500; + 43.15, 4600, 500; + 44.95, 4600, 500; + 46.74, 4600, 500; + 48.54, 4600, 500; + 50.34, 4600, 500; + 52.14, 4600, 500] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=500.0, + nMax=4599.9954, + cHQN=[ 0.00000e+00, 0.00000e+00, 1.79741e-06; + 0.00000e+00, -3.13331e-05, 0.00000e+00; + -9.49292e-03, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[ 2.12113e+01, 2.29734e-02, 2.74104e-06, 1.08557e-08, -1.33157e-14; + 0.00000e+00, 0.00000e+00, 3.76420e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, -9.60714e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -1.05943e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 50 mm, pump head range between 1 m and 38 m and maximum volume flow rate of 52.14 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN50_H1_38.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 1.79741e-06;
+0.00000e+00, -3.13331e-05, 0.00000e+00;
+-9.49292e-03, 0.00000e+00, 0.00000e+00
+cPQN:
+2.12113e+01, 2.29734e-02, 2.74104e-06, 1.08557e-08, -1.33157e-14;
+0.00000e+00, 0.00000e+00, 3.76420e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, -9.60714e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-1.05943e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN50_H1_38; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN50_H1_9_V29.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN50_H1_9_V29.mo new file mode 100644 index 0000000000..4bb1390d76 --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN50_H1_9_V29.mo @@ -0,0 +1,98 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN50_H1_9_V29 "Pump with head 1 to 9m and 29.24m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 11.57, 1.132; + 1.01, 11.80, 1.130; + 2.02, 11.39, 1.132; + 3.02, 11.69, 1.110; + 4.03, 11.46, 1.101; + 5.04, 12.03, 1.064; + 6.05, 11.33, 1.001; + 7.06, 10.97, 0.917; + 8.07, 11.64, 0.795; + 9.07, 10.80, 0.661; + 10.08, 10.56, 0.459; + 11.09, 10.11, 0.000; + 12.10, 9.89, 0.000; + 13.11, 9.35, 0.000; + 14.11, 8.89, 0.000; + 15.12, 8.44, 0.000; + 16.13, 8.01, 0.000; + 17.14, 7.64, 0.000; + 18.15, 7.24, 0.000; + 19.16, 6.85, 0.000; + 20.16, 6.51, 0.000; + 21.17, 6.11, 0.000; + 22.18, 5.64, 0.000; + 23.19, 5.18, 0.000; + 24.20, 4.75, 0.000; + 25.20, 4.15, 0.000; + 26.21, 3.78, 0.000; + 27.22, 3.26, 0.000; + 28.23, 2.76, 0.000; + 29.24, 2.48, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 4600, 1400; + 1.01, 4600, 1400; + 2.02, 4485, 1400; + 3.02, 4534, 1400; + 4.03, 4489, 1400; + 5.04, 4600, 1400; + 6.05, 4474, 1400; + 7.06, 4400, 1400; + 8.07, 4525, 1400; + 9.07, 4422, 1400; + 10.08, 4347, 1400; + 11.09, 4253, 1400; + 12.10, 4219, 1400; + 13.11, 4113, 1400; + 14.11, 4050, 1400; + 15.12, 3994, 1400; + 16.13, 3948, 1400; + 17.14, 3898, 1400; + 18.15, 3863, 1400; + 19.16, 3827, 1400; + 20.16, 3818, 1400; + 21.17, 3789, 1400; + 22.18, 3782, 1400; + 23.19, 3769, 1400; + 24.20, 3770, 1400; + 25.20, 3770, 1400; + 26.21, 3775, 1400; + 27.22, 3793, 1400; + 28.23, 3797, 1400; + 29.24, 3821, 1400] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=1400.0, + nMax=4600.0, + cHQN=[ 0.00000e+00, 0.00000e+00, 5.39062e-07; + 0.00000e+00, 4.08623e-05, 0.00000e+00; + -1.14430e-02, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[ 3.52564e-05, 2.35037e-02, -1.17407e-05, 6.50363e-09, -2.40575e-13; + 0.00000e+00, 0.00000e+00, 1.12838e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, 1.47693e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -2.42125e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 50 mm, pump head range between 1 m and 9 m and maximum volume flow rate of 29.24 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN50_H1_9_V29.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 5.39062e-07;
+0.00000e+00, 4.08623e-05, 0.00000e+00;
+-1.14430e-02, 0.00000e+00, 0.00000e+00
+cPQN:
+3.52564e-05, 2.35037e-02, -1.17407e-05, 6.50363e-09, -2.40575e-13;
+0.00000e+00, 0.00000e+00, 1.12838e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, 1.47693e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-2.42125e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN50_H1_9_V29; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN65.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN65.mo new file mode 100644 index 0000000000..aebcc032ce --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN65.mo @@ -0,0 +1,98 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN65 "Pump with head 1 to 32m and 100m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 32.49, 2.100; + 3.43, 32.82, 2.155; + 6.86, 33.13, 2.134; + 10.28, 33.39, 2.116; + 13.71, 33.51, 2.042; + 17.14, 33.52, 1.914; + 20.57, 33.27, 1.741; + 23.99, 33.34, 1.561; + 27.42, 33.53, 0.000; + 30.85, 33.71, 0.000; + 34.28, 33.62, 0.000; + 37.71, 33.43, 0.000; + 41.13, 33.15, 0.000; + 44.56, 32.86, 0.000; + 47.99, 32.55, 0.000; + 51.42, 32.11, 0.000; + 54.84, 31.46, 0.000; + 58.27, 30.92, 0.000; + 61.70, 30.34, 0.000; + 65.13, 29.73, 0.000; + 68.56, 29.12, 0.000; + 71.98, 28.51, 0.000; + 75.41, 27.89, 0.000; + 78.84, 27.24, 0.000; + 82.27, 26.32, 0.000; + 85.70, 25.39, 0.000; + 89.12, 24.31, 0.000; + 92.55, 23.13, 0.000; + 95.98, 21.99, 0.000; + 99.41, 20.79, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 2958, 749; + 3.43, 2959, 748; + 6.86, 2959, 747; + 10.28, 2958, 748; + 13.71, 2957, 748; + 17.14, 2957, 748; + 20.57, 2956, 748; + 23.99, 2956, 748; + 27.42, 2955, 748; + 30.85, 2955, 748; + 34.28, 2954, 748; + 37.71, 2953, 748; + 41.13, 2953, 748; + 44.56, 2952, 748; + 47.99, 2951, 748; + 51.42, 2951, 748; + 54.84, 2950, 748; + 58.27, 2949, 748; + 61.70, 2948, 748; + 65.13, 2947, 748; + 68.56, 2947, 748; + 71.98, 2946, 748; + 75.41, 2945, 748; + 78.84, 2945, 748; + 82.27, 2932, 748; + 85.70, 2919, 748; + 89.12, 2903, 748; + 92.55, 2883, 748; + 95.98, 2863, 748; + 99.41, 2844, 748] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=748.0, + nMax=2960.0, + cHQN=[ 0.00000e+00, 0.00000e+00, 3.74328e-06; + 0.00000e+00, 2.53004e-05, 0.00000e+00; + -1.73208e-03, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[ 1.25418e+02, -9.18914e-02, 1.55192e-04, 4.46658e-08, 9.42769e-12; + 0.00000e+00, 0.00000e+00, 5.73427e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, 1.83142e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -4.14183e-03, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 65 mm, pump head range between 1 m and 32 m and maximum volume flow rate of 100 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN65.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 3.74328e-06;
+0.00000e+00, 2.53004e-05, 0.00000e+00;
+-1.73208e-03, 0.00000e+00, 0.00000e+00
+cPQN:
+1.25418e+02, -9.18914e-02, 1.55192e-04, 4.46658e-08, 9.42769e-12;
+0.00000e+00, 0.00000e+00, 5.73427e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, 1.83142e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-4.14183e-03, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN65; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN65_H15.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN65_H15.mo new file mode 100644 index 0000000000..3ecb7db522 --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN65_H15.mo @@ -0,0 +1,98 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN65_H15 "Pump with head 15m and 52.21m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 14.44, 12.426; + 1.80, 14.26, 12.205; + 3.60, 14.07, 11.978; + 5.40, 13.91, 11.729; + 7.20, 13.77, 11.473; + 9.00, 13.63, 11.202; + 10.80, 13.49, 10.895; + 12.60, 13.33, 10.588; + 14.40, 13.17, 10.282; + 16.20, 13.00, 9.975; + 18.00, 12.81, 9.631; + 19.80, 12.62, 9.263; + 21.61, 12.33, 8.863; + 23.41, 11.98, 8.441; + 25.21, 11.64, 8.001; + 27.01, 11.21, 7.547; + 28.81, 10.75, 7.084; + 30.61, 10.23, 6.604; + 32.41, 9.69, 6.124; + 34.21, 9.15, 5.597; + 36.01, 8.56, 5.061; + 37.81, 7.89, 4.484; + 39.61, 7.23, 3.897; + 41.41, 6.53, 3.310; + 43.21, 5.77, 2.723; + 45.01, 5.01, 2.136; + 46.81, 4.22, 1.549; + 48.61, 3.40, 0.000; + 50.41, 2.58, 0.000; + 52.21, 1.76, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 2928, 2721; + 1.80, 2926, 2713; + 3.60, 2923, 2705; + 5.40, 2920, 2687; + 7.20, 2916, 2666; + 9.00, 2912, 2645; + 10.80, 2907, 2621; + 12.60, 2905, 2598; + 14.40, 2902, 2575; + 16.20, 2899, 2553; + 18.00, 2894, 2534; + 19.80, 2890, 2518; + 21.61, 2888, 2507; + 23.41, 2885, 2499; + 25.21, 2883, 2494; + 27.01, 2882, 2490; + 28.81, 2880, 2489; + 30.61, 2880, 2495; + 32.41, 2880, 2501; + 34.21, 2880, 2511; + 36.01, 2880, 2521; + 37.81, 2881, 2534; + 39.61, 2882, 2547; + 41.41, 2884, 2563; + 43.21, 2886, 2581; + 45.01, 2888, 2599; + 46.81, 2891, 2616; + 48.61, 2896, 2619; + 50.41, 2900, 2619; + 52.21, 2904, 2619] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=2487, + nMax=2928, + cHQN=[ 0.00000e+00, 0.00000e+00, 1.63907e-06; + 0.00000e+00, 1.78063e-05, 0.00000e+00; + -5.38508e-03, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[-7.57114e-02, -5.11382e+01, 5.95325e-02, -2.29313e-05, 2.93959e-09; + 0.00000e+00, 0.00000e+00, 3.59473e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, 7.24389e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -1.28918e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 65 mm, pump head 15 m and maximum volume flow rate of 52.21 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/WetRunner_Solar_65_15.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 1.63907e-06;
+0.00000e+00, 1.78063e-05, 0.00000e+00;
+-5.38508e-03, 0.00000e+00, 0.00000e+00
+cPQN:
+-7.57114e-02, -5.11382e+01, 5.95325e-02, -2.29313e-05, 2.93959e-09;
+0.00000e+00, 0.00000e+00, 3.59473e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, 7.24389e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-1.28918e-02, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN65_H15; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN65_H1_12_V48.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN65_H1_12_V48.mo new file mode 100644 index 0000000000..27eb76e4ec --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN65_H1_12_V48.mo @@ -0,0 +1,98 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN65_H1_12_V48 "Pump with head 1 to 12m and 47.88m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 12.43, 1.216; + 1.65, 12.44, 1.218; + 3.30, 12.52, 1.212; + 4.95, 12.55, 1.211; + 6.60, 12.54, 1.218; + 8.26, 12.52, 1.193; + 9.91, 12.48, 1.145; + 11.56, 12.37, 1.052; + 13.21, 11.82, 0.955; + 14.86, 11.25, 0.842; + 16.51, 10.70, 0.686; + 18.16, 10.26, 0.466; + 19.81, 9.90, 0.000; + 21.47, 9.34, 0.000; + 23.12, 8.86, 0.000; + 24.77, 8.31, 0.000; + 26.42, 7.88, 0.000; + 28.07, 7.37, 0.000; + 29.72, 6.86, 0.000; + 31.37, 6.45, 0.000; + 33.02, 5.95, 0.000; + 34.68, 5.47, 0.000; + 36.33, 5.02, 0.000; + 37.98, 4.59, 0.000; + 39.63, 4.13, 0.000; + 41.28, 3.63, 0.000; + 42.93, 3.06, 0.000; + 44.58, 2.55, 0.000; + 46.23, 1.98, 0.000; + 47.88, 1.42, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 2900, 900; + 1.65, 2900, 900; + 3.30, 2900, 900; + 4.95, 2900, 900; + 6.60, 2900, 900; + 8.26, 2900, 900; + 9.91, 2900, 900; + 11.56, 2892, 900; + 13.21, 2829, 900; + 14.86, 2746, 900; + 16.51, 2680, 900; + 18.16, 2622, 900; + 19.81, 2565, 900; + 21.47, 2500, 900; + 23.12, 2452, 900; + 24.77, 2409, 900; + 26.42, 2376, 900; + 28.07, 2337, 900; + 29.72, 2303, 900; + 31.37, 2288, 900; + 33.02, 2260, 900; + 34.68, 2241, 900; + 36.33, 2228, 900; + 37.98, 2213, 900; + 39.63, 2199, 900; + 41.28, 2189, 900; + 42.93, 2183, 900; + 44.58, 2185, 900; + 46.23, 2189, 900; + 47.88, 2190, 900] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=900.0, + nMax=2900.0, + cHQN=[ 0.00000e+00, 0.00000e+00, 1.42201e-06; + 0.00000e+00, 4.24097e-05, 0.00000e+00; + -4.17356e-03, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[-1.00813e+02, 3.06965e-01, -2.80623e-04, 1.33917e-07, -1.60284e-11; + 0.00000e+00, 0.00000e+00, 2.48789e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, 1.74281e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -7.79974e-03, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 65 mm, pump head range between 1 m and 12 m and maximum volume flow rate of 47.88 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN65_H1_12_V48.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 1.42201e-06;
+0.00000e+00, 4.24097e-05, 0.00000e+00;
+-4.17356e-03, 0.00000e+00, 0.00000e+00
+cPQN:
+-1.00813e+02, 3.06965e-01, -2.80623e-04, 1.33917e-07, -1.60284e-11;
+0.00000e+00, 0.00000e+00, 2.48789e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, 1.74281e-04, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-7.79974e-03, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN65_H1_12_V48; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN65_H1_16_V26.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN65_H1_16_V26.mo new file mode 100644 index 0000000000..4377d5a8ef --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN65_H1_16_V26.mo @@ -0,0 +1,98 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN65_H1_16_V26 "Pump with head 1 to 16m and 26.23m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 1.92, 1.315; + 0.90, 1.92, 1.326; + 1.81, 1.92, 1.327; + 2.71, 1.92, 1.336; + 3.62, 1.92, 1.326; + 4.52, 1.92, 1.315; + 5.43, 1.92, 1.326; + 6.33, 1.92, 1.320; + 7.24, 1.92, 1.326; + 8.14, 1.92, 1.295; + 9.05, 1.92, 1.269; + 9.95, 1.92, 1.236; + 10.85, 1.92, 1.195; + 11.76, 1.92, 1.133; + 12.66, 1.92, 1.091; + 13.57, 1.92, 1.041; + 14.47, 1.86, 0.975; + 15.38, 1.80, 0.887; + 16.28, 1.74, 0.785; + 17.19, 1.65, 0.688; + 18.09, 1.58, 0.612; + 18.99, 1.49, 0.510; + 19.90, 1.40, 0.360; + 20.80, 1.30, 0.000; + 21.71, 1.16, 0.000; + 22.61, 1.06, 0.000; + 23.52, 0.95, 0.000; + 24.42, 0.70, 0.000; + 25.33, 0.42, 0.000; + 26.23, 0.47, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 1200, 950; + 0.90, 1200, 950; + 1.81, 1200, 950; + 2.71, 1200, 950; + 3.62, 1200, 950; + 4.52, 1200, 950; + 5.43, 1200, 950; + 6.33, 1200, 950; + 7.24, 1200, 950; + 8.14, 1200, 950; + 9.05, 1200, 950; + 9.95, 1200, 950; + 10.85, 1200, 950; + 11.76, 1200, 950; + 12.66, 1200, 950; + 13.57, 1200, 950; + 14.47, 1200, 950; + 15.38, 1200, 950; + 16.28, 1200, 950; + 17.19, 1200, 950; + 18.09, 1200, 950; + 18.99, 1200, 950; + 19.90, 1200, 950; + 20.80, 1200, 950; + 21.71, 1200, 950; + 22.61, 1200, 950; + 23.52, 1200, 950; + 24.42, 1200, 950; + 25.33, 1200, 950; + 26.23, 1200, 950] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=950.0, + nMax=1200.0, + cHQN=[ 0.00000e+00, 0.00000e+00, 1.38419e-06; + 0.00000e+00, 4.69154e-05, 0.00000e+00; + -4.44085e-03, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[ 4.29488e-16, 3.38555e-13, 2.38276e-10, 1.26342e-07, -6.75873e-11; + 0.00000e+00, 0.00000e+00, 3.44640e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, 6.63336e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -4.81313e-03, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 65 mm, pump head range between 1 m and 16 m and maximum volume flow rate of 26.23 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN65_H1_16_V26.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 1.38419e-06;
+0.00000e+00, 4.69154e-05, 0.00000e+00;
+-4.44085e-03, 0.00000e+00, 0.00000e+00
+cPQN:
+4.29488e-16, 3.38555e-13, 2.38276e-10, 1.26342e-07, -6.75873e-11;
+0.00000e+00, 0.00000e+00, 3.44640e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, 6.63336e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-4.81313e-03, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN65_H1_16_V26; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN65_H1_17.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN65_H1_17.mo new file mode 100644 index 0000000000..2c4a89a467 --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/Pump_DN65_H1_17.mo @@ -0,0 +1,98 @@ +within AixLib.DataBase.Pumps.PumpPolynomialBased; +record Pump_DN65_H1_17 "Pump with head 1 to 17m and 67.9m^3/h volume flow" + extends PumpBaseRecord( + maxMinHeight=[ + 0.00, 17.73, 0.443; + 2.34, 17.54, 0.416; + 4.68, 17.22, 0.378; + 7.02, 16.93, 0.319; + 9.37, 16.61, 0.214; + 11.71, 16.26, 0.000; + 14.05, 16.03, 0.000; + 16.39, 16.01, 0.000; + 18.73, 15.64, 0.000; + 21.07, 15.23, 0.000; + 23.41, 14.85, 0.000; + 25.76, 14.48, 0.000; + 28.10, 14.08, 0.000; + 30.44, 13.69, 0.000; + 32.78, 13.39, 0.000; + 35.12, 13.06, 0.000; + 37.46, 12.63, 0.000; + 39.80, 12.15, 0.000; + 42.15, 11.62, 0.000; + 44.49, 11.01, 0.000; + 46.83, 10.40, 0.000; + 49.17, 9.77, 0.000; + 51.51, 9.12, 0.000; + 53.85, 8.46, 0.000; + 56.19, 7.82, 0.000; + 58.54, 7.12, 0.000; + 60.88, 6.41, 0.000; + 63.22, 5.67, 0.000; + 65.56, 4.89, 0.000; + 67.90, 4.10, 0.000] + "maximum and minimum boundaries of pump (Q,Hmax,Hmin)", + maxMinSpeedCurves = [ + 0.00, 3100, 500; + 2.34, 3100, 500; + 4.68, 3100, 500; + 7.02, 3100, 500; + 9.37, 3100, 500; + 11.71, 3100, 500; + 14.05, 3100, 500; + 16.39, 3100, 500; + 18.73, 3100, 500; + 21.07, 3100, 500; + 23.41, 3100, 500; + 25.76, 3100, 500; + 28.10, 3100, 500; + 30.44, 3100, 500; + 32.78, 3100, 500; + 35.12, 3100, 500; + 37.46, 3100, 500; + 39.80, 3100, 500; + 42.15, 3100, 500; + 44.49, 3100, 500; + 46.83, 3100, 500; + 49.17, 3100, 500; + 51.51, 3100, 500; + 53.85, 3100, 500; + 56.19, 3100, 500; + 58.54, 3100, 500; + 60.88, 3100, 500; + 63.22, 3100, 500; + 65.56, 3100, 500; + 67.90, 3100, 500] + "maximum and minimum boundaries of pump speed (Q,nMax,nMin)", + nMin=500.0, + nMax=3100.0, + cHQN=[ 0.00000e+00, 0.00000e+00, 1.80885e-06; + 0.00000e+00, -1.72302e-05, 0.00000e+00; + -2.05883e-03, 0.00000e+00, 0.00000e+00] + "coefficients for H = f(Q,N)", + cPQN=[ 2.76556e-01, 8.91053e-02, -8.74245e-05, 8.08353e-08, -7.69701e-12; + 0.00000e+00, 0.00000e+00, 2.10171e-06, 0.00000e+00, 0.00000e+00; + 0.00000e+00, 3.88746e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00; + -4.44859e-03, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00] + "coefficients for P = f(Q,N)"); + + annotation(preferredView="text", Documentation(revisions=" +Pump for nominal pipe diameter of 65 mm, pump head range between 1 m and 17 m and maximum volume flow rate of 67.9 m³/h.
+![\"Pump](\"modelica://AixLib/Resources/Images/DataBase/Pumps/PumpsPolynomialBased/Pump_DN65_H1_17.png\")
cHQN:
+0.00000e+00, 0.00000e+00, 1.80885e-06;
+0.00000e+00, -1.72302e-05, 0.00000e+00;
+-2.05883e-03, 0.00000e+00, 0.00000e+00
+cPQN:
+2.76556e-01, 8.91053e-02, -8.74245e-05, 8.08353e-08, -7.69701e-12;
+0.00000e+00, 0.00000e+00, 2.10171e-06, 0.00000e+00, 0.00000e+00;
+0.00000e+00, 3.88746e-05, 0.00000e+00, 0.00000e+00, 0.00000e+00;
+-4.44859e-03, 0.00000e+00, 0.00000e+00, 0.00000e+00, 0.00000e+00
+")); +end Pump_DN65_H1_17; diff --git a/AixLib/DataBase/Pumps/PumpPolynomialBased/package.mo b/AixLib/DataBase/Pumps/PumpPolynomialBased/package.mo new file mode 100644 index 0000000000..c9e267fb56 --- /dev/null +++ b/AixLib/DataBase/Pumps/PumpPolynomialBased/package.mo @@ -0,0 +1,14 @@ +within AixLib.DataBase.Pumps; +package PumpPolynomialBased "Configuration data for pump model in Fluid.Movers.PumpPolynomialBased package" + + + + + + + annotation (Documentation(revisions=" +Base data definition extending from the HeatPumpBaseDataDefinition, the parameters documentation is matched for a chiller. As a result, tableQdot_eva corresponds to the cooling capacity on the evaporator side of the chiller. Furthermore, the values of the tables depend on the condenser inlet temperature (defined in first row) and the evaporator outlet temperature (defined in first column) in W.
+The nominal mass flow rate in the condenser and evaporator are also defined as parameters.
+", + revisions=" +Data record for type AWO-M/AWO-M-E-AC 201.A04, obtained from the technical guide in the UK. Link to the datasheet
+", revisions=" ++ This package contains base classes for the package AixLib.Fluid.Chillers.BaseClasses.PerformanceData. +
+")); end BaseClasses; diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/BaseClasses/package.order b/AixLib/DataBase/ThermalMachines/Chiller/PerformanceData/BaseClasses/package.order similarity index 100% rename from AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/BaseClasses/package.order rename to AixLib/DataBase/ThermalMachines/Chiller/PerformanceData/BaseClasses/package.order diff --git a/AixLib/DataBase/ThermalMachines/Chiller/PerformanceData/LookUpTable2D.mo b/AixLib/DataBase/ThermalMachines/Chiller/PerformanceData/LookUpTable2D.mo new file mode 100644 index 0000000000..db7a8afc1b --- /dev/null +++ b/AixLib/DataBase/ThermalMachines/Chiller/PerformanceData/LookUpTable2D.mo @@ -0,0 +1,208 @@ +within AixLib.DataBase.ThermalMachines.Chiller.PerformanceData; +model LookUpTable2D "Performance data coming from manufacturer" + extends + AixLib.DataBase.ThermalMachines.Chiller.PerformanceData.BaseClasses.PartialPerformanceData; + + parameter Modelica.Blocks.Types.Smoothness smoothness=Modelica.Blocks.Types.Smoothness.LinearSegments + "Smoothness of table interpolation"; + parameter + AixLib.DataBase.ThermalMachines.Chiller.ChillerBaseDataDefinition dataTable= + AixLib.DataBase.ThermalMachines.Chiller.EN14511.Vitocal200AWO201() + "Data Table of Chiller" annotation (choicesAllMatching=true); + parameter Boolean extrapolation=true "False to hold last value"; + parameter Boolean printAsserts=false + "WARNING: This will lead to a lot of state-events if extrapolation occurs frequently! If extrapolation is enabled, the user will get warnings when extrapolation occurs." + annotation (Dialog(enable=extrapolation)); + + Utilities.Tables.CombiTable2DExtra Qdot_EvaTable( + final smoothness=smoothness, + final u1(unit="degC"), + final u2(unit="degC"), + final y(unit="W", displayUnit="kW"), + final extrapolation=extrapolation, + final table=dataTable.tableQdot_eva) + annotation (extent=[-60,40; -40,60], Placement(transformation(extent={{-14,-14}, + {14,14}}, + rotation=-90, + origin={46,34}))); + Utilities.Tables.CombiTable2DExtra P_eleTable( + final smoothness=smoothness, + extrapolation=extrapolation, + final u1(unit="degC"), + final u2(unit="degC"), + final y(unit="W", displayUnit="kW"), + final table=dataTable.tableP_ele) + "Electrical power table" + annotation (extent=[-60,-20; -40,0], Placement(transformation(extent={{-14,-14}, + {14,14}}, + rotation=-90, + origin={-60,36}))); + + Modelica.Blocks.Math.UnitConversions.To_degC t_Co_in + annotation (extent=[-88,38; -76,50], Placement(transformation(extent={{-6,-6}, + {6,6}}, + rotation=270, + origin={52,72}))); + Modelica.Blocks.Math.UnitConversions.To_degC t_Ev_ou annotation (extent=[-88,38; + -76,50], Placement(transformation(extent={{-6,-6},{6,6}}, + rotation=270, + origin={-54,76}))); + Modelica.Blocks.Math.Product nTimesPel annotation (Placement(transformation( + extent={{-7,-7},{7,7}}, + rotation=-90, + origin={-41,-11}))); + Modelica.Blocks.Math.Product nTimesQEva annotation (Placement(transformation( + extent={{-6,-6},{6,6}}, + rotation=-90, + origin={40,-10}))); + Modelica.Blocks.Math.Product proRedQEva + "Based on the icing factor, the heat flow to the evaporator is reduced" + annotation (Placement(transformation( + extent={{-6,-6},{6,6}}, + rotation=270, + origin={68,-62}))); + Modelica.Blocks.Math.Add calcRedQCon + "Based on redcued heat flow to the evaporator, the heat flow to the condenser is also reduced" + annotation (Placement(transformation( + extent={{-6,-6},{6,6}}, + rotation=270, + origin={-80,-80}))); + + Modelica.Blocks.Math.Product nTimesSF + "Create the product of the scaling factor and relative compressor speed" + annotation (Placement(transformation( + extent={{-7,-7},{7,7}}, + rotation=-90, + origin={-9,23}))); + +protected + parameter Real minSou = min(dataTable.tableP_ele[1,2:end]); + parameter Real minSup = min(dataTable.tableP_ele[2:end,1]); + parameter Real maxSou = max(dataTable.tableP_ele[1,2:end]); + parameter Real maxSup = max(dataTable.tableP_ele[2:end,1]); + Modelica.Blocks.Sources.Constant realCorr(final k=scalingFactor) + "Calculates correction of table output based on scaling factor" + annotation (Placement(transformation( + extent={{-3,-3},{3,3}}, + rotation=270, + origin={-13,43}))); + +equation + if printAsserts then + assert( + minSou + 273.15 < sigBus.T_flow_co, + "Current T_flow_co is too low. Extrapolation of data will result in unrealistic results", + level=AssertionLevel.warning); + assert( + maxSou + 273.15 > sigBus.T_flow_co, + "Current T_flow_co is too high. Extrapolation of data will result in unrealistic results", + level=AssertionLevel.warning); + assert( + minSup + 273.15 < sigBus.T_ret_ev, + "Current T_ret_ev is too low. Extrapolation of data will result in unrealistic results", + level=AssertionLevel.warning); + assert( + maxSup + 273.15 > sigBus.T_ret_ev, + "Current T_ret_ev is too high. Extrapolation of data will result in unrealistic results", + level=AssertionLevel.warning); + else + end if; + connect(t_Co_in.y,Qdot_EvaTable. u2) annotation (Line(points={{52,65.4},{52, + 60},{37.6,60},{37.6,50.8}}, color={0,0,127})); + connect(t_Co_in.y, P_eleTable.u2) annotation (Line(points={{52,65.4},{-68.4, + 65.4},{-68.4,52.8}}, color={0,0,127})); + connect(t_Ev_ou.y, P_eleTable.u1) annotation (Line(points={{-54,69.4},{-54, + 52.8},{-51.6,52.8}}, color={0,0,127})); + connect(t_Ev_ou.y,Qdot_EvaTable. u1) annotation (Line(points={{-54,69.4},{-54, + 60},{52,60},{52,50.8},{54.4,50.8}}, + color={0,0,127})); + connect(sigBus.T_ret_ev,t_Ev_ou. u) annotation (Line( + points={{1.075,104.07},{-54,104.07},{-54,83.2}}, + color={255,204,51}, + thickness=0.5), Text( + string="%first", + index=-1, + extent={{-6,3},{-6,3}})); + connect(sigBus.T_flow_co,t_Co_in. u) annotation (Line( + points={{1.075,104.07},{2,104.07},{2,104},{52,104},{52,79.2}}, + color={255,204,51}, + thickness=0.5), Text( + string="%first", + index=-1, + extent={{-6,3},{-6,3}})); + connect(P_eleTable.y, nTimesPel.u2) annotation (Line(points={{-60,20.6},{ + -60,10},{-45.2,10},{-45.2,-2.6}}, + color={0,0,127})); + connect(Qdot_EvaTable.y,nTimesQEva. u1) annotation (Line(points={{46,18.6},{ + 46,-2.8},{43.6,-2.8}}, color={0,0,127})); + connect(proRedQEva.y, calcRedQCon.u1) annotation (Line(points={{68,-68.6},{ + 68,-70},{-76.4,-70},{-76.4,-72.8}}, color= + {0,0,127})); + connect(sigBus.iceFac, proRedQEva.u1) annotation (Line( + points={{1.075,104.07},{20,104.07},{20,-42},{72,-42},{72,-54.8},{71.6, + -54.8}}, + color={255,204,51}, + thickness=0.5), Text( + string="%first", + index=-1, + extent={{6,3},{6,3}}, + horizontalAlignment=TextAlignment.Left)); + connect(nTimesPel.y, Pel) annotation (Line(points={{-41,-18.7},{-41,-30},{0, + -30},{0,-110}}, color={0,0,127})); + connect(realCorr.y, nTimesSF.u2) annotation (Line(points={{-13,39.7},{-13, + 31.4},{-13.2,31.4}}, color={0,0,127})); + connect(sigBus.N, nTimesSF.u1) annotation (Line( + points={{1.075,104.07},{-4,104.07},{-4,31.4},{-4.8,31.4}}, + color={255,204,51}, + thickness=0.5), Text( + string="%first", + index=-1, + extent={{6,3},{6,3}}, + horizontalAlignment=TextAlignment.Left)); + connect(nTimesQEva.y, proRedQEva.u2) annotation (Line(points={{40,-16.6},{ + 40,-54.8},{64.4,-54.8}}, color={0,0,127})); + connect(proRedQEva.y, QEva) annotation (Line(points={{68,-68.6},{68,-80},{ + 80,-80},{80,-110}}, color={0,0,127})); + connect(calcRedQCon.y, QCon) + annotation (Line(points={{-80,-86.6},{-80,-110}}, color={0,0,127})); + connect(nTimesPel.y, calcRedQCon.u2) annotation (Line(points={{-41,-18.7},{ + -41,-30},{-83.6,-30},{-83.6,-72.8}}, color={0,0,127})); + connect(nTimesSF.y, nTimesPel.u1) annotation (Line(points={{-9,15.3},{-9,10}, + {-36.8,10},{-36.8,-2.6}}, color={0,0,127})); + connect(nTimesSF.y, nTimesQEva.u2) annotation (Line(points={{-9,15.3},{-9, + 10},{36.4,10},{36.4,-2.8}}, color={0,0,127})); + annotation (Icon(graphics={ + Line(points={{-60.0,40.0},{-60.0,-40.0},{60.0,-40.0},{60.0,40.0},{30.0,40.0},{30.0,-40.0},{-30.0,-40.0},{-30.0,40.0},{-60.0,40.0},{-60.0,20.0},{60.0,20.0},{60.0,0.0},{-60.0,0.0},{-60.0,-20.0},{60.0,-20.0},{60.0,-40.0},{-60.0,-40.0},{-60.0,40.0},{60.0,40.0},{60.0,-40.0}}), + Line(points={{0.0,40.0},{0.0,-40.0}}), + Rectangle(fillColor={255,215,136}, + fillPattern=FillPattern.Solid, + extent={{-60.0,20.0},{-30.0,40.0}}), + Rectangle(fillColor={255,215,136}, + fillPattern=FillPattern.Solid, + extent={{-60.0,0.0},{-30.0,20.0}}), + Rectangle(fillColor={255,215,136}, + fillPattern=FillPattern.Solid, + extent={{-60.0,-20.0},{-30.0,0.0}}), + Rectangle(fillColor={255,215,136}, + fillPattern=FillPattern.Solid, + extent={{-60.0,-40.0},{-30.0,-20.0}})}), Documentation(revisions="This model uses the 2-dimensional table data given in the DIN EN 14511 (formerly EN255) to calculate QEva and P_el. To model an inverter controlled chiller, the relative compressor speed n is scaled linearly with the ouput of the tables. Furthermore, the design of a chiller is modeled via a scaling factor. As a result, the equations follow below:
+QEva,n = n * scalingFactor * TableQEva.y
+P_el = n * scalingFactor * TablePel.y
+To simulate possible icing of the evaporator on air-source chillers, the icing factor is used to influence the output as well. As the factor resembles the reduction of heat transfer between refrigerant and source, the factor is implemented as follows:
+QEva = iceFac * QEva,n
+With iceFac as a relative value between 0 and 1:
+iceFac = kA/kA_noIce
+Finally, to follow the first law of thermodynamics:
+QCon = P_el,n + QEva
+The model CombiTable2DExtra is able to disallow extrapolation by holding the last value. If one extrapolates the given perfomance data, warnings about occuring extrapolations are emitted. CAUTION: Checking for possible extrapolations will trigger state events which results in higher computing time.
+")); +end LookUpTable2D; diff --git a/AixLib/DataBase/ThermalMachines/Chiller/PerformanceData/LookUpTableND.mo b/AixLib/DataBase/ThermalMachines/Chiller/PerformanceData/LookUpTableND.mo new file mode 100644 index 0000000000..820a23e9e6 --- /dev/null +++ b/AixLib/DataBase/ThermalMachines/Chiller/PerformanceData/LookUpTableND.mo @@ -0,0 +1,270 @@ +within AixLib.DataBase.ThermalMachines.Chiller.PerformanceData; +model LookUpTableND "N-dimensional table with data for heat pump" + extends + AixLib.DataBase.ThermalMachines.Chiller.PerformanceData.BaseClasses.PartialPerformanceData; + parameter Real nConv=100 + "Gain value multiplied with relative compressor speed n to calculate matching value based on sdf tables"; + parameter SDF.Types.InterpolationMethod interpMethod=SDF.Types.InterpolationMethod.Linear + "Interpolation method"; + parameter SDF.Types.ExtrapolationMethod extrapMethod=SDF.Types.ExtrapolationMethod.None + "Extrapolation method"; + parameter String filename_Pel= + "modelica://Resources/Data/Fluid/BaseClasses/PerformanceData/LookUpTableND/VZH088AG.sdf" + "File name of sdf table data" + annotation (Dialog(group="Electrical Power",loadSelector(filter="SDF Files (*.sdf);;All Files (*.*)", caption="Select SDF file"))); + parameter String dataset_Pel="/Pel" + "Dataset name" + annotation (Dialog(group="Electrical Power")); + parameter String dataUnit_Pel="W" + "Data unit" + annotation (Dialog(group="Electrical Power")); + parameter String scaleUnits_Pel[3]={"K","K",""} + "Scale units" + annotation (Dialog(group="Electrical Power")); + parameter String filename_QCon= + "modelica://Resources/Data/Fluid/BaseClasses/PerformanceData/LookUpTableND/VZH088AG.sdf" + "File name of sdf table data" + annotation (Dialog(group="Condenser heat flow",loadSelector(filter="SDF Files (*.sdf);;All Files (*.*)", caption="Select SDF file"))); + parameter String dataset_QCon="/QCon" + "Dataset name" + annotation (Dialog(group="Condenser heat flow")); + parameter String dataUnit_QCon="W" + "Data unit" + annotation (Dialog(group="Condenser heat flow")); + parameter String scaleUnits_QCon[3]={"K","K",""} + "Scale units" + annotation (Dialog(group="Condenser heat flow")); + + Modelica.Blocks.Math.Gain nConGain(final k=nConv) + "Convert relative speed n to an absolute value for interpolation in sdf tables" + annotation (Placement(transformation( + extent={{-8,-8},{8,8}}, + rotation=-90, + origin={0,68}))); + Modelica.Blocks.Math.UnitConversions.To_degC t_Co_in + annotation (extent=[-88,38; -76,50], Placement(transformation(extent={{-6,-6}, + {6,6}}, + rotation=-90, + origin={46,44}))); + Modelica.Blocks.Math.UnitConversions.To_degC t_Ev_ou annotation (extent=[-88,38; + -76,50], Placement(transformation(extent={{-6,-6},{6,6}}, + rotation=-90, + origin={-40,46}))); + Modelica.Blocks.Math.Add calcRedQCon + "Calculates condenser heat flow with total energy balance" annotation ( + Placement(transformation( + extent={{-6,6},{6,-6}}, + rotation=-90, + origin={-80,-86}))); + Utilities.Logical.SmoothSwitch switchPel + "If HP is off, no heat will be exchanged" + annotation (Placement(transformation(extent={{-10,-10},{10,10}}, + rotation=-90, + origin={50,-60}))); + Utilities.Logical.SmoothSwitch switchQEva + "If chiller is off, no heat will be exchanged" + annotation (Placement(transformation(extent={{-10,-10},{10,10}}, + rotation=-90, + origin={-50,-56}))); + Modelica.Blocks.Sources.Constant constZero(final k=0) + "Power if HP is turned off" + annotation (Placement(transformation(extent={{-6,-6},{6,6}}, + rotation=-90, + origin={-4,-18}))); + SDF.NDTable nDTableQEva( + final nin=3, + final readFromFile=true, + final filename=filename_QCon, + final dataset=dataset_QCon, + final dataUnit=dataUnit_QCon, + final scaleUnits=scaleUnits_QCon, + final interpMethod=interpMethod, + final extrapMethod=extrapMethod) + "SDF-Table data for evaporator heat flow" + annotation (Placement(transformation(extent={{-12,-12},{12,12}}, + rotation=-90, + origin={-42,-10}))); + SDF.NDTable nDTablePel( + final nin=3, + final readFromFile=true, + final filename=filename_Pel, + final dataset=dataset_Pel, + final dataUnit=dataUnit_Pel, + final scaleUnits=scaleUnits_Pel, + final interpMethod=interpMethod, + final extrapMethod=extrapMethod) "SDF table data for electrical power" + annotation (Placement(transformation( + extent={{-12,-12},{12,12}}, + rotation=-90, + origin={50,-10}))); + Modelica.Blocks.Routing.Multiplex3 multiplex3_1( + final n1=1, + final n2=1, + final n3=1) "Concat all inputs into an array" + annotation (Placement(transformation(extent={{-8,-8},{8,8}}, + rotation=-90, + origin={0,20}))); + + Modelica.Blocks.Logical.GreaterThreshold greaterThreshold(final threshold= + Modelica.Constants.eps) annotation (Placement(transformation( + extent={{-6,-6},{6,6}}, + rotation=270, + origin={-72,46}))); +equation + connect(switchPel.y, Pel) annotation (Line(points={{50,-71},{50,-82},{0,-82}, + {0,-110}}, + color={0,0,127})); + + connect(constZero.y,switchQEva. u3) annotation (Line(points={{-4,-24.6},{-4, + -24},{-4,-24},{-4,-28},{-4,-30},{-58,-30},{-58,-42},{-58,-42},{-58, + -44},{-58,-44}}, color={0,0,127})); + connect(constZero.y, switchPel.u3) annotation (Line(points={{-4,-24.6},{-4, + -30},{42,-30},{42,-48}}, + color={0,0,127})); + connect(nDTableQEva.y,switchQEva. u1) + annotation (Line(points={{-42,-23.2},{-42,-44}}, + color={0,0,127})); + connect(nDTablePel.y, switchPel.u1) + annotation (Line(points={{50,-23.2},{50,-34},{58,-34},{58,-48}}, + color={0,0,127})); + connect(multiplex3_1.y,nDTableQEva. u) annotation (Line(points={{-1.55431e-15, + 11.2},{-1.55431e-15,4.4},{-42,4.4}}, + color={0,0,127})); + connect(multiplex3_1.y, nDTablePel.u) annotation (Line(points={{-1.77636e-15,11.2}, + {-1.77636e-15,4.4},{50,4.4}}, color={0,0,127})); + connect(sigBus.T_flow_co,t_Co_in. u) annotation (Line( + points={{1.075,104.07},{46,104.07},{46,51.2}}, + color={255,204,51}, + thickness=0.5), Text( + string="%first", + index=-1, + extent={{-6,3},{-6,3}})); + connect(sigBus.T_ret_ev,t_Ev_ou. u) annotation (Line( + points={{1.075,104.07},{-40,104.07},{-40,53.2}}, + color={255,204,51}, + thickness=0.5), Text( + string="%first", + index=-1, + extent={{-6,3},{-6,3}})); + connect(sigBus.N, greaterThreshold.u) annotation (Line( + points={{1.075,104.07},{-72,104.07},{-72,53.2}}, + color={255,204,51}, + thickness=0.5), Text( + string="%first", + index=-1, + extent={{-3,6},{-3,6}}, + horizontalAlignment=TextAlignment.Right)); + connect(greaterThreshold.y,switchQEva. u2) annotation (Line(points={{-72, + 39.4},{-72,-36},{-50,-36},{-50,-44}}, + color={255,0,255})); + connect(greaterThreshold.y, switchPel.u2) annotation (Line(points={{-72,39.4}, + {-72,-36},{50,-36},{50,-48}}, color={255,0,255})); + connect(sigBus.N, nConGain.u) annotation (Line( + points={{1.075,104.07},{1.77636e-15,104.07},{1.77636e-15,77.6}}, + color={255,204,51}, + thickness=0.5), Text( + string="%first", + index=-1, + extent={{-3,6},{-3,6}}, + horizontalAlignment=TextAlignment.Right)); + connect(nConGain.y, multiplex3_1.u3[1]) annotation (Line(points={{ + -1.55431e-15,59.2},{-6,59.2},{-6,29.6},{-5.6,29.6}}, color={0,0,127})); + connect(t_Ev_ou.y, multiplex3_1.u1[1]) annotation (Line(points={{-40,39.4},{ + -40,36},{5.6,36},{5.6,29.6}}, color={0,0,127})); + connect(t_Co_in.y, multiplex3_1.u2[1]) annotation (Line(points={{46,37.4},{46, + 32},{0,32},{0,29.6}}, color={0,0,127})); + connect(switchPel.y, calcRedQCon.u2) annotation (Line(points={{50,-71},{50, + -76},{-76.4,-76},{-76.4,-78.8}}, color={0,0,127})); + connect(switchQEva.y, calcRedQCon.u1) annotation (Line(points={{-50,-67},{ + -50,-72},{-83.6,-72},{-83.6,-78.8}}, color={0,0,127})); + connect(calcRedQCon.y, QCon) + annotation (Line(points={{-80,-92.6},{-80,-110}}, color={0,0,127})); + connect(switchQEva.y, QEva) annotation (Line(points={{-50,-67},{-50,-88},{ + 80,-88},{80,-110}}, color={0,0,127})); + annotation (Icon(graphics={ + Line(points={{-60.0,40.0},{-60.0,-40.0},{60.0,-40.0},{60.0,40.0},{30.0,40.0},{30.0,-40.0},{-30.0,-40.0},{-30.0,40.0},{-60.0,40.0},{-60.0,20.0},{60.0,20.0},{60.0,0.0},{-60.0,0.0},{-60.0,-20.0},{60.0,-20.0},{60.0,-40.0},{-60.0,-40.0},{-60.0,40.0},{60.0,40.0},{60.0,-40.0}}), + Line(points={{0.0,40.0},{0.0,-40.0}}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{-60.0,0.0},{-30.0,20.0}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,215,136}, + fillPattern=FillPattern.Solid, + extent={{-60.0,-40.0},{-30.0,-20.0}}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{-60,-20},{-30,0}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{-60,-40},{-30,-20}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{-30,-40},{0,-20}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{0,-40},{30,-20}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{30,-40},{60,-20}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{30,-20},{60,0}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{0,-20},{30,0}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{0,0},{30,20}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{30,0},{60,20}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{0,20},{30,40}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{30,20},{60,40}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{-60,20},{-30,40}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{-30,20},{0,40}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{-30,0},{0,20}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{-30,-20},{0,0}}, + lineColor={0,0,0})}), Documentation(info="+ Basic models showing the concept of using n-dimensional table data + for the innerCycle of the heat pump model. This model assumes one + provides data for inverter controlled heat pumps or chillers. + However, this basis structure can be used to create own models, where + electrical power and condenser depend on other inputs, such as + ambient temperature. +
+", revisions=" ++ This model is used to calculate the three values based on a + functional approach. The user can choose between several functions or + use their own. +
++ As the + base function only returns the electrical power and the condenser + heat flow, the evaporator heat flow is calculated with the following + energy balance: +
++ QEva = QCon - P_el +
+")); +end PolynomalApproach; diff --git a/AixLib/DataBase/ThermalMachines/Chiller/PerformanceData/package.mo b/AixLib/DataBase/ThermalMachines/Chiller/PerformanceData/package.mo new file mode 100644 index 0000000000..2c616094e5 --- /dev/null +++ b/AixLib/DataBase/ThermalMachines/Chiller/PerformanceData/package.mo @@ -0,0 +1,20 @@ +within AixLib.DataBase.ThermalMachines.Chiller; +package PerformanceData "Different data models used for a black box chiller model" + + + + +annotation (Documentation(revisions="+ This package contains models for the grey box chiller model AixLib.Fluid.Chillers.Chiller. +
+")); +end PerformanceData; diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/package.order b/AixLib/DataBase/ThermalMachines/Chiller/PerformanceData/package.order similarity index 75% rename from AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/package.order rename to AixLib/DataBase/ThermalMachines/Chiller/PerformanceData/package.order index 45f910d3e5..dc413da772 100644 --- a/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/package.order +++ b/AixLib/DataBase/ThermalMachines/Chiller/PerformanceData/package.order @@ -1,6 +1,4 @@ -IcingBlock LookUpTable2D LookUpTableND PolynomalApproach -calcCOP BaseClasses diff --git a/AixLib/DataBase/ThermalMachines/Chiller/package.mo b/AixLib/DataBase/ThermalMachines/Chiller/package.mo new file mode 100644 index 0000000000..d72a4bead8 --- /dev/null +++ b/AixLib/DataBase/ThermalMachines/Chiller/package.mo @@ -0,0 +1,15 @@ +within AixLib.DataBase.ThermalMachines; +package Chiller "Collection of Chiller Database Records" + extends Modelica.Icons.Package; + + + +annotation (Documentation(revisions=" +According to manufacturer's data which was inter- and extrapolated linearly; EN14511
+")); + end AlphaInnotec_LW80MA; + + record Dimplex_LA11AS "Dimplex LA 11 AS" + extends + AixLib.DataBase.ThermalMachines.HeatPump.HeatPumpBaseDataDefinition( + tableP_ele=[0,-7,2,7,10; 35,2444,2839,3139,3103; 45,2783,2974,3097, + 3013], + tableQdot_con=[0,-7,2,7,10; 35,6600,8800,11300,12100; 45,6400,7898, + 9600,10145], + mFlow_conNom=11300/4180/5, + mFlow_evaNom=1, + tableUppBou=[-25,58; 35,58], + tableLowBou=[-25,18; 35,18]); + + annotation(preferedView="text", DymolaStoredErrors, + Icon, + Documentation(revisions=" +According to data from Dimplex data sheets; EN14511
+")); + end Dimplex_LA11AS; + + record Ochsner_GMLW_19 "Ochsner GMLW 19" + extends + AixLib.DataBase.ThermalMachines.HeatPump.HeatPumpBaseDataDefinition( + tableP_ele=[0,-10,2,7; 35,4300,4400,4600; 50,6300,6400,6600], + tableQdot_con=[0,-10,2,7; 35,11600,17000,20200; 50,10200,15600,18800], + mFlow_conNom=20200/4180/5, + mFlow_evaNom=1, + tableUppBou=[-15,55; 40,55], + tableLowBou=[-15,0; 40,0]); + + annotation(preferedView="text", DymolaStoredErrors, + Icon, + Documentation(revisions=" +According to data from Ochsner data sheets; EN14511
+")); + end Ochsner_GMLW_19; + + record Ochsner_GMLW_19plus "Ochsner GMLW 19 plus" + extends + AixLib.DataBase.ThermalMachines.HeatPump.HeatPumpBaseDataDefinition( + tableP_ele=[0,-10,2,7; 35,4100,4300,4400; 50,5500,5700,5800; 60,6300, + 6500,6600], + tableQdot_con=[0,-10,2,7; 35,12600,16800,19800; 50,11700,15900,18900; + 60,11400,15600,18600], + mFlow_conNom=19800/4180/5, + mFlow_evaNom=1, + tableUppBou=[-24,52; -15,55; -10,65; 40,65], + tableLowBou=[-24,0; 40,0]); + + annotation(preferedView="text", DymolaStoredErrors, + Icon, + Documentation(revisions=" +According to data from Ochsner data sheets; EN14511
+")); + end Ochsner_GMLW_19plus; + + record Ochsner_GMSW_15plus "Ochsner GMSW 15 plus" + extends + AixLib.DataBase.ThermalMachines.HeatPump.HeatPumpBaseDataDefinition( + tableP_ele=[0,-5,0,5; 35,3225,3300,3300; 45,4000,4000,4000; 55,4825, + 4900,4900], + tableQdot_con=[0,-5,0,5; 35,12762,14500,16100; 45,12100,13900,15600; + 55,11513,13200,14900], + mFlow_conNom=14500/4180/5, + mFlow_evaNom=(14500 - 3300)/3600/3, + tableUppBou=[-8,52; 0,65; 20,65], + tableLowBou=[-8,10; 20,27]); + + annotation(preferedView="text", DymolaStoredErrors, + Icon, + Documentation(revisions=" +According to data from WPZ Buchs, Swiss; EN14511
+")); + end Ochsner_GMSW_15plus; + + record StiebelEltron_WPL18 "Stiebel Eltron WPL 18" + extends + AixLib.DataBase.ThermalMachines.HeatPump.HeatPumpBaseDataDefinition( + tableP_ele=[0,-7,2,7,10,20; 35,3300,3400,3500,3700,3800; 50,4500,4400, + 4600,5000,5100], + tableQdot_con=[0,-7,2,7,10,20; 35,9700,11600,13000,14800,16300; 50, + 10000,11200,12900,16700,17500], + mFlow_conNom=13000/4180/5, + mFlow_evaNom=1, + tableUppBou=[-25,65; 40,65], + tableLowBou=[-25,0; 40,0]); + //These boundary-tables are not from the datasheet but default values. + + annotation(preferedView="text", DymolaStoredErrors, + Icon, + Documentation(revisions=" +According to data from WPZ Buchs, Swiss; EN14511
+")); + end StiebelEltron_WPL18; + + record Vaillant_VWL_101 "Vaillant VWL10-1" + extends + AixLib.DataBase.ThermalMachines.HeatPump.HeatPumpBaseDataDefinition( + tableP_ele=[0,-15,-7,2,7; 35,2138,2177,2444,2444; 45,2558,2673,2864, + 3055; 55,2902,3131,3360,3513], + tableQdot_con=[0,-15,-7,2,7; 35,5842,7523,9776,10807; 45,5842,7332, + 9050,10387; 55,5728,7179,9050,10043], + mFlow_conNom=9776/4180/5, + mFlow_evaNom=1, + tableUppBou=[-25,65; 40,65], + tableLowBou=[-25,0; 40,0]); + //These boundary-tables are not from the datasheet but default values. + + annotation(preferedView="text", DymolaStoredErrors, + Icon, + Documentation(revisions=" +According to data from Vaillant data sheets; EN14511
+")); + end Vaillant_VWL_101; + + record Vitocal200AWO201 + "Vitocal200AWO201" + extends + AixLib.DataBase.ThermalMachines.HeatPump.HeatPumpBaseDataDefinition( + tableP_ele=[0,-15,-7,2,7,10,20,30; 35,1290.0,1310.0,730.0,870.0,850.0, + 830.0,780.0; 45,1550.0,1600.0,870.0,1110.0,1090.0,1080.0,1040.0; + 55,1870.0,1940.0,1170.0,1370.0,1370.0,1370.0,1350.0], + tableQdot_con=[0,-15,-7,2,7,10,20,30; 35,3020,3810,2610,3960,4340, + 5350,6610; 45,3020,3780,2220,3870,4120,5110,6310; 55,3120,3790, + 2430,3610,3910,4850,6000], + mFlow_conNom=3960/4180/5, + mFlow_evaNom=(2250*1.2)/3600, + tableUppBou=[-20,50; -10,60; 30,60; 35,55], + tableLowBou=[-20,25; 25,25; 35,35]); + + annotation ( + Icon(coordinateSystem(preserveAspectRatio=false)), + Diagram(coordinateSystem(preserveAspectRatio=false)), + Documentation(info=" +Data record for type AWO-M/AWO-M-E-AC 201.A04, obtained from the technical guide in the UK.
+", revisions=" +According to data from WPZ Buchs, Swiss; EN 255.
+", revisions=" +According to manufacturer's data; EN 255.
+", revisions=" +Data from manufacturer's data sheet (Viessmann). These exact curves are given in the data sheet for measurement procedure according to EN 255.
+", revisions=" +Data from manufacturer's data sheet (Viessmann). These exact curves are given in the data sheet for measurement procedure according to EN 255.
+", revisions=" +Data from manufacturer's data sheet (Viessmann). These exact curves are given in the data sheet for measurement procedure according to EN 255.
+", revisions=" +Carnot CoP and constant electric power, no dependency on speed or mass flow rates!
+", + revisions=" +Carnot CoP multiplied with constant quality grade and constant electric power, no dependency on speed or mass flow rates!
+", + revisions=" +Base funtion used in HeatPump model. It defines the inputs speed N (1/min), condenser outlet temperature T_co (K) and evaporator inlet temperature T_ev (K). The output is the vector Char: first value is compressor power, second value is the condenser heat flow rate.
+", + revisions=" +This function emulated the the Carnot model (AixLib.Fluid.Chillers.BaseClasses.Carnot). See this description for more info on assumptions etc.
+")); + end CarnotFunction; + + function PolynomalApproach + "Function to emulate the polynomal approach of the TRNSYS Type 401 heat pump model" + extends PartialBaseFct; + parameter Modelica.SIunits.Power p[6] = {0,0,0,0,0,0} + "Polynomal coefficient for the electrical power"; + parameter Modelica.SIunits.HeatFlowRate q[6] = {0,0,0,0,0,0} + "Polynomal coefficient for the condenser heat flow"; + + protected + Real TEva_n = T_eva/273.15 + 1 "Normalized evaporator temperature"; + Real TCon_n = T_con/273.15 + 1 "Normalized condenser temperature"; + algorithm + if N >= Modelica.Constants.eps then + Char[1] := p[1] + p[2]*TEva_n + p[3]*TCon_n + p[4]*TCon_n*TEva_n + p[5]*TEva_n^2 + p[6]*TCon_n^2; //Pel + Char[2] := q[1] + q[2]*TEva_n + q[3]*TCon_n + q[4]*TCon_n*TEva_n + q[5]*TEva_n^2 + q[6]*TCon_n^2; //QCon + else //Maybe something better could be used such as smooth() + Char[1] := 0; + Char[2] := 0; + end if; + annotation (Documentation(revisions=" +Based on the work of Afjej and Wetter, 1997 [1] and the TRNYS Type 401 heat pump model, this function uses a six-coefficient polynom to calculate the electrical power and the heat flow to the condenser. The coefficients are calculated based on the data in DIN EN 14511 with a minimization-problem in python using the root-mean-square-error.
+The normalized input temperatures are calculated with the formular:
+T_n = (T/273.15) + 1
+The coefficients for the polynomal functions are stored inside the record for heat pumps in AixLib.DataBase.HeatPump.
+[1]: https://www.trnsys.de/download/en/ts_type_401_en.pdf
+")); + end PolynomalApproach; + end Characteristics; + + package DefrostCorrection + extends Modelica.Icons.Package; + + function NoModel "No model" + extends + AixLib.DataBase.ThermalMachines.HeatPump.Functions.DefrostCorrection.PartialBaseFct( + T_eva); + + algorithm + f_CoPicing:=1; + + annotation (Documentation(info=" +No correction factor for icing/defrosting: f_cop_icing=1.
+", + revisions=" +Base funtion used in HeatPump model. Input is the evaporator inlet temperature, output is a CoP-correction factor f_cop_icing.
+", + revisions=" +Correction of CoP (Icing, Defrost) according to Wetter,Afjei 1996.
+", + revisions=" +This function can be used to implement a simple icing approach, e.g. based on outdoor air temperature or time based.
+")); + end BasicIcingApproach; + + partial function PartialBaseFct "Base function for all icing factor functions" + extends Modelica.Icons.Function; + input Modelica.SIunits.ThermodynamicTemperature T_flow_ev "Evaporator supply temperature"; + input Modelica.SIunits.ThermodynamicTemperature T_ret_ev "Evaporator return temperature"; + input Modelica.SIunits.ThermodynamicTemperature T_oda "Outdoor air temperature"; + input Modelica.SIunits.MassFlowRate m_flow_ev "Mass flow rate at the evaporator"; + output Real iceFac(min=0, max=1) "Icing factor, normalized value between 0 and 1"; + + annotation (Documentation(revisions=" +Base function for calculation of the icing factor. The normalized value represents reduction of heat exchange as a result of icing of the evaporator.
+")); + end PartialBaseFct; + + function WetterAfjei1996 + "Correction of CoP (Icing, Defrost) according to Wetter,Afjei 1996" + extends + AixLib.DataBase.ThermalMachines.HeatPump.Functions.IcingFactor.PartialBaseFct; + + parameter Real A=0.03; + parameter Real B=-0.004; + parameter Real C=0.1534; + parameter Real D=0.8869; + parameter Real E=26.06; + protected + Real factor; + Real linear_term; + Real gauss_curve; + algorithm + linear_term:=A + B*T_flow_ev; + gauss_curve:=C*Modelica.Math.exp(-(T_flow_ev - D)*(T_flow_ev - D)/E); + if linear_term>0 then + factor:=linear_term + gauss_curve; + else + factor:=gauss_curve; + end if; + iceFac:=1-factor; + annotation (Documentation(info=" +Correction of CoP (Icing, Defrost) according to Wetter,Afjei 1996.
+", + revisions=" +This package contains functions for calculation of an icing factor used in AixLib.Fluid.HeatPumps.BaseClasses.PerformanceData.IcingBlock.
+")); + end IcingFactor; +end Functions; diff --git a/AixLib/DataBase/HeatPump/HeatPumpBaseDataDefinition.mo b/AixLib/DataBase/ThermalMachines/HeatPump/HeatPumpBaseDataDefinition.mo similarity index 64% rename from AixLib/DataBase/HeatPump/HeatPumpBaseDataDefinition.mo rename to AixLib/DataBase/ThermalMachines/HeatPump/HeatPumpBaseDataDefinition.mo index c990be4537..c6819b4ae5 100644 --- a/AixLib/DataBase/HeatPump/HeatPumpBaseDataDefinition.mo +++ b/AixLib/DataBase/ThermalMachines/HeatPump/HeatPumpBaseDataDefinition.mo @@ -1,4 +1,4 @@ -within AixLib.DataBase.HeatPump; +within AixLib.DataBase.ThermalMachines.HeatPump; record HeatPumpBaseDataDefinition "Basic heat pump data" extends Modelica.Icons.Record; parameter Real tableQdot_con[:,:] "Heating power table; T in degC; Q_flow in W"; @@ -12,7 +12,7 @@ record HeatPumpBaseDataDefinition "Basic heat pump data" annotation (Documentation(info="Base data definition used in the heat pump model. It defines the table table_Qdot_Co which gives the condenser heat flow rate and table_Pel which gives the electric power consumption of the heat pump. Both tables define the power values depending on the evaporator inlet temperature (defined in first row) and the condenser outlet temperature (defined in first column) in W. The nominal heat flow rate in the condenser and evaporator are also defined as parameters.
Base data definition used in the heat pump model. It defines the table table_Qdot_Co which gives the condenser heat flow rate and table_Pel which gives the electric power consumption of the heat pump. Both tables define the power values depending on the evaporator inlet temperature (defined in first row) and the condenser outlet temperature (defined in first column) in W. The nominal mass flow rate in the condenser and evaporator are also defined as parameters.
", revisions="+ Model for calculation of the icing factor. The replaceable function + uses the inputs to calculate the resulting icing factor. +
+")); + end IcingBlock; + + model LookUpTable2D "Performance data coming from manufacturer" + extends + AixLib.DataBase.ThermalMachines.HeatPump.PerformanceData.BaseClasses.PartialPerformanceData; + + parameter Modelica.Blocks.Types.Smoothness smoothness=Modelica.Blocks.Types.Smoothness.LinearSegments + "Smoothness of table interpolation"; + parameter HeatPumpBaseDataDefinition dataTable= + AixLib.DataBase.ThermalMachines.HeatPump.EN255.Vitocal350AWI114() + "Data Table of HP" annotation (choicesAllMatching=true); + parameter Boolean extrapolation=true "False to hold last value"; + parameter Boolean printAsserts=false + "WARNING: This will lead to a lot of state-events if extrapolation occurs frequently! If extrapolation is enabled, the user will get warnings when extrapolation occurs." + annotation (Dialog(enable=extrapolation)); + + Utilities.Tables.CombiTable2DExtra Qdot_ConTable( + final smoothness=smoothness, + final u1(unit="degC"), + final u2(unit="degC"), + final y(unit="W", displayUnit="kW"), + final extrapolation=extrapolation, + final table=dataTable.tableQdot_con) + annotation (extent=[-60,40; -40,60], Placement(transformation(extent={{-14,-14}, + {14,14}}, + rotation=-90, + origin={46,34}))); + Utilities.Tables.CombiTable2DExtra P_eleTable( + final smoothness=smoothness, + extrapolation=extrapolation, + final u1(unit="degC"), + final u2(unit="degC"), + final y(unit="W", displayUnit="kW"), + final table=dataTable.tableP_ele) + "Electrical power table" + annotation (extent=[-60,-20; -40,0], Placement(transformation(extent={{-14,-14}, + {14,14}}, + rotation=-90, + origin={-60,36}))); + + Modelica.Blocks.Math.UnitConversions.To_degC t_Ev_in + annotation (extent=[-88,38; -76,50], Placement(transformation(extent={{-6,-6}, + {6,6}}, + rotation=270, + origin={52,72}))); + Modelica.Blocks.Math.UnitConversions.To_degC t_Co_ou annotation (extent=[-88,38; + -76,50], Placement(transformation(extent={{-6,-6},{6,6}}, + rotation=270, + origin={-54,76}))); + Modelica.Blocks.Math.Product nTimesPel annotation (Placement(transformation( + extent={{-7,-7},{7,7}}, + rotation=-90, + origin={-47,-3}))); + Modelica.Blocks.Math.Product nTimesQCon annotation (Placement(transformation( + extent={{-6,-6},{6,6}}, + rotation=-90, + origin={40,-10}))); + Modelica.Blocks.Math.Product proRedQEva + "Based on the icing factor, the heat flow to the evaporator is reduced" + annotation (Placement(transformation( + extent={{-6,-6},{6,6}}, + rotation=270, + origin={-78,-62}))); + Modelica.Blocks.Math.Add calcRedQCon + "Based on redcued heat flow to the evaporator, the heat flow to the condenser is also reduced" + annotation (Placement(transformation( + extent={{-6,-6},{6,6}}, + rotation=270, + origin={82,-70}))); + + Modelica.Blocks.Math.Product nTimesSF + "Create the product of the scaling factor and relative compressor speed" + annotation (Placement(transformation( + extent={{-7,-7},{7,7}}, + rotation=-90, + origin={-11,23}))); + + protected + parameter Real minSou = min(dataTable.tableP_ele[1,2:end]); + parameter Real minSup = min(dataTable.tableP_ele[2:end,1]); + parameter Real maxSou = max(dataTable.tableP_ele[1,2:end]); + parameter Real maxSup = max(dataTable.tableP_ele[2:end,1]); + Modelica.Blocks.Sources.Constant realCorr(final k=scalingFactor) + "Calculates correction of table output based on scaling factor" + annotation (Placement(transformation( + extent={{-3,-3},{3,3}}, + rotation=270, + origin={-15,43}))); + Modelica.Blocks.Math.Feedback feedbackHeatFlowEvaporator + "Calculates evaporator heat flow with total energy balance" annotation(Placement(transformation(extent={{-5,-5}, + {5,5}}, + rotation=270, + origin={-81,-43}))); + + equation + if printAsserts then + assert( + minSou + 273.15 < sigBus.T_flow_ev, + "Current T_flow_ev is too low. Extrapolation of data will result in unrealistic results", + level=AssertionLevel.warning); + assert( + maxSou + 273.15 > sigBus.T_flow_ev, + "Current T_flow_ev is too high. Extrapolation of data will result in unrealistic results", + level=AssertionLevel.warning); + assert( + minSup + 273.15 < sigBus.T_ret_co, + "Current T_ret_co is too low. Extrapolation of data will result in unrealistic results", + level=AssertionLevel.warning); + assert( + maxSup + 273.15 > sigBus.T_ret_co, + "Current T_ret_co is too high. Extrapolation of data will result in unrealistic results", + level=AssertionLevel.warning); + else + end if; + connect(t_Ev_in.y, Qdot_ConTable.u2) annotation (Line(points={{52,65.4},{52, + 60},{37.6,60},{37.6,50.8}}, color={0,0,127})); + connect(t_Ev_in.y, P_eleTable.u2) annotation (Line(points={{52,65.4},{-68.4, + 65.4},{-68.4,52.8}}, color={0,0,127})); + connect(t_Co_ou.y, P_eleTable.u1) annotation (Line(points={{-54,69.4},{-54, + 52.8},{-51.6,52.8}}, color={0,0,127})); + connect(t_Co_ou.y, Qdot_ConTable.u1) annotation (Line(points={{-54,69.4},{-54, + 60},{52,60},{52,50.8},{54.4,50.8}}, + color={0,0,127})); + connect(sigBus.T_ret_co, t_Co_ou.u) annotation (Line( + points={{1.075,104.07},{-54,104.07},{-54,83.2}}, + color={255,204,51}, + thickness=0.5), Text( + string="%first", + index=-1, + extent={{-6,3},{-6,3}})); + connect(sigBus.T_flow_ev, t_Ev_in.u) annotation (Line( + points={{1.075,104.07},{2,104.07},{2,104},{52,104},{52,79.2}}, + color={255,204,51}, + thickness=0.5), Text( + string="%first", + index=-1, + extent={{-6,3},{-6,3}})); + connect(P_eleTable.y, nTimesPel.u2) annotation (Line(points={{-60,20.6},{-60, + 10},{-51.2,10},{-51.2,5.4}}, + color={0,0,127})); + connect(Qdot_ConTable.y, nTimesQCon.u1) annotation (Line(points={{46,18.6},{ + 46,-2.8},{43.6,-2.8}}, color={0,0,127})); + connect(QCon, calcRedQCon.y) + annotation (Line(points={{-80,-110},{-80,-92},{82,-92},{82,-76.6}}, + color={0,0,127})); + connect(proRedQEva.y, calcRedQCon.u1) annotation (Line(points={{-78,-68.6}, + {-78,-72},{-4,-72},{-4,-58},{85.6,-58},{85.6,-62.8}}, color= + {0,0,127})); + connect(proRedQEva.y, QEva) + annotation (Line(points={{-78,-68.6},{-78,-86},{80,-86},{80,-110}}, + color={0,0,127})); + connect(feedbackHeatFlowEvaporator.y, proRedQEva.u2) annotation (Line(points={{-81, + -47.5},{-81,-54},{-81.6,-54},{-81.6,-54.8}}, color={0,0,127})); + connect(sigBus.iceFac, proRedQEva.u1) annotation (Line( + points={{1.075,104.07},{14,104.07},{14,-52},{-74,-52},{-74,-54.8},{ + -74.4,-54.8}}, + color={255,204,51}, + thickness=0.5), Text( + string="%first", + index=-1, + extent={{6,3},{6,3}}, + horizontalAlignment=TextAlignment.Left)); + connect(nTimesQCon.y, feedbackHeatFlowEvaporator.u1) annotation (Line(points={{40, + -16.6},{40,-32},{-81,-32},{-81,-39}}, color={0,0,127})); + connect(nTimesPel.y, feedbackHeatFlowEvaporator.u2) annotation (Line(points={{-47, + -10.7},{-47,-22},{-90,-22},{-90,-43},{-85,-43}}, color={0,0,127})); + connect(nTimesPel.y, Pel) annotation (Line(points={{-47,-10.7},{-47,-80},{0, + -80},{0,-110}}, color={0,0,127})); + connect(realCorr.y, nTimesSF.u2) annotation (Line(points={{-15,39.7},{-15, + 31.4},{-15.2,31.4}}, color={0,0,127})); + connect(sigBus.N, nTimesSF.u1) annotation (Line( + points={{1.075,104.07},{-2,104.07},{-2,31.4},{-6.8,31.4}}, + color={255,204,51}, + thickness=0.5), Text( + string="%first", + index=-1, + extent={{6,3},{6,3}}, + horizontalAlignment=TextAlignment.Left)); + connect(nTimesSF.y, nTimesPel.u1) annotation (Line(points={{-11,15.3},{-11, + 8},{-42.8,8},{-42.8,5.4}}, color={0,0,127})); + connect(nTimesSF.y, nTimesQCon.u2) annotation (Line(points={{-11,15.3},{-11, + 8},{36.4,8},{36.4,-2.8}}, color={0,0,127})); + connect(nTimesPel.y, calcRedQCon.u2) annotation (Line(points={{-47,-10.7},{ + -47,-22},{78.4,-22},{78.4,-62.8}}, color={0,0,127})); + annotation (Icon(graphics={ + Line(points={{-60.0,40.0},{-60.0,-40.0},{60.0,-40.0},{60.0,40.0},{30.0,40.0},{30.0,-40.0},{-30.0,-40.0},{-30.0,40.0},{-60.0,40.0},{-60.0,20.0},{60.0,20.0},{60.0,0.0},{-60.0,0.0},{-60.0,-20.0},{60.0,-20.0},{60.0,-40.0},{-60.0,-40.0},{-60.0,40.0},{60.0,40.0},{60.0,-40.0}}), + Line(points={{0.0,40.0},{0.0,-40.0}}), + Rectangle(fillColor={255,215,136}, + fillPattern=FillPattern.Solid, + extent={{-60.0,20.0},{-30.0,40.0}}), + Rectangle(fillColor={255,215,136}, + fillPattern=FillPattern.Solid, + extent={{-60.0,0.0},{-30.0,20.0}}), + Rectangle(fillColor={255,215,136}, + fillPattern=FillPattern.Solid, + extent={{-60.0,-20.0},{-30.0,0.0}}), + Rectangle(fillColor={255,215,136}, + fillPattern=FillPattern.Solid, + extent={{-60.0,-40.0},{-30.0,-20.0}})}), Documentation(revisions="+ This model uses the 2-dimensional table data given in the DIN EN + 14511 (formerly EN255) to calculate QCon and P_el. To + model an inverter controlled heat pump, the relative compressor + speed n is scaled linearly with the ouput of the tables. + Furthermore, the design of a heat pump is modeled via a scaling + factor. As a result, the equations follow below: +
++ QCon,n = n * scalingFactor * TableQCon.y +
++ P_el = n * scalingFactor * TablePel.y +
++ To simulate possible icing of the evaporator on air-source heat + pumps, the icing factor is used to influence the output as well. As + the factor resembles the reduction of heat transfer between + refrigerant and source, the factor is implemented as follows: +
++ QEva = iceFac * (QCon,n-P_el,n) +
++ With iceFac as a relative value between 0 and 1: +
++ iceFac = kA/kA_noIce +
++ Finally, to follow the first law of thermodynamics: +
++ QCon = P_el,n + QEva +
++ The model CombiTable2DExtra + is able to disallow extrapolation by holding the last value. If one + extrapolates the given perfomance data, warnings about occuring + extrapolations are emitted. CAUTION: Checking for possible + extrapolations will trigger state events which results in higher + computing time. +
+")); + end LookUpTable2D; + + model LookUpTableND "N-dimensional table with data for heat pump" + extends + AixLib.DataBase.ThermalMachines.HeatPump.PerformanceData.BaseClasses.PartialPerformanceData; + parameter Real nConv=100 + "Gain value multiplied with relative compressor speed n to calculate matching value based on sdf tables"; + parameter SDF.Types.InterpolationMethod interpMethod=SDF.Types.InterpolationMethod.Linear + "Interpolation method"; + parameter SDF.Types.ExtrapolationMethod extrapMethod=SDF.Types.ExtrapolationMethod.None + "Extrapolation method"; + parameter String filename_Pel= + "modelica://Resources/Data/Fluid/BaseClasses/PerformanceData/LookUpTableND/VZH088AG.sdf" + "File name of sdf table data" + annotation (Dialog(group="Electrical Power",loadSelector(filter="SDF Files (*.sdf);;All Files (*.*)", caption="Select SDF file"))); + parameter String dataset_Pel="/Pel" + "Dataset name" + annotation (Dialog(group="Electrical Power")); + parameter String dataUnit_Pel="W" + "Data unit" + annotation (Dialog(group="Electrical Power")); + parameter String scaleUnits_Pel[3]={"K","K",""} + "Scale units" + annotation (Dialog(group="Electrical Power")); + parameter String filename_QCon= + "modelica://Resources/Data/Fluid/BaseClasses/PerformanceData/LookUpTableND/VZH088AG.sdf" + "File name of sdf table data" + annotation (Dialog(group="Condenser heat flow",loadSelector(filter="SDF Files (*.sdf);;All Files (*.*)", caption="Select SDF file"))); + parameter String dataset_QCon="/QCon" + "Dataset name" + annotation (Dialog(group="Condenser heat flow")); + parameter String dataUnit_QCon="W" + "Data unit" + annotation (Dialog(group="Condenser heat flow")); + parameter String scaleUnits_QCon[3]={"K","K",""} + "Scale units" + annotation (Dialog(group="Condenser heat flow")); + + Modelica.Blocks.Math.Gain nConGain(final k=nConv) + "Convert relative speed n to an absolute value for interpolation in sdf tables" + annotation (Placement(transformation( + extent={{-8,-8},{8,8}}, + rotation=-90, + origin={0,68}))); + Modelica.Blocks.Math.UnitConversions.To_degC t_Ev_in + annotation (extent=[-88,38; -76,50], Placement(transformation(extent={{-6,-6}, + {6,6}}, + rotation=-90, + origin={46,44}))); + Modelica.Blocks.Math.UnitConversions.To_degC t_Co_ou annotation (extent=[-88,38; + -76,50], Placement(transformation(extent={{-6,-6},{6,6}}, + rotation=-90, + origin={-40,46}))); + Modelica.Blocks.Math.Feedback feedbackHeatFlowEvaporator + "Calculates evaporator heat flow with total energy balance" annotation(Placement(transformation(extent={{-6,-6}, + {6,6}}, + rotation=-90, + origin={80,-82}))); + Utilities.Logical.SmoothSwitch switchPel + "If HP is off, no heat will be exchanged" + annotation (Placement(transformation(extent={{-10,-10},{10,10}}, + rotation=-90, + origin={50,-60}))); + Utilities.Logical.SmoothSwitch switchQCon + "If HP is off, no heat will be exchanged" + annotation (Placement(transformation(extent={{-10,-10},{10,10}}, + rotation=-90, + origin={-50,-56}))); + Modelica.Blocks.Sources.Constant constZero(final k=0) + "Power if HP is turned off" + annotation (Placement(transformation(extent={{-6,-6},{6,6}}, + rotation=-90, + origin={-4,-18}))); + SDF.NDTable nDTableQCon( + final nin=3, + final readFromFile=true, + final filename=filename_QCon, + final dataset=dataset_QCon, + final dataUnit=dataUnit_QCon, + final scaleUnits=scaleUnits_QCon, + final interpMethod=interpMethod, + final extrapMethod=extrapMethod) "SDF-Table data for condenser heat flow" + annotation (Placement(transformation(extent={{-12,-12},{12,12}}, + rotation=-90, + origin={-42,-10}))); + SDF.NDTable nDTablePel( + final nin=3, + final readFromFile=true, + final filename=filename_Pel, + final dataset=dataset_Pel, + final dataUnit=dataUnit_Pel, + final scaleUnits=scaleUnits_Pel, + final interpMethod=interpMethod, + final extrapMethod=extrapMethod) "SDF table data for electrical power" + annotation (Placement(transformation( + extent={{-12,-12},{12,12}}, + rotation=-90, + origin={50,-10}))); + Modelica.Blocks.Routing.Multiplex3 multiplex3_1( + final n1=1, + final n2=1, + final n3=1) "Concat all inputs into an array" + annotation (Placement(transformation(extent={{-8,-8},{8,8}}, + rotation=-90, + origin={0,20}))); + + Modelica.Blocks.Logical.GreaterThreshold greaterThreshold(final threshold= + Modelica.Constants.eps) annotation (Placement(transformation( + extent={{-6,-6},{6,6}}, + rotation=270, + origin={-72,46}))); + equation + connect(feedbackHeatFlowEvaporator.y, QEva) + annotation (Line(points={{80,-87.4},{80,-110}}, + color={0,0,127})); + connect(switchPel.y, Pel) annotation (Line(points={{50,-71},{50,-82},{0,-82}, + {0,-110}}, + color={0,0,127})); + connect(switchQCon.y, QCon) annotation (Line(points={{-50,-67},{-50,-74},{ + -80,-74},{-80,-110}}, + color={0,0,127})); + + connect(constZero.y, switchQCon.u3) annotation (Line(points={{-4,-24.6},{-4, + -24},{-4,-24},{-4,-28},{-4,-30},{-58,-30},{-58,-42},{-58,-42},{-58, + -44},{-58,-44}}, color={0,0,127})); + connect(constZero.y, switchPel.u3) annotation (Line(points={{-4,-24.6},{-4, + -30},{42,-30},{42,-48}}, + color={0,0,127})); + connect(nDTableQCon.y, switchQCon.u1) + annotation (Line(points={{-42,-23.2},{-42,-44}}, + color={0,0,127})); + connect(nDTablePel.y, switchPel.u1) + annotation (Line(points={{50,-23.2},{50,-34},{58,-34},{58,-48}}, + color={0,0,127})); + connect(multiplex3_1.y, nDTableQCon.u) annotation (Line(points={{-1.55431e-15, + 11.2},{-1.55431e-15,4.4},{-42,4.4}}, + color={0,0,127})); + connect(multiplex3_1.y, nDTablePel.u) annotation (Line(points={{-1.77636e-15,11.2}, + {-1.77636e-15,4.4},{50,4.4}}, color={0,0,127})); + connect(sigBus.T_flow_ev, t_Ev_in.u) annotation (Line( + points={{1.075,104.07},{46,104.07},{46,51.2}}, + color={255,204,51}, + thickness=0.5), Text( + string="%first", + index=-1, + extent={{-6,3},{-6,3}})); + connect(sigBus.T_ret_co, t_Co_ou.u) annotation (Line( + points={{1.075,104.07},{-40,104.07},{-40,53.2}}, + color={255,204,51}, + thickness=0.5), Text( + string="%first", + index=-1, + extent={{-6,3},{-6,3}})); + connect(sigBus.N, greaterThreshold.u) annotation (Line( + points={{1.075,104.07},{-72,104.07},{-72,53.2}}, + color={255,204,51}, + thickness=0.5), Text( + string="%first", + index=-1, + extent={{-3,6},{-3,6}}, + horizontalAlignment=TextAlignment.Right)); + connect(greaterThreshold.y, switchQCon.u2) annotation (Line(points={{-72, + 39.4},{-72,-36},{-50,-36},{-50,-44}}, + color={255,0,255})); + connect(greaterThreshold.y, switchPel.u2) annotation (Line(points={{-72,39.4}, + {-72,-36},{50,-36},{50,-48}}, color={255,0,255})); + connect(sigBus.N, nConGain.u) annotation (Line( + points={{1.075,104.07},{1.77636e-15,104.07},{1.77636e-15,77.6}}, + color={255,204,51}, + thickness=0.5), Text( + string="%first", + index=-1, + extent={{-3,6},{-3,6}}, + horizontalAlignment=TextAlignment.Right)); + connect(nConGain.y, multiplex3_1.u3[1]) annotation (Line(points={{ + -1.55431e-15,59.2},{-6,59.2},{-6,29.6},{-5.6,29.6}}, color={0,0,127})); + connect(t_Co_ou.y, multiplex3_1.u1[1]) annotation (Line(points={{-40,39.4},{ + -40,36},{5.6,36},{5.6,29.6}}, color={0,0,127})); + connect(t_Ev_in.y, multiplex3_1.u2[1]) annotation (Line(points={{46,37.4},{ + 46,32},{0,32},{0,29.6}}, + color={0,0,127})); + connect(switchPel.y, feedbackHeatFlowEvaporator.u2) + annotation (Line(points={{50,-71},{50,-82},{75.2,-82}}, color={0,0,127})); + connect(switchQCon.y, feedbackHeatFlowEvaporator.u1) annotation (Line(points={{-50,-67}, + {-50,-74},{80,-74},{80,-77.2}}, color={0,0,127})); + annotation (Icon(graphics={ + Line(points={{-60.0,40.0},{-60.0,-40.0},{60.0,-40.0},{60.0,40.0},{30.0,40.0},{30.0,-40.0},{-30.0,-40.0},{-30.0,40.0},{-60.0,40.0},{-60.0,20.0},{60.0,20.0},{60.0,0.0},{-60.0,0.0},{-60.0,-20.0},{60.0,-20.0},{60.0,-40.0},{-60.0,-40.0},{-60.0,40.0},{60.0,40.0},{60.0,-40.0}}), + Line(points={{0.0,40.0},{0.0,-40.0}}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{-60.0,0.0},{-30.0,20.0}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,215,136}, + fillPattern=FillPattern.Solid, + extent={{-60.0,-40.0},{-30.0,-20.0}}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{-60,-20},{-30,0}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{-60,-40},{-30,-20}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{-30,-40},{0,-20}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{0,-40},{30,-20}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{30,-40},{60,-20}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{30,-20},{60,0}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{0,-20},{30,0}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{0,0},{30,20}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{30,0},{60,20}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{0,20},{30,40}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{30,20},{60,40}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{-60,20},{-30,40}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{-30,20},{0,40}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{-30,0},{0,20}}, + lineColor={0,0,0}), + Rectangle(fillColor={255,255,0}, + fillPattern=FillPattern.Solid, + extent={{-30,-20},{0,0}}, + lineColor={0,0,0})}), Documentation(info="+ Basic models showing the concept of using n-dimensional table data + for the innerCycle of the heat pump model. This model assumes one + provides data for inverter controlled heat pumps or chillers. + However, this basis structure can be used to create own models, where + electrical power and condenser depend on other inputs, such as + ambient temperature. +
+", revisions=" ++ This model is used to calculate the three values based on a + functional approach. The user can choose between several functions or + use their own. +
++ As the + base function only returns the electrical power and the condenser + heat flow, the evaporator heat flow is calculated with the following + energy balance: +
++ QEva = QCon - P_el +
+")); + end PolynomalApproach; + + model calcCOP + "To calculate the COP or EER of a device, this model ensures no integration failure will happen" + + parameter Modelica.SIunits.Power lowBouPel "If P_el falls below this value, COP will not be calculated"; + parameter Modelica.SIunits.Time aveTime=60 "Time span for average"; + + Modelica.Blocks.Interfaces.RealInput Pel(final unit="W", final displayUnit= + "kW") + "Input for all electrical power consumed by the system" + annotation (Placement(transformation(extent={{-140,-60},{-100,-20}}), + iconTransformation(extent={{-140,-60},{-100,-20}}))); + Modelica.Blocks.Interfaces.RealInput QHeat(final unit="W", final displayUnit= + "kW") + "Input for all heating power delivered to the system" + annotation (Placement(transformation(extent={{-140,20},{-100,60}}), + iconTransformation(extent={{-140,20},{-100,60}}))); + Modelica.Blocks.Interfaces.RealOutput y_COP "Output for calculated COP value" + annotation (Placement(transformation(extent={{100,-10},{120,10}}))); + protected + AixLib.Utilities.Math.MovingAverage movAve(final aveTime=aveTime) + "To calculate the moving average of the output values"; + equation + //Check if any of the two sums are lower than the given threshold. If so, set COP to zero + if Pel < lowBouPel or QHeat < Modelica.Constants.eps then + movAve.u = 0; + else + movAve.u = QHeat/Pel; + end if; + connect(movAve.y, y_COP); + annotation (Icon(coordinateSystem(preserveAspectRatio=false), graphics={ + Line( + points={{-82,0},{-12,0}}, + color={28,108,200}, + thickness=0.5), + Text( + extent={{-92,32},{-2,12}}, + lineColor={28,108,200}, + lineThickness=0.5, + textString="QHeat"), + Text( + extent={{-92,-8},{-2,-28}}, + lineColor={28,108,200}, + lineThickness=0.5, + textString="Pel"), + Line(points={{-6,6},{22,6}}, color={28,108,200}), + Line(points={{-6,-6},{22,-6}}, color={28,108,200}), + Text( + extent={{12,8},{102,-12}}, + lineColor={28,108,200}, + lineThickness=0.5, + textString="COP")}), Diagram( + coordinateSystem(preserveAspectRatio=false)), + Documentation(revisions="+ This model is used to calculate the COP or the EER of a device. As + the electrical power could get negative, a lower boundary is used to + avoid division by zero. A moving average ensure a stable calculation + of the COP or EER. +
+")); + end calcCOP; + + package BaseClasses "Package with partial classes of Performance Data" + partial model PartialPerformanceData + "Model with a replaceable for different methods of data aggregation" + + Modelica.Blocks.Interfaces.RealOutput Pel(final unit="W", final displayUnit="kW") + "Electrical Power consumed by HP" annotation (Placement( + transformation( + extent={{-10,-10},{10,10}}, + rotation=270, + origin={0,-110}))); + Modelica.Blocks.Interfaces.RealOutput QCon(final unit="W", final displayUnit="kW") + "Heat flow rate through Condenser" annotation (Placement(transformation( + extent={{-10,-10},{10,10}}, + rotation=270, + origin={-80,-110}))); + AixLib.Controls.Interfaces.ThermalMachineControlBus sigBus + "Bus-connector used in a thermal machine" annotation (Placement( + transformation( + extent={{-15,-14},{15,14}}, + rotation=0, + origin={1,104}))); + Modelica.Blocks.Interfaces.RealOutput QEva(final unit="W", final displayUnit="kW") + "Heat flow rate through Condenser" annotation (Placement( + transformation( + extent={{-10,-10},{10,10}}, + rotation=270, + origin={80,-110}))); + protected + parameter Real scalingFactor=1 "Scaling factor of heat pump"; + annotation (Icon(coordinateSystem(preserveAspectRatio=false), graphics={ + Rectangle( + extent={{-100,-100},{100,100}}, + lineColor={0,0,127}, + fillColor={255,255,255}, + fillPattern=FillPattern.Solid), Text( + extent={{-47.5,-26.5},{47.5,26.5}}, + lineColor={0,0,127}, + pattern=LinePattern.Dash, + textString="%name +", origin={0.5,60.5}, + rotation=180)}),Diagram(coordinateSystem(preserveAspectRatio=false)), + Documentation(revisions="+ Partial model for calculation of P_el, QCon and QEva based on the values in the + sigBusHP. +
+")); + end PartialPerformanceData; + annotation (Icon(graphics={ + Rectangle( + lineColor={200,200,200}, + fillColor={248,248,248}, + fillPattern=FillPattern.HorizontalCylinder, + extent={{-100.0,-100.0},{100.0,100.0}}, + radius=25.0), + Rectangle( + lineColor={128,128,128}, + extent={{-100.0,-100.0},{100.0,100.0}}, + radius=25.0), + Ellipse( + extent={{-30.0,-30.0},{30.0,30.0}}, + lineColor={128,128,128}, + fillColor={255,255,255}, + fillPattern=FillPattern.Solid)}), Documentation(revisions="+ This package contains base classes for the package AixLib.Fluid.HeatPumps.BaseClasses.PerformanceData. +
+")); + end BaseClasses; +annotation (Documentation(revisions="+ This package contains models for the grey box heat pump model + AixLib.Fluid.HeatPumps.HeatPump. +
+")); +end PerformanceData; diff --git a/AixLib/DataBase/HeatPump/package.mo b/AixLib/DataBase/ThermalMachines/HeatPump/package.mo similarity index 72% rename from AixLib/DataBase/HeatPump/package.mo rename to AixLib/DataBase/ThermalMachines/HeatPump/package.mo index 49a7b5fa01..31778020d9 100644 --- a/AixLib/DataBase/HeatPump/package.mo +++ b/AixLib/DataBase/ThermalMachines/HeatPump/package.mo @@ -1,7 +1,9 @@ -within AixLib.DataBase; +within AixLib.DataBase.ThermalMachines; package HeatPump "Collection of HeatPump Database Records" extends Modelica.Icons.Package; + + end HeatPump; diff --git a/AixLib/DataBase/HeatPump/package.order b/AixLib/DataBase/ThermalMachines/HeatPump/package.order similarity index 61% rename from AixLib/DataBase/HeatPump/package.order rename to AixLib/DataBase/ThermalMachines/HeatPump/package.order index 4781c08a64..e27a59356a 100644 --- a/AixLib/DataBase/HeatPump/package.order +++ b/AixLib/DataBase/ThermalMachines/HeatPump/package.order @@ -1,3 +1,5 @@ -HeatPumpBaseDataDefinition EN14511 EN255 +Functions +PerformanceData +HeatPumpBaseDataDefinition diff --git a/AixLib/DataBase/ThermalMachines/package.mo b/AixLib/DataBase/ThermalMachines/package.mo new file mode 100644 index 0000000000..62bcc55560 --- /dev/null +++ b/AixLib/DataBase/ThermalMachines/package.mo @@ -0,0 +1,4 @@ +within AixLib.DataBase; +package ThermalMachines "Collection of Thermal Machines Database Records" + +end ThermalMachines; diff --git a/AixLib/DataBase/ThermalMachines/package.order b/AixLib/DataBase/ThermalMachines/package.order new file mode 100644 index 0000000000..0238c92550 --- /dev/null +++ b/AixLib/DataBase/ThermalMachines/package.order @@ -0,0 +1,2 @@ +Chiller +HeatPump diff --git a/AixLib/DataBase/ThermalZones/OfficePassiveHouse/OPH_1_Office.mo b/AixLib/DataBase/ThermalZones/OfficePassiveHouse/OPH_1_Office.mo index 8ed5e30973..547cde6e56 100644 --- a/AixLib/DataBase/ThermalZones/OfficePassiveHouse/OPH_1_Office.mo +++ b/AixLib/DataBase/ThermalZones/OfficePassiveHouse/OPH_1_Office.mo @@ -1,86 +1,100 @@ within AixLib.DataBase.ThermalZones.OfficePassiveHouse; record OPH_1_Office "Office zone of office building" extends AixLib.DataBase.ThermalZones.ZoneBaseRecord( - T_start = 293.15, - VAir = 6700.0, - AZone = 1675.0, - alphaRad = 5, - lat = 0.87266462599716, - nOrientations = 5, - AWin = {108.5, 19.0, 108.5, 19.0, 0}, - ATransparent = {108.5, 19.0, 108.5, 19.0, 0}, - alphaWin = 2.7, - RWin = 0.017727777777, - gWin = 0.78, - UWin= 2.1, - ratioWinConRad = 0.09, - AExt = {244.12, 416.33, 244.12, 416.33, 208.16}, - alphaExt = 2.19, - nExt = 1, - RExt = {1.4142107968e-05}, - RExtRem = 0.000380773816236, - CExt = {492976267.489}, - AInt = 5862.5, - alphaInt = 2.27, - nInt = 1, - RInt = {1.13047235829e-05}, - CInt = {1402628013.98}, - AFloor = 0, - alphaFloor = 0, - nFloor = 1, - RFloor = {0.001}, - RFloorRem = 0.001, - CFloor = {0.001}, - ARoof = 0, - alphaRoof = 0, - nRoof = 1, - RRoof = {0.001}, - RRoofRem = 0.001, - CRoof = {0.001}, - nOrientationsRoof = 1, - tiltRoof = {0}, - aziRoof = {0}, - wfRoof = {1}, - aRoof = 0.7, - aExt = 0.7, - TSoil = 283.15, - alphaWallOut = 20.0, - alphaRadWall = 5, - alphaWinOut = 20.0, - alphaRoofOut = 20, - alphaRadRoof = 5, - tiltExtWalls = {1.5707963267949, 1.5707963267949, 1.5707963267949, 1.5707963267949, 0}, - aziExtWalls = {0, 1.5707963267949, 3.1415926535898, 4.7123889803847, 0}, - wfWall = {0.2, 0.2, 0.2, 0.2, 0.1}, - wfWin = {0.25, 0.25, 0.25, 0.25, 0}, - wfGro = 0.1, - nrPeople = 83.75, - ratioConvectiveHeatPeople = 0.5, - nrPeopleMachines = 117.25, - ratioConvectiveHeatMachines = 0.6, - lightingPower = 12.5, - ratioConvectiveHeatLighting = 0.6, - useConstantACHrate = false, - baseACH = 0.2, - maxUserACH = 1, - maxOverheatingACH = {3.0, 2.0}, - maxSummerACH = {1.0, 273.15 + 10, 273.15 + 17}, - winterReduction = {0.2,273.15,273.15 + 10}, - withAHU = true, - minAHU = 0, - maxAHU = 12, - hHeat = 167500, - lHeat = 0, - KRHeat = 1000, - TNHeat = 1, - HeaterOn = true, - hCool = 0, - lCool = -1, - KRCool = 1000, - TNCool = 1, - CoolerOn = false); + T_start=293.15, + VAir=6700.0, + AZone=1675.0, + hRad=5, + lat=0.87266462599716, + nOrientations=5, + AWin={108.5,19.0,108.5,19.0,0}, + ATransparent={108.5,19.0,108.5,19.0,0}, + hConWin=2.7, + RWin=0.017727777777, + gWin=0.78, + UWin=2.1, + ratioWinConRad=0.09, + AExt={244.12,416.33,244.12,416.33,208.16}, + hConExt=2.19, + nExt=1, + RExt={1.4142107968e-05}, + RExtRem=0.000380773816236, + CExt={492976267.489}, + AInt=5862.5, + hConInt=2.27, + nInt=1, + RInt={1.13047235829e-05}, + CInt={1402628013.98}, + AFloor=0, + hConFloor=0, + nFloor=1, + RFloor={0.001}, + RFloorRem=0.001, + CFloor={0.001}, + ARoof=0, + hConRoof=0, + nRoof=1, + RRoof={0.001}, + RRoofRem=0.001, + CRoof={0.001}, + nOrientationsRoof=1, + tiltRoof={0}, + aziRoof={0}, + wfRoof={1}, + aRoof=0.7, + aExt=0.7, + TSoil=283.15, + hConWallOut=20.0, + hRadWall=5, + hConWinOut=20.0, + hConRoofOut=20, + hRadRoof=5, + tiltExtWalls={1.5707963267949,1.5707963267949,1.5707963267949,1.5707963267949,0}, + aziExtWalls={0,1.5707963267949,3.1415926535898,4.7123889803847,0}, + wfWall={0.2,0.2,0.2,0.2,0.1}, + wfWin={0.25,0.25,0.25,0.25,0}, + wfGro=0.1, + specificPeople=1/14, + activityDegree=1.2, + fixedHeatFlowRatePersons=70, + ratioConvectiveHeatPeople=0.5, + internalGainsMoistureNoPeople=0.5, + internalGainsMachinesSpecific=7.0, + ratioConvectiveHeatMachines=0.6, + lightingPowerSpecific=12.5, + ratioConvectiveHeatLighting=0.6, + useConstantACHrate=false, + baseACH=0.2, + maxUserACH=1, + maxOverheatingACH={3.0,2.0}, + maxSummerACH={1.0,273.15 + 10,273.15 + 17}, + winterReduction={0.2,273.15,273.15 + 10}, + withAHU=true, + minAHU=0, + maxAHU=12, + hHeat=167500, + lHeat=0, + KRHeat=1000, + TNHeat=1, + HeaterOn=true, + hCool=0, + lCool=-1, + KRCool=1000, + TNCool=1, + CoolerOn=false, + TThresholdHeater=273.15 + 15, + TThresholdCooler=273.15 + 22, + withIdealThresholds=false); annotation (Documentation(revisions="Zone "Office" of an example building according to an office building with passive house standard. The building is divided in six zones, this is a typical zoning for an office building.
+")); +end OPH_1_OfficeNoHeaterCooler; diff --git a/AixLib/DataBase/ThermalZones/OfficePassiveHouse/package.order b/AixLib/DataBase/ThermalZones/OfficePassiveHouse/package.order index 3bc2a36747..b4d13f5804 100644 --- a/AixLib/DataBase/ThermalZones/OfficePassiveHouse/package.order +++ b/AixLib/DataBase/ThermalZones/OfficePassiveHouse/package.order @@ -1 +1,2 @@ OPH_1_Office +OPH_1_OfficeNoHeaterCooler diff --git a/AixLib/DataBase/ThermalZones/ZoneBaseRecord.mo b/AixLib/DataBase/ThermalZones/ZoneBaseRecord.mo index edfc49054f..a15f3bc067 100644 --- a/AixLib/DataBase/ThermalZones/ZoneBaseRecord.mo +++ b/AixLib/DataBase/ThermalZones/ZoneBaseRecord.mo @@ -1,4 +1,4 @@ -within AixLib.DataBase.ThermalZones; +within AixLib.DataBase.ThermalZones; record ZoneBaseRecord "Base record definition for zone records" extends Modelica.Icons.Record; @@ -6,8 +6,7 @@ record ZoneBaseRecord "Base record definition for zone records" parameter Boolean withAirCap = true "Consider capacity of indoor air"; parameter Modelica.SIunits.Volume VAir "Air volume of the zone"; parameter Modelica.SIunits.Area AZone "Net floor area of zone"; - parameter Modelica.SIunits.CoefficientOfHeatTransfer alphaRad - "Coefficient of heat transfer for linearized radiation exchange between walls"; + parameter Modelica.SIunits.CoefficientOfHeatTransfer hRad "Coefficient of heat transfer for linearized radiation exchange between walls"; parameter Modelica.SIunits.Angle lat "Latitude of zone location"; parameter Integer nOrientations(min=1) "Number of orientations"; @@ -15,8 +14,7 @@ record ZoneBaseRecord "Base record definition for zone records" "Areas of windows by orientations"; parameter Modelica.SIunits.Area ATransparent[nOrientations] "Areas of transparent (solar radiation transmittend) elements by orientations"; - parameter Modelica.SIunits.CoefficientOfHeatTransfer alphaWin - "Convective coefficient of heat transfer of windows (indoor)"; + parameter Modelica.SIunits.CoefficientOfHeatTransfer hConWin "Convective coefficient of heat transfer of windows (indoor)"; parameter Modelica.SIunits.ThermalResistance RWin "Resistor for windows"; parameter Modelica.SIunits.TransmissionCoefficient gWin "Total energy transmittance of windows"; @@ -25,28 +23,24 @@ record ZoneBaseRecord "Base record definition for zone records" parameter Real ratioWinConRad "Ratio for windows between convective and radiative heat emission"; parameter Modelica.SIunits.Area AExt[nOrientations] "Areas of exterior walls by orientations"; - parameter Modelica.SIunits.CoefficientOfHeatTransfer alphaExt - "Convective coefficient of heat transfer for exterior walls (indoor)"; + parameter Modelica.SIunits.CoefficientOfHeatTransfer hConExt "Convective coefficient of heat transfer for exterior walls (indoor)"; parameter Integer nExt(min=1) "Number of RC-elements of exterior walls"; parameter Modelica.SIunits.ThermalResistance RExt[nExt] "Resistances of exterior walls, from inside to outside"; parameter Modelica.SIunits.ThermalResistance RExtRem "Resistance of remaining resistor RExtRem between capacity n and outside"; parameter Modelica.SIunits.HeatCapacity CExt[nExt] "Heat capacities of exterior walls, from inside to outside"; parameter Modelica.SIunits.Area AInt "Area of interior walls"; - parameter Modelica.SIunits.CoefficientOfHeatTransfer alphaInt - "Convective coefficient of heat transfer of interior walls (indoor)"; + parameter Modelica.SIunits.CoefficientOfHeatTransfer hConInt "Convective coefficient of heat transfer of interior walls (indoor)"; parameter Integer nInt(min=1) "Number of RC-elements of interior walls"; parameter Modelica.SIunits.ThermalResistance RInt[nInt] "Resistances of interior wall, from port to center"; parameter Modelica.SIunits.HeatCapacity CInt[nInt] "Heat capacities of interior walls, from port to center"; parameter Modelica.SIunits.Area AFloor "Area of floor plate"; - parameter Modelica.SIunits.CoefficientOfHeatTransfer alphaFloor - "Convective coefficient of heat transfer of floor plate (indoor)"; + parameter Modelica.SIunits.CoefficientOfHeatTransfer hConFloor "Convective coefficient of heat transfer of floor plate (indoor)"; parameter Integer nFloor(min=1) "Number of RC-elements of floor plate"; parameter Modelica.SIunits.ThermalResistance RFloor[nFloor] "Resistances of floor plate, from inside to outside"; parameter Modelica.SIunits.ThermalResistance RFloorRem "Resistance of remaining resistor RFloorRem between capacity n and outside"; parameter Modelica.SIunits.HeatCapacity CFloor[nFloor] "Heat capacities of floor plate, from inside to outside"; parameter Modelica.SIunits.Area ARoof "Area of roof"; - parameter Modelica.SIunits.CoefficientOfHeatTransfer alphaRoof - "Convective coefficient of heat transfer of roof (indoor)"; + parameter Modelica.SIunits.CoefficientOfHeatTransfer hConRoof "Convective coefficient of heat transfer of roof (indoor)"; parameter Integer nRoof(min=1) "Number of RC-elements of roof"; parameter Modelica.SIunits.ThermalResistance RRoof[nRoof] "Resistances of roof, from inside to outside"; parameter Modelica.SIunits.ThermalResistance RRoofRem "Resistance of remaining resistor RRoofRem between capacity n and outside"; @@ -60,16 +54,11 @@ record ZoneBaseRecord "Base record definition for zone records" parameter Modelica.SIunits.Emissivity aExt "Coefficient of absorption of exterior walls (outdoor)"; parameter Modelica.SIunits.Temperature TSoil "Temperature of soil"; - parameter Modelica.SIunits.CoefficientOfHeatTransfer alphaWallOut - "Exterior walls convective coefficient of heat transfer (outdoor)"; - parameter Modelica.SIunits.CoefficientOfHeatTransfer alphaRadWall - "Coefficient of heat transfer for linearized radiation for exterior walls"; - parameter Modelica.SIunits.CoefficientOfHeatTransfer alphaWinOut - "Windows' convective coefficient of heat transfer (outdoor)"; - parameter Modelica.SIunits.CoefficientOfHeatTransfer alphaRoofOut - "Roof's convective coefficient of heat transfer (outdoor)"; - parameter Modelica.SIunits.CoefficientOfHeatTransfer alphaRadRoof - "Coefficient of heat transfer for linearized radiation for roof"; + parameter Modelica.SIunits.CoefficientOfHeatTransfer hConWallOut "Exterior walls convective coefficient of heat transfer (outdoor)"; + parameter Modelica.SIunits.CoefficientOfHeatTransfer hRadWall "Coefficient of heat transfer for linearized radiation for exterior walls"; + parameter Modelica.SIunits.CoefficientOfHeatTransfer hConWinOut "Windows' convective coefficient of heat transfer (outdoor)"; + parameter Modelica.SIunits.CoefficientOfHeatTransfer hConRoofOut "Roof's convective coefficient of heat transfer (outdoor)"; + parameter Modelica.SIunits.CoefficientOfHeatTransfer hRadRoof "Coefficient of heat transfer for linearized radiation for roof"; parameter Modelica.SIunits.Angle tiltExtWalls[nOrientations] "Tilts of exterior walls"; parameter Modelica.SIunits.Angle aziExtWalls[nOrientations] "Azimuths of exterior walls"; parameter Real wfWall[nOrientations] @@ -78,14 +67,19 @@ record ZoneBaseRecord "Base record definition for zone records" "Weight factors of the windows"; parameter Real wfGro "Weight factor of the ground"; - - parameter Real nrPeople "Number of people in the room"; + parameter Real specificPeople "people per squaremeter"; + parameter Real activityDegree "acitivity degree of people in met"; + parameter Modelica.SIunits.HeatFlowRate fixedHeatFlowRatePersons + "Area specific heatflowrate by persons in case of temperature independent + calculation"; parameter Real ratioConvectiveHeatPeople "Ratio of convective heat from overall heat output for people"; - parameter Real nrPeopleMachines "Number of people with machines"; + parameter Real internalGainsMoistureNoPeople + "internal moisture production of plants, etc. except from people in g/(h m²)"; + parameter Real internalGainsMachinesSpecific "Heat Flux of machines"; parameter Real ratioConvectiveHeatMachines "Ratio of convective heat from overall heat output for machines"; - parameter Modelica.SIunits.HeatFlux lightingPower "Heat flux of lighting"; + parameter Modelica.SIunits.HeatFlux lightingPowerSpecific "Heat flux of lighting"; parameter Real ratioConvectiveHeatLighting "Ratio of convective heat from overall heat output for lights"; parameter Boolean useConstantACHrate @@ -98,14 +92,12 @@ record ZoneBaseRecord "Base record definition for zone records" "Additional ACH in summer, Tmin, Tmax"; parameter Real winterReduction[3] "Reduction factor of userACH for cold weather"; - parameter Boolean withAHU "Zone is connected to central air handling unit"; parameter Real minAHU(unit = "m3/(h.m2)") "Minimum specific air flow supplied by the AHU"; parameter Real maxAHU(unit = "m3/(h.m2)") "Maximum specific air flow supplied by the AHU"; - parameter Real hHeat "Upper limit controller output"; parameter Real lHeat "Lower limit controller output"; parameter Real KRHeat "Gain of the controller"; @@ -117,13 +109,27 @@ record ZoneBaseRecord "Base record definition for zone records" parameter Modelica.SIunits.Time TNCool "Time constant of the controller"; parameter Boolean CoolerOn "Use chiller component"; - + parameter Modelica.SIunits.Temperature TThresholdHeater + "Threshold temperature below ideal heater is used"; + parameter Modelica.SIunits.Temperature TThresholdCooler + "Threshold temperature above ideal cooler is used"; + parameter Boolean withIdealThresholds + "Sets if the threshold temperatures for ideal heater and cooler should + be used"; annotation(Documentation(info="This is the base definition of zone records used in AixLib.ThermalZones.ReducedOrder.ThermalZone. It aggregates all parameters at one record to enhance usability, exchanging entire datasets and automatic generation of these datasets.
For automatic generation of thermal zone and multizone models as well as for datasets, see https://github.com/RWTH-EBC/TEASER
", revisions="+ This package contains test examples for the use of induction machine + models. +
+")); +end Examples; diff --git a/AixLib/Electrical/Machines/Examples/package.order b/AixLib/Electrical/Machines/Examples/package.order new file mode 100644 index 0000000000..225950a050 --- /dev/null +++ b/AixLib/Electrical/Machines/Examples/package.order @@ -0,0 +1 @@ +InductionMotor diff --git a/AixLib/Electrical/Machines/InductionMachine.mo b/AixLib/Electrical/Machines/InductionMachine.mo new file mode 100644 index 0000000000..99a3fba44f --- /dev/null +++ b/AixLib/Electrical/Machines/InductionMachine.mo @@ -0,0 +1,245 @@ +within AixLib.Electrical.Machines; +model InductionMachine + "Model of a general induction machine working as generator or electric motor" + import AixLib; + extends Modelica.Electrical.Machines.Icons.TransientMachine; + + parameter Modelica.SIunits.Frequency n0=f_1/p + "Idling speed of the electric machine" + annotation (Dialog(group="Machine specifications")); + parameter Modelica.SIunits.Frequency n_nominal=1530/60 "Rated rotor speed" + annotation (Dialog(group="Machine specifications")); + parameter Modelica.SIunits.Frequency f_1=50 "Frequency" + annotation (Dialog(group="Machine specifications")); + parameter Modelica.SIunits.Voltage U_1=400 "Rated voltage" + annotation (Dialog(group="Machine specifications")); + parameter Modelica.SIunits.Current I_elNominal=P_elNominal/(sqrt(3)*U_1* + cosPhi) "Rated current" + annotation (Dialog(group="Machine specifications")); + parameter Modelica.SIunits.Current I_1_start=if P_Mec_nominal<=15000 then 7.2*I_elNominal else 8*I_elNominal + "Motor start current (realistic factors used from DIN VDE 2650/2651)" + annotation (Dialog( tab="Calculations")); + parameter Modelica.SIunits.Power P_elNominal=15000 + "Nominal electrical power of electric machine" + annotation (Dialog(group="Machine specifications")); + parameter Modelica.SIunits.Power P_Mec_nominal=P_elNominal*(1+s_nominal/0.22) "Nominal mechanical power of electric machine" + annotation (Dialog(tab="Calculations")); + parameter Modelica.SIunits.Torque M_nominal=P_Mec_nominal/(2*Modelica.Constants.pi*n_nominal) "Nominal torque of electric machine" + annotation (Dialog(tab="Calculations")); + parameter Modelica.SIunits.Torque M_til=2*M_nominal "Tilting torque of electric machine (realistic factor used from DIN VDE 2650/2651)" + annotation (Dialog(tab="Calculations")); + parameter Modelica.SIunits.Torque M_start=if P_Mec_nominal<=4000 then 1.6*M_nominal + elseif P_Mec_nominal>=22000 then 1*M_nominal else 1.25*M_nominal + "Starting torque of electric machine (realistic factor used from DIN VDE 2650/2651)" + annotation (Dialog(tab="Calculations")); + parameter Modelica.SIunits.Inertia J_Gen=1 + "Moment of inertia of the electric machine (default=0.5kg.m2)" + annotation (Dialog(group="Calibration")); + parameter Real s_nominal=abs(1-n_nominal*p/f_1) "Nominal slip of electric machine" + annotation (Dialog(tab="Calculations")); + parameter Real s_til=abs((s_nominal*(M_til/M_nominal)+s_nominal*sqrt(abs(((M_til/M_nominal)^2)-1+2*s_nominal*((M_til/M_nominal)-1))))/(1-2*s_nominal*((M_til/M_nominal)-1))) + "Tilting slip of electric machine" + annotation (Dialog(tab="Calculations")); + parameter Real p=2 "Number of pole pairs" + annotation (Dialog(group="Machine specifications")); + parameter Real cosPhi=0.8 "Power factor of electric machine (default=0.8)" + annotation (Dialog(group="Machine specifications")); + parameter Real calFac=1 + "Calibration factor for electric power outuput (default=1)" + annotation (Dialog(group="Calibration")); + parameter Real gearRatio=1 "Transmission ratio (engine speed / generator speed)" + annotation (Dialog(group="Machine specifications")); + + Modelica.SIunits.Frequency n=inertia.w/(2*Modelica.Constants.pi) "Speed of machine rotor [1/s]"; + Modelica.SIunits.Current I_1 "Electric current of machine stator"; + Modelica.SIunits.Power P_E "Electrical power at the electric machine"; + Modelica.SIunits.Power P_Mec "Mechanical power at the electric machine"; + Modelica.SIunits.Power CalQ_Loss + "Calculated heat flow from electric machine"; + Modelica.SIunits.Torque M "Torque at electric machine"; + Real s=1-n*p/f_1 "Current slip of electric machine"; + Real eta "Total efficiency of the electric machine (as motor)"; + Real calI_1 = 1/(1+((k-1)/((s_nominal^2)-k))*((s^2)+rho1*abs(s)+rho0)); + Boolean OpMode = (n<=n0) "Operation mode (true=motor, false=generator)"; + Boolean SwitchOnOff = isOn "Operation of electric machine (true=On, false=Off)"; + Modelica.Mechanics.Rotational.Components.Inertia inertia( w(fixed=false), J=J_Gen) + annotation (Placement(transformation(extent={{20,-10},{40,10}}))); + Modelica.Blocks.Sources.RealExpression electricTorque(y=M) + annotation (Placement(transformation(extent={{-60,-10},{-40,10}}))); + Modelica.Mechanics.Rotational.Sources.Torque torque + annotation (Placement(transformation(extent={{-20,-10},{0,10}}))); + Modelica.Mechanics.Rotational.Interfaces.Flange_a flange_Machine + annotation (Placement(transformation(extent={{90,-10},{110,10}}))); + + Modelica.Mechanics.Rotational.Components.IdealGear transmission(ratio= + gearRatio) + annotation (Placement(transformation(extent={{80,-10},{60,10}}))); + Modelica.Blocks.Interfaces.BooleanInput isOn annotation (Placement( + transformation( + extent={{-20,-20},{20,20}}, + rotation=0, + origin={-106,0}), iconTransformation(extent={{-100,-20},{-60,20}}))); + Modelica.Blocks.Interfaces.RealOutput electricCurrent annotation (Placement( + transformation( + extent={{-10,-10},{10,10}}, + rotation=90, + origin={-40,74}), iconTransformation( + extent={{-10,-10},{10,10}}, + rotation=90, + origin={-30,74}))); + Modelica.Blocks.Interfaces.RealOutput electricPower annotation (Placement( + transformation( + extent={{-10,-10},{10,10}}, + rotation=90, + origin={0,74}), iconTransformation( + extent={{-10,-10},{10,10}}, + rotation=90, + origin={0,74}))); + Modelica.Blocks.Interfaces.RealOutput rotationalSpeed annotation (Placement( + transformation( + extent={{-10,-10},{10,10}}, + rotation=90, + origin={40,74}), iconTransformation( + extent={{-10,-10},{10,10}}, + rotation=90, + origin={30,74}))); + Modelica.Blocks.Sources.RealExpression current(y=I_1) annotation (Placement( + transformation( + extent={{-10,-10},{10,10}}, + rotation=90, + origin={-40,34}))); + Modelica.Blocks.Sources.RealExpression power(y=P_E) annotation (Placement( + transformation( + extent={{-10,-10},{10,10}}, + rotation=90, + origin={0,34}))); + Modelica.Blocks.Sources.RealExpression speed(y=n) annotation (Placement( + transformation( + extent={{-10,-10},{10,10}}, + rotation=90, + origin={40,34}))); + +protected + parameter Real rho0=s_til^2 "Calculation variable for analytical approach (Aree, 2017)" + annotation (Dialog(tab="Calculations")); + parameter Real rho1=(M_start*(1+s_til^2)-2*s_til*M_til)/(M_til-M_start) "Calculation variable for analytical approach (Aree, 2017)" + annotation (Dialog(tab="Calculations")); + parameter Real rho3=(M_til*M_start*(1-s_til)^2)/(M_til-M_start) "Calculation variable for analytical approach (Aree, 2017)" + annotation (Dialog(tab="Calculations")); + parameter Real k=((I_elNominal/I_1_start)^2)*(((s_nominal^2)+rho1*s_nominal+rho0)/(1+rho1+rho0)) "Calculation variable for analytical approach (Aree, 2017)" + annotation (Dialog(tab="Calculations")); + +equation + +if noEvent(SwitchOnOff) then + + I_1=sign(s)*I_1_start*sqrt(abs((1+((k-1)/((s_nominal^2)-k))*(s^2)*(1+rho1+rho0))*calI_1)); + P_E=if noEvent(s>0) then sqrt(3)*I_1*U_1*cosPhi elseif noEvent(s<0) then calFac*(P_Mec+CalQ_Loss) else 1; + P_Mec=2*Modelica.Constants.pi*M*n; + CalQ_Loss= (calFac-1)*P_E + 2*Modelica.Constants.pi*M*(s*n0)/0.22; + M=sign(s)*(rho3*abs(s))/((s^2)+rho1*abs(s)+rho0); + eta=if noEvent(s>0) then abs(P_Mec/(P_E+1)) + elseif noEvent(s<0) then abs(P_E/(P_Mec-1)) else 0; + +else + + I_1=0; + P_E=0; + P_Mec=0; + CalQ_Loss=0; + M=if noEvent(s<0) then sign(s)*(rho3*abs(s))/((s^2)+rho1*abs(s)+rho0) else 0; + eta=0; + + end if; + + connect(electricTorque.y, torque.tau) + annotation (Line(points={{-39,0},{-22,0}}, color={0,0,127})); + connect(torque.flange, inertia.flange_a) + annotation (Line(points={{0,0},{20,0}}, color={0,0,0})); + connect(inertia.flange_b, transmission.flange_b) + annotation (Line(points={{40,0},{60,0}}, color={0,0,0})); + connect(transmission.flange_a, flange_Machine) + annotation (Line(points={{80,0},{100,0}}, color={0,0,0})); + connect(current.y, electricCurrent) + annotation (Line(points={{-40,45},{-40,74}}, color={0,0,127})); + connect(power.y, electricPower) + annotation (Line(points={{0,45},{0,74}}, color={0,0,127})); + connect(speed.y, rotationalSpeed) + annotation (Line(points={{40,45},{40,74}}, color={0,0,127})); + annotation (Documentation(info="+ Model of an electric induction machine that includes the calculation + of: +
++ -> mechanical output (torque and speed) +
++ -> electrical output (current and power) +
++ It delivers positive torque and negative electrical power when + operating below the synchronous speed (motor) and can switch into + generating electricity (positive electrical power and negative + torque) when operating above the synchronous speed (generator). +
++ The calculations are based on simple electrical equations and an + analytical approach by Pichai Aree (2017) that determinates stator + current and torque depending on the slip. +
++ The parameters rho0, rho1, rho3 and k are used for the calculation of + the characteristic curves. They are determined from the general + machine data at nominal operation and realistic assumptions about the + ratio between starting torque, starting current, breakdown torque, + breakdown slip and nominal current and torque. These assumptions are + taken from DIN VDE 2650/2651. It shows good agreement for machines up + to 100kW of mechanical power operating at a speed up to 3000rpm and + with a rated voltage up to 500V. +
++ The only data required is: +
++ - number of polepairs or synchronous speed (p or n0) +
++ - voltage and frequence of the electric power supply (U_1 and + f_1) +
++ - nominal current and speed (I_elNominal and n_nominal + ) +
++ - power factor if available (default=0.8) +
+
+
+ Additional Information:
+
+
+ - Electric power calculation as a generator from mechanical input
+ speed can be further approached by small changes to the speed.
+
+ - The electric losses are calculated from the slip depending rotor + loss which corresponds to roughly 22% of the total losses according + to Almeida (DOI: 10.1109/MIAS.2010.939427). +
+", + revisions="PV system data (DataBase Records) can be found:
Source of literature for the calculation of the pv cell efficiency:
PV system data (DataBase Records) can be found:
Source of literature for the calculation of the pv cell efficiency:
Evaporator/Condenser model adapted to FastHAVC library.
+ This model is based on the Fluid model AixLib.Fluid.HeatPumps.BaseClasses.EvaporatorCondenserWithCapacity. It includes heat losses to the environment.
Overview
+Chiller model adapted to FastHAVC library.
+This model is based on the Fluid model + AixLib.Fluid.Chiller.Chiller created by Julian Matthes in 2019.
+", + revisions="- Heat pump black box model with two simple heat exchangers, no - controllers included. -
-- Works as on/off-controlled heat pump or heat pump with capacity - control. The type of capacity and electrical power calculation can be - chosen: -
-- Correction models of the calculation can be activated that effect the - efficiency or the start-up and shut-off behavior of the heat pump. -
-- The heat pump speed is helt between the boundaries N_min and N_max - even if the input speed is higher or lower. But no further - controlling is implemented. The control logic is conciously not - integrated into this model. -
-- The calculation of the capacity and electric power does not represent - any dynamic behavior of the refrigerant cycle as it occurs in real - heat pumps. Therefor two possibilities exist, to add dynamic - behavior: -
-- See ValidationHeatPump -
-", - revisions="HeatPump model adapted to FastHAVC library.
+ This model is based on the Fluid model
+ AixLib.Fluid.HeatPumps.HeatPump created by Fabian
+ Wüllhorst in 2018.
+ Example Setup is based on fluid example of + + AixLib.Fluid.Chillers.Examples.Chiller +
+ ", + revisions="+ Example Setup is based on fluid example of + + AixLib.Fluid.HeatPumps.Examples.HeatPump +
+ ", + revisions="
+ This component transports one fluid stream.
+ It is based on the Fluid model AixLib.Fluid.Interfaces.TwoPortHeatMassExchanger and was adapted to the FastHVAC library.
+
start attribute for filter.x.order.Partial model of a three way valve. This is the base model for valves @@ -172,6 +145,19 @@ for details regarding the valve implementation. ", revisions="
filteredInput to use_inputFilter.Partial model for a two way valve. This is the base model for valves @@ -102,6 +95,19 @@ each valve opening characteristics has different parameters. revisions="
phi>-0.2
+since the valve control input is now lower limited
+to zero.
+See
+issue 1223.
+filteredInput to use_inputFilter.Partial model for valves with different opening characteristics, @@ -85,6 +57,11 @@ AixLib.Fluid.Actuators.Valves.TwoWayLinear. revisions="
filteredInput to use_inputFilter.filteredInput to use_inputFilter.-This model contains a simple calculation procedure for flow coefficients (for -more information, please check out - -AixLib.Fluid.Actuators.Valves.ExpansionValves.BaseClasses.PartialExpansionValve). -The model provides a constant flow coefficient and is the most basic flow -coefficient model. -
-")); - end ConstantFlowCoefficient; - - model Buck_R22R407CR410A_EEV_16_18 - "Buckingham - Similitude for R22, R407C, R410A - EEV - 1.6 mm to 1.8 mm " - extends PowerFlowCoefficient( - final powMod=Types.PowerModels.Li2013, - final a=1.066, - final b={0.8006,0.0609}, - final pDifRat=0.84); - - annotation (Documentation(revisions=" -
-This model contains a calculation procedure for flow coefficients presented by
-Li (2013).
-
| Reference | -Formula | -Refrigerants | -Validity Tcondensing |
-Validity Tevaporating |
-Validity Tsubcooling |
-
|---|---|---|---|---|---|
| Li2013 | -C = a * (opening)^b1 *
-(Tsubcooling/Tcrit)^b2 |
-R22, R407C, R410A |
-30 - 50 °C |
-0 - 30 °C |
-1.5 - 15 °C |
-
-Li, W. (2013): -Simplified modeling analysis ofmass flow characteristics in electronic expansion -valve. In: Applied Thermal Engineering 53(1), S. 8–12 -
-")); - end Buck_R22R407CR410A_EEV_16_18; - - model Buck_R22R407CR410A_EEV_15_22 - "Buckingham - Similitude for R22, R407C, R410A - EEV - 1.5 mm to 2.2 mm " - extends PowerFlowCoefficient( - final powMod=Types.PowerModels.ShanweiEtAl2005, - final a=0.2343, - final b={0.0281,0.0260,-0.0477,-0.1420,-0.1291}, - final dCle=0.02e-3); - - annotation (Documentation(revisions=" -
-This model contains a calculation procedure for flow coefficients presented by
-Shanwei et al. (2005).
-
| Reference | -Formula | -Refrigerants | -Validity Tcondensing |
-Validity Tevaporating |
-Validity Tsubcooling |
-
|---|---|---|---|---|---|
| ShanweiEtAl2005 | -C = a * a * (A/dclearance^2)^b1 *
-((pinlet-poutlet)/pcrit)^b2 *
-(Tcrit/Tsubcooling)^b3 *
-(rhoinlet/rhooutlet)^b4 *
-(quality)^b5 |
-R22, R407C, R410A |
-40 - 50 °C |
-0 - 10 °C |
-1.5 - 10 °C |
-
-M. Shanwei, Z. Chuan, C. Jiangping and C. Zhiujiu. (2005): - -Experimental research on refrigerant mass flow coefficient of electronic -expansion valve. In: Applied Thermal Engineering 25(14), -S. 2351–2366 -
-")); - end Buck_R22R407CR410A_EEV_15_22; - - model Power_R134a_EEV_15 "Power - R134a - EEV - 1.5 mm" - extends PowerFlowCoefficient( - final powMod=Types.PowerModels.ZhifangAndOu2008, - final a=1.1868e-13, - final b={-1.4347,3.6426}); - - annotation (Documentation(revisions=" -
-This model contains a calculation procedure for flow coefficients presented by
-Zhifang et al. (2008).
-
| Reference | -Formula | -Refrigerants | -Validity Tcondensing |
-Validity Tevaporating |
-Validity Tsubcooling |
-
|---|---|---|---|---|---|
| ZhifangAndOu2008 | -C = a * ((pinlet-poutlet) *
-sqrt(A)/σinlet)^b1 *
-(dinlet*sqrt(ρinlet *
-pinlet)/μinlet)^b2 |
-R134a |
-31 - 67.17 °C |
-no information |
-0 - 20 °C |
-
-X. Zhifang, S. Lin and O. Hongfei. (2008): - -Refrigerant flow characteristics of electronic expansion -valve based on thermodynamic analysis and experiment. In: -Applied Thermal Engineering 28(2), -S. 2381–243 -
-")); - end Power_R134a_EEV_15; - - model Poly_R22R407CR410A_EEV_15_22 - "Polynomial - Similitude for R22, R407C, R410A - EEV - 1.5 mm to 2.2 mm" - extends PolynomialFlowCoefficient( - final polyMod=Types.PolynomialModels.ShanweiEtAl2005, - final a={-1.615e4,3.328e-4,1.4465e-3,2.9968e-3,-3.3890e2,7.0925e-5}, - final b={1,1,1,1,1,1}, - final dCle=0.02e-3); - - annotation (Documentation(revisions=" -
-This model contains a calculation procedure for flow coefficients presented by
-Shanwei et al. (2005).
-
| Reference | -Formula | -Refrigerants | -Validity Tcondensing |
-Validity Tevaporating |
-Validity Tsubcooling |
-
|---|---|---|---|---|---|
| ShanweiEtAl2005 | -C = a1*A + a2*ρinlet + a3*ρoutlet +
-a4*Tsubcooling + a5*dclearance + a6*(pinlet-
-poutlet) |
-R22, R407C, R410A |
-40 - 50 °C |
-0 - 10 °C |
-1.5 - 10 °C |
-
-M. Shanwei, Z. Chuan, C. Jiangping and C. Zhiujiu. (2005): - -Experimental research on refrigerant mass flow coefficient of electronic -expansion valve. In: Applied Thermal Engineering 25(14), -S. 2351–2366 -
-")); - end Poly_R22R407CR410A_EEV_15_22; - - model Poly_R22_EEV_16 "Polynomial - R22 - EEV - 1.6 mm" - extends PolynomialFlowCoefficient( - final polyMod=Types.PolynomialModels.Li2013, - final a={-0.03469,1.64866,-0.84227,1.19513,0,0}, - final b={1,1,1,1,1,1}, - final pDifRat=0.84); - - annotation (Documentation(revisions=" -
-This model contains a calculation procedure for flow coefficients presented by
-Li (2013).
-
| Reference | -Formula | -Refrigerants | -Validity Tcondensing |
-Validity Tevaporating |
-Validity Tsubcooling |
-
|---|---|---|---|---|---|
| Li2013 | -C = a1 + a2*opening + a3*opening^2 +
-a4*opening*(Tsubcooling/Tcrit) +
-a5*(Tsubcooling/Tcrit) +
-a6*(Tsubcooling/Tcrit)^2 |
-R22 |
-30 - 50 °C |
-0 - 30 °C |
-1.5 - 15 °C |
-
-Li, W. (2013): -Simplified modeling analysis ofmass flow characteristics in electronic expansion -valve. In: Applied Thermal Engineering 53(1), S. 8–12 -
-")); - end Poly_R22_EEV_16; - - model Poly_R407c_EEV_18 "Polynomial - R407c - EEV - 1.8 mm" - extends PolynomialFlowCoefficient( - final polyMod=Types.PolynomialModels.Li2013, - final a={-0.07154,1.67713,-0.79141,1.09516,0,0}, - final b={1,1,1,1,1,1}, - final pDifRat=0.84); - - annotation (Documentation(revisions=" -
-This model contains a calculation procedure for flow coefficients presented by
-Li (2013).
-
| Reference | -Formula | -Refrigerants | -Validity Tcondensing |
-Validity Tevaporating |
-Validity Tsubcooling |
-
|---|---|---|---|---|---|
| Li2013 | -C = a1 + a2*opening + a3*opening^2 +
-a4*opening*(Tsubcooling/Tcrit) +
-a5*(Tsubcooling/Tcrit) +
-a6*(Tsubcooling/Tcrit)^2 |
-R407C |
-30 - 50 °C |
-0 - 30 °C |
-1.5 - 15 °C |
-
-Li, W. (2013): -Simplified modeling analysis ofmass flow characteristics in electronic expansion -valve. In: Applied Thermal Engineering 53(1), S. 8–12 -
-")); - end Poly_R407c_EEV_18; - - model Poly_R410a_EEV_18 "Polynomial - R410a - EEV - 1.8 mm" - extends PolynomialFlowCoefficient( - final polyMod=Types.PolynomialModels.Li2013, - final a={-0.07374,1.5461,-0.73679,1.09651,0,0}, - final b={1,1,1,1,1,1}, - final pDifRat=0.84); - - annotation (Documentation(revisions=" -
-This model contains a calculation procedure for flow coefficients presented by
-Li (2013).
-
| Reference | -Formula | -Refrigerants | -Validity Tcondensing |
-Validity Tevaporating |
-Validity Tsubcooling |
-
|---|---|---|---|---|---|
| Li2013 | -C = a1 + a2*opening + a3*opening^2 +
-a4*opening*(Tsubcooling/Tcrit) +
-a5*(Tsubcooling/Tcrit) +
-a6*(Tsubcooling/Tcrit)^2 |
-R410A |
-30 - 50 °C |
-0 - 30 °C |
-1.5 - 15 °C |
-
-Li, W. (2013): -Simplified modeling analysis ofmass flow characteristics in electronic expansion -valve. In: Applied Thermal Engineering 53(1), S. 8–12 -
-")); - end Poly_R410a_EEV_18; - annotation (Documentation(revisions=" --This package cointains flow coefficients that are already specified. -This means that the calculation approaches of the flow coeffiencient -presented before are adapted for a specific expansion valve type and -a specific refrigerant. -
--In the following, a guideline of naming flow coefficient models is -summarised: -
--Approach of calculating flow coefficient _ -Valid refrigerants _ -Type of expansion valve _ -Diameter of cross-sectional area of expansion valve -
-+This model contains a simple calculation procedure for flow coefficients (for +more information, please check out + +AixLib.Fluid.Actuators.Valves.ExpansionValves.BaseClasses.PartialExpansionValve). +The model provides a constant flow coefficient and is the most basic flow +coefficient model. +
+")); +end ConstantFlowCoefficient; diff --git a/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/FlowCoefficient/SimilitudeTheory/Poly_R22R407CR410A_EEV_15_22.mo b/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/FlowCoefficient/SpecifiedFlowCoefficients/Poly_R22R407CR410A_EEV_15_22.mo similarity index 94% rename from AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/FlowCoefficient/SimilitudeTheory/Poly_R22R407CR410A_EEV_15_22.mo rename to AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/FlowCoefficient/SpecifiedFlowCoefficients/Poly_R22R407CR410A_EEV_15_22.mo index 74de68c790..991454510a 100644 --- a/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/FlowCoefficient/SimilitudeTheory/Poly_R22R407CR410A_EEV_15_22.mo +++ b/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/FlowCoefficient/SpecifiedFlowCoefficients/Poly_R22R407CR410A_EEV_15_22.mo @@ -1,4 +1,4 @@ -within AixLib.Fluid.Actuators.Valves.ExpansionValves.Utilities.FlowCoefficient.SimilitudeTheory; +within AixLib.Fluid.Actuators.Valves.ExpansionValves.Utilities.FlowCoefficient.SpecifiedFlowCoefficients; model Poly_R22R407CR410A_EEV_15_22 "Polynomial - Similitude for R22, R407C, R410A - EEV - 1.5 mm to 2.2 mm" extends PolynomialFlowCoefficient( @@ -10,7 +10,7 @@ model Poly_R22R407CR410A_EEV_15_22 annotation (Documentation(revisions="+This package cointains flow coefficients that are already specified. +This means that the calculation approaches of the flow coeffiencient +presented before are adapted for a specific expansion valve type and +a specific refrigerant. +
++In the following, a guideline of naming flow coefficient models is +summarised: +
++Approach of calculating flow coefficient _ +Valid refrigerants _ +Type of expansion valve _ +Diameter of cross-sectional area of expansion valve +
+This package contains types and constants to define menue choices.
-")); -end Types; diff --git a/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Choices/CalcProc.mo b/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Types/CalcProc.mo similarity index 83% rename from AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Choices/CalcProc.mo rename to AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Types/CalcProc.mo index 7bfbff6ed4..dde8a6eecc 100644 --- a/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Choices/CalcProc.mo +++ b/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Types/CalcProc.mo @@ -1,4 +1,4 @@ -within AixLib.Fluid.Actuators.Valves.ExpansionValves.Utilities.Choices; +within AixLib.Fluid.Actuators.Valves.ExpansionValves.Utilities.Types; type CalcProc = enumeration( linear "Usage of linear behaviour: m_flow = A * f(dp)", diff --git a/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Choices/PolynomialModels.mo b/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Types/PolynomialModels.mo similarity index 81% rename from AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Choices/PolynomialModels.mo rename to AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Types/PolynomialModels.mo index 5ac7717568..6af7aba008 100644 --- a/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Choices/PolynomialModels.mo +++ b/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Types/PolynomialModels.mo @@ -1,4 +1,4 @@ -within AixLib.Fluid.Actuators.Valves.ExpansionValves.Utilities.Choices; +within AixLib.Fluid.Actuators.Valves.ExpansionValves.Utilities.Types; type PolynomialModels = enumeration( ShanweiEtAl2005 "ShanweiEtAl2005 - Function of area, pressures, subcooling and densities", diff --git a/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Choices/PowerModels.mo b/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Types/PowerModels.mo similarity index 84% rename from AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Choices/PowerModels.mo rename to AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Types/PowerModels.mo index 3c982f3bf7..4fda88d142 100644 --- a/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Choices/PowerModels.mo +++ b/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Types/PowerModels.mo @@ -1,4 +1,4 @@ -within AixLib.Fluid.Actuators.Valves.ExpansionValves.Utilities.Choices; +within AixLib.Fluid.Actuators.Valves.ExpansionValves.Utilities.Types; type PowerModels = enumeration( ShanweiEtAl2005 "ShanweiEtAl2005 - Function of area, pressures, subcooling and densities", diff --git a/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Types/package.mo b/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Types/package.mo new file mode 100644 index 0000000000..061ffdeae5 --- /dev/null +++ b/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Types/package.mo @@ -0,0 +1,20 @@ +within AixLib.Fluid.Actuators.Valves.ExpansionValves.Utilities; +package Types "Types, constants to define menu choices" + extends Modelica.Icons.TypesPackage; + + // Types describing calculation procedures of mass flow and pressure drop + // + // Types describing calculation procedures of flow coefficients + // + annotation (Documentation(revisions=" +This package contains types and constants to define menue choices.
+")); +end Types; diff --git a/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Choices/package.order b/AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Types/package.order similarity index 100% rename from AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Choices/package.order rename to AixLib/Fluid/Actuators/Valves/ExpansionValves/Utilities/Types/package.order diff --git a/AixLib/Fluid/Actuators/Valves/ThreeWayEqualPercentageLinear.mo b/AixLib/Fluid/Actuators/Valves/ThreeWayEqualPercentageLinear.mo index b8bea949a2..a2f8457453 100644 --- a/AixLib/Fluid/Actuators/Valves/ThreeWayEqualPercentageLinear.mo +++ b/AixLib/Fluid/Actuators/Valves/ThreeWayEqualPercentageLinear.mo @@ -2,8 +2,12 @@ within AixLib.Fluid.Actuators.Valves; model ThreeWayEqualPercentageLinear "Three way valve with equal percentage and linear characteristics" extends BaseClasses.PartialThreeWayValve( - redeclare TwoWayEqualPercentage res1(R=R, delta0=delta0), - redeclare TwoWayLinear res3); + redeclare TwoWayEqualPercentage res1( + R=R, + delta0=delta0, + final l=l[1]), + redeclare TwoWayLinear res3( + final l=l[2])); parameter Real R = 50 "Rangeability, R=50...100 typically"; parameter Real delta0 = 0.01 "Range of significant deviation from equal percentage law"; @@ -52,6 +56,14 @@ for the implementation of the regularization near the origin. revisions="dp_nominal to dpValve_nominal,
and added new parameter dpFixed_nominal.
diff --git a/AixLib/Fluid/Actuators/Valves/ThreeWayLinear.mo b/AixLib/Fluid/Actuators/Valves/ThreeWayLinear.mo
index 8fb5ea6eec..158a6eb19a 100644
--- a/AixLib/Fluid/Actuators/Valves/ThreeWayLinear.mo
+++ b/AixLib/Fluid/Actuators/Valves/ThreeWayLinear.mo
@@ -1,8 +1,10 @@
within AixLib.Fluid.Actuators.Valves;
model ThreeWayLinear "Three way valve with linear characteristics"
extends BaseClasses.PartialThreeWayValve(
- redeclare TwoWayLinear res1,
- redeclare TwoWayLinear res3);
+ redeclare TwoWayLinear res1(
+ final l=l[1]),
+ redeclare TwoWayLinear res3(
+ final l=l[2]));
equation
connect(inv.y, res3.y) annotation (Line(points={{-62.6,46},{20,46},{20,-50},{
@@ -36,6 +38,14 @@ for the implementation of the regularization near the origin.
revisions="
dp_nominal to dpValve_nominal,
and added new parameter dpFixed_nominal.
diff --git a/AixLib/Fluid/Actuators/Valves/TwoWayEqualPercentage.mo b/AixLib/Fluid/Actuators/Valves/TwoWayEqualPercentage.mo
index 1b9c039c72..5631afa0cb 100644
--- a/AixLib/Fluid/Actuators/Valves/TwoWayEqualPercentage.mo
+++ b/AixLib/Fluid/Actuators/Valves/TwoWayEqualPercentage.mo
@@ -1,7 +1,8 @@
within AixLib.Fluid.Actuators.Valves;
model TwoWayEqualPercentage
"Two way valve with equal percentage flow characteristics"
- extends BaseClasses.PartialTwoWayValveKv(phi=if homotopyInitialization then
+ extends BaseClasses.PartialTwoWayValveKv(
+ phi=max(0, if homotopyInitialization then
homotopy(actual=AixLib.Fluid.Actuators.BaseClasses.equalPercentage(
y_actual,
R,
@@ -11,7 +12,7 @@ model TwoWayEqualPercentage
y_actual,
R,
l,
- delta0));
+ delta0)));
parameter Real R=50 "Rangeability, R=50...100 typically";
parameter Real delta0=0.01
"Range of significant deviation from equal percentage law";
@@ -39,6 +40,14 @@ as the regularization near the origin.
", revisions="
phi using
+max(0, . ) to avoid
+negative phi.
+See
+issue 1223.
+phi
to the model instantiation because in its base class,
diff --git a/AixLib/Fluid/Actuators/Valves/TwoWayLinear.mo b/AixLib/Fluid/Actuators/Valves/TwoWayLinear.mo
index bb40014637..4ea7ba1cc1 100644
--- a/AixLib/Fluid/Actuators/Valves/TwoWayLinear.mo
+++ b/AixLib/Fluid/Actuators/Valves/TwoWayLinear.mo
@@ -1,6 +1,6 @@
within AixLib.Fluid.Actuators.Valves;
model TwoWayLinear "Two way valve with linear flow characteristics"
- extends BaseClasses.PartialTwoWayValveKv(phi=l + y_actual*(1 - l));
+ extends BaseClasses.PartialTwoWayValveKv(phi=max(0, l + y_actual*(1 - l)));
initial equation
// Since the flow model AixLib.Fluid.BaseClasses.FlowModels.basicFlowFunction_m_flow computes
@@ -22,6 +22,14 @@ as the regularization near the origin.
revisions="
phi using
+max(0, . ) to avoid
+negative phi.
+See
+issue 1223.
+phi
to the model instantiation because in its base class,
diff --git a/AixLib/Fluid/Actuators/Valves/TwoWayPolynomial.mo b/AixLib/Fluid/Actuators/Valves/TwoWayPolynomial.mo
index ca9f7e99f9..b8d4d0ca82 100644
--- a/AixLib/Fluid/Actuators/Valves/TwoWayPolynomial.mo
+++ b/AixLib/Fluid/Actuators/Valves/TwoWayPolynomial.mo
@@ -1,7 +1,7 @@
within AixLib.Fluid.Actuators.Valves;
model TwoWayPolynomial "Two way valve with polynomial characteristic"
extends AixLib.Fluid.Actuators.BaseClasses.PartialTwoWayValveKv(
- phi=l + pol_y*(1 - l));
+ phi=max(0, l + pol_y*(1 - l)));
parameter Real[:] c
"Polynomial coefficients, starting with fixed offset";
@@ -51,6 +51,14 @@ as the regularization near the origin.
revisions="
phi using
+max(0, . ) to avoid
+negative phi.
+See
+issue 1223.
+Two way valve with a pressure-independent valve opening characteristic. @@ -249,6 +220,19 @@ can serve both puroposes. revisions="
phi using
+max(0, . ) to avoid
+negative phi.
+See
+issue 1223.
+cubicHermite
such that it does not have a local maximum
diff --git a/AixLib/Fluid/Actuators/Valves/TwoWayQuickOpening.mo b/AixLib/Fluid/Actuators/Valves/TwoWayQuickOpening.mo
index 1dcf7a610f..af51be5930 100644
--- a/AixLib/Fluid/Actuators/Valves/TwoWayQuickOpening.mo
+++ b/AixLib/Fluid/Actuators/Valves/TwoWayQuickOpening.mo
@@ -1,15 +1,18 @@
within AixLib.Fluid.Actuators.Valves;
model TwoWayQuickOpening
"Two way valve with quick opening flow characteristics"
- extends BaseClasses.PartialTwoWayValveKv(phi=if homotopyInitialization then
- homotopy(actual=l + Modelica.Fluid.Utilities.regPow(
- y_actual,
- alpInv,
- delta0)*(1 - l), simplified=l + y_actual*(1 - l)) else l +
- Modelica.Fluid.Utilities.regPow(
- y_actual,
- alpInv,
- delta0)*(1 - l));
+ extends BaseClasses.PartialTwoWayValveKv(
+ phi=max(0,
+ if homotopyInitialization then
+ homotopy(
+ actual=l + Modelica.Fluid.Utilities.regPow(
+ y_actual,
+ alpInv,
+ delta0)*(1 - l),
+ simplified=l + y_actual*(1 - l))
+ else
+ l + Modelica.Fluid.Utilities.regPow(y_actual, alpInv, delta0)*(1 - l)));
+
parameter Real alp = 2 "Parameter for valve characteristics, alp>0";
parameter Real delta0 = 0.01 "Range of significant deviation from power law";
protected
@@ -36,6 +39,14 @@ as the regularization near the origin.
revisions="
phi using
+max(0, . ) to avoid
+negative phi.
+See
+issue 1223.
+phi
to the model instantiation because in its base class,
diff --git a/AixLib/Fluid/Actuators/Valves/TwoWayTable.mo b/AixLib/Fluid/Actuators/Valves/TwoWayTable.mo
index d8916cdc88..b8e87f2e8a 100644
--- a/AixLib/Fluid/Actuators/Valves/TwoWayTable.mo
+++ b/AixLib/Fluid/Actuators/Valves/TwoWayTable.mo
@@ -1,7 +1,7 @@
within AixLib.Fluid.Actuators.Valves;
model TwoWayTable "Two way valve with table-specified flow characteristics"
extends BaseClasses.PartialTwoWayValveKv(
- phi=phiLooUp.y[1],
+ phi=max(0, phiLooUp.y[1]),
final l = phiLooUp.table[1, 2]);
parameter Data.Generic flowCharacteristics "Table with flow characteristics"
annotation (choicesAllMatching=true, Placement(transformation(extent={{-80,
@@ -131,6 +131,14 @@ AixLib.Fluid.Actuators.Valves.Examples.TwoWayValveTable.
", revisions="
phi using
+max(0, . ) to avoid
+negative phi.
+See
+issue 1223.
+Real in the
assert statements as this is not allowed in Modelica.
diff --git a/AixLib/Fluid/BaseClasses/FlowModels/Validation/InvertingBasicFlowFunction_dp.mo b/AixLib/Fluid/BaseClasses/FlowModels/Validation/InvertingBasicFlowFunction_dp.mo
index ea83165935..15d54076b2 100644
--- a/AixLib/Fluid/BaseClasses/FlowModels/Validation/InvertingBasicFlowFunction_dp.mo
+++ b/AixLib/Fluid/BaseClasses/FlowModels/Validation/InvertingBasicFlowFunction_dp.mo
@@ -8,7 +8,7 @@ model InvertingBasicFlowFunction_dp
"Nominal mass flow rate";
Modelica.SIunits.MassFlowRate m_flow "Mass flow rate";
- Modelica.SIunits.PressureDifference dp(displayUnit="Pa") "Pressure difference";
+ Modelica.SIunits.PressureDifference dp(displayUnit="Pa", start=0) "Pressure difference";
equation
m_flow = 4*(time-0.5);
m_flow = FlowModels.basicFlowFunction_dp(dp=dp, k=k, m_flow_turbulent=m_flow_nominal*0.3);
@@ -33,6 +33,10 @@ after the symbolic manipulation.
", revisions="
m_flow_turbulent determines the location of the regulariz
", revisions="
smooth(2, . ) for avoiding
+a warning in the check valve model.Function that implements the second order derivative of @@ -42,6 +42,11 @@ with respect to the mass flow rate. revisions="
m_flow_turbulent determines the location of the regulariz
revisions="
smooth(2, . ), similar to
+
+AixLib.Fluid.BaseClasses.FlowModels.basicFlowFunction_dp.Function that implements the second order derivative of @@ -42,6 +42,11 @@ with respect to the mass flow rate. revisions="
i_x to avoid a variable array index.substanceName.
+ This black box model represents the refrigerant cycle of a thermal + machine. Used in AixLib.Fluid.HeatPumps.HeatPump and + AixLib.Fluid.Chiller.Chiller, this model serves the simulation of a + reversible thermal machine. Thus, data both of chillers and heat + pumps can be used to calculate the three relevant values P_el, QCon and QEva. The mode of the machine is used to + switch between the performance data of the chiller and the heat pump. +
++ The user can choose between different types of performance data or + implement a new black-box model by extending from the + partial model. +
++ This partial model for a generic grey-box thermal machine (heat pump + or chiller) uses empirical data to model the refrigerant cycle. The + modelling of system inertias and heat losses allow the simulation of + transient states. +
++ Resulting in the choosen model structure, several configurations are + possible: +
++ Using a signal bus as a connector, this model working as a heat pump + can be easily combined with several control or security blocks from + AixLib.Controls.HeatPump. + The relevant data is aggregated. In order to control both chillers + and heat pumps, both flow and return temperature are aggregated. The + mode signal chooses the operation type of the thermal machine: +
++ To model both on/off and inverter controlled thermal machines, the + compressor speed is normalizd to a relative value between 0 and 1. +
++ Possible icing of the evaporator is modelled with an input value + between 0 and 1. +
++ The model structure is as follows. To understand each submodel, + please have a look at the corresponding model information: +
++ To simplify the parametrization of the evaporator and condenser + volumes and nominal mass flows there exists an option of automatic + estimation based on the nominal usable power of the thermal machine. + This function uses a linear correlation of these parameters, which + was established from the linear regression of more than 20 data sets + of water-to-water heat pumps from different manufacturers (e.g. + Carrier, Trane, Lennox) ranging from about 25kW to 1MW nominal power. + The linear regressions with coefficients of determination above 91% + give a good approximation of these parameters. Nevertheless, + estimates for machines outside the given range should be checked for + plausibility during simulation. +
++ Several assumptions where made in order to model the thermal machine. + For a detailed description see the corresponding model. +
+This model calculates the efficiency of a condensing boiler and is based upon the literature Règles de modélisation des systèmes énergétiques dans les bâtiments basse consommation
+The efficiency depends on the inflow temperature of the boiler (T_in).
+", revisions=" ++ Model of an easy on-off-controller for the modular CHP model. +
++ It allows to manually modulate the load of the power unit. A + modulation factor (modFac) of 0 indicates that the machine is not in + operation. +
+", revisions=" +A boiler model consisting of physical components.The efficiency is based on the part load rate and the inflow water temperature.
+
+
Assumptions for predefined parameter values (based on Vissmann data cheat):
+
G: a heat loss of 0.3 % of nominal power at a temperature difference of 50 K to ambient is assumed.
+C: factor C/Q_nom is in range of 1.2 to 2 for boilers with nominal power between 460 kW and 80 kW (with c of 500J/kgK for steel). Thus, a value of 1.5 is used as default.
+", revisions=" +The simulation illustrates the behavior of AixLib.Fluid.BoilerCHP.BoilerNoControl. +The efficiency depends on the part load rate and the inflow temperature.
+", + revisions=" ++ An example of the use of modular CHP components combined as a power + unit with interfaces to a controller and to the heating circuit. +
++ It allows an impression of the versatile and complex application + possibilities of the model by the changeability of many variables of + individual components and the detailed investigation capability. +
++ For a better understanding the controller modulates the fuel + consumption of the CHP unit. The effects to the thermal output can be + visualized by looking at T_Ret and T_Sup. +
++ The return temperature as well as the volume flow in the heating + circuit are considered constant in this example. +
+
+
+
+ Caution:
+
+ If the prime coolant cirlce of the power unit is using a gasoline + medium instead of a liquid fluid, you may need to adjust (raise) the + nominal mass flow and pressure drop of the cooling to heating heat + exchanger to run the model, because of a background calculation for + the nominal flow. +
+", revisions=" +
+
+ The model of the motor housing uses a build-up scheme as a two-layer
+ wall with thermal transitions to a circulating cooling medium.
+ Assumptions were made to simplify the thermal simulation.
+
+ From individual cylinders, a total area (assumption: cylinder is at + bottom dead center) is calculated and the heat conduction is modeled + as a flat wall. This approximation of the unknown motor geometry with + heat transfers to the environment and the cooling water circuit needs + to be calibrated. +
++ The engine block consists of a homogeneous material with known total + weight and is divided into an inner and an outer part (default is + grey cast iron) +
++ For simplicity the oil circuit is considered as a capacity in the + outer engine block that needs to calibrated as well. The cooling + water circuit is assumed to run between these two parts (only the + outer part interacts with the environment). +
++ The thickness of the inner engine block is an essential, but unknown + variable (literature indicates values around 5mm for car engines). + Attachments and individual different material layers in the engine + block are not taken into account for simplicity and can be + approximated by calibration. The insulating housing of the power unit + has no own capacity. +
++ The heat transfer (cylinder wall to cooling water circuit) is + calibrated and assumed to be proportional to the temperature + difference because due to unknown cooling channel geometry the + calculation of a convective heat transfer coefficient is not + possible. +
++ The temperature profile of the cylinder wall is homogeneously formed + from the ambient temperature and the maximum combustion temperature + (temperature curve in cylinder as a triangle with T_Amb - T_Com - + T_Amb). Therefore a mean cylinder wall temperature is determinated + using a bisector in the temperature profile as shown in the following + figure. +
+
+
+
+
+ The model of the internal combustion engine is the centrepiece of the + BHKW model developed. It is divided into a thermal and a + mechanical-chemical part. +
++ The energy balance of the combustion engine is used to determine the + maximum heat released. The mechanical power is calculated using a + mean value model, which is characterized by short calculation times + and simple parameterization. An empirical approach is used to + describe the specific enthalpy of the exhaust gas. The required mass + flows of the combustion products are determined by assuming complete + combustion with a known fuel composition. Various liquid and gaseous + fuels have been implemented on the basis of the existing material + models and are available to the user. +
++ Due to the complexity of a combustion engine, assumptions have to be + made. These are listed below to understand the function and + applicability of the model. +
+
+
+ Assumptions
+
+
+ Assumptions made and resulting limitations of the internal combustion
+ engine model:
+
+ - The nominal power point of the power unit is known and the + modulationof the operation point is achieved by a reduction of the + introduced fuel. +
++ - The indicated mean pressure is assumed to be constant as a + necessary measure for the calculation of engine power. This + corresponds to a constant thermodynamic combustion process within the + cylinders. +
++ - The engine must be started with an electric machine. It is + controlled by the release of the fuel quantity from a minimum speed + (800rpm). The speed then increases to equilibrium with the + counteracting generator torque. +
++ - Complete and superstoichiometric combustion is assumed to solve the + gross reaction equation +
++ - Entry of air and fuel at ambient conditions and constant amount of + fuel and air per combustion cycle +
++ -> Only conditionally with turbocharging of the engines, since + then the cylinder filling can vary depending on the boost pressure + (slight consideration due to stored rated performance data) +
+
+
+ Air ratio or residual oxygen in the exhaust gas is known to estimate
+ the combustion process. So this is a necessary assumption for the
+ calculation of material flows (mass flows, composition of the exhaust
+ gas).
+
+ The mean specific heat capacity of the exhaust gas for a temperature + range from 0 ° C to the maximum adiabatic combustion temperature is + used to calculate the exhaust gas temperature. +
++ The mean specific heat capacity is determinated with a potency + approach according to Müller (1968). +
++ Frictional losses that can be calculated based on a known friction + mean pressure at a speed of 3000rpm (if not known, default average + values from VK1 by S.Pischinger) are converted into usable heat. +
++ The calculation of the exhaust gas enthalpy according to an empirical + approach is based on investigations by R.Pischinger which uses a + reference point temperature of 25 ° C (initial state of the reaction + educts from combustion air and fuel). +
++ -> Consideration of the chemical and thermal proportions of the + enthalpy +
++ -> Limited accuracy for diesel engine (non-premixed) processes +
+")); +end GasolineEngineChp_EngineModel; diff --git a/AixLib/Fluid/BoilerCHP/ModularCHP/BaseClasses/BaseClassComponents/package.mo b/AixLib/Fluid/BoilerCHP/ModularCHP/BaseClasses/BaseClassComponents/package.mo new file mode 100644 index 0000000000..cc3532fd74 --- /dev/null +++ b/AixLib/Fluid/BoilerCHP/ModularCHP/BaseClasses/BaseClassComponents/package.mo @@ -0,0 +1,20 @@ +within AixLib.Fluid.BoilerCHP.ModularCHP.BaseClasses; +package BaseClassComponents "Package with base classe components for AixLib.Fluid.BoilerCHP.ModularCHP" + extends Modelica.Icons.BasesPackage +annotation (preferredView="info", Documentation(info="+ This package contains base classes that are used to construct the + models in AixLib.Fluid.BoilerCHP.ModularCHP. +
+")); + + + + + annotation (Documentation(info="+ This package contains base classe components that are used to + construct the models in AixLib.Fluid.ModularCHP. +
+")); +end BaseClassComponents; diff --git a/AixLib/Fluid/BoilerCHP/ModularCHP/BaseClasses/BaseClassComponents/package.order b/AixLib/Fluid/BoilerCHP/ModularCHP/BaseClasses/BaseClassComponents/package.order new file mode 100644 index 0000000000..4571da14c0 --- /dev/null +++ b/AixLib/Fluid/BoilerCHP/ModularCHP/BaseClasses/BaseClassComponents/package.order @@ -0,0 +1,4 @@ +GasolineEngineChp_EngineHousing +GasolineEngineChp_EngineHousing_CylToInnerWall +GasolineEngineChp_EngineHousing_EngineBlock +GasolineEngineChp_EngineModel diff --git a/AixLib/Fluid/BoilerCHP/ModularCHP/BaseClasses/CHP_ElectricMachine.mo b/AixLib/Fluid/BoilerCHP/ModularCHP/BaseClasses/CHP_ElectricMachine.mo new file mode 100644 index 0000000000..5d249df30c --- /dev/null +++ b/AixLib/Fluid/BoilerCHP/ModularCHP/BaseClasses/CHP_ElectricMachine.mo @@ -0,0 +1,246 @@ +within AixLib.Fluid.BoilerCHP.ModularCHP.BaseClasses; +model CHP_ElectricMachine + "Model of a general induction machine working as a starter generator" + extends Modelica.Electrical.Machines.Icons.TransientMachine; + + parameter + AixLib.DataBase.CHP.ModularCHPEngineData.CHPEngDataBaseRecord + CHPEngData=DataBase.CHP.ModularCHPEngineData.CHP_ECPowerXRGI15() + "Needed engine data for calculations" + annotation (choicesAllMatching=true, Dialog(group="Unit properties")); + + parameter Modelica.SIunits.Frequency n0=CHPEngData.n0 + "Idling speed of the electric machine" + annotation (Dialog(group="Machine specifications")); + parameter Modelica.SIunits.Frequency n_nominal=CHPEngData.n_nominal + "Rated rotor speed" + annotation (Dialog(group="Machine specifications")); + parameter Modelica.SIunits.Frequency f_1=CHPEngData.f_1 + "Frequency" + annotation (Dialog(group="Machine specifications")); + parameter Modelica.SIunits.Voltage U_1=CHPEngData.U_1 + "Rated voltage" + annotation (Dialog(group="Machine specifications")); + parameter Modelica.SIunits.Current I_elNominal=CHPEngData.I_elNominal + "Rated current" + annotation (Dialog(group="Machine specifications")); + parameter Modelica.SIunits.Current I_1_start=if P_Mec_nominal<=15000 then 7.2*I_elNominal else 8*I_elNominal + "Motor start current (realistic factors used from DIN VDE 2650/2651)" + annotation (Dialog( tab="Calculations")); + parameter Modelica.SIunits.Power P_elNominal=CHPEngData.P_elNominal + "Nominal electrical power of electric machine" + annotation (Dialog(group="Machine specifications")); + parameter Modelica.SIunits.Power P_Mec_nominal=P_elNominal*(1+s_nominal/0.22) "Nominal mechanical power of electric machine" + annotation (Dialog(tab="Calculations")); + parameter Modelica.SIunits.Torque M_nominal=P_Mec_nominal/(2*Modelica.Constants.pi*n_nominal) "Nominal torque of electric machine" + annotation (Dialog(tab="Calculations")); + parameter Modelica.SIunits.Torque M_til=2*M_nominal "Tilting torque of electric machine (realistic factor used from DIN VDE 2650/2651)" + annotation (Dialog(tab="Calculations")); + parameter Modelica.SIunits.Torque M_start=if P_Mec_nominal<=4000 then 1.6*M_nominal + elseif P_Mec_nominal>=22000 then 1*M_nominal else 1.25*M_nominal + "Starting torque of electric machine (realistic factor used from DIN VDE 2650/2651)" + annotation (Dialog(tab="Calculations")); + parameter Modelica.SIunits.Inertia J_Gen=1 + "Moment of inertia of the electric machine (default=1kg.m2)" + annotation (Dialog(group="Calibration")); + parameter Boolean useHeat=CHPEngData.useHeat + "Is the thermal loss energy of the elctric machine used?" + annotation (Dialog(group="Machine specifications")); + parameter Real s_nominal=abs(1-n_nominal*p/f_1) "Nominal slip of electric machine" + annotation (Dialog(tab="Calculations")); + parameter Real s_til=abs((s_nominal*(M_til/M_nominal)+s_nominal*sqrt(abs(((M_til/M_nominal)^2)-1+2*s_nominal*((M_til/M_nominal)-1))))/(1-2*s_nominal*((M_til/M_nominal)-1))) + "Tilting slip of electric machine" + annotation (Dialog(tab="Calculations")); + parameter Real p=CHPEngData.p + "Number of pole pairs" + annotation (Dialog(group="Machine specifications")); + parameter Real cosPhi=CHPEngData.cosPhi + "Power factor of electric machine (default=0.8)" + annotation (Dialog(group="Machine specifications")); + parameter Real calFac=1 + "Calibration factor for electric power outuput (default=1)" + annotation (Dialog(group="Calibration")); + parameter Real gearRatio=CHPEngData.gearRatio + "Transmission ratio (engine speed / generator speed)" + annotation (Dialog(group="Machine specifications")); + + Modelica.SIunits.Frequency n=inertia.w/(2*Modelica.Constants.pi) "Speed of machine rotor [1/s]"; + Modelica.SIunits.Current I_1 "Electric current of machine stator"; + Modelica.SIunits.Power P_E "Electrical power at the electric machine"; + Modelica.SIunits.Power P_Mec "Mechanical power at the electric machine"; + Modelica.SIunits.Power CalQ_Loss + "Calculated heat flow from electric machine"; + Modelica.SIunits.Power Q_Therm=if useHeat then CalQ_Loss else 0 + "Heat flow from electric machine" + annotation (Dialog(group="Machine specifications")); + Modelica.SIunits.Torque M "Torque at electric machine"; + Real s=1-n*p/f_1 "Current slip of electric machine"; + Real eta "Total efficiency of the electric machine (as motor)"; + Real calI_1 = 1/(1+((k-1)/((s_nominal^2)-k))*((s^2)+rho1*abs(s)+rho0)); + Boolean OpMode = (n<=n0) "Operation mode (true=motor, false=generator)"; + Boolean SwitchOnOff=cHPGenBus.isOn + "Operation of electric machine (true=On, false=Off)"; + + Modelica.Mechanics.Rotational.Components.Inertia inertia( w(fixed=false), J=J_Gen) + "Inertia model of the electric machine" + annotation (Placement(transformation(extent={{20,-10},{40,10}}))); + Modelica.Blocks.Sources.RealExpression electricTorque1(y=M) + annotation (Placement(transformation(extent={{-60,-10},{-40,10}}))); + Modelica.Mechanics.Rotational.Sources.Torque torque + "Calculated torque of the electric machine" + annotation (Placement(transformation(extent={{-20,-10},{0,10}}))); + Modelica.Mechanics.Rotational.Interfaces.Flange_a flange_genIn + "Mechanical port to the output drive" + annotation (Placement(transformation(extent={{90,-10},{110,10}}))); + + Modelica.Mechanics.Rotational.Components.IdealGear gearEngineToGenerator( + ratio=gearRatio) + "Model for mapping a possible transmission ratio between engine and generator" + annotation (Placement(transformation(extent={{80,-10},{60,10}}))); + AixLib.Controls.Interfaces.CHPControlBus cHPGenBus + "Signal bus of the electric machine" + annotation (Placement(transformation(extent={{-72,28},{-132, + 84}}), iconTransformation( + extent={{-30,-28},{30,28}}, + rotation=90, + origin={-76,0}))); + Modelica.Blocks.Sources.RealExpression electricCurrent(y=I_1) + annotation (Placement(transformation(extent={{-36,18},{-56,38}}))); + Modelica.Blocks.Sources.RealExpression electricTorque2(y=M) + annotation (Placement(transformation(extent={{-36,32},{-56,52}}))); + Modelica.Blocks.Sources.RealExpression electricPower(y=P_E) + annotation (Placement(transformation(extent={{-36,46},{-56,66}}))); + Modelica.Blocks.Sources.RealExpression generatorHeatLoss(y=Q_Therm) + annotation (Placement(transformation(extent={{-36,74},{-56,94}}))); + Modelica.Blocks.Sources.RealExpression generatorEfficiency(y=eta) + annotation (Placement(transformation(extent={{-36,60},{-56,80}}))); + +protected + parameter Real rho0=s_til^2 "Calculation variable for analytical approach (Aree, 2017)" + annotation (Dialog(tab="Calculations")); + parameter Real rho1=(M_start*(1+s_til^2)-2*s_til*M_til)/(M_til-M_start) "Calculation variable for analytical approach (Aree, 2017)" + annotation (Dialog(tab="Calculations")); + parameter Real rho3=(M_til*M_start*(1-s_til)^2)/(M_til-M_start) "Calculation variable for analytical approach (Aree, 2017)" + annotation (Dialog(tab="Calculations")); + parameter Real k=((I_elNominal/I_1_start)^2)*(((s_nominal^2)+rho1*s_nominal+rho0)/(1+rho1+rho0)) "Calculation variable for analytical approach (Aree, 2017)" + annotation (Dialog(tab="Calculations")); + +equation + +if noEvent(SwitchOnOff) then + + I_1=sign(s)*I_1_start*sqrt(abs((1+((k-1)/((s_nominal^2)-k))*(s^2)*(1+rho1+rho0))*calI_1)); + P_E=if noEvent(s>0) then sqrt(3)*I_1*U_1*cosPhi elseif noEvent(s<0) then calFac*(P_Mec+CalQ_Loss) else 1; + // P_Mec=if noEvent(s>0) then 2*Modelica.Constants.pi*M*n else 2*Modelica.Constants.pi*n*M; + P_Mec=2*Modelica.Constants.pi*M*n; + CalQ_Loss= (calFac-1)*P_E + 2*Modelica.Constants.pi*M*(s*n0)/0.22; + M=sign(s)*(rho3*abs(s))/((s^2)+rho1*abs(s)+rho0); + eta=if noEvent(s>0) then abs(P_Mec/(P_E+1)) + elseif noEvent(s<0) then abs(P_E/(P_Mec-1)) else 0; + +else + + I_1=0; + P_E=0; + P_Mec=0; + CalQ_Loss=0; + M=if noEvent(s<0) then sign(s)*(rho3*abs(s))/((s^2)+rho1*abs(s)+rho0) else 0; + eta=0; + + end if; + + connect(electricTorque1.y, torque.tau) + annotation (Line(points={{-39,0},{-22,0}}, color={0,0,127})); + connect(torque.flange, inertia.flange_a) + annotation (Line(points={{0,0},{20,0}}, color={0,0,0})); + connect(inertia.flange_b, gearEngineToGenerator.flange_b) + annotation (Line(points={{40,0},{60,0}}, color={0,0,0})); + connect(gearEngineToGenerator.flange_a, flange_genIn) + annotation (Line(points={{80,0},{100,0}}, color={0,0,0})); + connect(generatorHeatLoss.y, cHPGenBus.calThePowGen) annotation (Line(points= + {{-57,84},{-80,84},{-80,56.14},{-102.15,56.14}}, color={0,0,127})); + connect(electricPower.y, cHPGenBus.meaElPowGen) annotation (Line(points={{-57, + 56},{-80,56},{-80,56.14},{-102.15,56.14}}, color={0,0,127})); + connect(electricTorque2.y, cHPGenBus.meaTorGen) annotation (Line(points={{-57, + 42},{-80,42},{-80,56.14},{-102.15,56.14}}, color={0,0,127})); + connect(electricCurrent.y, cHPGenBus.meaCurGen) annotation (Line(points={{-57, + 28},{-80,28},{-80,56.14},{-102.15,56.14}}, color={0,0,127})); + connect(generatorEfficiency.y, cHPGenBus.calEtaGen) annotation (Line(points={ + {-57,70},{-80,70},{-80,56.14},{-102.15,56.14}}, color={0,0,127})); + annotation (Documentation(info="+ Model of an electric induction machine that includes the calculation + of: +
++ -> mechanical output (torque and speed) +
++ -> electrical output (current and power) +
++ It delivers positive torque and negative electrical power when + operating below the synchronous speed (motor) and can switch into + generating electricity (positive electrical power and negative + torque) when operating above the synchronous speed (generator). +
++ The calculations are based on simple electrical equations and an + analytical approach by Pichai Aree (2017) that determinates stator + current and torque depending on the slip. +
++ The parameters rho0, rho1, rho3 and k are used for the calculation of + the characteristic curves. They are determined from the general + machine data at nominal operation and realistic assumptions about the + ratio between starting torque, starting current, breakdown torque, + breakdown slip and nominal current and torque. These assumptions are + taken from DIN VDE 2650/2651. It shows good agreement for machines up + to 100kW of mechanical power operating at a speed up to 3000rpm and + with a rated voltage up to 500V. +
++ The only data required is: +
++ - number of polepairs or synchronous speed (p or n0) +
++ - voltage and frequence of the electric power supply (U_1 and + f_1) +
++ - nominal current and speed (I_elNominal and n_nominal + ) +
++ - power factor if available (default=0.8) +
+
+
+ Additional Information:
+
+
+ - Electric power calculation as a generator from mechanical input
+ speed can be further approached by small changes to the speed.
+
+ - The electric losses are calculated from the slip depending rotor + loss which corresponds to roughly 22% of the total losses according + to Almeida (DOI: 10.1109/MIAS.2010.939427). +
+", revisions=" ++ Exhaust gas heat exchanger for engine combustion and its heat + transfer to a cooling circle. +
++ Assumptions +
++ The convective heat transfer between exhaust gas and heat exchanger + is calculated as a cylindrical exhaust pipe. For the pipe + cross-section, the connection cross-section of the power unit is + used; the heat transfer area and the capacity of the heat exchanger + can be calibrated. +
++ Known variables are the combustion air ratio and the heat flow to the + cooling water circuit at nominal operation. These are used to + estimate the pipe diameters if unknown. +
++ The heat transfer to the environment (G_Amb) and the cooling water + circuit (G_Cool) is calculated by means of heat conduction. +
++ There is the option of considering the heat output from the + condensation of water in the flue gas. This is determined from the + determination of the precipitating water via the saturation vapour + pressure and the critical loading in the flue gas for the critical + state (at outlet temperature). The evaporation enthalpy is + approximated using an empirical formula based on table data for + ambient pressure. +
++ Simplifying it is assumed that the latent heat flux in addition to + the convective heat flux is transferred to the capacity of the + exhaust gas heat exchanger. +
+", revisions=" ++ Model of a combustion engine combined from the thermal and mechanical + engine model. # +
++ Together with the submodels cooling circuit, exhaust gas heat + exchanger and electric motor, it can be connected to form the power + unit of a combined heat and power unit. +
+", revisions=" ++ This model shows the implementation of a holistic overall model for a + CHP power unit using the example of the Kirsch L4.12. The model is + able to map different gas engine CHPs of small and medium power + classes (< 200 kWel). It allows an investigation of the thermal + and electrical dynamics of the individual components and the entire + plant. In addition, a CO2 balance can be calculated for the + comparison of different control strategies. +
++ The modular CHP model is aggregated from closed submodels that can be + run on their own. These are based on physical calculation approaches + and offer mechanical, material and thermal interfaces. The thermal + interconnection of the exhaust gas heat exchanger and combustion + engine in the internal primary circuit is freely selectable. Detailed + explanations of how the submodels work are provided in their + documentation. Parameterization and control are realized on the + highest model level using bus ports to transmit measured and + calculated signals throughout the different hierarchical model + levels. +
++ If the calibration of the model is not to be performed for all listed + calibration quantities, a quick adaptation of the essential model + quantities for the use of are carried out. Setting the speed of the + generator and internal combustion engine for the nominal power point + using the calibration variables tilting slip, electrical calibration + factor and modulation factor results in a high correspondence for + electrical power and fuel input for each power stage of the CHP. The + thermal output can then be checked by checking the flue gas + temperature when the system exits. The examination of the data sheets + of some cogeneration units provides general comparative values for + the flue gas temperature in a range around 50 °C with and around 110 + °C without condensing utilisation at rated output. The flue gas + temperature can mainly be adjusted using the heat transitions + G_CoolChannel and G_CooExhHex. Finally, the parameters of the heat + exchanger can be adapted to the heating circuit. +
++ Supercharged internal combustion engines and diesel engines cannot be + completely mapped. +
+", revisions=" ++ Model of important cooling circuit components that needs to be used + with the engine model to realise its heat transfer. +
++ Therefore a heat port is implemented as well as temperature sensors + to capture the in- and outlet temperatures of the coolant medium for + engine calculations. +
++ Depending on the unit configuration this model can be placed inside + the cooling circuit before or after the fluid ports of the exhaust + heat exchanger. +
++ The pressure level within the cooling circuit is assumed to be + constant at about 3 bar. +
+", revisions=" ++ This package contains base classes that are used to construct the + models in AixLib.Fluid.BoilerCHP.ModularCHP. +
+")); + + + + + + + + + + + + annotation (Documentation(info="+ This package contains base classes that are used to construct the + models in AixLib.Fluid.ModularCHP. +
+")); +end BaseClasses; diff --git a/AixLib/Fluid/BoilerCHP/ModularCHP/BaseClasses/package.order b/AixLib/Fluid/BoilerCHP/ModularCHP/BaseClasses/package.order new file mode 100644 index 0000000000..b465d60161 --- /dev/null +++ b/AixLib/Fluid/BoilerCHP/ModularCHP/BaseClasses/package.order @@ -0,0 +1,6 @@ +CHP_ElectricMachine +ExhaustHeatExchanger +GasolineEngineChp +ModularCHP_PowerUnit +SubmodelCooling +BaseClassComponents diff --git a/AixLib/Fluid/BoilerCHP/ModularCHP/ModularCHPIntegrated.mo b/AixLib/Fluid/BoilerCHP/ModularCHP/ModularCHPIntegrated.mo new file mode 100644 index 0000000000..de56e9995b --- /dev/null +++ b/AixLib/Fluid/BoilerCHP/ModularCHP/ModularCHPIntegrated.mo @@ -0,0 +1,319 @@ +within AixLib.Fluid.BoilerCHP.ModularCHP; +model ModularCHPIntegrated + "Modular combined heat and power system model integrated into a heating circuit" + import AixLib; + + replaceable package Medium_Fuel = + AixLib.DataBase.CHP.ModularCHPEngineMedia.NaturalGasMixture_TypeAachen + constrainedby + DataBase.CHP.ModularCHPEngineMedia.CHPCombustionMixtureGasNasa + "Fuel medium model used in the CHP plant" annotation(choicesAllMatching=true); + replaceable package Medium_Coolant = Modelica.Media.Air.DryAirNasa + constrainedby + Modelica.Media.Interfaces.PartialMedium + "Coolant medium model used in the CHP plant" annotation (choicesAllMatching=true); + + replaceable package Medium_HeatingCircuit = + Modelica.Media.CompressibleLiquids.LinearColdWater constrainedby + Modelica.Media.Interfaces.PartialMedium + "Heating circuit medium model" annotation ( + __Dymola_choicesAllMatching=true); + + parameter + AixLib.DataBase.CHP.ModularCHPEngineData.CHPEngDataBaseRecord + CHPEngineModel=DataBase.CHP.ModularCHPEngineData.CHP_Kirsch_L4_12() + "CHP engine data for calculations" + annotation (choicesAllMatching=true, Dialog(group="Unit properties")); + + parameter AixLib.Fluid.BoilerCHP.Data.ModularCHP.EngineMaterialData EngMat= + AixLib.Fluid.BoilerCHP.Data.ModularCHP.EngineMaterial_CastIron() + "Thermal engine material data for calculations" + annotation (choicesAllMatching=true, Dialog(group="Unit properties")); + parameter Modelica.SIunits.Temperature T_amb=293.15 + "Default ambient temperature" + annotation (Dialog(group="Ambient Parameters")); + parameter Modelica.SIunits.AbsolutePressure p_amb=101325 + "Default ambient pressure" annotation (Dialog(group="Ambient Parameters")); + parameter Real s_til=abs((cHP_PowerUnit.inductionMachine.s_nominal*( + cHP_PowerUnit.inductionMachine.M_til/cHP_PowerUnit.inductionMachine.M_nominal) + + cHP_PowerUnit.inductionMachine.s_nominal*sqrt(abs(((cHP_PowerUnit.inductionMachine.M_til + /cHP_PowerUnit.inductionMachine.M_nominal)^2) - 1 + 2*cHP_PowerUnit.inductionMachine.s_nominal + *((cHP_PowerUnit.inductionMachine.M_til/cHP_PowerUnit.inductionMachine.M_nominal) + - 1))))/(1 - 2*cHP_PowerUnit.inductionMachine.s_nominal*((cHP_PowerUnit.inductionMachine.M_til + /cHP_PowerUnit.inductionMachine.M_nominal) - 1))) + "Tilting slip of electric machine" annotation (Dialog(tab="Calibration parameters", + group="Fast calibration - Electric power and fuel usage")); + parameter Real calFac=0.94 + "Calibration factor for electric power output (default=1)" + annotation (Dialog(tab="Calibration parameters", + group="Fast calibration - Electric power and fuel usage")); + parameter Modelica.SIunits.ThermalConductance GEngToCoo=33 + "Thermal conductance of engine housing from the cylinder wall to the water cooling channels" + annotation (Dialog(tab="Calibration parameters",group= + "Fast calibration - Thermal power output")); + parameter Modelica.SIunits.ThermalConductance GCooExhHex=400 + "Thermal conductance of the coolant heat exchanger at nominal flow" + annotation (Dialog(tab="Calibration parameters",group= + "Fast calibration - Thermal power output")); + parameter Modelica.SIunits.HeatCapacity CExhHex=50000 + "Heat capacity of exhaust heat exchanger(default= 4000 J/K)" annotation ( + Dialog(tab="Calibration parameters",group= + "Advanced calibration parameters")); + parameter Modelica.SIunits.Mass Cal_mEng=0 + "Added engine mass for calibration purposes of the system´s thermal inertia" + annotation (Dialog(tab="Calibration parameters",group="Advanced calibration parameters")); + parameter Modelica.SIunits.Area A_surExhHea=100 + "Surface for exhaust heat transfer" + annotation (Dialog(tab="Calibration parameters",group="Advanced calibration parameters")); + parameter Modelica.SIunits.MassFlowRate m_flow_Coo=0.4 + "Nominal mass flow rate of coolant inside the engine cooling circle" annotation ( + Dialog(tab="Calibration parameters",group= + "Advanced calibration parameters")); + parameter Modelica.SIunits.Thickness dInn=0.01 + "Typical value for the thickness of the cylinder wall (between combustion chamber and cooling circle)" + annotation (Dialog(tab="Calibration parameters",group="Fast calibration - Thermal power output")); + parameter Modelica.SIunits.ThermalConductance GEngToAmb=2 + "Thermal conductance from engine housing to the surrounding air" + annotation (Dialog(tab="Calibration parameters",group= + "Advanced calibration parameters")); + parameter Modelica.SIunits.ThermalConductance GAmb=10 + "Constant heat transfer coefficient of engine housing to ambient" annotation ( + Dialog(tab="Calibration parameters",group= + "Advanced calibration parameters")); + parameter Real modTab[:,2]=[0.0,0.8; 7200,0.8; 7200,0.93; 10800,0.93; 10800,0.62; + 14400,0.62; 14400,0.8; 18000,0.8; 18000,0.0] + "Table for unit modulation (time = first column; modulation factors = second column)" + annotation (Dialog(tab="Calibration parameters", group="Fast calibration - Electric power and fuel usage")); + parameter Boolean ConTec=true + "Is condensing technology used and should latent heat be considered?" + annotation (Dialog(tab="Advanced", group="Latent heat use")); + parameter Boolean useGenHea=true + "Is the thermal loss energy of the elctric machine used?" + annotation (Dialog(tab="Advanced", group="Generator heat use")); + parameter Boolean allowFlowReversalExhaust=true + "= false to simplify equations, assuming, but not enforcing, no flow reversal for exhaust medium" + annotation (Dialog(tab="Advanced", group="Assumptions")); + parameter Boolean allowFlowReversalCoolant=true + "= false to simplify equations, assuming, but not enforcing, no flow reversal for coolant medium" + annotation (Dialog(tab="Advanced", group="Assumptions")); + parameter Modelica.Media.Interfaces.PartialMedium.MassFlowRate + mExh_flow_small=0.001 + "Small exhaust mass flow rate for regularization of zero flow" + annotation (Dialog(tab="Advanced", group="Assumptions")); + parameter Modelica.Media.Interfaces.PartialMedium.MassFlowRate + mCool_flow_small=0.005 + "Small coolant mass flow rate for regularization of zero flow" + annotation (Dialog(tab="Advanced", group="Assumptions")); + + Modelica.SIunits.Temperature T_Ret=temRetFlo.T "Coolant return temperature"; + Modelica.SIunits.Temperature T_Sup=temSupFlo.T "Coolant supply temperature"; + Modelica.SIunits.Power Q_Therm_th=cHP_PowerUnit.Q_Therm "Thermal power output of the CHP unit to the coolant media"; + Modelica.SIunits.Power Q_Therm=coolantHex.Q2_flow "Effective thermal power output of the CHP unit to the heating circuit"; + Modelica.SIunits.Power P_Mech=cHP_PowerUnit.P_Mech "Mechanical power output of the CHP unit"; + Modelica.SIunits.Power P_El=cHP_PowerUnit.P_El "Electrical power output of the CHP unit"; + Modelica.SIunits.Power P_Fuel=cHP_PowerUnit.P_Fuel "CHP fuel expenses"; + Modelica.SIunits.Power Q_TotUnused=cHP_PowerUnit.Q_TotUnused "Total heat error of the CHP unit"; + Modelica.SIunits.MassFlowRate m_flow_CO2=cHP_PowerUnit.m_flow_CO2 + "CO2 emission output rate"; + Modelica.SIunits.MassFlowRate m_flow_Fue=cHP_PowerUnit.m_flow_Fue + "Fuel consumption rate of CHP unit"; + Real FueUtiRate = cHP_PowerUnit.FueUtiRate "Fuel utilization rate of the CHP unit"; + Real PowHeatRatio = cHP_PowerUnit.PowHeatRatio "Power to heat ration of the CHP unit"; + Real eta_Therm = cHP_PowerUnit.eta_Therm "Thermal efficiency of the CHP unit"; + Real eta_Mech = cHP_PowerUnit.eta_Mech "Mechanical efficiency of the CHP unit"; + Real eta_El = cHP_PowerUnit.eta_El "Mechanical efficiency of the CHP unit"; + + inner Modelica.Fluid.System system(p_ambient=p_amb, T_ambient=T_amb) + annotation (Placement(transformation(extent={{-100,-100},{-84,-84}}))); + AixLib.Fluid.BoilerCHP.ModularCHP.BaseClasses.ModularCHP_PowerUnit + cHP_PowerUnit( + redeclare package Medium_Fuel = Medium_Fuel, + CHPEngineModel=CHPEngineModel, + EngMat=EngMat, + T_amb=T_amb, + p_amb=p_amb, + m_flow=m_flow_Coo, + GEngToCoo=GEngToCoo, + ConTec=ConTec, + useGenHea=useGenHea, + allowFlowReversalExhaust=allowFlowReversalExhaust, + allowFlowReversalCoolant=allowFlowReversalCoolant, + mExh_flow_small=mExh_flow_small, + mCool_flow_small=mCool_flow_small, + A_surExhHea=A_surExhHea, + mEng=mEng, + redeclare package Medium_Coolant = Medium_Coolant, + GCooExhHex=GCooExhHex, + CExhHex=CExhHex, + inductionMachine(J_Gen=1), + dInn=dInn, + GEngToAmb=GEngToAmb, + GAmb=GAmb, + calFac=calFac, + s_til=s_til) + "Model of the main heat and power generating components of a CHP unit" + annotation (Placement(transformation(extent={{-20,0},{20,48}}))); + AixLib.Fluid.HeatExchangers.ConstantEffectiveness coolantHex( + allowFlowReversal1=allowFlowReversalCoolant, + allowFlowReversal2=allowFlowReversalCoolant, + m2_flow_nominal=CHPEngineModel.m_floCooNominal, + m1_flow_small=mCool_flow_small, + m2_flow_small=mCool_flow_small, + redeclare package Medium1 = Medium_Coolant, + m1_flow_nominal=m_flow_Coo, + redeclare package Medium2 = Medium_HeatingCircuit, + dp1_nominal(displayUnit="kPa") = 10000, + dp2_nominal(displayUnit="kPa") = 10000, + eps=0.9) "Heat exchanger between inner cooling and outer heating circuit" + annotation (Placement(transformation(extent={{20,-72},{-20,-32}}))); + Modelica.Fluid.Sensors.TemperatureTwoPort temRetFlo( + m_flow_small=mCool_flow_small, + m_flow_nominal=CHPEngineModel.m_floCooNominal, + redeclare package Medium = Medium_HeatingCircuit) + "Heating circuit return flow temperature sensor" + annotation (Placement(transformation(extent={{-58,-72},{-42,-56}}))); + Modelica.Fluid.Sensors.TemperatureTwoPort temSupFlo( + m_flow_small=mCool_flow_small, + m_flow_nominal=CHPEngineModel.m_floCooNominal, + redeclare package Medium = Medium_HeatingCircuit) + "Heating circuit supply flow temperature sensor" + annotation (Placement(transformation(extent={{42,-72},{58,-56}}))); + AixLib.Fluid.BoilerCHP.BaseClasses.Controllers.ControllerOnOffModularCHP + ControllerCHP( + CHPEngineModel=CHPEngineModel, + startTimeChp=3600, + modTab=modTab) "On/Off control with modulation factor setting" + annotation (Placement(transformation(rotation=0, extent={{-76, + 64},{-44,96}}))); + Modelica.Fluid.Interfaces.FluidPort_a port_retHea(redeclare package Medium = + Medium_Coolant) + "Fluid port for the return flow side of the heating circuit" + annotation (Placement(transformation(extent={{-110,-10},{-90,10}}))); + Modelica.Fluid.Interfaces.FluidPort_b port_supHea(redeclare package Medium = + Medium_Coolant) + "Fluid port for the supply flow side of the heating circuit" + annotation (Placement(transformation(extent={{90,-10},{110,10}}))); + + Modelica.Fluid.Sources.FixedBoundary fixedPressureLevel( + nPorts=1, + redeclare package Medium = Medium_Coolant, + T(displayUnit="K"), + p=300000) + annotation (Placement(transformation(extent={{-10,-10},{10,10}}, + rotation=0, + origin={-74,-20}))); + +protected + replaceable package Medium_Air = + AixLib.DataBase.CHP.ModularCHPEngineMedia.EngineCombustionAir + constrainedby + DataBase.CHP.ModularCHPEngineMedia.EngineCombustionAir + "Air medium model used in the CHP plant" annotation(choicesAllMatching=true); + + replaceable package Medium_Exhaust = + DataBase.CHP.ModularCHPEngineMedia.CHPFlueGasLambdaOnePlus constrainedby + DataBase.CHP.ModularCHPEngineMedia.CHPCombustionMixtureGasNasa + "Exhaust gas medium model used in the CHP plant" annotation(choicesAllMatching=true); + + parameter Modelica.SIunits.Mass mEng=CHPEngineModel.mEng + Cal_mEng + "Total engine mass for heat capacity calculation" + annotation (Dialog(tab="Calibration parameters",group="Advanced calibration parameters")); + +equation + connect(coolantHex.port_a2, temRetFlo.port_b) + annotation (Line(points={{-20,-64},{-42,-64}}, color={0,127,255})); + connect(coolantHex.port_b2, temSupFlo.port_a) + annotation (Line(points={{20,-64},{42,-64}}, color={0,127,255})); + connect(ControllerCHP.modCHPConBus, cHP_PowerUnit.sigBusCHP) annotation (Line( + points={{-44,80},{0.25,80},{0.25,46.32}}, + color={255,204,51}, + thickness=0.5)); + connect(coolantHex.port_b1,cHP_PowerUnit.port_retCoo) annotation (Line( + points={{-20,-40},{-60,-40},{-60,10.08},{-20,10.08}}, color={0,127, + 255})); + connect(cHP_PowerUnit.port_supCoo, coolantHex.port_a1) annotation (Line( + points={{20,10.08},{60,10.08},{60,-40},{20,-40}}, color={0,127,255})); + connect(temSupFlo.port_b, port_supHea) annotation (Line(points={{58,-64},{90, + -64},{90,0},{100,0}}, color={0,127,255})); + connect(port_retHea, temRetFlo.port_a) annotation (Line(points={{-100,0},{-90, + 0},{-90,-64},{-58,-64}}, color={0,127,255})); + connect(fixedPressureLevel.ports[1], cHP_PowerUnit.port_retCoo) annotation ( + Line(points={{-64,-20},{-60,-20},{-60,10.08},{-20,10.08}}, color={0,127, + 255})); + annotation (Icon(coordinateSystem(preserveAspectRatio=false), graphics={Text( + extent={{-50,58},{50,18}}, + lineColor={255,255,255}, + fillPattern=FillPattern.HorizontalCylinder, + fillColor={175,175,175}, + textString="CHP", + textStyle={TextStyle.Bold}), + Rectangle( + extent={{-60,80},{60,-80}}, + lineColor={0,0,0}, + fillPattern=FillPattern.VerticalCylinder, + fillColor={170,170,255}), Text( + extent={{-50,68},{50,28}}, + lineColor={255,255,255}, + fillPattern=FillPattern.HorizontalCylinder, + fillColor={175,175,175}, + textStyle={TextStyle.Bold}, + textString="Modular +CHP"), Rectangle( + extent={{-12,6},{12,-36}}, + lineColor={0,0,0}, + fillColor={255,255,255}, + fillPattern=FillPattern.Solid), + Polygon( + points={{-10,-16},{-10,-36},{-8,-30},{8,-30},{10,-36},{10,-16},{-10,-16}}, + lineColor={0,0,0}, + fillColor={215,215,215}, + fillPattern=FillPattern.Solid), + Ellipse( + extent={{-2,-26},{4,-32}}, + lineColor={0,0,0}, + fillColor={135,135,135}, + fillPattern=FillPattern.Solid), + Ellipse( + extent={{-18,-54},{-8,-64}}, + lineColor={0,0,0}, + fillColor={135,135,135}, + fillPattern=FillPattern.Solid), + Polygon( + points={{-2,-30},{-14,-54},{-10,-56},{0,-32},{-2,-30}}, + lineColor={0,0,0}, + fillColor={135,135,135}, + fillPattern=FillPattern.Solid), + Polygon( + points={{-4.5,-15.5},{-8,-10},{0,4},{6,-4},{10,-4},{8,-8},{8,-12},{5.5, + -15.5},{-4.5,-15.5}}, + lineColor={0,0,0}, + fillPattern=FillPattern.Sphere, + fillColor={255,127,0}), + Polygon( + points={{-4.5,-13.5},{0,-4},{6,-10},{2,-14},{-4.5,-13.5}}, + lineColor={255,255,170}, + fillColor={255,255,170}, + fillPattern=FillPattern.Solid), + Line( + points={{-90,0},{-60,0}}, + color={0,127,255}, + thickness=1), + Line( + points={{60,0},{90,0}}, + color={0,127,255}, + thickness=1)}), Diagram( + coordinateSystem(preserveAspectRatio=false)), + Documentation(info=" +This model of a gas engine CHP plant is using the CHP power unit AixLib.Fluid.BoilerCHP.ModularCHP.BaseClasses.ModularCHP_PowerUnit extended by a heat exchanger to the heating circuit. Also, a simple controller model is added to simulate different operation conditions by transferring an On-/Off-Signal and the modulation factor via the bus port.
+Model calibration and limitations can be found in AixLib.Fluid.BoilerCHP.ModularCHP.BaseClasses.ModularCHP_PowerUnit
+", revisions=" +evaluate_etaPL and how it is used.
+This correction only affects protected variables and does not affect the results.+ This black box model represents the refrigerant cycle of a chiller. + Used in AixLib.Fluid.Chillers.Chiller, this model serves the + simulation of a reversible chiller. Thus, data both of chillers and + heat pumps can be used to calculate the three relevant values + P_el, QCon and QEva. The mode of the chiller is used to + switch between the performance data of the chiller and the heat pump. +
++ The user can choose between different types of performance data or + implement a new black-box model by extending from the + partial model. +
++ This generic grey-box chiller model uses empirical data to model the + refrigerant cycle. The modelling of system inertias and heat losses + allow the simulation of transient states. +
++ Resulting in the choosen model structure, several configurations are + possible: +
++ Using a signal bus as a connector, this chiller model can be easily + combined within a chiller system model including several control or + security blocks analogous to AixLib.Controls.HeatPump. + The relevant data is aggregated. The mode signal chooses the type of + the chiller operation. As a result, this model can also be used as a + heat pump: +
++ To model both on/off and inverter controlled chillers, the compressor + speed is normalizd to a relative value between 0 and 1. +
++ Possible icing of the evaporator is modelled with an input value + between 0 and 1. +
++ The model structure is as follows. To understand each submodel, + please have a look at the corresponding model information: +
++ To simplify the parametrization of the evaporator and condenser + volumes and nominal mass flows there exists an option of automatic + estimation based on the nominal usable cooling power of the Chiller. + This function uses a linear correlation of these parameters, which + was established from the linear regression of more than 20 data sets + of water-to-water chillers from different manufacturers (e.g. + Carrier, Trane, Lennox) ranging from about 25kW to 1MW nominal power. + The linear regressions with coefficients of determination above 91% + give a good approximation of these parameters. Nevertheless, + estimates for machines outside the given range should be checked for + plausibility during simulation. +
++ Several assumptions where made in order to model the chiller. For a + detailed description see the corresponding model. +
+dTEva_nominal.
revisions="
dTEva_nominal to be consistent.
+ Simple test set-up for the reversible chiller model. The chiller is + turned on and off while the source temperature increases linearly. + Outputs are the electric power consumption of the chiller and the + supply temperature. +
++ Besides using the default simple table data, the user should also + test tabulated data from AixLib.DataBase.Chiller or + polynomial functions. +
+", + revisions="Chiller to be upper-case.
each statements.each statements.each keywords.
each.
Medium.temperature_phX and
Medium.specificEnthalpy_pTX.
diff --git a/AixLib/Fluid/FMI/Adaptors/Outlet.mo b/AixLib/Fluid/FMI/Adaptors/Outlet.mo
index 676d93263f..06c6043f06 100644
--- a/AixLib/Fluid/FMI/Adaptors/Outlet.mo
+++ b/AixLib/Fluid/FMI/Adaptors/Outlet.mo
@@ -2,8 +2,10 @@ within AixLib.Fluid.FMI.Adaptors;
model Outlet "Adaptor for connecting a fluid outlet to the FMI interface"
replaceable package Medium =
- Modelica.Media.Interfaces.PartialMedium "Medium model within the source"
- annotation (choicesAllMatching=true);
+ Modelica.Media.Interfaces.PartialMedium "Medium in the component"
+ annotation (choices(
+ choice(redeclare package Medium = AixLib.Media.Air "Moist air"),
+ choice(redeclare package Medium = AixLib.Media.Water "Water")));
parameter Boolean allowFlowReversal = true
"= true to allow flow reversal, false restricts to design direction (inlet -> outlet)"
@@ -151,6 +153,11 @@ for how to use this model.
", revisions="
Medium.temperature_phX.
each keyword.
@@ -376,6 +384,11 @@ for a model that uses this model.
", revisions="
X.Medium.temperature_phX.
This example demonstrates how to export a model of an HVAC system that only provides convective cooling to a single thermal zone. + +
The example extends from @@ -279,6 +283,11 @@ ports which are exposed at the FMU interface. ", revisions="
The example extends from diff --git a/AixLib/Fluid/FMI/ExportContainers/Examples/FMUs/ThermalZones.mo b/AixLib/Fluid/FMI/ExportContainers/Examples/FMUs/ThermalZones.mo index 5d5416ec38..8da7d054f5 100644 --- a/AixLib/Fluid/FMI/ExportContainers/Examples/FMUs/ThermalZones.mo +++ b/AixLib/Fluid/FMI/ExportContainers/Examples/FMUs/ThermalZones.mo @@ -104,7 +104,7 @@ equation color={255,204,51}, thickness=0.5, smooth=Smooth.None), Text( - string="%second", + textString="%second", index=1, extent={{6,3},{6,3}})); connect(theCon1.port_b, vol1.heatPort) annotation (Line(points={{50,120},{50,120}, @@ -113,7 +113,7 @@ equation {60,40},{80,40}}, color={191,0,0})); connect(TAirOut.T, weaBus.TDryBul) annotation (Line(points={{-32,120},{-40,120}, {-40,140},{120,140}}, color={0,0,127}), Text( - string="%second", + textString="%second", index=1, extent={{6,3},{6,3}})); connect(TAirOut.port, theCon1.port_a) @@ -191,11 +191,13 @@ This example demonstrates how to export a model that contains two thermal zones with convective heat input from the HVAC system only. The thermal zones are connected to an adaptor so that they can be coupled -to an air-based HVAC system. The thermal zone is +to an air-based HVAC system. +
The example extends from diff --git a/AixLib/Fluid/FMI/ExportContainers/HVACZone.mo b/AixLib/Fluid/FMI/ExportContainers/HVACZone.mo index eaffd7f582..a0e90dac12 100644 --- a/AixLib/Fluid/FMI/ExportContainers/HVACZone.mo +++ b/AixLib/Fluid/FMI/ExportContainers/HVACZone.mo @@ -3,8 +3,9 @@ partial block HVACZone "Partial block to export an HVAC system that has no radiative component and that serves multiple zones as an FMU" replaceable package Medium = - Modelica.Media.Interfaces.PartialMedium "Medium in the component" - annotation (choicesAllMatching = true); + Modelica.Media.Interfaces.PartialMedium "Medium in the component" + annotation (choices( + choice(redeclare package Medium = AixLib.Media.Air "Moist air"))); // Set allowFlowReversal = true to get access to the states of the zone. Interfaces.Outlet fluPor[size(hvacAda.fluPor, 1)]( @@ -124,11 +125,13 @@ The example AixLib.Fluid.FMI.ExportContainers.Examples.FMUs.HVACZone
The conversion between the fluid ports and signal ports is done
@@ -219,6 +222,11 @@ in models that are connected to ports.
", revisions="
The following two parameters need to be assigned by the user:
@@ -284,6 +287,11 @@ in models that are connected to ports.
", revisions="
use_p_in=false.
diff --git a/AixLib/Fluid/FMI/ExportContainers/ThermalZone.mo b/AixLib/Fluid/FMI/ExportContainers/ThermalZone.mo
index a7ae6c5357..e641650f6f 100644
--- a/AixLib/Fluid/FMI/ExportContainers/ThermalZone.mo
+++ b/AixLib/Fluid/FMI/ExportContainers/ThermalZone.mo
@@ -1,8 +1,10 @@
within AixLib.Fluid.FMI.ExportContainers;
partial block ThermalZone
"Partial block to export a model of a thermal zone as an FMU"
- replaceable package Medium = Modelica.Media.Interfaces.PartialMedium
- "Medium model" annotation (choicesAllMatching=true);
+ replaceable package Medium =
+ Modelica.Media.Interfaces.PartialMedium "Medium in the component"
+ annotation (choices(
+ choice(redeclare package Medium = AixLib.Media.Air "Moist air")));
parameter Integer nPorts(min=2) "Number of fluid ports";
@@ -96,11 +98,13 @@ The example
AixLib.Fluid.FMI.ExportContainers.Examples.FMUs.ThermalZone
@@ -136,10 +140,13 @@ the port fluPor (which is negative if it is an exhaust),
Tair,zon is the zone air temperature.
Note that without the max(·, ·), the energy
balance would be wrong.
-Models in the package
+For example,
+
+the control volumes in
AixLib.Fluid.MixingVolumes
implement such a max(·, ·) function.
@@ -165,15 +172,22 @@ All nPorts
AixLib.Fluid.FMI.ExportContainers.Examples.FMUs.ThermalZone
+
", revisions="
@@ -176,10 +180,13 @@ the port fluPor (which is negative if it is an exhaust),
Tair,zon is the zone air temperature.
Note that without the max(·, ·), the energy
balance would be wrong.
-Models in the package
+For example,
+
+the control volumes in
AixLib.Fluid.MixingVolumes
implement such a max(·, ·) function.
@@ -206,15 +213,22 @@ All nPorts
AixLib.Fluid.FMI.ExportContainers.Examples.FMUs.ThermalZones.
+
", revisions="assert() statement which was triggered
when the model was exported as an FMU
diff --git a/AixLib/Fluid/FMI/Interfaces/FluidProperties.mo b/AixLib/Fluid/FMI/Interfaces/FluidProperties.mo
index ce1e7123ab..92ad1c06f6 100644
--- a/AixLib/Fluid/FMI/Interfaces/FluidProperties.mo
+++ b/AixLib/Fluid/FMI/Interfaces/FluidProperties.mo
@@ -1,7 +1,15 @@
within AixLib.Fluid.FMI.Interfaces;
connector FluidProperties "Type definition for fluid properties"
- replaceable package Medium = Modelica.Media.Interfaces.PartialMedium
- "Medium model" annotation (choicesAllMatching=true);
+ replaceable package Medium =
+ Modelica.Media.Interfaces.PartialMedium "Medium in the component"
+ annotation (choices(
+ choice(redeclare package Medium = AixLib.Media.Air "Moist air"),
+ choice(redeclare package Medium = AixLib.Media.Water "Water"),
+ choice(redeclare package Medium =
+ AixLib.Media.Antifreeze.PropyleneGlycolWater (
+ property_T=293.15,
+ X_a=0.40)
+ "Propylene glycol water, 40% mass fraction")));
Medium.Temperature T "Temperature";
@@ -46,6 +54,11 @@ outlet connector.
", revisions="
allowFlowReversal = false, then these outputs are not present.
", revisions="
use_p_in=false.
diff --git a/AixLib/Fluid/FMI/Interfaces/Outlet.mo b/AixLib/Fluid/FMI/Interfaces/Outlet.mo
index 3a6133aff7..521594bae9 100644
--- a/AixLib/Fluid/FMI/Interfaces/Outlet.mo
+++ b/AixLib/Fluid/FMI/Interfaces/Outlet.mo
@@ -1,7 +1,15 @@
within AixLib.Fluid.FMI.Interfaces;
connector Outlet "Connector for fluid outlet"
- replaceable package Medium = Modelica.Media.Interfaces.PartialMedium
- "Medium model" annotation (choicesAllMatching=true);
+ replaceable package Medium =
+ Modelica.Media.Interfaces.PartialMedium "Medium in the component"
+ annotation (choices(
+ choice(redeclare package Medium = AixLib.Media.Air "Moist air"),
+ choice(redeclare package Medium = AixLib.Media.Water "Water"),
+ choice(redeclare package Medium =
+ AixLib.Media.Antifreeze.PropyleneGlycolWater (
+ property_T=293.15,
+ X_a=0.40)
+ "Propylene glycol water, 40% mass fraction")));
parameter Boolean use_p_in = true
"= true to use pressure connector, false to remove it"
@@ -93,6 +101,11 @@ and hence not required to be provided.
", revisions="
use_p_in=false.
diff --git a/AixLib/Fluid/FMI/Sink_T.mo b/AixLib/Fluid/FMI/Sink_T.mo
index 792bc58afa..562f02fc2f 100644
--- a/AixLib/Fluid/FMI/Sink_T.mo
+++ b/AixLib/Fluid/FMI/Sink_T.mo
@@ -3,8 +3,9 @@ model Sink_T
"Model of a sink with temperature for reverse flow as an input that can be exported as an FMU"
extends Modelica.Blocks.Icons.Block;
replaceable package Medium =
- Modelica.Media.Interfaces.PartialMedium "Medium in the component"
- annotation (choicesAllMatching = true);
+ Modelica.Media.Interfaces.PartialMedium "Medium in the component"
+ annotation (choices(
+ choice(redeclare package Medium = AixLib.Media.Air "Moist air")));
parameter Boolean use_p_in = true
"= true to use a pressure from connector, false to output Medium.p_default"
@@ -114,6 +115,11 @@ may be needed to iteratively solve for the mass flow rate.
", revisions="
use_p_in=false.
diff --git a/AixLib/Fluid/FMI/Source_T.mo b/AixLib/Fluid/FMI/Source_T.mo
index c4a838802f..1c66c5a161 100644
--- a/AixLib/Fluid/FMI/Source_T.mo
+++ b/AixLib/Fluid/FMI/Source_T.mo
@@ -3,8 +3,9 @@ model Source_T
"Model of a boundary with mass flow rate, pressure and temperature as an input that can be exported as an FMU"
extends Modelica.Blocks.Icons.Block;
replaceable package Medium =
- Modelica.Media.Interfaces.PartialMedium "Medium in the component"
- annotation (choicesAllMatching = true);
+ Modelica.Media.Interfaces.PartialMedium "Medium in the component"
+ annotation (choices(
+ choice(redeclare package Medium = AixLib.Media.Air "Moist air")));
parameter Boolean allowFlowReversal = true
"= true to allow flow reversal, false restricts to design direction (inlet -> outlet)"
@@ -101,6 +102,11 @@ and the mass flow rate of the system.
", revisions="
The component calculates the delay time at both in/outlet ports of the pipe and therefore has two outlets. During forward flow, only the forward - -AixLib.Fluid.PlugFlowPipes.BaseClasses.HeatLossPipeDelay component in - -AixLib.Fluid.PlugFlowPipes.BaseClasses.PipeCore + +AixLib.Fluid.FixedResistances.BaseClasses.PlugFlowTransportDelay component in + +AixLib.Fluid.FixedResistances.BaseClasses.PlugFlowCore will be active and uses the forward output of PlugFlowTransportDelay. During reverse, the opposite is true and only the reverse output is used.
@@ -128,19 +133,29 @@ During reverse, the opposite is true and only the reverse output is used. ", revisions="spatialDistribution operator to be a parameter
+expression.abs() of normalized velocity input in order to avoid negative
-delay times. +Implementation of a hydraulic check valve. +Note that the small reverse flows can still occur with this model. +
++The basic flow function +
++ m = sign(Δp) k √ Δp , +
++with regularization near the origin, is used to compute the pressure drop. +The flow coefficient +
++ k = m ⁄ √ Δp +
+
+is increased from l*KV_Si to KV_Si,
+where KV_Si is equal to Kv but in SI units.
+Therefore, the flow coefficient k is set to a value close to zero for negative pressure differences, thereby
+restricting reverse flow to a small value.
+The flow coefficient k saturates to its maximum value at the pressure dpValve_closing.
+For larger pressure drops, the pressure drop is a quadratic function of the flow rate.
+
+The parameters m_flow_nominal and dpValve_nominal
+determine the flow coefficient of the check valve when it is fully opened.
+A typical value for a nominal flow rate of 1 m/s is
+dpValve_nominal = 3400 Pa.
+The leakage ratio l determines the minimum flow coefficient,
+for negative pressure differences.
+The parameter dpFixed_nominal allows to include a series
+pressure drop with a fixed flow coefficient into the model.
+The parameter dpValve_closing determines when the
+flow coefficient starts to increase,
+which is typically in the order of dpValve_nominal.
+
+The check valve implementation approximates the physics
+where a forward pressure difference opens the valve such that
+the valve opening increases, causing a growing orifice area
+and thus increasing the flow coefficient.
+Near dp=dpValve_closing, the valve is fully open and the flow coefficient saturates
+to the flow coefficient value determined by dpValve_nominal and m_flow_nominal.
+For typical valve diameters, the check valve is only fully open
+near nominal mass flow rate. Therefore, the model sets dpValve_closing=dpValve_nominal/2
+by default.
+
+Example model for the use of a hydraulic check valve. +
+")); +end CheckValve; diff --git a/AixLib/Fluid/FixedResistances/Examples/CompareFixedResistances.mo b/AixLib/Fluid/FixedResistances/Examples/CompareFixedResistances.mo index f6fad98521..7676b5ea27 100644 --- a/AixLib/Fluid/FixedResistances/Examples/CompareFixedResistances.mo +++ b/AixLib/Fluid/FixedResistances/Examples/CompareFixedResistances.mo @@ -78,7 +78,7 @@ equation connect(masFlo1.m_flow, assEqu.u2) annotation (Line(points={{30,51},{30,64},{38,64}}, color={0,0,127})); annotation ( - experiment(StopTime=3), + experiment(StopTime=3600, Tolerance=1e-06), __Dymola_Commands(file="modelica://AixLib/Resources/Scripts/Dymola/Fluid/FixedResistances/Examples/CompareFixedResistances.mos" "Simulate and plot"), __Dymola_experimentSetupOutput, diff --git a/AixLib/Fluid/FixedResistances/Examples/Pipe.mo b/AixLib/Fluid/FixedResistances/Examples/Pipe.mo index 720c1d6ec6..5ed9e68c3b 100644 --- a/AixLib/Fluid/FixedResistances/Examples/Pipe.mo +++ b/AixLib/Fluid/FixedResistances/Examples/Pipe.mo @@ -61,18 +61,18 @@ equation smooth=Smooth.None)); connect(Source.ports[1], dynamicPipeEBCAggregated_Ambient_Loss_UC.port_a) annotation (Line( - points={{-44,0},{-14.4,0}}, + points={{-44,0},{-14,0}}, color={0,127,255}, smooth=Smooth.None)); connect(temperatureBefore.port, dynamicPipeEBCAggregated_Ambient_Loss_UC.port_a) annotation (Line( - points={{-42,-40},{-30,-40},{-30,0},{-14.4,0}}, + points={{-42,-40},{-30,-40},{-30,0},{-14,0}}, color={0,127,255}, smooth=Smooth.None)); connect(dynamicPipeEBCAggregated_Ambient_Loss_UC.port_b, Sink.ports[1]) - annotation (Line(points={{6.4,0},{68,0},{68,1}}, color={0,127,255})); + annotation (Line(points={{6,0},{68,0},{68,1}}, color={0,127,255})); connect(temperatureAfter.port, dynamicPipeEBCAggregated_Ambient_Loss_UC.port_b) - annotation (Line(points={{24,-40},{40,-40},{40,0},{6.4,0}}, color={0,127,255})); + annotation (Line(points={{24,-40},{40,-40},{40,0},{6,0}}, color={0,127,255})); connect(fixedTemp.port, dynamicPipeEBCAggregated_Ambient_Loss_UC.heatPort_outside) annotation (Line(points={{-30,30},{-2.4,30},{-2.4,5.6}}, color={191,0,0})); annotation (Diagram(coordinateSystem(preserveAspectRatio=false, extent={{-100, diff --git a/AixLib/Fluid/FixedResistances/Examples/package.order b/AixLib/Fluid/FixedResistances/Examples/package.order index 57061a01b6..f668d2de98 100644 --- a/AixLib/Fluid/FixedResistances/Examples/package.order +++ b/AixLib/Fluid/FixedResistances/Examples/package.order @@ -1,3 +1,4 @@ +CheckValve CompareFixedResistances FlowJunction HydraulicDiameter diff --git a/AixLib/Fluid/FixedResistances/Pipe.mo b/AixLib/Fluid/FixedResistances/Pipe.mo index fcc26380b4..5018c72717 100644 --- a/AixLib/Fluid/FixedResistances/Pipe.mo +++ b/AixLib/Fluid/FixedResistances/Pipe.mo @@ -1,17 +1,13 @@ within AixLib.Fluid.FixedResistances; model Pipe "Discretized DynamicPipe with heat loss to ambient" - + extends Interfaces.PartialTwoPort; import Modelica.Fluid.Types.ModelStructure; outer Modelica.Fluid.System system "System wide properties"; - // Parameters Tab "General" - replaceable package Medium = - Modelica.Media.Water.ConstantPropertyLiquidWater constrainedby - Modelica.Media.Interfaces.PartialMedium "Medium in the component" - annotation (choicesAllMatching = true); - parameter Real nParallel = 1 "Number of identical parallel pipes" annotation(Dialog(group = "Geometry")); + + parameter Integer nParallel = 1 "Number of identical parallel pipes" annotation(Dialog(group = "Geometry")); parameter Modelica.SIunits.Length length=1 "Length" annotation(Dialog(group = "Geometry")); parameter Boolean isCircular = true @@ -35,11 +31,6 @@ model Pipe "Discretized DynamicPipe with heat loss to ambient" "Wall friction, gravity, momentum flow" annotation(Dialog(group="Pressure loss"), choicesAllMatching=true); - // Parameter Tab "Assumptions" - parameter Boolean allowFlowReversal = system.allowFlowReversal - "= true to allow flow reversal, false restricts to design direction (port_a -> port_b)" - annotation(Dialog(tab="Assumptions"), Evaluate=true); - parameter Modelica.Fluid.Types.Dynamics energyDynamics = system.energyDynamics "Formulation of energy balances" annotation(Dialog(tab="Assumptions", group = "Dynamics")); parameter Modelica.Fluid.Types.Dynamics massDynamics = system.massDynamics @@ -64,8 +55,7 @@ model Pipe "Discretized DynamicPipe with heat loss to ambient" Modelica.Fluid.Pipes.BaseClasses.HeatTransfer.PartialFlowHeatTransfer "Wall heat transfer" annotation (Dialog(tab="Heat transfer",enable=use_HeatTransfer),choicesAllMatching=true); - parameter Modelica.SIunits.CoefficientOfHeatTransfer alpha_i=1000 - "Heat tranfer coefficient from fluid to pipe wall"; + parameter Modelica.SIunits.CoefficientOfHeatTransfer hCon_i=1000 "Heat tranfer coefficient from fluid to pipe wall"; parameter AixLib.DataBase.Pipes.PipeBaseDataDefinition parameterPipe= AixLib.DataBase.Pipes.Copper.Copper_6x1() "Pipe type" annotation (choicesAllMatching=true, Dialog(tab="Heat transfer")); @@ -73,8 +63,8 @@ model Pipe "Discretized DynamicPipe with heat loss to ambient" AixLib.DataBase.Pipes.Insulation.Iso0pc() "Insulation Type" annotation (choicesAllMatching=true, Dialog(tab="Heat transfer")); - parameter Modelica.SIunits.CoefficientOfHeatTransfer alpha=8 - "Heat transfer coefficient to ambient" annotation (Dialog(tab="Heat transfer", enable = Heat_Loss_To_Ambient)); + parameter Modelica.SIunits.CoefficientOfHeatTransfer hCon=8 "Heat transfer coefficient to ambient" + annotation (Dialog(tab="Heat transfer", enable=Heat_Loss_To_Ambient)); Utilities.HeatTransfer.CylindricHeatTransfer PipeWall[nNodes]( rho=fill(parameterPipe.d, nNodes), c=fill(parameterPipe.c, nNodes), @@ -82,7 +72,8 @@ model Pipe "Discretized DynamicPipe with heat loss to ambient" d_in=fill(parameterPipe.d_i, nNodes), length=fill(length/nNodes, nNodes), lambda=fill(parameterPipe.lambda, nNodes), - T0=fill(T_start, nNodes)) + T0=fill(T_start, nNodes), + each nParallel=nParallel) annotation (Placement(transformation(extent={{-20,-30},{0,-10}}))); Utilities.HeatTransfer.CylindricHeatTransfer Insulation[nNodes]( @@ -93,7 +84,8 @@ model Pipe "Discretized DynamicPipe with heat loss to ambient" length=fill(length/nNodes, nNodes), lambda=fill(parameterIso.lambda, nNodes), T0=fill(T_start, nNodes), - rho=fill(parameterIso.d, nNodes)) if withInsulation + rho=fill(parameterIso.d, nNodes), + each nParallel=nParallel) if withInsulation annotation (Placement(transformation(extent={{-20,-8},{0,12}}))); Modelica.Fluid.Pipes.DynamicPipe pipe( @@ -126,18 +118,8 @@ model Pipe "Discretized DynamicPipe with heat loss to ambient" useInnerPortProperties=useInnerPortProperties, redeclare model HeatTransfer = Modelica.Fluid.Pipes.BaseClasses.HeatTransfer.ConstantFlowHeatTransfer - (alpha0=alpha_i)) + ( alpha0=hCon_i)) annotation (Placement(transformation(extent={{-20,-46},{0,-26}}))); - Modelica.Fluid.Interfaces.FluidPort_b port_b(redeclare package Medium = - Medium) - "Fluid connector b (positive design flow direction is from port_a to port_b)" - annotation (Placement(transformation(extent={{94,-46},{114,-26}}), - iconTransformation(extent={{94,-10},{114,10}}))); - Modelica.Fluid.Interfaces.FluidPort_a port_a(redeclare package Medium = - Medium) - "Fluid connector a (positive design flow direction is from port_a to port_b)" - annotation (Placement(transformation(extent={{-114,-46},{-94,-26}}), - iconTransformation(extent={{-114,-10},{-94,10}}))); // Parameter Tab "Initialisation" parameter Medium.AbsolutePressure p_a_start=system.p_start @@ -191,23 +173,22 @@ protected Modelica.Fluid.Interfaces.HeatPorts_a heatPorts[nNodes] annotation (Placement(transformation(extent={{18,38},{58,46}}), iconTransformation(extent={{-46,20},{40,38}}))); + public - AixLib.Utilities.HeatTransfer.HeatConv heatConv[nNodes](alpha=fill(alpha, - nNodes), A=Modelica.Constants.pi*PipeWall.d_out*length/nNodes) if - Heat_Loss_To_Ambient and not withInsulation and not isEmbedded - "Convection from pipe wall" annotation (Placement(transformation( + AixLib.Utilities.HeatTransfer.HeatConv heatConv[nNodes](hCon=fill(hCon, nNodes), A=Modelica.Constants.pi*PipeWall.d_out*length/nNodes) if + Heat_Loss_To_Ambient and not withInsulation and not isEmbedded "Convection from pipe wall" + annotation (Placement(transformation( extent={{-10,-10},{10,10}}, rotation=270, origin={24,26}))); - AixLib.Utilities.HeatTransfer.HeatConv heatConv_withInsulation[nNodes](alpha= - fill(alpha, nNodes), A=Modelica.Constants.pi*Insulation.d_out*length/ - nNodes) if (Heat_Loss_To_Ambient and withInsulation and not isEmbedded) - "Convection from insulation" annotation (Placement(transformation( + AixLib.Utilities.HeatTransfer.HeatConv heatConv_withInsulation[nNodes](hCon=fill(hCon, nNodes), A=Modelica.Constants.pi*Insulation.d_out* + length/nNodes) if (Heat_Loss_To_Ambient and withInsulation and not isEmbedded) "Convection from insulation" + annotation (Placement(transformation( extent={{-10,-10},{10,10}}, rotation=270, origin={50,26}))); - AixLib.Utilities.HeatTransfer.HeatToStar twoStar_RadEx[nNodes](eps=fill(eps, - nNodes), A=Modelica.Constants.pi*PipeWall.d_out*length/nNodes) if + Utilities.HeatTransfer.HeatToStar twoStar_RadEx[nNodes](eps=fill(eps, nNodes), + A=Modelica.Constants.pi*PipeWall.d_out*length/nNodes*nParallel) if Heat_Loss_To_Ambient and not isEmbedded "Radiation" annotation (Placement(transformation( extent={{-10,-10},{10,10}}, @@ -224,9 +205,7 @@ parameter Modelica.SIunits.Emissivity eps = 0.8 "Emissivity" rotation=180, origin={36,58}))); - AixLib.Utilities.Interfaces.Star Star if Heat_Loss_To_Ambient and not isEmbedded - annotation (Placement(transformation(extent={{-70,74},{-50,94}}), - iconTransformation(extent={{-24,46},{-4,66}}))); + AixLib.Utilities.Interfaces.RadPort Star if Heat_Loss_To_Ambient and not isEmbedded annotation (Placement(transformation(extent={{-70,74},{-50,94}}), iconTransformation(extent={{-24,46},{-4,66}}))); Modelica.Thermal.HeatTransfer.Components.ThermalCollector thermalCollector_Star(m=nNodes) if Heat_Loss_To_Ambient and not isEmbedded annotation (Placement(transformation(extent={{-10,-10},{10,10}}, rotation=180, @@ -252,14 +231,6 @@ protected */ equation - connect(pipe.port_b, port_b) annotation (Line( - points={{0,-36},{104,-36}}, - color={0,127,255}, - smooth=Smooth.None)); - connect(pipe.port_a, port_a) annotation (Line( - points={{-20,-36},{-104,-36}}, - color={0,127,255}, - smooth=Smooth.None)); connect(pipe.heatPorts,PipeWall.port_a); connect(heatPorts, thermalCollector.port_a); connect(heatPort_outside, thermalCollector.port_b); @@ -308,6 +279,10 @@ equation color={0,0,127}, smooth=Smooth.None)); */ + connect(pipe.port_a, port_a) annotation (Line(points={{-20,-36},{-80,-36},{-80, + 0},{-100,0}}, color={0,127,255})); + connect(pipe.port_b, port_b) annotation (Line(points={{0,-36},{80,-36},{80,0}, + {100,0}}, color={0,127,255})); annotation ( Icon(graphics={ Rectangle( extent={{-100,40},{100,-40}}, diff --git a/AixLib/Fluid/FixedResistances/Validation/PlugFlowPipes/Data/BaseClasses/PipeDataULg.mo b/AixLib/Fluid/FixedResistances/Validation/PlugFlowPipes/Data/BaseClasses/PipeDataULg.mo index c386e5b570..794baac581 100644 --- a/AixLib/Fluid/FixedResistances/Validation/PlugFlowPipes/Data/BaseClasses/PipeDataULg.mo +++ b/AixLib/Fluid/FixedResistances/Validation/PlugFlowPipes/Data/BaseClasses/PipeDataULg.mo @@ -43,7 +43,7 @@ the mass flow rate is set to 1.245 kg/s.Notice: length are approximate
Overview
This record contains data of a real disitrict heating network for week-long period (23-29 Januar 2009) monitored by the Austrian Institut for Technology.
-Pipes are layed underground +
Pipes are layed underground
Data structure
Column 1: Time in s
@@ -646,9 +646,9 @@ First implementation.Test procedure
Information at several points of the district heating network is recorded during a week. - +Test bench schematic
-![\"Schematic](\"modelica://AixLib/Resources/Images/Experimental/AITTestBench.png\")
+
![\"Schematic](\"modelica://AixLib/Resources/Images/Fluid/FixedResistances/Validation/PlugFlowPipes/AITTestBench.png\")
diff --git a/AixLib/Fluid/FixedResistances/Validation/PlugFlowPipes/MSLAIT.mo b/AixLib/Fluid/FixedResistances/Validation/PlugFlowPipes/MSLAIT.mo
index 0bbf06f62c..77957dd1ed 100644
--- a/AixLib/Fluid/FixedResistances/Validation/PlugFlowPipes/MSLAIT.mo
+++ b/AixLib/Fluid/FixedResistances/Validation/PlugFlowPipes/MSLAIT.mo
@@ -51,7 +51,7 @@ model MSLAIT
Modelica.Blocks.Sources.RealExpression T_p1(y=DataReader.y[1])
"Inlet temperature"
annotation (Placement(transformation(extent={{62,-110},{102,-90}})));
- Fluid.Sources.FixedBoundary ExcludedBranch(redeclare package Medium = Medium,
+ AixLib.Fluid.Sources.Boundary_pT ExcludedBranch(redeclare package Medium = Medium,
nPorts=1) "Mass flow sink for excluded branch"
annotation (Placement(transformation(
extent={{-10,-10},{10,10}},
@@ -504,6 +504,11 @@ Where the thermal conductivity of the ground lambda_g = 2.4 W/(m K)
pipVol.
lambda_g = 2.4 W/(m K)
", revisions="
pipVol.
This package contains base classes that are used to construct the models in -AixLib.Fluid.HeatExchangers.Boreholes. + +AixLib.Fluid.Geothermal.Borefields.BaseClasses.Boreholes.
")); end BaseClasses; diff --git a/AixLib/Fluid/Geothermal/Borefields/BaseClasses/Boreholes/Examples/BaseClasses/PartialBorehole.mo b/AixLib/Fluid/Geothermal/Borefields/BaseClasses/Boreholes/Examples/BaseClasses/PartialBorehole.mo index d25f71fd6c..f27806ce3d 100644 --- a/AixLib/Fluid/Geothermal/Borefields/BaseClasses/Boreholes/Examples/BaseClasses/PartialBorehole.mo +++ b/AixLib/Fluid/Geothermal/Borefields/BaseClasses/Boreholes/Examples/BaseClasses/PartialBorehole.mo @@ -72,8 +72,8 @@ equation annotation(Documentation(info="This partial model is used for examples using boreholes models which extend - -AixLib.Fluid.Geothermal.Borefields.BaseClasses.Boreholes.partialBorehole. + +AixLib.Fluid.Geothermal.Borefields.BaseClasses.Boreholes.Examples.BaseClasses.PartialBorehole.
", revisions="+This example demonstrates the evaluation of the +finite line source integrand function. +
+", revisions=" +diff --git a/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/GFunction_1borehole_5meters.mo b/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/GFunction_1borehole_5meters.mo new file mode 100644 index 0000000000..46be013ef2 --- /dev/null +++ b/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/GFunction_1borehole_5meters.mo @@ -0,0 +1,97 @@ +within AixLib.Fluid.Geothermal.Borefields.BaseClasses.HeatTransfer.ThermalResponseFactors.Validation; +model GFunction_1borehole_5meters + "g-Function calculation for a field of 1 borehole" + extends Modelica.Icons.Example; + + parameter Integer nBor = 1 "Number of boreholes"; + parameter Modelica.SIunits.Position cooBor[nBor, 2] = {{5.*mod(i-1,3), 5.*floor((i-1)/3)} for i in 1:nBor} + "Coordinates of boreholes"; + parameter Modelica.SIunits.Height hBor = 5 "Borehole length"; + parameter Modelica.SIunits.Height dBor = 1 "Borehole buried depth"; + parameter Modelica.SIunits.Radius rBor = 0.075 "Borehole radius"; + parameter Modelica.SIunits.ThermalDiffusivity aSoi = 1e-6 "Ground thermal diffusivity used in g-function evaluation"; + parameter Integer nSeg = 12 "Number of line source segments per borehole"; + parameter Integer nTimSho = 26 "Number of time steps in short time region"; + parameter Integer nTimLon = 50 "Number of time steps in long time region"; + parameter Real ttsMax = exp(5) "Maximum non-dimensional time for g-function calculation"; + + final parameter Integer nTimTot=nTimSho+nTimLon; + final parameter Real[nTimTot] gFun(each fixed=false); + final parameter Real[nTimTot] lntts(each fixed=false); + final parameter Modelica.SIunits.Time[nTimTot] tGFun(each fixed=false); + final parameter Real[nTimTot] dspline(each fixed=false); + + Real gFun_int "Interpolated value of g-function"; + Real lntts_int "Non-dimensional logarithmic time for interpolation"; + + discrete Integer k "Current interpolation interval"; + discrete Modelica.SIunits.Time t1 "Previous value of time for interpolation"; + discrete Modelica.SIunits.Time t2 "Next value of time for interpolation"; + discrete Real gFun1 "Previous g-function value for interpolation"; + discrete Real gFun2 "Next g-function value for interpolation"; + parameter Modelica.SIunits.Time ts = hBor^2/(9*aSoi) "Bore field characteristic time"; + +initial equation + // Evaluate g-function for the specified bore field configuration + (tGFun,gFun) = + AixLib.Fluid.Geothermal.Borefields.BaseClasses.HeatTransfer.ThermalResponseFactors.gFunction( + nBor = nBor, + cooBor = cooBor, + hBor = hBor, + dBor = dBor, + rBor = rBor, + aSoi = aSoi, + nSeg = nSeg, + nTimSho = nTimSho, + nTimLon = nTimLon, + ttsMax = ttsMax); + lntts = log(tGFun/ts .+ Modelica.Constants.small); + // Initialize parameters for interpolation + dspline = AixLib.Utilities.Math.Functions.splineDerivatives( + x = tGFun, + y = gFun); + k = 1; + t1 = tGFun[1]; + t2 = tGFun[2]; + gFun1 = gFun[1]; + gFun2 = gFun[2]; + +equation + // Dimensionless logarithmic time + lntts_int = log(AixLib.Utilities.Math.Functions.smoothMax(time, 1e-6, 2e-6)/ts); + // Interpolate g-function + gFun_int = AixLib.Utilities.Math.Functions.cubicHermiteLinearExtrapolation( + x = time, + x1 = t1, + x2 = t2, + y1 = gFun1, + y2 = gFun2, + y1d = dspline[pre(k)], + y2d = dspline[pre(k)+1]); + // Update interpolation parameters, when needed + when time >= pre(t2) then + k = min(pre(k) + 1, nTimTot); + t1 = tGFun[k]; + t2 = tGFun[k+1]; + gFun1 = gFun[k]; + gFun2 = gFun[k+1]; + end when; + + annotation(experiment(Tolerance=1e-6, StopTime=412000000), +__Dymola_Commands(file="modelica://AixLib/Resources/Scripts/Dymola/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/GFunction_1borehole_5meters.mos" + "Simulate and plot"), + Documentation(info=" +
+This example checks the implementation of functions that evaluate the +g-function of a borefield of 100 boreholes in a 1 configuration. +
+", +revisions=" +diff --git a/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Examples/InfiniteLineSource.mo b/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/InfiniteLineSource.mo similarity index 94% rename from AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Examples/InfiniteLineSource.mo rename to AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/InfiniteLineSource.mo index bd6677dbd2..54c54384a5 100644 --- a/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Examples/InfiniteLineSource.mo +++ b/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/InfiniteLineSource.mo @@ -1,4 +1,4 @@ -within AixLib.Fluid.Geothermal.Borefields.BaseClasses.HeatTransfer.ThermalResponseFactors.Examples; +within AixLib.Fluid.Geothermal.Borefields.BaseClasses.HeatTransfer.ThermalResponseFactors.Validation; model InfiniteLineSource "Test case for infinite line source" extends Modelica.Icons.Example; @@ -19,7 +19,7 @@ equation annotation ( __Dymola_Commands(file= - "modelica://AixLib/Resources/Scripts/Dymola/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Examples/InfiniteLineSource.mos" + "modelica://AixLib/Resources/Scripts/Dymola/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/InfiniteLineSource.mos" "Simulate and plot"), experiment(Tolerance=1e-6, StopTime=15.0), Documentation(info=" diff --git a/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Examples/ShaGFunction.mo b/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/ShaGFunction.mo similarity index 80% rename from AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Examples/ShaGFunction.mo rename to AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/ShaGFunction.mo index 823aebc655..ccfafd5874 100644 --- a/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Examples/ShaGFunction.mo +++ b/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/ShaGFunction.mo @@ -1,4 +1,4 @@ -within AixLib.Fluid.Geothermal.Borefields.BaseClasses.HeatTransfer.ThermalResponseFactors.Examples; +within AixLib.Fluid.Geothermal.Borefields.BaseClasses.HeatTransfer.ThermalResponseFactors.Validation; model ShaGFunction "Verifies the SHA-1 encryption of a single borehole" extends Modelica.Icons.Example; @@ -17,9 +17,9 @@ model ShaGFunction 50, exp(5)) "SHA1-encrypted g-function inputs"; - //Expected output (SHA1-encryption of '1.000e+0000.000e+0000.000e+0001.500e+0024.000e+0007.500e-0021.000e-0061.200e+0012.600e+0015.000e+0011.484e+002') + //Expected output (SHA1-encryption of (1,{{0,0}},150,4,0.075,1e-6,12,26,50,exp(5))) parameter String strEx= - "5d0475f93c93232dfe2452bb34acabd6b9fd28e5" + "f1213b0067741511110ed55c9689cd740f9d42ae" "Expected string output"; //Comparison result @@ -29,7 +29,7 @@ equation cmp = Modelica.Utilities.Strings.isEqual(strIn,strEx,false); annotation (experiment(Tolerance=1e-6, StopTime=1.0), -__Dymola_Commands(file="modelica://AixLib/Resources/Scripts/Dymola/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Examples/ShaGFunction.mos" +__Dymola_Commands(file="modelica://AixLib/Resources/Scripts/Dymola/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/ShaGFunction.mos" "Simulate and plot"), Documentation(info="
diff --git a/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Examples/TimeGeometric.mo b/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/TimeGeometric.mo similarity index 87% rename from AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Examples/TimeGeometric.mo rename to AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/TimeGeometric.mo index fd9b4e7ecf..07e546d901 100644 --- a/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Examples/TimeGeometric.mo +++ b/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/TimeGeometric.mo @@ -1,4 +1,4 @@ -within AixLib.Fluid.Geothermal.Borefields.BaseClasses.HeatTransfer.ThermalResponseFactors.Examples; +within AixLib.Fluid.Geothermal.Borefields.BaseClasses.HeatTransfer.ThermalResponseFactors.Validation; model TimeGeometric "Test case for geometric expansion of time vector" extends Modelica.Icons.Example; @@ -7,7 +7,7 @@ model TimeGeometric parameter Modelica.SIunits.Time t_max = 20.0 "Maximum value of time"; parameter Integer nTim = 5 "Number of time values"; - final parameter Modelica.SIunits.Time[nTim] t(fixed=false) "Time vector"; + final parameter Modelica.SIunits.Time[nTim] t(each fixed=false) "Time vector"; initial equation t = AixLib.Fluid.Geothermal.Borefields.BaseClasses.HeatTransfer.ThermalResponseFactors.timeGeometric( @@ -17,7 +17,7 @@ initial equation annotation ( __Dymola_Commands(file= - "modelica://AixLib/Resources/Scripts/Dymola/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Examples/TimeGeometric.mos" + "modelica://AixLib/Resources/Scripts/Dymola/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/TimeGeometric.mos" "Simulate and plot"), experiment(Tolerance=1e-6, StopTime=1.0), Documentation(info=" diff --git a/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Examples/package.mo b/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/package.mo similarity index 86% rename from AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Examples/package.mo rename to AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/package.mo index c0c1273b34..cdabbb7008 100644 --- a/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Examples/package.mo +++ b/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/package.mo @@ -1,5 +1,5 @@ within AixLib.Fluid.Geothermal.Borefields.BaseClasses.HeatTransfer.ThermalResponseFactors; -package Examples "Example models for ThermalResponseFactors" +package Validation "Example models for ThermalResponseFactors" extends Modelica.Icons.ExamplesPackage; annotation (preferredView="info", Documentation(info=" @@ -9,4 +9,4 @@ This package contains examples for the use of functions that can be found in AixLib.Fluid.Geothermal.Borefields.BaseClasses.HeatTransfer.ThermalResponseFactors.
")); -end Examples; +end Validation; diff --git a/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Examples/package.order b/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/package.order similarity index 78% rename from AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Examples/package.order rename to AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/package.order index 855673faa3..f9152733c5 100644 --- a/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Examples/package.order +++ b/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/Validation/package.order @@ -3,7 +3,9 @@ CylindricalHeatSource_Integrand FiniteLineSource FiniteLineSource_Erfint FiniteLineSource_Integrand +FiniteLineSource_Integrand_Length GFunction_100boreholes +GFunction_1borehole_5meters GFunction_SmallScaleValidation InfiniteLineSource ShaGFunction diff --git a/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/cylindricalHeatSource.mo b/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/cylindricalHeatSource.mo index 887b3e8f2d..79fbcb86c7 100644 --- a/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/cylindricalHeatSource.mo +++ b/AixLib/Fluid/Geothermal/Borefields/BaseClasses/HeatTransfer/ThermalResponseFactors/cylindricalHeatSource.mo @@ -52,7 +52,8 @@ The cylindrical heat source solution is given by:The integral is solved numerically, with the integrand defined in -AixLib.Fluid.Geothermal.Borefields.BaseClasses.ThermalResponseFactors.cylindricalHeatSource_Integrand. + +AixLib.Fluid.Geothermal.Borefields.BaseClasses.HeatTransfer.ThermalResponseFactors.cylindricalHeatSource_Integrand.
", revisions="
-This model simulates a borefield containing one or multiple boreholes
-using the parameters in the borFieDat record.
-
-Heat transfer to the soil is modeled using only one borehole heat exchanger -(To be added in an extended model). The -fluid mass flow rate into the borehole is divided to reflect the per-borehole -fluid mass flow rate. The borehole model calculates the dynamics within the -borehole itself using an axial discretization and a resistance-capacitance -network for the internal thermal resistances between the individual pipes and -between each pipe and the borehole wall. -
--The thermal interaction between the borehole wall and the surrounding soil -is modeled using AixLib.Fluid.Geothermal.Borefields.BaseClasses.HeatTransfer.GroundTemperatureResponse, -which uses a cell-shifting load aggregation technique to calculate the borehole wall -temperature after calculating and/or read (from a previous calculation) the borefield's thermal response factor. -
-", revisions=" -
+This model simulates a borefield containing one or multiple boreholes
+using the parameters in the borFieDat record.
+
+Heat transfer to the soil is modeled using only one borehole heat exchanger +(To be added in an extended model). The +fluid mass flow rate into the borehole is divided to reflect the per-borehole +fluid mass flow rate. The borehole model calculates the dynamics within the +borehole itself using an axial discretization and a resistance-capacitance +network for the internal thermal resistances between the individual pipes and +between each pipe and the borehole wall. +
++The thermal interaction between the borehole wall and the surrounding soil +is modeled using + +AixLib.Fluid.Geothermal.Borefields.BaseClasses.HeatTransfer.GroundTemperatureResponse, +which uses a cell-shifting load aggregation technique to calculate the borehole wall +temperature after calculating and/or read (from a previous calculation) the borefield's thermal response factor. +
+", revisions=" +protected.
+choicesAllMatching for borFieDat.
+See #1117.
+This package contains base classes that are used to construct the models in -AixLib.Fluid.HeatExchangers.Ground. +AixLib.Fluid.Geothermal.Borefields.
")); end BaseClasses; diff --git a/AixLib/Fluid/Geothermal/Borefields/Data/Borefield/package.mo b/AixLib/Fluid/Geothermal/Borefields/Data/Borefield/package.mo index c0f870d3eb..82c485a940 100644 --- a/AixLib/Fluid/Geothermal/Borefields/Data/Borefield/package.mo +++ b/AixLib/Fluid/Geothermal/Borefields/Data/Borefield/package.mo @@ -5,8 +5,8 @@ package Borefield "Collection of borefield data records" annotation (Documentation(info="
This package contains data records for use with ground heat exchanger models
-in
-AixLib.Fluid.HeatExchangers.Ground.
+in
+AixLib.Fluid.Geothermal.Borefields.
The borefield data records
contain one of the
diff --git a/AixLib/Fluid/Geothermal/Borefields/Data/Configuration/package.mo b/AixLib/Fluid/Geothermal/Borefields/Data/Configuration/package.mo
index c7714e337a..57dbac7e17 100644
--- a/AixLib/Fluid/Geothermal/Borefields/Data/Configuration/package.mo
+++ b/AixLib/Fluid/Geothermal/Borefields/Data/Configuration/package.mo
@@ -5,8 +5,8 @@ package Configuration "Collection of records of configuration data of borefields
annotation (Documentation(info="
This package contains data records for use with ground heat exchanger models
-in
-AixLib.Fluid.HeatExchangers.Ground. The configuration data
+in
+AixLib.Fluid.Geothermal.Borefields. The configuration data
records contain the geometrical and operational characteristics of the borefield
and the boreholes.
This package contains data records for use with ground heat exchanger models
-in
-AixLib.Fluid.HeatExchangers.Ground. The filling data
+in
+AixLib.Fluid.Geothermal.Borefields. The filling data
records contain the heat transfer properties of the borehole filling material.
This package contains data records for use with ground heat exchanger models
-in
-AixLib.Fluid.HeatExchangers.Ground. The soil data
+in
+AixLib.Fluid.Geothermal.Borefields. The soil data
records contain the heat transfer properties of soil materials.
This package contains data records for use with ground heat exchanger models
-in
-AixLib.Fluid.HeatExchangers.Ground.
+in
+AixLib.Fluid.Geothermal.Borefields.
This package contains examples for the use of functions that can be found in
-
-AixLib.Fluid.HeatExchangers.Ground.
+
+AixLib.Fluid.Geothermal.Borefields.
The borefield models are constructed in two main parts: the borehole(s) and the ground heat transfer.
-The former is modeled as a vertical discretization of borehole segments, all of them sharing a common
-uniform borehole wall temperature. The thermal effects of the circulating fluid (including the convection resistance),
+The former is modeled as a vertical discretization of borehole segments, where a uniform temperature increase or decrease
+(due to heat injection or extraction) is superimposed to the far-field ground temperature to obtain the borehole wall
+temperature. The thermal effects of the circulating fluid (including the convection resistance),
of the pipes and of the filling material are all taken into consideration, which allows modeling
short-term thermal effects in the borehole. The borehole segments do not take into account axial effects,
thus only radial (horizontal) effects are considered within the borehole(s). The thermal
@@ -220,8 +217,9 @@ AixLib.Fluid.Geothermal.Borefields.BaseClasses.HeatTransfer.ThermalResponseFacto
D. Picard, L. Helsen.
Advanced Hybrid Model for Borefield Heat
-Exchanger Performance Evaluation, an Implementation in Modelica
+Exchanger Performance Evaluation; an Implementation in Modelica
Proc. of the 10th Intertional ModelicaConference, p. 857-866. Lund, Sweden. March 2014.
+https://lirias.kuleuven.be/retrieve/270880.
+This record contains the borefield data of a field of 100 boreholes.
+
+This record contains the configuration data of a field of 100 boreholes.
+
+This record contains the filling data of a field of 100 boreholes.
+
+This record contains the soil data of a field of 100 boreholes.
+
+This validation case simulates a borefield of 100 boreholes on a square 10 by 10
+grid.
+
+The heat injection rate in the borefield is constant and equal to
+
This package contains validation models for the classes in
-
-AixLib.Fluid.HeatExchangers.Ground.
+
+AixLib.Fluid.Geothermal.Borefields.
Model for a panel heating element, consisting of a water volume, heat conduction upwards and downwards through the wall layers, convection and radiation exchange at the room facing side. Model for a panel heating element, consisting of a water volume, heat conduction upwards and downwards through the wall layers, convection and radiation exchange at the room facing side. Model for a contributor for different floor heating circuits in a house. The contributor is built to connect six floor heating circuits together. The volume is used for nummerical reasons, to have a point where all the flows mix together. The contributor is built to connect n floor heating circuits together. The volume is used for nummerical reasons, to have a point where all the flows mix together. AixLib.Fluid.HeatExchangers.Examples.ActiveWalls.ActiveWalls_Test A simple example to test the models panelheating_1D_Dis1 and contributor.
+Test model for
+AixLib.Fluid.HeatExchangers.BaseClasses.HADryCoil.
+
+Model for sensible convective heat transfer coefficients for an air to water coil.
+
+This model computes the convective heat transfer coefficient
+for an air to water coil.
+The parameters allow a user to enable or disable, individually
+for each medium, the mass flow and/or the temperature dependence
+of the convective heat transfer coefficients.
+For a detailed explanation of the equation, see
+the references below.
+
+Partial model of a heat exchanger without humidity condensation.
+This model transfers heat in the amount of
+
+ Q = Qmax ε
+where
+Qmax is the maximum heat that can be transferred,
+ε is the heat transfer effectiveness,
+NTU is the Number of Transfer Units,
+Z is the ratio of minimum to maximum capacity flow rate and
+flowRegime is the heat exchanger flow regime.
+such as
+parallel flow, cross flow or counter flow.
+
+The flow regimes depend on the heat exchanger configuration. All configurations
+defined in
+
+AixLib.Fluid.Types.HeatExchangerConfiguration
+are supported.
+
+Models that extend from this partial model need to provide an assignment
+for
+This function computes the heat exchanger effectiveness,
+the Number of Transfer Units, and the capacity flow ratio
+for given capacity flow rates.
+
+The implementation allows for zero flow rate.
+As
+The different options for the flow regime are declared in
+
+AixLib.Fluid.Types.HeatExchangerFlowRegime.
+
+Model of a coil without humidity condensation.
+This model transfers heat in the amount of
+
+ Q̇ = Q̇max ε
+where
+Q̇max is the maximum heat that can be transferred,
+ε is the heat transfer effectiveness,
+NTU is the Number of Transfer Units,
+Z is the ratio of minimum to maximum capacity flow rate and
+flowRegime is the heat exchanger flow regime.
+such as
+parallel flow, cross flow or counter flow.
+
+The flow regimes depend on the heat exchanger configuration. All configurations
+defined in
+
+AixLib.Fluid.Types.HeatExchangerConfiguration
+are supported.
+
+The convective heat transfer coefficients scale proportional to
+(ṁ/ṁ0)n, where
+ṁ is the mass flow rate,
+ṁ0 is the nominal mass flow rate, and
+n=0.8 on the air-side and n=0.85 on the water side.
+
+For a heat and moisture exchanger, use
+
+AixLib.Fluid.MassExchangers.ConstantEffectiveness.
+ This is a simple dynamic heat exchanger with a heat capacity and convection. The heat exchanger is discretized in n elements and the volume elements are replaceable. The heat transfer and pressure losses are calculated by nominal values. Nevertheless, the heat transfer coefficient Gc can be overwritten. Model for an evaporator or condenser with the use of a capacity to simulate heat losses. Used in AixLib.Fluid.HeatPumps.HeatPump, the heat flow to or from the volume is calculated in a black box. Thus the heat is directly added to the medium. In order to model transient states and inertias of a real heat pump, a capacity is added to the base model TwoPortHeatMassExchanger. The heat exchange between capacity and medium (GIns) is based on a series of heat resistances caused by forced convection and conduction through the capacity of the heat exchanger. Losses or gains in result of heat exchange with the ambient are modeled through the heat exchange coefficient GOut is represented by a series of conductive resistances and the convection to the ambient. Both parameters GIns and GOut are variable so that the calculation can follow a temperature or flow-rate based approach.
+This model tests
+
+AixLib.Fluid.HeatExchangers.DryCoilEffectivenessNTU
+for different mass flow rates.
+
+This model demonstrates the use of
+
+AixLib.Fluid.HeatExchangers.DryCoilEffectivenessNTU.
+The valve on the water-side is regulated to track a setpoint temperature
+for the air outlet.
+
+This model tests
+
+AixLib.Fluid.HeatExchangers.DynamicHX
+for different inlet conditions.
+
+This model tests
+
+AixLib.Fluid.HeatExchangers.DryCoilEffectivenessNTU
+for different inlet conditions.
+ Carnot CoP and constant electric power, no dependency on speed or mass flow rates! Carnot CoP multiplied with constant quality grade and constant electric power, no dependency on speed or mass flow rates! Base funtion used in HeatPump model. It defines the inputs speed N (1/min), condenser outlet temperature T_co (K) and evaporator inlet temperature T_ev (K). The output is the vector Char: first value is compressor power, second value is the condenser heat flow rate. No correction factor for icing/defrosting: f_cop_icing=1. Base funtion used in HeatPump model. Input is the evaporator inlet temperature, output is a CoP-correction factor f_cop_icing. Correction of CoP (Icing, Defrost) according to Wetter,Afjei 1996.
+ This black box model represents the refrigerant cycle of a heat pump.
+ Used in AixLib.Fluid.HeatPumps.HeatPump, this model serves the
+ simulation of a reversible heat pump. Thus, data both of chillers and
+ heat pumps can be used to calculate the three relevant values
+ P_el, QCon and QEva. The mode of the heat pump is used to
+ switch between the performance data of the chiller and the heat pump.
+
+ The user can choose between different types of performance data or
+ implement a new black-box model by extending from the
+ partial model.
+
Model for a reciprocating processor, as detailed in Jin (2002). The rate of heat transferred to the evaporator is given by:
@@ -113,6 +113,10 @@ PhD Thesis. Oklahoma State University. Stillwater, Oklahoma, USA. 2012.
", revisions="
Simple test set-up for the HeatPumpDetailed model. The heat pump is turned on and off while the source temperature increases linearly. Outputs are the electric power consumption of the heat pump and the supply temperature. Besides using the default simple table data, the user should also test tabulated data from AixLib.DataBase.HeatPump or polynomial functions.
+ Simple test set-up for the HeatPumpDetailed model. The heat pump is
+ turned on and off while the source temperature increases linearly.
+ Outputs are the electric power consumption of the heat pump and the
+ supply temperature.
+
+ Besides using the default simple table data, the user should also
+ test tabulated data from AixLib.DataBase.HeatPump or
+ polynomial functions.
+
Example that simulates one room equipped with a radiator. Hot water is produced
@@ -306,6 +303,11 @@ off when the room temperature rises above 21°C.
", revisions="
+ This generic grey-box heat pump model uses empirical data to model
+ the refrigerant cycle. The modelling of system inertias and heat
+ losses allow the simulation of transient states.
+
+ Resulting in the choosen model structure, several configurations are
+ possible:
+
+ Using a signal bus as a connector, this heat pump model can be easily
+ combined with the new HeatPumpSystem
+ or several control or security blocks from AixLib.Controls.HeatPump.
+ The relevant data is aggregated. In order to control both chillers
+ and heat pumps, both flow and return temperature are aggregated. The
+ mode signal chooses the type of the heat pump operation. As a result,
+ this model can also be used as a chiller:
+
+ To model both on/off and inverter controlled heat pumps, the
+ compressor speed is normalizd to a relative value between 0 and 1.
+
+ Possible icing of the evaporator is modelled with an input value
+ between 0 and 1.
+
+ The model structure is as follows. To understand each submodel,
+ please have a look at the corresponding model information:
+
+ To simplify the parametrization of the evaporator and condenser
+ volumes and nominal mass flows there exists an option of automatic
+ estimation based on the nominal usable heating power of the HeatPump.
+ This function uses a linear correlation of these parameters, which
+ was established from the linear regression of more than 20 data sets
+ of water-to-water heat pumps from different manufacturers (e.g.
+ Carrier, Trane, Lennox) ranging from about 25kW to 1MW nominal power.
+ The linear regressions with coefficients of determination above 91%
+ give a good approximation of these parameters. Nevertheless,
+ estimates for machines outside the given range should be checked for
+ plausibility during simulation.
+
+ Several assumptions where made in order to model the heat pump. For a
+ detailed description see the corresponding model.
+ Model that demonstrates the use of the GenericHumidifier. The first humidifier adds steam with a temperature of 100°C to the air volume flow. The second calculates the vaporization temperature depending on the pressure. Due to the fact that the pressure is slightly higher than standard pressure in the sink, the results are slightly different. The third humidifier adds liquid water that evaporates. Thus, the temperature decreases in this case.
+Model for an air humidifier.
+
+This model adds moisture to the air stream. The moisture can be either liquid (adiabatic) or steam. If steam is chosen, the vaporization temperature can be fixed or calculated from the pressure.
+
+The amount of added moisture is equal to
+
+ṁwat = u ṁwat,nom,
+
+where u is the control input signal and
+ṁwat,nom is equal to the parameter Twater_in is used to calculate the thermal power for the vaporization (sensible and latent heat) of the steam humidifier and to calculate the enthalpy for the liquid in the adiabatic case.
+
+Changed the default properties based on Table 4 in the
+
+McQuay geothermal heat pump design manual.
+See #1062.
+
Revised implementation, added defaultComponentPrefixes and
diff --git a/AixLib/Fluid/Geothermal/Borefields/Data/Soil/package.mo b/AixLib/Fluid/Geothermal/Borefields/Data/Soil/package.mo
index c6021945ad..93a6be37e9 100644
--- a/AixLib/Fluid/Geothermal/Borefields/Data/Soil/package.mo
+++ b/AixLib/Fluid/Geothermal/Borefields/Data/Soil/package.mo
@@ -5,8 +5,8 @@ package Soil "Collection of records of soil data"
annotation (Documentation(info="
+
+"));
+end ConstantHeatInjection_100Boreholes_Borefield;
diff --git a/AixLib/Fluid/Geothermal/Borefields/Validation/BaseClasses/ConstantHeatInjection_100Boreholes_Configuration.mo b/AixLib/Fluid/Geothermal/Borefields/Validation/BaseClasses/ConstantHeatInjection_100Boreholes_Configuration.mo
new file mode 100644
index 0000000000..4343d3151e
--- /dev/null
+++ b/AixLib/Fluid/Geothermal/Borefields/Validation/BaseClasses/ConstantHeatInjection_100Boreholes_Configuration.mo
@@ -0,0 +1,33 @@
+within AixLib.Fluid.Geothermal.Borefields.Validation.BaseClasses;
+record ConstantHeatInjection_100Boreholes_Configuration
+ "Configuration data record for 100 boreholes validation case"
+ extends AixLib.Fluid.Geothermal.Borefields.Data.Configuration.Template(
+ borCon = Types.BoreholeConfiguration.SingleUTube,
+ cooBor={{7.5*mod(i-1,10), 7.5*floor((i-1)/10)} for i in 1:100},
+ mBor_flow_nominal=0.3,
+ dp_nominal=5e4,
+ hBor=150.0,
+ rBor=0.075,
+ dBor=4.0,
+ rTub=0.02,
+ kTub=0.5,
+ eTub=0.002,
+ xC=0.05);
+ annotation (
+ defaultComponentPrefixes="parameter",
+ defaultComponentName="conDat",
+ Documentation(
+info="
+
+First implementation.
+
+
+"));
+end ConstantHeatInjection_100Boreholes_Configuration;
diff --git a/AixLib/Fluid/Geothermal/Borefields/Validation/BaseClasses/ConstantHeatInjection_100Boreholes_Filling.mo b/AixLib/Fluid/Geothermal/Borefields/Validation/BaseClasses/ConstantHeatInjection_100Boreholes_Filling.mo
new file mode 100644
index 0000000000..973fbb31e0
--- /dev/null
+++ b/AixLib/Fluid/Geothermal/Borefields/Validation/BaseClasses/ConstantHeatInjection_100Boreholes_Filling.mo
@@ -0,0 +1,25 @@
+within AixLib.Fluid.Geothermal.Borefields.Validation.BaseClasses;
+record ConstantHeatInjection_100Boreholes_Filling
+ "Filling data record for 100 boreholes validation case"
+ extends AixLib.Fluid.Geothermal.Borefields.Data.Filling.Template(
+ kFil=1.15,
+ dFil=1600,
+ cFil=800);
+ annotation (
+ defaultComponentPrefixes="parameter",
+ defaultComponentName="filDat",
+Documentation(
+info="
+
+First implementation.
+
+
+"));
+end ConstantHeatInjection_100Boreholes_Filling;
diff --git a/AixLib/Fluid/Geothermal/Borefields/Validation/BaseClasses/ConstantHeatInjection_100Boreholes_Soil.mo b/AixLib/Fluid/Geothermal/Borefields/Validation/BaseClasses/ConstantHeatInjection_100Boreholes_Soil.mo
new file mode 100644
index 0000000000..a8e1f2a833
--- /dev/null
+++ b/AixLib/Fluid/Geothermal/Borefields/Validation/BaseClasses/ConstantHeatInjection_100Boreholes_Soil.mo
@@ -0,0 +1,25 @@
+within AixLib.Fluid.Geothermal.Borefields.Validation.BaseClasses;
+record ConstantHeatInjection_100Boreholes_Soil
+ "Soil data record for 100 boreholes validation case"
+ extends AixLib.Fluid.Geothermal.Borefields.Data.Soil.Template(
+ kSoi=2.5,
+ dSoi=1800,
+ cSoi=1200);
+ annotation (
+ defaultComponentPrefixes="parameter",
+ defaultComponentName="soiDat",
+Documentation(
+info="
+
+First implementation.
+
+
+"));
+end ConstantHeatInjection_100Boreholes_Soil;
diff --git a/AixLib/Fluid/Geothermal/Borefields/Validation/BaseClasses/package.order b/AixLib/Fluid/Geothermal/Borefields/Validation/BaseClasses/package.order
index 752da3aa25..dc502e24a3 100644
--- a/AixLib/Fluid/Geothermal/Borefields/Validation/BaseClasses/package.order
+++ b/AixLib/Fluid/Geothermal/Borefields/Validation/BaseClasses/package.order
@@ -1,3 +1,7 @@
+ConstantHeatInjection_100Boreholes_Borefield
+ConstantHeatInjection_100Boreholes_Configuration
+ConstantHeatInjection_100Boreholes_Filling
+ConstantHeatInjection_100Boreholes_Soil
SandBox_Borefield
SandBox_Configuration
SandBox_Filling
diff --git a/AixLib/Fluid/Geothermal/Borefields/Validation/ConstantHeatInjection_100Boreholes.mo b/AixLib/Fluid/Geothermal/Borefields/Validation/ConstantHeatInjection_100Boreholes.mo
new file mode 100644
index 0000000000..d7ed57aeab
--- /dev/null
+++ b/AixLib/Fluid/Geothermal/Borefields/Validation/ConstantHeatInjection_100Boreholes.mo
@@ -0,0 +1,114 @@
+within AixLib.Fluid.Geothermal.Borefields.Validation;
+model ConstantHeatInjection_100Boreholes
+ "Long-term temperature response of a borefield of 100 boreholes"
+ extends Modelica.Icons.Example;
+ package Medium = AixLib.Media.Water;
+
+ parameter Modelica.SIunits.Temperature T_start = 273.15
+ "Initial temperature of the soil";
+
+ AixLib.Fluid.Geothermal.Borefields.OneUTube borHol(
+ redeclare package Medium = Medium, borFieDat=
+ borFieDat,
+ energyDynamics=Modelica.Fluid.Types.Dynamics.FixedInitial,
+ TExt0_start=T_start,
+ dT_dz=0,
+ tLoaAgg=3600000)
+ "Borehole"
+ annotation (Placement(transformation(extent={{40,-30},{60,-10}})));
+ AixLib.Fluid.Movers.FlowControlled_m_flow pum(
+ redeclare package Medium = Medium,
+ T_start=T_start,
+ addPowerToMedium=false,
+ use_inputFilter=false,
+ energyDynamics=Modelica.Fluid.Types.Dynamics.SteadyState,
+ massDynamics=Modelica.Fluid.Types.Dynamics.SteadyState,
+ m_flow_nominal=borFieDat.conDat.mBorFie_flow_nominal,
+ nominalValuesDefineDefaultPressureCurve=true,
+ inputType=AixLib.Fluid.Types.InputType.Constant)
+ annotation (Placement(transformation(extent={{-20,-10},{0,-30}})));
+ AixLib.Fluid.Sensors.TemperatureTwoPort TBorFieIn(
+ redeclare package Medium = Medium,
+ T_start=T_start,
+ m_flow_nominal=borFieDat.conDat.mBorFie_flow_nominal,
+ tau=0)
+ "Inlet temperature of the borefield"
+ annotation (Placement(transformation(extent={{10,-30},{30,-10}})));
+ AixLib.Fluid.Sensors.TemperatureTwoPort TBorFieOut(
+ redeclare package Medium = Medium,
+ T_start=T_start,
+ m_flow_nominal=borFieDat.conDat.mBorFie_flow_nominal,
+ tau=0)
+ "Outlet temperature of the borefield"
+ annotation (Placement(transformation(extent={{70,-30},{90,-10}})));
+ AixLib.Fluid.Geothermal.Borefields.Validation.BaseClasses.ConstantHeatInjection_100Boreholes_Borefield borFieDat
+ "Borefield data"
+ annotation (Placement(transformation(extent={{-100,-100},{-80,-80}})));
+ AixLib.Fluid.Sources.Boundary_ph sin(
+ redeclare package Medium = Medium,
+ nPorts=1) "Sink"
+ annotation (Placement(transformation(extent={{60,0},{80,20}})));
+ AixLib.Fluid.HeatExchangers.HeaterCooler_u hea(
+ redeclare package Medium = Medium,
+ dp_nominal=10000,
+ show_T=true,
+ energyDynamics=Modelica.Fluid.Types.Dynamics.SteadyState,
+ T_start=T_start,
+ m_flow_nominal=borFieDat.conDat.mBorFie_flow_nominal,
+ m_flow(start=borFieDat.conDat.mBorFie_flow_nominal),
+ p_start=100000,
+ Q_flow_nominal=2*Modelica.Constants.pi*borFieDat.soiDat.kSoi*borFieDat.conDat.hBor
+ *borFieDat.conDat.nBor)
+ "Heater"
+ annotation (Placement(transformation(extent={{-50,-30},{-30,-10}})));
+ Modelica.Blocks.Sources.Constant heaRat(k=1)
+ "Constant heat injection rate into the borefield"
+ annotation (Placement(transformation(extent={{-88,10},{-68,30}})));
+equation
+ connect(TBorFieIn.port_b, borHol.port_a)
+ annotation (Line(points={{30,-20},{40,-20}}, color={0,127,255}));
+ connect(borHol.port_b, TBorFieOut.port_a)
+ annotation (Line(points={{60,-20},{70,-20}}, color={0,127,255}));
+ connect(pum.port_b, TBorFieIn.port_a) annotation (Line(points={{0,-20},{10,-20}},
+ color={0,127,255}));
+ connect(sin.ports[1], TBorFieOut.port_b) annotation (Line(points={{80,10},{100,
+ 10},{100,-20},{90,-20}},color={0,127,255}));
+ connect(hea.port_b, pum.port_a)
+ annotation (Line(points={{-30,-20},{-20,-20}}, color={0,127,255}));
+ connect(hea.port_a, TBorFieOut.port_b) annotation (Line(points={{-50,-20},{-100,
+ -20},{-100,40},{100,40},{100,-20},{90,-20}},
+ color={0,127,255}));
+ connect(hea.u, heaRat.y) annotation (Line(points={{-52,-14},{-60,-14},{-60,20},
+ {-67,20}}, color={0,0,127}));
+ annotation (experiment(Tolerance=1e-6, StopTime=31536.0E+06),
+ __Dymola_Commands(file=
+ "Resources/Scripts/Dymola/Fluid/Geothermal/Borefields/Validation/ConstantHeatInjection_100Boreholes.mos"
+ "Simulate and Plot"),
+Documentation(info="
+
+First implementation.
+2*pi*kSoi*hBor*nBor. In this case, the borehole wall temperature
+variation corresponds to the g-function of the borefield, as evaluated in
+
+AixLib.Fluid.Geothermal.Borefields.BaseClasses.HeatTransfer.ThermalResponseFactors.Validation.GFunction_100boreholes.
+
+
+"),
+ Diagram(coordinateSystem(extent={{-120,-120},{120,120}})));
+end ConstantHeatInjection_100Boreholes;
diff --git a/AixLib/Fluid/Geothermal/Borefields/Validation/package.mo b/AixLib/Fluid/Geothermal/Borefields/Validation/package.mo
index 0b5ea92e09..7886e2df29 100644
--- a/AixLib/Fluid/Geothermal/Borefields/Validation/package.mo
+++ b/AixLib/Fluid/Geothermal/Borefields/Validation/package.mo
@@ -1,12 +1,12 @@
within AixLib.Fluid.Geothermal.Borefields;
-package Validation "Validation models for AixLib.Fluid.HeatExchangers.Ground"
+package Validation "Validation models for AixLib.Fluid.Geothermal.Borefields"
extends Modelica.Icons.ExamplesPackage;
annotation (preferredView="info", Documentation(info="
+Changed StopTime from integer to floating point.
+This is for
+issue 1163.
+
+First implementation.
+
.
", revisions="
+Replaced fluid source. This is for
+ #1072.
+
Revised implementation.
+Limited the media choice.
+See #1050.
+
Set final alpha=0 for prescribed heat flow rate.
+Replaced fluid source. This is for
+ #1072.
+
Changed medium start temperature to avoid conflicting
start values of the same precedence in Dymola 2016.
diff --git a/AixLib/Fluid/HeatExchangers/ActiveBeams/Examples/CoolingOnly.mo b/AixLib/Fluid/HeatExchangers/ActiveBeams/Examples/CoolingOnly.mo
index 87b6d8f56e..d101d6c667 100644
--- a/AixLib/Fluid/HeatExchangers/ActiveBeams/Examples/CoolingOnly.mo
+++ b/AixLib/Fluid/HeatExchangers/ActiveBeams/Examples/CoolingOnly.mo
@@ -6,7 +6,7 @@ model CoolingOnly
package MediumW = AixLib.Media.Water "Medium model for water";
- AixLib.Fluid.Sources.FixedBoundary sin_1(
+ AixLib.Fluid.Sources.Boundary_pT sin_1(
redeclare package Medium = MediumW,
nPorts=1) "Sink for water"
annotation (Placement(transformation(extent={{100,56},{80,76}})));
@@ -17,7 +17,7 @@ model CoolingOnly
nPorts=1,
T=285.85) "Source for air"
annotation (Placement(transformation(extent={{100,10},{80,30}})));
- AixLib.Fluid.Sources.FixedBoundary bou(
+ AixLib.Fluid.Sources.Boundary_pT bou(
redeclare package Medium = MediumA,
nPorts=1) "Sink for air"
annotation (Placement(transformation(extent={{100,-110},{80,-90}})));
@@ -118,6 +118,11 @@ that regulates the water flow rate in the active beam.
", revisions="
+Replaced fluid source. This is for
+ #1072.
+
Revised implementation.
+Replaced fluid source. This is for
+ #1072.
+
Revised implementation.
+Replaced fluid source. This is for
+ #1072.
+
Revised implementation.
-
-",
- info="
-
-Naming according to AixLib standards.
-Moved into AixLib
Uses components from MSL
Added documentation.Overview
-
+
+",
+ info="
+
+Naming according to AixLib standards.
+Moved into AixLib
Uses components from MSL
Added documentation.Overview
+
+
-",
- info="
-
+Make model more dynamic (See #673)
Moved into AixLib
Added documentation.Overview
+", info="
+Overview
Concept
-Example Results
+Concept
+Example Results
+
+"));
+end HADryCoil;
diff --git a/AixLib/Fluid/HeatExchangers/BaseClasses/Examples/package.order b/AixLib/Fluid/HeatExchangers/BaseClasses/Examples/package.order
index 2de1040537..b99ef6650c 100644
--- a/AixLib/Fluid/HeatExchangers/BaseClasses/Examples/package.order
+++ b/AixLib/Fluid/HeatExchangers/BaseClasses/Examples/package.order
@@ -1,2 +1,3 @@
HACoilInside
+HADryCoil
HANaturalCylinder
diff --git a/AixLib/Fluid/HeatExchangers/BaseClasses/HACoilInside.mo b/AixLib/Fluid/HeatExchangers/BaseClasses/HACoilInside.mo
index 7ea9742538..3ca86a5cca 100644
--- a/AixLib/Fluid/HeatExchangers/BaseClasses/HACoilInside.mo
+++ b/AixLib/Fluid/HeatExchangers/BaseClasses/HACoilInside.mo
@@ -94,7 +94,7 @@ First implementation.
Line(points={{-52,-40},{56,-40},{44,-32}}, color={175,175,175}),
Line(points={{56,-40},{44,-48}}, color={175,175,175})}),
Icon(
- Rectangle(extent=[-36,-36; -24,-72], style(
+ Rectangle(extent={{-36,-36},{-24,-72}}, style(
color=0,
fillColor=8,
fillPattern=8)),
@@ -107,7 +107,7 @@ First implementation.
Line(points=[16,-40; 16,-68], style(color=69, fillColor=47)),
Line(points=[16,-68; 10,-58], style(color=69, fillColor=47)),
Line(points=[16,-68; 22,-58], style(color=69, fillColor=47)),
- Rectangle(extent=[-36,66; -24,30], style(
+ Rectangle(extent={{-36,66},{-24,30}}, style(
color=0,
fillColor=8,
fillPattern=8)),
diff --git a/AixLib/Fluid/HeatExchangers/BaseClasses/HADryCoil.mo b/AixLib/Fluid/HeatExchangers/BaseClasses/HADryCoil.mo
new file mode 100644
index 0000000000..9abefe7c5e
--- /dev/null
+++ b/AixLib/Fluid/HeatExchangers/BaseClasses/HADryCoil.mo
@@ -0,0 +1,247 @@
+within AixLib.Fluid.HeatExchangers.BaseClasses;
+model HADryCoil
+ "Sensible convective heat transfer model for air to water coil"
+ extends Modelica.Blocks.Icons.Block;
+
+ parameter Modelica.SIunits.ThermalConductance UA_nominal(min=0)
+ "Thermal conductance at nominal flow"
+ annotation(Dialog(tab="General", group="Nominal condition"));
+
+ parameter Modelica.SIunits.MassFlowRate m_flow_nominal_w
+ "Water mass flow rate"
+ annotation(Dialog(tab="General", group="Nominal condition"));
+ parameter Modelica.SIunits.MassFlowRate m_flow_nominal_a "Air mass flow rate"
+ annotation(Dialog(tab="General", group="Nominal condition"));
+
+ Modelica.Blocks.Interfaces.RealInput m1_flow(final unit="kg/s") "Mass flow rate medium 1"
+ annotation (Placement(transformation(extent={{-120,60},{-100,80}})));
+ Modelica.Blocks.Interfaces.RealInput m2_flow(final unit="kg/s") "Mass flow rate medium 2"
+ annotation (Placement(transformation(extent={{-120,-80},{-100,-60}})));
+ Modelica.Blocks.Interfaces.RealInput T_1(final unit="K") "Temperature medium 1"
+ annotation (Placement(transformation(extent={{-120,20},{-100,40}})));
+ Modelica.Blocks.Interfaces.RealInput T_2(final unit="K") "Temperature medium 2"
+ annotation (Placement(transformation(extent={{-120,-40},{-100,-20}})));
+
+ Modelica.Blocks.Interfaces.RealOutput hA_1(final unit="W/K")
+ "Convective heat transfer medium 1" annotation (Placement(transformation(
+ extent={{100,60},{120,80}})));
+ Modelica.Blocks.Interfaces.RealOutput hA_2(final unit="W/K")
+ "Convective heat transfer medium 2" annotation (Placement(transformation(
+ extent={{100,-80},{120,-60}})));
+
+ parameter Real r_nominal(min=0)=0.5
+ "Ratio between air-side and water-side convective heat transfer coefficient"
+ annotation(Dialog(tab="General", group="Nominal condition"));
+ parameter Modelica.SIunits.ThermalConductance hA_nominal_w(min=0)=UA_nominal * (r_nominal+1)/r_nominal
+ "Water side convective heat transfer coefficient"
+ annotation(Dialog(tab="General", group="Nominal condition"));
+ parameter Modelica.SIunits.ThermalConductance hA_nominal_a(min=0)=r_nominal * hA_nominal_w
+ "Air side convective heat transfer coefficient, including fin resistance"
+ annotation(Dialog(tab="General", group="Nominal condition"));
+ parameter Real n_w(min=0, max=1)=0.85
+ "Water-side exponent for convective heat transfer coefficient, h~m_flow^n";
+ parameter Real n_a(min=0, max=1)=0.8
+ "Air-side exponent for convective heat transfer coefficient, h~m_flow^n";
+ parameter Modelica.SIunits.Temperature T0_w=
+ Modelica.SIunits.Conversions.from_degC(20) "Water temperature"
+ annotation(Dialog(tab="General", group="Nominal condition"));
+ parameter Modelica.SIunits.Temperature T0_a=
+ Modelica.SIunits.Conversions.from_degC(20) "Air temperature"
+ annotation(Dialog(tab="General", group="Nominal condition"));
+ parameter Boolean waterSideFlowDependent=true
+ "Set to false to make water-side hA independent of mass flow rate"
+ annotation(Dialog(tab="Advanced", group="Modeling detail"), Evaluate=true);
+ parameter Boolean airSideFlowDependent = true
+ "Set to false to make air-side hA independent of mass flow rate"
+ annotation(Dialog(tab="Advanced", group="Modeling detail"), Evaluate=true);
+ parameter Boolean waterSideTemperatureDependent = true
+ "Set to false to make water-side hA independent of temperature"
+ annotation(Dialog(tab="Advanced", group="Modeling detail"), Evaluate=true);
+ parameter Boolean airSideTemperatureDependent = true
+ "Set to false to make air-side hA independent of temperature"
+ annotation(Dialog(tab="Advanced", group="Modeling detail"), Evaluate=true);
+protected
+ Real x_a(min=0)
+ "Factor for air side temperature dependent variation of heat transfer coefficient";
+ Real x_w(min=0)
+ "Factor for water side temperature dependent variation of heat transfer coefficient";
+ parameter Real s_w(min=0, fixed=false)
+ "Coefficient for temperature dependence of water side heat transfer coefficient";
+ Real fm_w "Fraction of actual to nominal mass flow rate";
+ Real fm_a "Fraction of actual to nominal mass flow rate";
+initial equation
+ s_w = if waterSideTemperatureDependent then
+ 0.014/(1+0.014*Modelica.SIunits.Conversions.to_degC(T0_w)) else
+ 1;
+equation
+ fm_w = if waterSideFlowDependent then
+ m1_flow / m_flow_nominal_w else 1;
+ fm_a = if airSideFlowDependent then
+ m2_flow / m_flow_nominal_a else 1;
+ x_w = if waterSideTemperatureDependent then
+ 1 + s_w * (T_1-T0_w) else
+ 1;
+ x_a = if airSideTemperatureDependent then
+ 1 + 7.8532E-4 * (T_2-T0_a) else
+ 1;
+ if waterSideFlowDependent then
+ hA_1 = x_w * hA_nominal_w
+ * AixLib.Utilities.Math.Functions.regNonZeroPower(fm_w, n_w, 0.1);
+ else
+ hA_1 = x_w * hA_nominal_w;
+ end if;
+
+ if airSideFlowDependent then
+ hA_2 = x_a * hA_nominal_a
+ * AixLib.Utilities.Math.Functions.regNonZeroPower(fm_a, n_a, 0.1);
+ else
+ hA_2 = x_a * hA_nominal_a;
+ end if;
+annotation (Documentation(info="
+
+First version.
+References
+
+
+",
+revisions="
+
+
+"),
+ Icon(coordinateSystem(preserveAspectRatio=false, extent={{-100,-100},{100,
+ 100}}), graphics={ Text(
+ extent={{-60,90},{66,0}},
+ lineColor={0,0,0},
+ fillColor={255,255,255},
+ fillPattern=FillPattern.Solid,
+ textString="hA"),
+ Ellipse(
+ extent={{-32,-10},{-12,-32}},
+ lineColor={0,0,0},
+ fillColor={0,0,0},
+ fillPattern=FillPattern.Solid),
+ Ellipse(
+ extent={{34,-10},{54,-32}},
+ lineColor={0,0,0},
+ fillColor={0,0,0},
+ fillPattern=FillPattern.Solid),
+ Ellipse(
+ extent={{0,-10},{20,-32}},
+ lineColor={0,0,0},
+ fillColor={0,0,0},
+ fillPattern=FillPattern.Solid),
+ Ellipse(
+ extent={{-64,-10},{-44,-32}},
+ lineColor={0,0,0},
+ fillColor={0,0,0},
+ fillPattern=FillPattern.Solid),
+ Ellipse(
+ extent={{-48,-40},{-28,-62}},
+ lineColor={0,0,0},
+ fillColor={0,0,0},
+ fillPattern=FillPattern.Solid),
+ Ellipse(
+ extent={{-16,-40},{4,-62}},
+ lineColor={0,0,0},
+ fillColor={0,0,0},
+ fillPattern=FillPattern.Solid),
+ Ellipse(
+ extent={{16,-40},{36,-62}},
+ lineColor={0,0,0},
+ fillColor={0,0,0},
+ fillPattern=FillPattern.Solid),
+ Ellipse(
+ extent={{50,-40},{70,-62}},
+ lineColor={0,0,0},
+ fillColor={0,0,0},
+ fillPattern=FillPattern.Solid),
+ Ellipse(
+ extent={{-68,-66},{-48,-88}},
+ lineColor={0,0,0},
+ fillColor={0,0,0},
+ fillPattern=FillPattern.Solid),
+ Ellipse(
+ extent={{-36,-66},{-16,-88}},
+ lineColor={0,0,0},
+ fillColor={0,0,0},
+ fillPattern=FillPattern.Solid),
+ Ellipse(
+ extent={{-4,-66},{16,-88}},
+ lineColor={0,0,0},
+ fillColor={0,0,0},
+ fillPattern=FillPattern.Solid),
+ Ellipse(
+ extent={{30,-66},{50,-88}},
+ lineColor={0,0,0},
+ fillColor={0,0,0},
+ fillPattern=FillPattern.Solid)}),
+ Icon(
+ Rectangle(extent={{-36,-36},{-24,-72}}, style(
+ color=0,
+ fillColor=8,
+ fillPattern=8)),
+ Line(points=[-12,-52; 26,-52], style(color=42, fillColor=45)),
+ Line(points=[-4,-40; -4,-68], style(color=69, fillColor=47)),
+ Line(points=[-4,-68; -10,-58], style(color=69, fillColor=47)),
+ Line(points=[-4,-68; 2,-58], style(color=69, fillColor=47)),
+ Line(points=[14,-58; 26,-52], style(color=42, fillColor=45)),
+ Line(points=[14,-46; 26,-52], style(color=42, fillColor=45)),
+ Line(points=[16,-40; 16,-68], style(color=69, fillColor=47)),
+ Line(points=[16,-68; 10,-58], style(color=69, fillColor=47)),
+ Line(points=[16,-68; 22,-58], style(color=69, fillColor=47)),
+ Rectangle(extent={{-36,66},{-24,30}}, style(
+ color=0,
+ fillColor=8,
+ fillPattern=8)),
+ Line(points=[-12,50; 26,50], style(color=42, fillColor=45)),
+ Line(points=[-4,62; -4,34], style(color=69, fillColor=47)),
+ Line(points=[-4,34; -10,44], style(color=69, fillColor=47)),
+ Line(points=[-4,34; 2,44], style(color=69, fillColor=47)),
+ Line(points=[14,44; 26,50], style(color=42, fillColor=45)),
+ Line(points=[14,56; 26,50], style(color=42, fillColor=45)),
+ Line(points=[16,62; 16,34], style(color=69, fillColor=47)),
+ Line(points=[16,34; 10,44], style(color=69, fillColor=47)),
+ Line(points=[16,34; 22,44], style(color=69, fillColor=47))));
+end HADryCoil;
diff --git a/AixLib/Fluid/HeatExchangers/BaseClasses/PartialEffectiveness.mo b/AixLib/Fluid/HeatExchangers/BaseClasses/PartialEffectiveness.mo
index 786e901cfd..c6b8fe4151 100644
--- a/AixLib/Fluid/HeatExchangers/BaseClasses/PartialEffectiveness.mo
+++ b/AixLib/Fluid/HeatExchangers/BaseClasses/PartialEffectiveness.mo
@@ -6,15 +6,29 @@ partial model PartialEffectiveness
prescribedHeatFlowRate2=true,
show_T=false);
- Medium1.Temperature T_in1 "Inlet temperature medium 1";
- Medium2.Temperature T_in2 "Inlet temperature medium 2";
- Modelica.SIunits.ThermalConductance C1_flow
+ Medium1.Temperature T_in1 = if allowFlowReversal1 then
+ fra_a1 * Medium1.temperature(state_a1_inflow) + fra_b1 * Medium1.temperature(state_b1_inflow) else
+ Medium1.temperature(state_a1_inflow)
+ "Inlet temperature medium 1";
+ Medium2.Temperature T_in2 = if allowFlowReversal2 then
+ fra_a2 * Medium2.temperature(state_a2_inflow) + fra_b2 * Medium2.temperature(state_b2_inflow) else
+ Medium2.temperature(state_a2_inflow)
+ "Inlet temperature medium 2";
+ Modelica.SIunits.ThermalConductance C1_flow = abs(m1_flow)*
+ ( if allowFlowReversal1 then
+ fra_a1 * Medium1.specificHeatCapacityCp(state_a1_inflow) +
+ fra_b1 * Medium1.specificHeatCapacityCp(state_b1_inflow) else
+ Medium1.specificHeatCapacityCp(state_a1_inflow))
"Heat capacity flow rate medium 1";
- Modelica.SIunits.ThermalConductance C2_flow
+ Modelica.SIunits.ThermalConductance C2_flow = abs(m2_flow)*
+ ( if allowFlowReversal2 then
+ fra_a2 * Medium2.specificHeatCapacityCp(state_a2_inflow) +
+ fra_b2 * Medium2.specificHeatCapacityCp(state_b2_inflow) else
+ Medium2.specificHeatCapacityCp(state_a2_inflow))
"Heat capacity flow rate medium 2";
- Modelica.SIunits.ThermalConductance CMin_flow(min=0)
+ Modelica.SIunits.ThermalConductance CMin_flow(min=0) = min(C1_flow, C2_flow)
"Minimum heat capacity flow rate";
- Modelica.SIunits.HeatFlowRate QMax_flow
+ Modelica.SIunits.HeatFlowRate QMax_flow = CMin_flow*(T_in2 - T_in1)
"Maximum heat flow rate into medium 1";
protected
parameter Real delta=1E-3 "Parameter used for smoothing";
@@ -25,13 +39,29 @@ protected
"Specific heat capacity of medium 2 at default medium state";
parameter Modelica.SIunits.ThermalConductance CMin_flow_small(fixed=false)
"Small value for smoothing of minimum heat capacity flow rate";
- Real fra_a1(min=0, max=1)
+ Real fra_a1(min=0, max=1) = if allowFlowReversal1
+ then Modelica.Fluid.Utilities.regStep(
+ m1_flow,
+ 1,
+ 0,
+ m1_flow_small)
+ else 1
"Fraction of incoming state taken from port a2 (used to avoid excessive calls to regStep)";
- Real fra_b1(min=0, max=1)
+ Real fra_b1(min=0, max=1) = if allowFlowReversal1
+ then 1-fra_a1
+ else 0
"Fraction of incoming state taken from port b2 (used to avoid excessive calls to regStep)";
- Real fra_a2(min=0, max=1)
+ Real fra_a2(min=0, max=1) = if allowFlowReversal2
+ then Modelica.Fluid.Utilities.regStep(
+ m2_flow,
+ 1,
+ 0,
+ m2_flow_small)
+ else 1
"Fraction of incoming state taken from port a2 (used to avoid excessive calls to regStep)";
- Real fra_b2(min=0, max=1)
+ Real fra_b2(min=0, max=1) = if allowFlowReversal2
+ then 1-fra_a2
+ else 0
"Fraction of incoming state taken from port b2 (used to avoid excessive calls to regStep)";
initial equation
cp1_default = Medium1.specificHeatCapacityCp(Medium1.setState_pTX(
@@ -43,53 +73,6 @@ initial equation
Medium2.T_default,
Medium2.X_default));
CMin_flow_small = min(m1_flow_small*cp1_default, m2_flow_small*cp2_default);
-equation
- if allowFlowReversal2 then
- fra_a2 = Modelica.Fluid.Utilities.regStep(
- m2_flow,
- 1,
- 0,
- m2_flow_small);
- fra_b2 = 1-fra_a2;
- else
- fra_a2 = 1;
- fra_b2 = 0;
- end if;
- if allowFlowReversal1 then
- fra_a1 = Modelica.Fluid.Utilities.regStep(
- m1_flow,
- 1,
- 0,
- m1_flow_small);
- fra_b1 = 1-fra_a1;
- else
- fra_a1 = 1;
- fra_b1 = 0;
- end if;
-
- /////////////////////////////////////////////////////////
- // Definitions for heat transfer effectiveness model
- T_in1 = if allowFlowReversal1 then
- fra_a1 * Medium1.temperature(state_a1_inflow) + fra_b1 * Medium1.temperature(state_b1_inflow) else
- Medium1.temperature(state_a1_inflow);
- T_in2 = if allowFlowReversal2 then
- fra_a2 * Medium2.temperature(state_a2_inflow) + fra_b2 * Medium2.temperature(state_b2_inflow) else
- Medium2.temperature(state_a2_inflow);
-
- C1_flow = abs(m1_flow)*
- ( if allowFlowReversal1 then
- fra_a1 * Medium1.specificHeatCapacityCp(state_a1_inflow) +
- fra_b1 * Medium1.specificHeatCapacityCp(state_b1_inflow) else
- Medium1.specificHeatCapacityCp(state_a1_inflow));
- C2_flow = abs(m2_flow)*
- ( if allowFlowReversal2 then
- fra_a2 * Medium2.specificHeatCapacityCp(state_a2_inflow) +
- fra_b2 * Medium2.specificHeatCapacityCp(state_b2_inflow) else
- Medium2.specificHeatCapacityCp(state_a2_inflow));
- CMin_flow = min(C1_flow, C2_flow);
-
- // QMax_flow is maximum heat transfer into medium 1
- QMax_flow = CMin_flow*(T_in2 - T_in1);
annotation (
Icon(coordinateSystem(preserveAspectRatio=false, extent={{-100,-100},{100,
@@ -123,6 +106,17 @@ and
+Corrected coefficient in Taylor expansion of x_a.
+This is for
+#698.
+
+Fixed bug in computation of s_w.
+The old implementation used the current inlet water temperature instead
+of the design condition that corresponds to UA_nominal.
+
+First implementation.
+QMax_flow > 0.
", revisions="
"));
end Radiator;
diff --git a/AixLib/Fluid/HeatExchangers/Validation/DryCoilEffectivenessNTU.mo b/AixLib/Fluid/HeatExchangers/Validation/DryCoilEffectivenessNTU.mo
new file mode 100644
index 0000000000..db4820df7c
--- /dev/null
+++ b/AixLib/Fluid/HeatExchangers/Validation/DryCoilEffectivenessNTU.mo
@@ -0,0 +1,273 @@
+within AixLib.Fluid.HeatExchangers.Validation;
+model DryCoilEffectivenessNTU
+ "Model that demonstrates use of a heat exchanger without condensation that uses the epsilon-NTU relation"
+ extends Modelica.Icons.Example;
+
+ package Medium1 = AixLib.Media.Water;
+ package Medium2 = AixLib.Media.Air;
+
+ parameter Modelica.SIunits.SpecificHeatCapacity cp1=
+ Medium1.specificHeatCapacityCp(
+ Medium1.setState_pTX(Medium1.p_default, Medium1.T_default, Medium1.X_default))
+ "Specific heat capacity of medium 2";
+ parameter Modelica.SIunits.SpecificHeatCapacity cp2=
+ Medium2.specificHeatCapacityCp(
+ Medium2.setState_pTX(Medium2.p_default, Medium2.T_default, Medium2.X_default))
+ "Specific heat capacity of medium 2";
+ parameter Modelica.SIunits.MassFlowRate m1_flow = 5
+ "Nominal mass flow rate medium 1";
+ parameter Modelica.SIunits.MassFlowRate m2_flow = m1_flow*cp1/
+ cp2 "Nominal mass flow rate medium 2";
+
+ AixLib.Fluid.Sources.Boundary_pT sin_2(
+ redeclare package Medium = Medium2,
+ use_p_in=true,
+ nPorts=5,
+ T=273.15 + 10) "Boundary condition"
+ annotation (Placement(transformation(extent={{-64,10},
+ {-44,30}})));
+ Modelica.Blocks.Sources.Ramp PIn(
+ height=200,
+ duration=60,
+ offset=101325,
+ startTime=100) "Pressure boundary condition"
+ annotation (Placement(transformation(extent={{60,-90},{80,-70}})));
+ AixLib.Fluid.Sources.Boundary_pT sou_2(
+ redeclare package Medium = Medium2,
+ T=273.15 + 5,
+ use_p_in=true,
+ use_T_in=true,
+ nPorts=5) "Boundary condition"
+ annotation (Placement(transformation(extent={{10,-10},
+ {-10,10}}, origin={72,-10})));
+ Modelica.Blocks.Sources.Ramp TWat(
+ height=10,
+ duration=60,
+ offset=273.15 + 30,
+ startTime=60) "Water temperature"
+ annotation (Placement(transformation(extent={{-100,44},{-80,64}})));
+ Modelica.Blocks.Sources.Constant TDb(k=293.15) "Drybulb temperature"
+ annotation (Placement(transformation(extent={{60,-60},{80,-40}})));
+ Modelica.Blocks.Sources.Constant POut(k=101325)
+ annotation (Placement(transformation(extent={{-100,10},{-80,30}})));
+ AixLib.Fluid.Sources.Boundary_pT sin_1(
+ redeclare package Medium = Medium1,
+ use_p_in=true,
+ nPorts=5,
+ p=300000,
+ T=273.15 + 25)
+ "Boundary condition" annotation (Placement(transformation(extent={{80,40},
+ {60,60}})));
+ AixLib.Fluid.Sources.Boundary_pT sou_1(
+ redeclare package Medium = Medium1,
+ p=300000 + 5000,
+ T=273.15 + 50,
+ use_T_in=true,
+ nPorts=5)
+ "Boundary condition" annotation (Placement(transformation(extent={{-62,40},
+ {-42,60}})));
+ AixLib.Fluid.HeatExchangers.DryCoilEffectivenessNTU hexPar(
+ redeclare package Medium1 = Medium1,
+ redeclare package Medium2 = Medium2,
+ dp1_nominal=500,
+ dp2_nominal=10,
+ m1_flow_nominal=m1_flow,
+ m2_flow_nominal=m2_flow,
+ Q_flow_nominal=m2_flow*cp2*(24 - 20),
+ configuration=AixLib.Fluid.Types.HeatExchangerConfiguration.ParallelFlow,
+ show_T=true,
+ T_a1_nominal=303.15,
+ T_a2_nominal=293.15)
+ "Heat exchanger"
+ annotation (Placement(transformation(extent={{-10,40},{10,60}})));
+
+ AixLib.Fluid.HeatExchangers.DryCoilEffectivenessNTU hexCou(
+ redeclare package Medium1 = Medium1,
+ redeclare package Medium2 = Medium2,
+ dp1_nominal=500,
+ dp2_nominal=10,
+ m1_flow_nominal=m1_flow,
+ m2_flow_nominal=m2_flow,
+ Q_flow_nominal=m2_flow*cp2*(24 - 20),
+ configuration=AixLib.Fluid.Types.HeatExchangerConfiguration.CounterFlow,
+ show_T=true,
+ T_a1_nominal=303.15,
+ T_a2_nominal=293.15)
+ "Heat exchanger"
+ annotation (Placement(transformation(extent={{-10,0},{10,20}})));
+ AixLib.Fluid.HeatExchangers.DryCoilEffectivenessNTU hexCroC1Mix(
+ redeclare package Medium1 = Medium1,
+ redeclare package Medium2 = Medium2,
+ dp1_nominal=500,
+ dp2_nominal=10,
+ m1_flow_nominal=m1_flow,
+ m2_flow_nominal=m2_flow,
+ Q_flow_nominal=m2_flow*cp2*(24 - 20),
+ configuration=AixLib.Fluid.Types.HeatExchangerConfiguration.CrossFlowStream1MixedStream2Unmixed,
+ show_T=true,
+ T_a1_nominal=303.15,
+ T_a2_nominal=293.15)
+ "Heat exchanger"
+ annotation (Placement(transformation(extent={{-10,-28},{10,-8}})));
+ AixLib.Fluid.HeatExchangers.DryCoilEffectivenessNTU hexCroC1Unm(
+ redeclare package Medium1 = Medium1,
+ redeclare package Medium2 = Medium2,
+ dp1_nominal=500,
+ dp2_nominal=10,
+ m1_flow_nominal=m1_flow,
+ m2_flow_nominal=m2_flow,
+ Q_flow_nominal=m2_flow*cp2*(24 - 20),
+ configuration=AixLib.Fluid.Types.HeatExchangerConfiguration.CrossFlowStream1UnmixedStream2Mixed,
+ show_T=true,
+ T_a1_nominal=303.15,
+ T_a2_nominal=293.15)
+ "Heat exchanger"
+ annotation (Placement(transformation(extent={{-10,-58},{10,-38}})));
+ AixLib.Fluid.HeatExchangers.DryCoilEffectivenessNTU hexCroUnm(
+ redeclare package Medium1 = Medium1,
+ redeclare package Medium2 = Medium2,
+ dp1_nominal=500,
+ dp2_nominal=10,
+ m1_flow_nominal=m1_flow,
+ m2_flow_nominal=m2_flow,
+ Q_flow_nominal=m2_flow*cp2*(24 - 20),
+ configuration=AixLib.Fluid.Types.HeatExchangerConfiguration.CrossFlowUnmixed,
+ show_T=true,
+ T_a1_nominal=303.15,
+ T_a2_nominal=293.15)
+ "Heat exchanger"
+ annotation (Placement(transformation(extent={{-10,-86},{10,-66}})));
+ Modelica.Blocks.Sources.Trapezoid trapezoid(
+ amplitude=5000,
+ rising=10,
+ width=100,
+ falling=10,
+ period=3600,
+ offset=300000)
+ "Pressure boundary condition"
+ annotation (Placement(transformation(extent={{40,70},{60,90}})));
+equation
+ connect(PIn.y,sou_2. p_in) annotation (Line(
+ points={{81,-80},{98,-80},{98,-2},{84,-2}},
+ color={0,0,127}));
+ connect(TDb.y, sou_2.T_in) annotation (Line(points={{81,-50},{92,-50},{92,-6},
+ {84,-6}}, color={0,0,127}));
+ connect(TWat.y, sou_1.T_in)
+ annotation (Line(points={{-79,54},{-64,54}}, color={0,0,127}));
+ connect(sou_1.ports[1], hexPar.port_a1)
+ annotation (Line(
+ points={{-42,53.2},{-25,53.2},{-25,56},{-10,56}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hexPar.port_a2, sou_2.ports[1])
+ annotation (Line(
+ points={{10,44},{30,44},{30,-6.8},{62,-6.8}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(POut.y, sin_2.p_in) annotation (Line(
+ points={{-79,20},{-69.5,20},{-69.5,28},{-66,28}},
+ color={0,0,127},
+ smooth=Smooth.None));
+ connect(hexPar.port_b1, sin_1.ports[1])
+ annotation (Line(
+ points={{10,56},{34,56},{34,53.2},{60,53.2}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(sin_2.ports[1], hexPar.port_b2)
+ annotation (Line(
+ points={{-44,23.2},{-32,23.2},{-32,44},{-10,44}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hexCou.port_a1, sou_1.ports[2]) annotation (Line(
+ points={{-10,16},{-24,16},{-24,51.6},{-42,51.6}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hexCroC1Mix.port_a1, sou_1.ports[3]) annotation (Line(
+ points={{-10,-12},{-26,-12},{-26,50},{-42,50}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hexCroC1Unm.port_a1, sou_1.ports[4]) annotation (Line(
+ points={{-10,-42},{-28,-42},{-28,48.4},{-42,48.4}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hexCou.port_b2, sin_2.ports[2]) annotation (Line(
+ points={{-10,4},{-32,4},{-32,21.6},{-44,21.6}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hexCroC1Mix.port_b2, sin_2.ports[3]) annotation (Line(
+ points={{-10,-24},{-34,-24},{-34,20},{-44,20}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hexCroC1Unm.port_b2, sin_2.ports[4]) annotation (Line(
+ points={{-10,-54},{-36,-54},{-36,18.4},{-44,18.4}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hexCou.port_b1, sin_1.ports[2]) annotation (Line(
+ points={{10,16},{34,16},{34,51.6},{60,51.6}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hexCroC1Mix.port_b1, sin_1.ports[3]) annotation (Line(
+ points={{10,-12},{36,-12},{36,50},{60,50}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hexCroC1Unm.port_b1, sin_1.ports[4]) annotation (Line(
+ points={{10,-42},{38,-42},{38,48.4},{60,48.4}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hexCou.port_a2, sou_2.ports[2]) annotation (Line(
+ points={{10,4},{36,4},{36,-8.4},{62,-8.4}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hexCroC1Mix.port_a2, sou_2.ports[3]) annotation (Line(
+ points={{10,-24},{30,-24},{30,-10},{62,-10}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hexCroC1Unm.port_a2, sou_2.ports[4]) annotation (Line(
+ points={{10,-54},{32,-54},{32,-11.6},{62,-11.6}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hexCroUnm.port_a1, sou_1.ports[5]) annotation (Line(
+ points={{-10,-70},{-30,-70},{-30,46.8},{-42,46.8}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hexCroUnm.port_b2, sin_2.ports[5]) annotation (Line(
+ points={{-10,-82},{-38,-82},{-38,16.8},{-44,16.8}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hexCroUnm.port_b1, sin_1.ports[5]) annotation (Line(
+ points={{10,-70},{42,-70},{42,46.8},{60,46.8}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hexCroUnm.port_a2, sou_2.ports[5]) annotation (Line(
+ points={{10,-82},{44,-82},{44,-13.2},{62,-13.2}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(trapezoid.y, sin_1.p_in) annotation (Line(
+ points={{61,80},{92,80},{92,58},{82,58}},
+ color={0,0,127},
+ smooth=Smooth.None));
+ annotation(experiment(Tolerance=1e-6, StopTime=360),
+__Dymola_Commands(file="modelica://Buildings/Resources/Scripts/Dymola/Fluid/HeatExchangers/Validation/DryCoilEffectivenessNTU.mos"
+ "Simulate and plot"),
+Documentation(info="
+
+Revised implementation of all equations
+such that a binding equation is used.
+I.e. we set the variable value at the variable definition
+instead of using the equation section.
+This allows overwriting the equation
+when extending the model.
+See
+#1102.
+
Set prescribedHeatFlowRate1=true and
prescribedHeatFlowRate2=true.
diff --git a/AixLib/Fluid/HeatExchangers/BaseClasses/PartialEffectivenessNTU.mo b/AixLib/Fluid/HeatExchangers/BaseClasses/PartialEffectivenessNTU.mo
new file mode 100644
index 0000000000..585f44040a
--- /dev/null
+++ b/AixLib/Fluid/HeatExchangers/BaseClasses/PartialEffectivenessNTU.mo
@@ -0,0 +1,257 @@
+within AixLib.Fluid.HeatExchangers.BaseClasses;
+model PartialEffectivenessNTU
+ "Partial model for heat exchanger with effectiveness - NTU relation and no moisture condensation"
+ extends AixLib.Fluid.HeatExchangers.BaseClasses.PartialEffectiveness(
+ sensibleOnly1=true,
+ sensibleOnly2=true,
+ Q1_flow = eps*QMax_flow,
+ Q2_flow = -Q1_flow,
+ mWat1_flow = 0,
+ mWat2_flow = 0);
+ import con = AixLib.Fluid.Types.HeatExchangerConfiguration;
+ import flo = AixLib.Fluid.Types.HeatExchangerFlowRegime;
+
+ parameter con configuration "Heat exchanger configuration"
+ annotation (Evaluate=true);
+
+ parameter Boolean use_Q_flow_nominal = true
+ "Set to true to specify Q_flow_nominal and temperatures, or to false to specify effectiveness"
+ annotation (Evaluate=true,
+ Dialog(group="Nominal thermal performance"));
+
+ parameter Modelica.SIunits.HeatFlowRate Q_flow_nominal(fixed=use_Q_flow_nominal)
+ "Nominal heat transfer"
+ annotation (Dialog(group="Nominal thermal performance",
+ enable=use_Q_flow_nominal));
+ parameter Modelica.SIunits.Temperature T_a1_nominal(fixed=use_Q_flow_nominal)
+ "Nominal temperature at port a1"
+ annotation (Dialog(group="Nominal thermal performance",
+ enable=use_Q_flow_nominal));
+ parameter Modelica.SIunits.Temperature T_a2_nominal(fixed=use_Q_flow_nominal)
+ "Nominal temperature at port a2"
+ annotation (Dialog(group="Nominal thermal performance",
+ enable=use_Q_flow_nominal));
+
+ parameter Real eps_nominal(fixed=not use_Q_flow_nominal)
+ "Nominal heat transfer effectiveness"
+ annotation (Dialog(group="Nominal thermal performance",
+ enable=not use_Q_flow_nominal));
+
+ input Modelica.SIunits.ThermalConductance UA "UA value";
+
+ Real eps(min=0, max=1) "Heat exchanger effectiveness";
+
+ // NTU has been removed as NTU goes to infinity as CMin goes to zero.
+ // This quantity is not good for modeling.
+ // Real NTU(min=0) "Number of transfer units";
+ final parameter Modelica.SIunits.ThermalConductance UA_nominal(fixed=false)
+ "Nominal UA value";
+ final parameter Real NTU_nominal(min=0, fixed=false)
+ "Nominal number of transfer units";
+
+protected
+ final parameter Medium1.ThermodynamicState sta1_default = Medium1.setState_pTX(
+ T=Medium1.T_default,
+ p=Medium1.p_default,
+ X=Medium1.X_default[1:Medium1.nXi]) "Default state for medium 1";
+ final parameter Medium2.ThermodynamicState sta2_default = Medium2.setState_pTX(
+ T=Medium1.T_default,
+ p=Medium2.p_default,
+ X=Medium2.X_default[1:Medium2.nXi]) "Default state for medium 2";
+
+ parameter Modelica.SIunits.SpecificHeatCapacity cp1_nominal(fixed=false)
+ "Specific heat capacity of medium 1 at nominal condition";
+ parameter Modelica.SIunits.SpecificHeatCapacity cp2_nominal(fixed=false)
+ "Specific heat capacity of medium 2 at nominal condition";
+ parameter Modelica.SIunits.ThermalConductance C1_flow_nominal(fixed=false)
+ "Nominal capacity flow rate of Medium 1";
+ parameter Modelica.SIunits.ThermalConductance C2_flow_nominal(fixed=false)
+ "Nominal capacity flow rate of Medium 2";
+ parameter Modelica.SIunits.ThermalConductance CMin_flow_nominal(fixed=false)
+ "Minimal capacity flow rate at nominal condition";
+ parameter Modelica.SIunits.ThermalConductance CMax_flow_nominal(fixed=false)
+ "Maximum capacity flow rate at nominal condition";
+ parameter Real Z_nominal(
+ min=0,
+ max=1,
+ fixed=false) "Ratio of capacity flow rate at nominal condition";
+ parameter Modelica.SIunits.Temperature T_b1_nominal(fixed=false)
+ "Nominal temperature at port b1";
+ parameter Modelica.SIunits.Temperature T_b2_nominal(fixed=false)
+ "Nominal temperature at port b2";
+ parameter flo flowRegime_nominal(fixed=false)
+ "Heat exchanger flow regime at nominal flow rates";
+ flo flowRegime(fixed=false, start=flowRegime_nominal)
+ "Heat exchanger flow regime";
+initial equation
+ assert(m1_flow_nominal > 0,
+ "m1_flow_nominal must be positive, m1_flow_nominal = " + String(
+ m1_flow_nominal));
+ assert(m2_flow_nominal > 0,
+ "m2_flow_nominal must be positive, m2_flow_nominal = " + String(
+ m2_flow_nominal));
+
+ cp1_nominal = Medium1.specificHeatCapacityCp(sta1_default);
+ cp2_nominal = Medium2.specificHeatCapacityCp(sta2_default);
+
+ // Heat transferred from fluid 1 to 2 at nominal condition
+ C1_flow_nominal = m1_flow_nominal*cp1_nominal;
+ C2_flow_nominal = m2_flow_nominal*cp2_nominal;
+ CMin_flow_nominal = min(C1_flow_nominal, C2_flow_nominal);
+ CMax_flow_nominal = max(C1_flow_nominal, C2_flow_nominal);
+ Z_nominal = CMin_flow_nominal/CMax_flow_nominal;
+ Q_flow_nominal = m1_flow_nominal*cp1_nominal*(T_a1_nominal - T_b1_nominal);
+ if use_Q_flow_nominal then
+ Q_flow_nominal = -m2_flow_nominal*cp2_nominal*(T_a2_nominal - T_b2_nominal);
+ eps_nominal = abs(Q_flow_nominal/((T_a1_nominal - T_a2_nominal)*
+ CMin_flow_nominal));
+ else
+ T_a1_nominal = Medium1.T_default;
+ T_a2_nominal = Medium2.T_default;
+ T_b1_nominal = Medium1.T_default;
+ T_b2_nominal = Medium2.T_default;
+ end if;
+ assert(eps_nominal > 0 and eps_nominal < 1,
+ "eps_nominal out of bounds, eps_nominal = " + String(eps_nominal) +
+ "\n To achieve the required heat transfer rate at epsilon=0.8, set |T_a1_nominal-T_a2_nominal| = "
+ + String(abs(Q_flow_nominal/0.8*CMin_flow_nominal)) +
+ "\n or increase flow rates. The current parameters result in " +
+ "\n CMin_flow_nominal = " + String(CMin_flow_nominal) +
+ "\n CMax_flow_nominal = " + String(CMax_flow_nominal));
+ // Assign the flow regime for the given heat exchanger configuration and capacity flow rates
+ if (configuration == con.CrossFlowStream1MixedStream2Unmixed) then
+ flowRegime_nominal = if (C1_flow_nominal < C2_flow_nominal) then flo.CrossFlowCMinMixedCMaxUnmixed
+ else flo.CrossFlowCMinUnmixedCMaxMixed;
+ elseif (configuration == con.CrossFlowStream1UnmixedStream2Mixed) then
+ flowRegime_nominal = if (C1_flow_nominal < C2_flow_nominal) then flo.CrossFlowCMinUnmixedCMaxMixed
+ else flo.CrossFlowCMinMixedCMaxUnmixed;
+ elseif (configuration == con.ParallelFlow) then
+ flowRegime_nominal = flo.ParallelFlow;
+ elseif (configuration == con.CounterFlow) then
+ flowRegime_nominal = flo.CounterFlow;
+ elseif (configuration == con.CrossFlowUnmixed) then
+ flowRegime_nominal = flo.CrossFlowUnmixed;
+ else
+ // Invalid flow regime. Assign a value to flowRegime_nominal, and stop with an assert
+ flowRegime_nominal = flo.CrossFlowUnmixed;
+ assert(configuration >= con.ParallelFlow and configuration <= con.CrossFlowStream1UnmixedStream2Mixed,
+ "Invalid heat exchanger configuration.");
+ end if;
+ // The equation sorter of Dymola 7.3 does not guarantee that the above assert is tested prior to the
+ // function call on the next line. Thus, we add the test on eps_nominal to avoid an error in ntu_epsilonZ
+ // for invalid input arguments
+ NTU_nominal = if (eps_nominal > 0 and eps_nominal < 1) then
+ AixLib.Fluid.HeatExchangers.BaseClasses.ntu_epsilonZ(
+ eps=eps_nominal,
+ Z=Z_nominal,
+ flowRegime=Integer(flowRegime_nominal)) else 0;
+ UA_nominal = NTU_nominal*CMin_flow_nominal;
+equation
+ // Assign the flow regime for the given heat exchanger configuration and capacity flow rates
+ if (configuration == con.ParallelFlow) then
+ flowRegime = if (C1_flow*C2_flow >= 0) then flo.ParallelFlow else flo.CounterFlow;
+ elseif (configuration == con.CounterFlow) then
+ flowRegime = if (C1_flow*C2_flow >= 0) then flo.CounterFlow else flo.ParallelFlow;
+ elseif (configuration == con.CrossFlowUnmixed) then
+ flowRegime = flo.CrossFlowUnmixed;
+ elseif (configuration == con.CrossFlowStream1MixedStream2Unmixed) then
+ flowRegime = if (C1_flow < C2_flow) then flo.CrossFlowCMinMixedCMaxUnmixed
+ else flo.CrossFlowCMinUnmixedCMaxMixed;
+ else
+ // have ( configuration == con.CrossFlowStream1UnmixedStream2Mixed)
+ flowRegime = if (C1_flow < C2_flow) then flo.CrossFlowCMinUnmixedCMaxMixed
+ else flo.CrossFlowCMinMixedCMaxUnmixed;
+ end if;
+
+ // Effectiveness
+ eps = AixLib.Fluid.HeatExchangers.BaseClasses.epsilon_C(
+ UA=UA,
+ C1_flow=C1_flow,
+ C2_flow=C2_flow,
+ flowRegime=Integer(flowRegime),
+ CMin_flow_nominal=CMin_flow_nominal,
+ CMax_flow_nominal=CMax_flow_nominal,
+ delta=delta);
+
+ annotation (
+ Icon(coordinateSystem(preserveAspectRatio=false, extent={{-100,-100},{100,
+ 100}}), graphics={Rectangle(
+ extent={{-70,78},{70,-82}},
+ lineColor={0,0,255},
+ pattern=LinePattern.None,
+ fillColor={95,95,95},
+ fillPattern=FillPattern.Solid)}),
+defaultComponentName="hex",
+ Documentation(info="
+
+ ε = f(NTU, Z, flowRegime),
+UA.
+
+
+"));
+end PartialEffectivenessNTU;
diff --git a/AixLib/Fluid/HeatExchangers/BaseClasses/epsilon_C.mo b/AixLib/Fluid/HeatExchangers/BaseClasses/epsilon_C.mo
new file mode 100644
index 0000000000..06a91d3b05
--- /dev/null
+++ b/AixLib/Fluid/HeatExchangers/BaseClasses/epsilon_C.mo
@@ -0,0 +1,124 @@
+within AixLib.Fluid.HeatExchangers.BaseClasses;
+function epsilon_C
+ "Computes heat exchanger effectiveness for given capacity flow rates and heat exchanger flow regime"
+ input Modelica.SIunits.ThermalConductance UA "UA value";
+ input Modelica.SIunits.ThermalConductance C1_flow
+ "Enthalpy flow rate medium 1";
+ input Modelica.SIunits.ThermalConductance C2_flow
+ "Enthalpy flow rate medium 2";
+ input Integer flowRegime
+ "Heat exchanger flow regime, see AixLib.Fluid.Types.HeatExchangerFlowRegime";
+ input Modelica.SIunits.ThermalConductance CMin_flow_nominal
+ "Minimum enthalpy flow rate at nominal condition";
+ input Modelica.SIunits.ThermalConductance CMax_flow_nominal
+ "Maximum enthalpy flow rate at nominal condition";
+ input Real delta = 1E-3 "Small value used for smoothing";
+ output Real eps(min=0, max=1) "Heat exchanger effectiveness";
+
+protected
+ Modelica.SIunits.ThermalConductance deltaCMin
+ "Small number for capacity flow rate";
+ Modelica.SIunits.ThermalConductance deltaCMax
+ "Small number for capacity flow rate";
+ Modelica.SIunits.ThermalConductance CMin_flow "Minimum capacity flow rate";
+ Modelica.SIunits.ThermalConductance CMax_flow "Maximum capacity flow rate";
+ Modelica.SIunits.ThermalConductance CMinNZ_flow
+ "Minimum capacity flow rate, bounded away from zero";
+ Modelica.SIunits.ThermalConductance CMaxNZ_flow
+ "Maximum capacity flow rate, bounded away from zero";
+ Real gaiEps(min=0, max=1)
+ "Gain used to force UA to zero for very small flow rates";
+ Real gaiNTU(min=1E-10, max=1)
+ "Gain used to force NTU to a number slightly above zero for very small flow rates. Because NTU is used in NTU^-(0.22), it must not be zero.";
+ Real NTU "Number of transfer units";
+ Real Z(min=0, max=1) "Ratio of capacity flow rate (CMin/CMax)";
+
+algorithm
+ deltaCMin := delta*CMin_flow_nominal;
+ deltaCMax := delta*CMax_flow_nominal;
+ // effectiveness
+ CMin_flow :=AixLib.Utilities.Math.Functions.smoothMin(
+ C1_flow,
+ C2_flow,
+ deltaCMin/4);
+ CMax_flow :=AixLib.Utilities.Math.Functions.smoothMax(
+ C1_flow,
+ C2_flow,
+ deltaCMax/4);
+ // CMin and CMax, constrained to be non-zero to compute eps-NTU-Z relationship
+ CMinNZ_flow :=AixLib.Utilities.Math.Functions.smoothMax(
+ CMin_flow,
+ deltaCMin,
+ deltaCMin/4);
+ CMaxNZ_flow :=AixLib.Utilities.Math.Functions.smoothMax(
+ CMax_flow,
+ deltaCMax,
+ deltaCMax/4);
+ Z := CMin_flow/CMaxNZ_flow+1E-10*deltaCMin;
+ // Gain that goes to zero as CMin_flow gets below deltaCMin
+ // This is needed to allow zero flow
+ gaiEps := AixLib.Utilities.Math.Functions.spliceFunction(
+ pos=1,
+ neg=0,
+ x=CMin_flow-deltaCMin,
+ deltax=deltaCMin/2);
+ gaiNTU := AixLib.Utilities.Math.Functions.spliceFunction(
+ pos=1,
+ neg=delta,
+ x=CMin_flow-deltaCMin,
+ deltax=deltaCMin/2);
+
+ NTU := gaiNTU*UA/CMinNZ_flow;
+ eps := gaiEps*AixLib.Fluid.HeatExchangers.BaseClasses.epsilon_ntuZ(
+ NTU=NTU,
+ Z=Z,
+ flowRegime=flowRegime);
+
+ annotation (
+ Inline=false,
+ smoothOrder=1,
+ Documentation(info="
+
+Removed variable Z that is not used.
+This is for
+issue 1328.
+
+Corrected an error where the value of NTU was assigned to Z.
+This is for
+issue 1328.
+
+Introduced sta1_default and sta2_default
+to enable translation under OpenModelica.
+Removed max=1 attribute for Z. This is needed as near
+zero flow, Z can be larger than one due to the regularization.
+As Z is not used in this model other than for reporting, this bound
+need not be enforced (and the calculation of eps is fine at these small flow rates).
+This is for
+issue 490.
+
+Changed assert statement to avoid comparing
+enumeration with an integer, which triggers a warning
+in Dymola 2015.
+
+Updated model to use new variable mWat_flow
+in the base class.
+
+First implementation.
+CMin_flow crosses delta*CMin_flow_nominal from above,
+the Number of Transfer Units and the heat exchanger effectiveness go to zero.
+
+
+"));
+end epsilon_C;
diff --git a/AixLib/Fluid/HeatExchangers/BaseClasses/ntu_epsilonZ.mo b/AixLib/Fluid/HeatExchangers/BaseClasses/ntu_epsilonZ.mo
index 08166c8620..b638b2f2bb 100644
--- a/AixLib/Fluid/HeatExchangers/BaseClasses/ntu_epsilonZ.mo
+++ b/AixLib/Fluid/HeatExchangers/BaseClasses/ntu_epsilonZ.mo
@@ -113,7 +113,7 @@ to avoid a warning during model check in Dymola 2015.
August 10, 2011, by Michael Wetter:
+Removed outputs Z and NTU as they are not used by other models.
+Removed if statement that can cause a discontinuous derivative.
+
+Changed the type of the input flowRegime from
+AixLib.Fluid.Types.HeatExchangerFlowRegime
+to Integer.
+This was done to have the same argument list as
+
+AixLib.Fluid.HeatExchangers.BaseClasses.epsilon_ntuZ,
+in which the type had to be changed.
+
+Removed unused import statement.
+
+First implementation.
+
Changed implementation to use
Modelica.Media.Common.OneNonLinearEquation instead of
-Buildings.Utilities.Math.BaseClasses.OneNonLinearEquation.
+AixLib.Utilities.Math.BaseClasses.OneNonLinearEquation.
diff --git a/AixLib/Fluid/HeatExchangers/BaseClasses/package.order b/AixLib/Fluid/HeatExchangers/BaseClasses/package.order
index 79ae053c59..7f6a2c043b 100644
--- a/AixLib/Fluid/HeatExchangers/BaseClasses/package.order
+++ b/AixLib/Fluid/HeatExchangers/BaseClasses/package.order
@@ -1,9 +1,12 @@
HACoilInside
+HADryCoil
HANaturalCylinder
Internal
PartialEffectiveness
+PartialEffectivenessNTU
PartialPrescribedOutlet
dynamicViscosityWater
+epsilon_C
epsilon_ntuZ
isobaricExpansionCoefficientWater
ntu_epsilonZ
diff --git a/AixLib/Fluid/HeatExchangers/DryCoilEffectivenessNTU.mo b/AixLib/Fluid/HeatExchangers/DryCoilEffectivenessNTU.mo
new file mode 100644
index 0000000000..7e40cfacfe
--- /dev/null
+++ b/AixLib/Fluid/HeatExchangers/DryCoilEffectivenessNTU.mo
@@ -0,0 +1,86 @@
+within AixLib.Fluid.HeatExchangers;
+model DryCoilEffectivenessNTU
+ "Heat exchanger with effectiveness - NTU relation and no moisture condensation"
+ extends AixLib.Fluid.HeatExchangers.BaseClasses.PartialEffectivenessNTU(
+ UA = 1/(1/hA.hA_1 + 1/hA.hA_2));
+
+ parameter Real r_nominal(
+ min=0,
+ max=1) = 2/3
+ "Ratio between air-side and water-side convective heat transfer (hA-value) at nominal condition";
+
+ AixLib.Fluid.HeatExchangers.BaseClasses.HADryCoil hA(
+ final r_nominal=r_nominal,
+ final UA_nominal=UA_nominal,
+ final m_flow_nominal_w=m1_flow_nominal,
+ final m_flow_nominal_a=m2_flow_nominal,
+ waterSideTemperatureDependent=false,
+ airSideTemperatureDependent=false)
+ "Model for convective heat transfer coefficient";
+
+equation
+ // Convective heat transfer coefficient
+ hA.m1_flow = m1_flow;
+ hA.m2_flow = m2_flow;
+ hA.T_1 = T_in1;
+ hA.T_2 = T_in2;
+
+ annotation (
+ Icon(coordinateSystem(preserveAspectRatio=false, extent={{-100,-100},{100,
+ 100}}), graphics={Rectangle(
+ extent={{-70,78},{70,-82}},
+ lineColor={0,0,255},
+ pattern=LinePattern.None,
+ fillColor={95,95,95},
+ fillPattern=FillPattern.Solid)}),
+ preferredView="info",
+defaultComponentName="hex",
+ Documentation(info="
+
+ ε = f(NTU, Z, flowRegime),
+
+
+"));
+end DryCoilEffectivenessNTU;
diff --git a/AixLib/Fluid/HeatExchangers/DynamicHX.mo b/AixLib/Fluid/HeatExchangers/DynamicHX.mo
new file mode 100644
index 0000000000..1be4ff5b79
--- /dev/null
+++ b/AixLib/Fluid/HeatExchangers/DynamicHX.mo
@@ -0,0 +1,66 @@
+within AixLib.Fluid.HeatExchangers;
+model DynamicHX "Simple dynamic heat exchanger model"
+ extends Interfaces.FourPortHeatExchanger;
+
+ parameter Modelica.SIunits.Time tau_C = 10 "Time constant of heat capacity at nominal heat flow and temperature difference."
+ annotation(Dialog(tab = "Dynamics",group = "Nominal condition"));
+ parameter Modelica.SIunits.TemperatureDifference dT_nom "Temperature difference at nominal conditions (used to calculate Gc)" annotation(Dialog(group = "Heat Transfer"));
+ Modelica.Thermal.HeatTransfer.Components.HeatCapacitor heatCapacitor[nNodes](
+ each final C=Q_nom/dT_nom*tau_C/nNodes,
+ each final T(fixed=true, start=TCapacity_start))
+ annotation (Placement(transformation(extent={{-10,0},{10,20}})));
+ parameter Modelica.SIunits.HeatFlowRate Q_nom "Temperature difference at nominal conditions (used to calculate Gc)" annotation(Dialog(group = "Heat Transfer"));
+ parameter Modelica.SIunits.Temperature TCapacity_start=(T1_start + T2_start)/2
+ "Start value of temperature"
+ annotation(Dialog(tab="Initialization", group="Heat capacity"));
+ parameter Modelica.Blocks.Interfaces.RealInput Gc1(unit="W/K") = Q_nom/dT_nom*2/nNodes
+ "Signal representing the convective thermal conductance in [W/K]" annotation(Dialog(group = "Heat Transfer"));
+ parameter Modelica.Blocks.Interfaces.RealInput Gc2(unit="W/K") = Q_nom/dT_nom*2/nNodes
+ "Signal representing the convective thermal conductance in [W/K]" annotation(Dialog(group = "Heat Transfer"));
+ Modelica.Blocks.Sources.RealExpression Gc1_Expression[nNodes](
+ each final y=Gc1)
+ annotation (Placement(transformation(extent={{-72,20},{-52,40}})));
+ Modelica.Thermal.HeatTransfer.Components.Convection convection1[nNodes]
+ annotation (Placement(transformation(
+ extent={{-10,10},{10,-10}},
+ rotation=270,
+ origin={-32,30})));
+ Modelica.Blocks.Sources.RealExpression Gc2_Expression[nNodes](
+ each final y=Gc2)
+ annotation (
+ Placement(transformation(
+ extent={{-10,-10},{10,10}},
+ rotation=180,
+ origin={58,-30})));
+ Modelica.Thermal.HeatTransfer.Components.Convection convection2[nNodes]
+ annotation (Placement(transformation(
+ extent={{-10,10},{10,-10}},
+ rotation=90,
+ origin={30,-30})));
+equation
+ connect(convection2.solid, vol2.heatPort)
+ annotation (Line(points={{30,-40},{30,-50},{10,-50}}, color={191,0,0}));
+
+ connect(convection1[nNodes:-1:1].solid, vol1[1:nNodes].heatPort)
+ annotation (Line(points={{-32,40},{-32,50},{-10,50}}, color={191,0,0}));
+
+ connect(convection1.fluid, heatCapacitor.port)
+ annotation (Line(points={{-32,20},{-32,0},{0,0}}, color={191,0,0}));
+ connect(convection2.fluid, heatCapacitor.port)
+ annotation (Line(points={{30,-20},{30,0},{0,0}}, color={191,0,0}));
+ connect(Gc1_Expression.y, convection1.Gc)
+ annotation (Line(points={{-51,30},{-42,30}}, color={0,0,127}));
+ connect(Gc2_Expression.y, convection2.Gc)
+ annotation (Line(points={{47,-30},{40,-30}}, color={0,0,127}));
+ annotation (Documentation(revisions="
+
+Refactored model to use a common base class with
+
+Buildings.Fluid.HeatExchangers.PlateHeatExchangerEffectivenessNTU.
+
+
+", info="
+
+First implementation, AixLib, issue 661.
+
+
+", info="
+
+First implementation (see issue #577)
+
+Replaced fluid source. This is for
+ #1072.
+
Updated model for new heater model.
This is for
diff --git a/AixLib/Fluid/HeatExchangers/Examples/BaseClasses/package.order b/AixLib/Fluid/HeatExchangers/Examples/BaseClasses/package.order
index c707c5f8a6..86b910f7d7 100644
--- a/AixLib/Fluid/HeatExchangers/Examples/BaseClasses/package.order
+++ b/AixLib/Fluid/HeatExchangers/Examples/BaseClasses/package.order
@@ -1 +1,2 @@
+EffectivenessNTUMassFlow
Heater
diff --git a/AixLib/Fluid/HeatExchangers/Examples/DryCoilEffectivenessNTUMassFlow.mo b/AixLib/Fluid/HeatExchangers/Examples/DryCoilEffectivenessNTUMassFlow.mo
new file mode 100644
index 0000000000..83e3693a9d
--- /dev/null
+++ b/AixLib/Fluid/HeatExchangers/Examples/DryCoilEffectivenessNTUMassFlow.mo
@@ -0,0 +1,75 @@
+within AixLib.Fluid.HeatExchangers.Examples;
+model DryCoilEffectivenessNTUMassFlow
+ "Model of epsilon-NTU dry coil that tests variable mass flow rates"
+ extends Modelica.Icons.Example;
+ extends
+ AixLib.Fluid.HeatExchangers.Examples.BaseClasses.EffectivenessNTUMassFlow(
+ sou_1(nPorts=1),
+ sin_1(nPorts=1),
+ sou_2(nPorts=1),
+ sin_2(nPorts=1));
+
+ AixLib.Fluid.HeatExchangers.DryCoilEffectivenessNTU hex(
+ redeclare package Medium1 = Medium1,
+ redeclare package Medium2 = Medium2,
+ m1_flow_nominal=m1_flow_nominal,
+ m2_flow_nominal=m2_flow_nominal,
+ dp2_nominal(displayUnit="Pa") = 200,
+ configuration=AixLib.Fluid.Types.HeatExchangerConfiguration.CounterFlow,
+ allowFlowReversal1=true,
+ allowFlowReversal2=true,
+ dp1_nominal(displayUnit="Pa") = 3000,
+ Q_flow_nominal=Q_flow_nominal,
+ T_a1_nominal=T_a1_nominal,
+ T_a2_nominal=T_a2_nominal,
+ show_T=true) annotation (Placement(transformation(extent={{82,20},
+ {102,40}})));
+
+ AixLib.Fluid.Sensors.RelativeHumidityTwoPort senRelHum(
+ redeclare package Medium =
+ Medium2, m_flow_nominal=m2_flow_nominal,
+ initType=Modelica.Blocks.Types.Init.InitialState)
+ annotation (Placement(transformation(extent={{60,14},{40,34}})));
+equation
+ connect(sou_1.ports[1], hex.port_a1) annotation (Line(
+ points={{18,62},{74,62},{74,36},{82,36}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hex.port_b1, sin_1.ports[1]) annotation (Line(
+ points={{102,36},{112,36},{112,60},{120,60}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hex.port_a2, sou_2.ports[1]) annotation (Line(
+ points={{102,24},{118,24}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(senRelHum.port_a, hex.port_b2) annotation (Line(
+ points={{60,24},{82,24}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(senRelHum.port_b, sin_2.ports[1]) annotation (Line(
+ points={{40,24},{20,24}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ annotation (Diagram(coordinateSystem(preserveAspectRatio=true, extent={{-100,
+ -100},{200,200}})),
+experiment(Tolerance=1e-6, StopTime=3600),
+__Dymola_Commands(file=
+ "modelica://AixLib/Resources/Scripts/Dymola/Fluid/HeatExchangers/Examples/DryCoilEffectivenessNTUMassFlow.mos"
+ "Simulate and plot"),
+Documentation(info="
+
+
+"));
+end DryCoilEffectivenessNTUMassFlow;
diff --git a/AixLib/Fluid/HeatExchangers/Examples/DryCoilEffectivenessNTUPControl.mo b/AixLib/Fluid/HeatExchangers/Examples/DryCoilEffectivenessNTUPControl.mo
new file mode 100644
index 0000000000..078beffa9a
--- /dev/null
+++ b/AixLib/Fluid/HeatExchangers/Examples/DryCoilEffectivenessNTUPControl.mo
@@ -0,0 +1,161 @@
+within AixLib.Fluid.HeatExchangers.Examples;
+model DryCoilEffectivenessNTUPControl
+ "Model that demonstrates use of a heat exchanger without condensation that uses the epsilon-NTU relation with feedback control"
+ extends Modelica.Icons.Example;
+
+ package Medium1 = AixLib.Media.Water "Medium model for water";
+ package Medium2 = AixLib.Media.Air "Medium model for air";
+ parameter Modelica.SIunits.Temperature T_a1_nominal = 60+273.15
+ "Temperature at nominal conditions as port a1";
+ parameter Modelica.SIunits.Temperature T_b1_nominal = 50+273.15
+ "Temperature at nominal conditions as port b1";
+ parameter Modelica.SIunits.Temperature T_a2_nominal = 20+273.15
+ "Temperature at nominal conditions as port a2";
+ parameter Modelica.SIunits.Temperature T_b2_nominal = 40+273.15
+ "Temperature at nominal conditions as port b2";
+ parameter Modelica.SIunits.MassFlowRate m1_flow_nominal = 5
+ "Nominal mass flow rate medium 1";
+ parameter Modelica.SIunits.MassFlowRate m2_flow_nominal = m1_flow_nominal*4200/1000*(T_a1_nominal-T_b1_nominal)/(T_b2_nominal-T_a2_nominal)
+ "Nominal mass flow rate medium 2";
+
+ AixLib.Fluid.Sources.Boundary_pT sin_2(
+ redeclare package Medium = Medium2,
+ use_p_in=false,
+ p(displayUnit="Pa") = 101325,
+ T=303.15,
+ nPorts=1) "Boundary condition" annotation (Placement(transformation(extent={{-52,10},
+ {-32,30}})));
+ AixLib.Fluid.Sources.Boundary_pT sou_2(
+ redeclare package Medium = Medium2,
+ nPorts=1,
+ use_p_in=false,
+ use_T_in=false,
+ p(displayUnit="Pa") = 101625,
+ T=T_a2_nominal) "Boundary condition"
+ annotation (Placement(transformation(extent={{140,10},
+ {120,30}})));
+ AixLib.Fluid.Sources.Boundary_pT sin_1(
+ redeclare package Medium = Medium1,
+ use_p_in=false,
+ p=300000,
+ T=293.15,
+ nPorts=1) "Boundary condition"
+ annotation (Placement(transformation(extent={{140,50},{120,70}})));
+ AixLib.Fluid.Sources.Boundary_pT sou_1(
+ redeclare package Medium = Medium1,
+ p=300000 + 9000,
+ nPorts=1,
+ use_T_in=false,
+ T=T_a1_nominal)
+ "Boundary condition"
+ annotation (Placement(transformation(extent={{-50,50},{-30,70}})));
+ AixLib.Fluid.Sensors.TemperatureTwoPort temSen(
+ redeclare package Medium = Medium2,
+ m_flow_nominal=m2_flow_nominal)
+ "Temperature sensor"
+ annotation (Placement(transformation(extent={{40,10},{20,30}})));
+ AixLib.Fluid.Actuators.Valves.TwoWayEqualPercentage val(
+ redeclare package Medium = Medium1,
+ l=0.005,
+ m_flow_nominal=m1_flow_nominal,
+ dpFixed_nominal=2000 + 3000,
+ dpValve_nominal=6000) "Valve"
+ annotation (Placement(transformation(extent={{30,50},{50,70}})));
+ AixLib.Controls.Continuous.LimPID P(
+ controllerType=Modelica.Blocks.Types.SimpleController.PI,
+ Ti=30,
+ k=0.1,
+ Td=1)
+ "Controller"
+ annotation (Placement(transformation(extent={{-24,80},{-4,100}})));
+ Modelica.Blocks.Sources.Pulse TSet(
+ amplitude=5,
+ period=3600,
+ offset=273.15 + 22) "Temperature setpoint"
+ annotation (Placement(transformation(extent={{-70,80},{-50,100}})));
+ AixLib.Fluid.HeatExchangers.DryCoilEffectivenessNTU hex(
+ redeclare package Medium1 = Medium1,
+ redeclare package Medium2 = Medium2,
+ show_T=true,
+ m1_flow_nominal=m1_flow_nominal,
+ m2_flow_nominal=m2_flow_nominal,
+ Q_flow_nominal=m1_flow_nominal*4200*(T_a1_nominal-T_b1_nominal),
+ configuration=AixLib.Fluid.Types.HeatExchangerConfiguration.CounterFlow,
+ T_a1_nominal=T_a1_nominal,
+ T_a2_nominal=T_a2_nominal,
+ dp1_nominal(displayUnit="Pa") = 0,
+ dp2_nominal(displayUnit="Pa") = 200 + 100)
+ "Heat exchanger"
+ annotation (Placement(transformation(extent={{60,16},{80,36}})));
+
+equation
+ connect(val.port_b, hex.port_a1) annotation (Line(points={{50,60},
+ {52,60},{52,32},{60,32}}, color={0,127,255}));
+ connect(sou_1.ports[1], val.port_a) annotation (Line(
+ points={{-30,60},{30,60}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(sou_2.ports[1], hex.port_a2) annotation (Line(
+ points={{120,20},{80,20}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(hex.port_b2, temSen.port_a) annotation (Line(
+ points={{60,20},{40,20}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(TSet.y, P.u_s) annotation (Line(
+ points={{-49,90},{-26,90}},
+ color={0,0,127},
+ smooth=Smooth.None));
+ connect(temSen.T, P.u_m) annotation (Line(
+ points={{30,31},{30,40},{-14,40},{-14,78}},
+ color={0,0,127},
+ smooth=Smooth.None));
+ connect(P.y, val.y) annotation (Line(
+ points={{-3,90},{40,90},{40,72}},
+ color={0,0,127},
+ smooth=Smooth.None));
+ connect(hex.port_b1, sin_1.ports[1]) annotation (Line(
+ points={{80,32},{100,32},{100,60},{120,60}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ connect(temSen.port_b, sin_2.ports[1]) annotation (Line(
+ points={{20,20},{-32,20}},
+ color={0,127,255},
+ smooth=Smooth.None));
+ annotation(Diagram(coordinateSystem(preserveAspectRatio=true, extent={{-100,
+ -100},{200,200}})),
+experiment(Tolerance=1e-6, StopTime=3600),
+__Dymola_Commands(file=
+ "modelica://AixLib/Resources/Scripts/Dymola/Fluid/HeatExchangers/Examples/DryCoilEffectivenessNTUPControl.mos"
+ "Simulate and plot"),
+Documentation(info="
+
+First implementation.
+
+
+"));
+end DryCoilEffectivenessNTUPControl;
diff --git a/AixLib/Fluid/HeatExchangers/Examples/DynamicHX.mo b/AixLib/Fluid/HeatExchangers/Examples/DynamicHX.mo
new file mode 100644
index 0000000000..dc9ecd11d6
--- /dev/null
+++ b/AixLib/Fluid/HeatExchangers/Examples/DynamicHX.mo
@@ -0,0 +1,136 @@
+within AixLib.Fluid.HeatExchangers.Examples;
+model DynamicHX
+ "Model that demonstrates use of a simple dynamic heat exchanger"
+ package Medium1 = AixLib.Media.Water "Medium model";
+ import AixLib;
+ extends Modelica.Icons.Example;
+
+ package Medium2 = AixLib.Media.Air "Medium model";
+
+ AixLib.Fluid.Sources.Boundary_pT sin_2(
+ redeclare package Medium = Medium2,
+ use_p_in=true,
+ T=273.15 + 10,
+ X={0.001,0.999},
+ nPorts=1)
+ "Boundary condition"
+ annotation (Placement(transformation(extent={{-58,-10},
+ {-38,10}})));
+ Modelica.Blocks.Sources.Ramp PIn(
+ height=200,
+ duration=60,
+ offset=101325,
+ startTime=50)
+ "Ramp signal for pressure"
+ annotation (Placement(transformation(extent={{-20,-50},{0,-30}})));
+
+ AixLib.Fluid.Sources.Boundary_pT sou_2(
+ redeclare package Medium = Medium2, T=273.15 + 5,
+ use_p_in=true,
+ use_T_in=true,
+ nPorts=1)
+ "Boundary condition"
+ annotation (Placement(transformation(extent={{40,-70}, {60,-50}})));
+
+ Modelica.Blocks.Sources.Ramp TWat(
+ height=10,
+ duration=60,
+ offset=273.15 + 30,
+ startTime=60) "Water temperature"
+ annotation (Placement(transformation(extent={{-100,40},{-80,60}})));
+ Modelica.Blocks.Sources.Constant TDb(k=293.15) "Drybulb temperature"
+ annotation (Placement(transformation(extent={{-20,-90},{0,-70}})));
+
+ Modelica.Blocks.Sources.Constant POut(k=101325) "Pressure"
+ annotation (Placement(transformation(extent={{-100,-2},{-80,18}})));
+
+ AixLib.Fluid.Sources.Boundary_pT sin_1(
+ redeclare package Medium = Medium1,
+ use_p_in=true,
+ p=300000,
+ T=273.15 + 25,
+ nPorts=1)
+ "Boundary condition"
+ annotation (Placement(transformation(extent={{84,2},{64,22}})));
+
+ AixLib.Fluid.Sources.Boundary_pT sou_1(
+ redeclare package Medium = Medium1,
+ p=300000 + 5000,
+ T=273.15 + 50,
+ use_T_in=true,
+ nPorts=1)
+ "Boundary condition"
+ annotation (Placement(transformation(extent={{-60,36}, {-40,56}})));
+
+ Modelica.Blocks.Sources.Trapezoid trapezoid(
+ amplitude=5000,
+ rising=10,
+ width=100,
+ falling=10,
+ period=3600,
+ offset=300000)
+ "Signal for pressure boundary condition"
+ annotation (Placement(transformation(extent={{40,62},{60,82}})));
+ AixLib.Fluid.HeatExchangers.DynamicHX dynamicHX(
+ redeclare package Medium1 = Medium1,
+ redeclare package Medium2 = Medium2,
+ m1_flow_nominal=1,
+ m2_flow_nominal=1,
+ dp1_nominal=5000,
+ dp2_nominal=1000,
+ dT_nom=30,
+ Q_nom=50000) annotation (Placement(transformation(extent={{2,-4},{22,16}})));
+ AixLib.Fluid.Sensors.TemperatureTwoPort THeaOut1(
+ redeclare package Medium = Medium1,
+ m_flow_nominal=1,
+ T_start=289.15) "Outlet temperature of the heater"
+ annotation (Placement(transformation(extent={{32,2},{52,22}})));
+ AixLib.Fluid.Sensors.TemperatureTwoPort THeaOut2(
+ redeclare package Medium = Medium2,
+ m_flow_nominal=1,
+ T_start=289.15) "Outlet temperature of the heater" annotation (Placement(
+ transformation(
+ extent={{-10,-10},{10,10}},
+ rotation=180,
+ origin={-18,0})));
+equation
+ connect(PIn.y,sou_2. p_in) annotation (Line(
+ points={{1,-40},{20,-40},{20,-52},{38,-52}},
+ color={0,0,127}));
+ connect(TDb.y, sou_2.T_in) annotation (Line(points={{1,-80},{20,-80},{20,-56},
+ {38,-56}}, color={0,0,127}));
+ connect(TWat.y, sou_1.T_in)
+ annotation (Line(points={{-79,50},{-70.5,50},{-62,50}},
+ color={0,0,127}));
+ connect(POut.y, sin_2.p_in) annotation (Line(
+ points={{-79,8},{-69.5,8},{-69.5,8},{-60,8}},
+ color={0,0,127}));
+ connect(trapezoid.y, sin_1.p_in) annotation (Line(
+ points={{61,72},{94,72},{94,20},{86,20}},
+ color={0,0,127}));
+ connect(sou_1.ports[1], dynamicHX.port_a1) annotation (Line(points={{-40,46},
+ {-20,46},{-20,12},{2,12}}, color={0,127,255}));
+ connect(sou_2.ports[1], dynamicHX.port_a2) annotation (Line(points={{60,-60},
+ {62,-60},{62,-10},{32,-10},{32,0},{22,0}}, color={0,127,255}));
+ connect(THeaOut1.port_a, dynamicHX.port_b1)
+ annotation (Line(points={{32,12},{22,12}}, color={0,127,255}));
+ connect(THeaOut1.port_b, sin_1.ports[1])
+ annotation (Line(points={{52,12},{64,12}}, color={0,127,255}));
+ connect(dynamicHX.port_b2, THeaOut2.port_a) annotation (Line(points={{2,0},{
+ -4,0},{-4,-1.22125e-015},{-8,-1.22125e-015}}, color={0,127,255}));
+ connect(THeaOut2.port_b, sin_2.ports[1])
+ annotation (Line(points={{-28,0},{-38,0}}, color={0,127,255}));
+ annotation(experiment(Tolerance=1e-6, StopTime=360),
+Documentation(info="
+
+Removed Modelica.Fluid.System
+to address issue
+#311.
+
+Changed pressure sink to mass flow rate sink to avoid an overdetermined
+by consistent set of initial conditions.
+
+Added nominal pressure drop for valve as
+this parameter no longer has a default value.
+
+
+"));
+end DynamicHX;
diff --git a/AixLib/Fluid/HeatExchangers/Examples/package.order b/AixLib/Fluid/HeatExchangers/Examples/package.order
index 6854611565..ff7c28e32a 100644
--- a/AixLib/Fluid/HeatExchangers/Examples/package.order
+++ b/AixLib/Fluid/HeatExchangers/Examples/package.order
@@ -1,6 +1,9 @@
-AirHeater_T
-AirHeater_u
-WaterCooler_T
-WaterHeater_T
-WaterHeater_u
-BaseClasses
+AirHeater_T
+AirHeater_u
+DryCoilEffectivenessNTUMassFlow
+DryCoilEffectivenessNTUPControl
+DynamicHX
+WaterCooler_T
+WaterHeater_T
+WaterHeater_u
+BaseClasses
diff --git a/AixLib/Fluid/HeatExchangers/Radiators/BaseClasses/MultiLayerThermalDelta.mo b/AixLib/Fluid/HeatExchangers/Radiators/BaseClasses/MultiLayerThermalDelta.mo
index 8448ca529e..da36496dab 100644
--- a/AixLib/Fluid/HeatExchangers/Radiators/BaseClasses/MultiLayerThermalDelta.mo
+++ b/AixLib/Fluid/HeatExchangers/Radiators/BaseClasses/MultiLayerThermalDelta.mo
@@ -55,14 +55,13 @@ model MultiLayerThermalDelta "multi layers of heat exchanger"
Modelica.SIunits.Temperature TOut;
Modelica.SIunits.Temperature TRad;
Modelica.SIunits.Temperature TAir;
- AixLib.Utilities.Interfaces.Star radiative annotation (Placement(
- transformation(extent={{22,73},{40,89}}, rotation=0)));
+ AixLib.Utilities.Interfaces.RadPort radiative annotation (Placement(transformation(extent={{22,73},{40,89}}, rotation=0)));
Modelica.Thermal.HeatTransfer.Interfaces.HeatPort_a convective
annotation (Placement(transformation(extent={{-48,74},{-32,88}},
rotation=0)));
- AixLib.Utilities.HeatTransfer.HeatToStar twoStar_RadEx(
- A=(s_eff*Q_dot_nom_i)/((delta_nom)*Modelica.Constants.sigma*eps), eps=1)
- annotation (Placement(transformation(
+ Utilities.HeatTransfer.HeatToStar twoStar_RadEx(A=(s_eff*Q_dot_nom_i)/((
+ delta_nom)*Modelica.Constants.sigma*eps), eps=1) annotation (Placement(
+ transformation(
origin={41,51},
extent={{-11,-23},{11,23}},
rotation=90)));
diff --git a/AixLib/Fluid/HeatExchangers/Radiators/BaseClasses/package.order b/AixLib/Fluid/HeatExchangers/Radiators/BaseClasses/package.order
index ed1d3ae297..e1338c0e42 100644
--- a/AixLib/Fluid/HeatExchangers/Radiators/BaseClasses/package.order
+++ b/AixLib/Fluid/HeatExchangers/Radiators/BaseClasses/package.order
@@ -5,4 +5,4 @@ PressureDropRadiator
RadiatorTypes
RadiatorWall
calcHeaterExcessTemp
-
+RadiatorTypes
diff --git a/AixLib/Fluid/HeatExchangers/Radiators/Examples/Radiator.mo b/AixLib/Fluid/HeatExchangers/Radiators/Examples/Radiator.mo
index a0e10893b9..7caea49e79 100644
--- a/AixLib/Fluid/HeatExchangers/Radiators/Examples/Radiator.mo
+++ b/AixLib/Fluid/HeatExchangers/Radiators/Examples/Radiator.mo
@@ -1,57 +1,57 @@
-within AixLib.Fluid.HeatExchangers.Radiators.Examples;
-model Radiator "Example for EBC radiator"
- extends Modelica.Icons.Example;
- package Medium = AixLib.Media.Water "Medium model";
- Sources.MassFlowSource_T source(redeclare package Medium = Medium,
- nPorts=1,
- m_flow=0.02761,
- T=328.15) annotation (Placement(transformation(extent={{-70,-8},{-50,12}})));
- Sources.FixedBoundary sink(redeclare package Medium = Medium,
- nPorts=1)
- "Sink"
- annotation (Placement(transformation(extent={{98,-10},{78,10}})));
- AixLib.Fluid.HeatExchangers.Radiators.Radiator radiator(
- redeclare package Medium = Medium,
- m_flow_nominal=1,
- selectable=true,
- radiatorType=AixLib.DataBase.Radiators.RadiatorBaseDataDefinition(
- NominalPower=496,
- RT_nom={55,45,20},
- PressureDrop=1017878,
- Exponent=1.2776,
- VolumeWater=3.6,
- MassSteel=17.01,
- length=2.6,
- height=0.3,
- DensitySteel=7900,
- CapacitySteel=551,
- LambdaSteel=60,
- Type=BaseClasses.RadiatorTypes.PanelRadiator10),
- calc_dT=AixLib.Fluid.HeatExchangers.Radiators.BaseClasses.CalcExcessTemp.exp)
- "Radiator"
- annotation (Placement(transformation(extent={{-10,-10},{10,10}})));
- FixedResistances.PressureDrop res(redeclare package Medium = Medium,
- m_flow_nominal=1,
- dp_nominal=100000)
- "Pipe"
- annotation (Placement(transformation(extent={{46,-10},{66,10}})));
- Modelica.Thermal.HeatTransfer.Sources.FixedTemperature convTemp(T=293.15)
- "Convetive heat"
- annotation (Placement(transformation(extent={{-30,42},{-10,62}})));
- Modelica.Thermal.HeatTransfer.Sources.FixedTemperature radTemp(T=293.15)
- "Radiative heat"
- annotation (Placement(transformation(extent={{30,42},{10,62}})));
-equation
- connect(radiator.port_b, res.port_a)
- annotation (Line(points={{10,0},{10,0},{46,0}}, color={0,127,255}));
- connect(res.port_b, sink.ports[1])
- annotation (Line(points={{66,0},{66,0},{78,0}}, color={0,127,255}));
- connect(radTemp.port, radiator.RadiativeHeat)
- annotation (Line(points={{10,52},{8,52},{8,2},{4,2}}, color={191,0,0}));
- connect(convTemp.port, radiator.ConvectiveHeat) annotation (Line(
- points={{-10,52},{-6,52},{-6,2},{-2,2}}, color={191,0,0}));
- connect(source.ports[1], radiator.port_a)
- annotation (Line(points={{-50,2},{-50,0},{-10,0}}, color={0,127,255}));
- annotation (experiment(StopTime=86400, Interval=600),
- __Dymola_experimentSetupOutput);
-end Radiator;
+within AixLib.Fluid.HeatExchangers.Radiators.Examples;
+model Radiator "Example for EBC radiator"
+ extends Modelica.Icons.Example;
+ package Medium = AixLib.Media.Water "Medium model";
+ Sources.MassFlowSource_T source(redeclare package Medium = Medium,
+ nPorts=1,
+ m_flow=0.02761,
+ T=328.15) annotation (Placement(transformation(extent={{-70,-8},{-50,12}})));
+ Sources.Boundary_pT sink(redeclare package Medium = Medium,
+ nPorts=1)
+ "Sink"
+ annotation (Placement(transformation(extent={{98,-10},{78,10}})));
+ AixLib.Fluid.HeatExchangers.Radiators.Radiator radiator(
+ redeclare package Medium = Medium,
+ m_flow_nominal=1,
+ selectable=true,
+ radiatorType=AixLib.DataBase.Radiators.RadiatorBaseDataDefinition(
+ NominalPower=496,
+ RT_nom=Modelica.SIunits.Conversions.from_degC({55,45,20}),
+ PressureDrop=1017878,
+ Exponent=1.2776,
+ VolumeWater=3.6,
+ MassSteel=17.01,
+ DensitySteel=7900,
+ CapacitySteel=551,
+ LambdaSteel=60,
+ Type=BaseClasses.RadiatorTypes.PanelRadiator10,
+ length=2.6,
+ height=0.3),
+ calc_dT=AixLib.Fluid.HeatExchangers.Radiators.BaseClasses.CalcExcessTemp.exp)
+ "Radiator"
+ annotation (Placement(transformation(extent={{-10,-10},{10,10}})));
+ FixedResistances.PressureDrop res(redeclare package Medium = Medium,
+ m_flow_nominal=1,
+ dp_nominal=100000)
+ "Pipe"
+ annotation (Placement(transformation(extent={{46,-10},{66,10}})));
+ Modelica.Thermal.HeatTransfer.Sources.FixedTemperature convTemp(T=293.15)
+ "Convetive heat"
+ annotation (Placement(transformation(extent={{-30,42},{-10,62}})));
+ Modelica.Thermal.HeatTransfer.Sources.FixedTemperature radTemp(T=293.15)
+ "Radiative heat"
+ annotation (Placement(transformation(extent={{30,42},{10,62}})));
+equation
+ connect(radiator.port_b, res.port_a)
+ annotation (Line(points={{10,0},{10,0},{46,0}}, color={0,127,255}));
+ connect(res.port_b, sink.ports[1])
+ annotation (Line(points={{66,0},{66,0},{78,0}}, color={0,127,255}));
+ connect(radTemp.port, radiator.RadiativeHeat)
+ annotation (Line(points={{10,52},{8,52},{8,2},{4,2}}, color={191,0,0}));
+ connect(convTemp.port, radiator.ConvectiveHeat) annotation (Line(
+ points={{-10,52},{-6,52},{-6,2},{-2,2}}, color={191,0,0}));
+ connect(source.ports[1], radiator.port_a)
+ annotation (Line(points={{-50,2},{-50,0},{-10,0}}, color={0,127,255}));
+ annotation (experiment(StopTime=86400, Interval=600),
+ __Dymola_experimentSetupOutput);
+end Radiator;
diff --git a/AixLib/Fluid/HeatExchangers/Radiators/Radiator.mo b/AixLib/Fluid/HeatExchangers/Radiators/Radiator.mo
index fe159be78f..b8f1124506 100644
--- a/AixLib/Fluid/HeatExchangers/Radiators/Radiator.mo
+++ b/AixLib/Fluid/HeatExchangers/Radiators/Radiator.mo
@@ -74,7 +74,7 @@ model Radiator "Radiator multilayer model"
"Initial temperature, in degrees Celsius"
annotation (Dialog(group="Miscellaneous"));
parameter SIunits.Temperature RT_nom[3]=
- (if selectable then Modelica.SIunits.Conversions.from_degC(radiatorType.RT_nom)
+ (if selectable then radiatorType.RT_nom
else Modelica.SIunits.Conversions.from_degC({75,65,20}))
"Nominal temperatures (TIn, TOut, TAir) according to DIN-EN 442."
annotation (Dialog(group="Miscellaneous",enable=not selectable));
@@ -92,11 +92,7 @@ model Radiator "Radiator multilayer model"
"Convective heat port to room"
annotation (Placement(transformation(extent={{-60,20},{-44,36}}, rotation=
0), iconTransformation(extent={{-30,10},{-10,30}})));
- AixLib.Utilities.Interfaces.Star RadiativeHeat
- "Radiative heat port to room"
- annotation (Placement(
- transformation(extent={{30,12},{50,30}}, rotation=0),
- iconTransformation(extent={{30,10},{50,30}})));
+ AixLib.Utilities.Interfaces.RadPort RadiativeHeat "Radiative heat port to room" annotation (Placement(transformation(extent={{30,12},{50,30}}, rotation=0), iconTransformation(extent={{30,10},{50,30}})));
Sensors.TemperatureTwoPort FlowTemperature(redeclare package
Medium = Medium,
m_flow_nominal=m_flow_nominal)
@@ -477,6 +473,7 @@ appropriately
First implementation.
Transfer to AixLib. Delete
EnergyMeter and additional output T_source
Changed temperature unit according to #734
+
+"));
+end DryCoilEffectivenessNTU;
diff --git a/AixLib/Fluid/HeatExchangers/Validation/package.order b/AixLib/Fluid/HeatExchangers/Validation/package.order
index 91584750f1..157113a911 100644
--- a/AixLib/Fluid/HeatExchangers/Validation/package.order
+++ b/AixLib/Fluid/HeatExchangers/Validation/package.order
@@ -1,4 +1,5 @@
ConstantEffectiveness
+DryCoilEffectivenessNTU
EvaporatorCondenser
HeaterCooler_u
PrescribedOutlet
diff --git a/AixLib/Fluid/HeatExchangers/package.order b/AixLib/Fluid/HeatExchangers/package.order
index e8703f3309..7a776ef041 100644
--- a/AixLib/Fluid/HeatExchangers/package.order
+++ b/AixLib/Fluid/HeatExchangers/package.order
@@ -1,12 +1,15 @@
-ConstantEffectiveness
-EvaporatorCondenser
-HeaterCooler_u
-Heater_T
-PrescribedOutlet
-SensibleCooler_T
-ActiveBeams
-ActiveWalls
-Radiators
-Examples
-Validation
-BaseClasses
+ConstantEffectiveness
+DryCoilEffectivenessNTU
+DynamicHX
+EvaporatorCondenser
+EvaporatorCondenserWithCapacity
+HeaterCooler_u
+Heater_T
+PrescribedOutlet
+SensibleCooler_T
+ActiveBeams
+ActiveWalls
+Radiators
+Examples
+Validation
+BaseClasses
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/CycleHP.mo b/AixLib/Fluid/HeatPumps/BaseClasses/CycleHP.mo
index 35325a52f1..ab205e4e5f 100644
--- a/AixLib/Fluid/HeatPumps/BaseClasses/CycleHP.mo
+++ b/AixLib/Fluid/HeatPumps/BaseClasses/CycleHP.mo
@@ -9,8 +9,8 @@ model CycleHP
annotation(Dialog(group = "Heat Pump cycle", compact = true, descriptionLabel = true, enable=HPctrlType), choices(choice=1
"Polynomial", choice = 2 "Table (only on/off heat pump)", radioButtons = true));
- parameter DataBase.HeatPump.HeatPumpBaseDataDefinition dataTable=
- AixLib.DataBase.HeatPump.EN255.Vitocal350BWH113()
+ parameter DataBase.ThermalMachines.HeatPump.HeatPumpBaseDataDefinition
+ dataTable=AixLib.DataBase.ThermalMachines.HeatPump.EN255.Vitocal350BWH113()
"Look-up table data for on/off heat pump according to EN255/EN14511"
annotation (choicesAllMatching=true, Dialog(enable=HPctrlType and (
capCalcType == 2), group="Capacity data"));
@@ -19,16 +19,15 @@ protected
final parameter Real tableP_ele[:,:]= dataTable.tableP_ele;
public
replaceable function data_poly =
- AixLib.Fluid.HeatPumps.BaseClasses.Functions.Characteristics.ConstantQualityGrade
+ AixLib.DataBase.ThermalMachines.HeatPump.Functions.Characteristics.ConstantQualityGrade
constrainedby
- AixLib.Fluid.HeatPumps.BaseClasses.Functions.Characteristics.PartialBaseFct
+ AixLib.DataBase.ThermalMachines.HeatPump.Functions.Characteristics.PartialBaseFct
"Polynomial heat pump characteristics"
annotation(choicesAllMatching = true,Dialog(enable=(capCalcType==1),group="Capacity data"));
replaceable function Corr_icing =
- AixLib.Fluid.HeatPumps.BaseClasses.Functions.DefrostCorrection.NoModel
- constrainedby
- AixLib.Fluid.HeatPumps.BaseClasses.Functions.DefrostCorrection.PartialBaseFct
+ AixLib.DataBase.ThermalMachines.HeatPump.Functions.DefrostCorrection.NoModel constrainedby
+ AixLib.DataBase.ThermalMachines.HeatPump.Functions.DefrostCorrection.PartialBaseFct
"Frost/Defrost model (only air-to-water heat pumps)"
annotation(choicesAllMatching = true,Dialog(enable=(capCalcType==1),group="Defrosting/Icing correction",tab="Advanced"));
parameter SI.Temperature T_conMax=338.15 "Maximum condenser outlet temperature" annotation(Dialog(group="Heat Pump cycle"));
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/Characteristics/ConstantCoP.mo b/AixLib/Fluid/HeatPumps/BaseClasses/Functions/Characteristics/ConstantCoP.mo
deleted file mode 100644
index 13d1d1f872..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/Characteristics/ConstantCoP.mo
+++ /dev/null
@@ -1,25 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses.Functions.Characteristics;
-function ConstantCoP "Constant CoP and constant electric power"
- extends
- AixLib.Fluid.HeatPumps.BaseClasses.Functions.Characteristics.PartialBaseFct(
- N,
- T_con,
- T_eva,
- mFlow_eva,
- mFlow_con);
- parameter Modelica.SIunits.Power powerCompressor=2000
- "Constant electric power input for compressor";
- parameter Real CoP "Constant CoP";
-algorithm
- Char:= {powerCompressor,powerCompressor*CoP};
-
- annotation (Documentation(info="
-
+Removed Modelica.Fluid.System
+to address issue
+#311.
+
+First implementation.
+
-
-
-"));
-end ConstantCoP;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/Characteristics/ConstantQualityGrade.mo b/AixLib/Fluid/HeatPumps/BaseClasses/Functions/Characteristics/ConstantQualityGrade.mo
deleted file mode 100644
index d99bd984bd..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/Characteristics/ConstantQualityGrade.mo
+++ /dev/null
@@ -1,29 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses.Functions.Characteristics;
-function ConstantQualityGrade
- "Carnot CoP multiplied with constant quality grade and constant electric power"
- extends
- AixLib.Fluid.HeatPumps.BaseClasses.Functions.Characteristics.PartialBaseFct(
- N,
- T_con,
- T_eva,
- mFlow_eva,
- mFlow_con);
- parameter Real qualityGrade=0.3 "Constant quality grade";
- parameter Modelica.SIunits.Power P_com=2000
- "Constant electric power input for compressor";
-protected
- Real CoP_C "Carnot CoP";
-algorithm
- CoP_C:=T_con/(T_con - T_eva);
- Char:= {P_com,P_com*CoP_C*qualityGrade};
-
- annotation (Documentation(info="
-
implemented
-
-
-"));
-end ConstantQualityGrade;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/Characteristics/PartialBaseFct.mo b/AixLib/Fluid/HeatPumps/BaseClasses/Functions/Characteristics/PartialBaseFct.mo
deleted file mode 100644
index 1c1258c780..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/Characteristics/PartialBaseFct.mo
+++ /dev/null
@@ -1,20 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses.Functions.Characteristics;
-partial function PartialBaseFct "Base class for Cycle Characteristic"
- extends Modelica.Icons.Function;
- input Real N;
- input Real T_con;
- input Real T_eva;
- input Real mFlow_eva;
- input Real mFlow_con;
- output Real Char[2];
-
- annotation (Documentation(info="
-
implemented
-
-
-"));
-end PartialBaseFct;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/Characteristics/package.mo b/AixLib/Fluid/HeatPumps/BaseClasses/Functions/Characteristics/package.mo
deleted file mode 100644
index ba624d805b..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/Characteristics/package.mo
+++ /dev/null
@@ -1,7 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses.Functions;
-package Characteristics
- extends Modelica.Icons.Package;
-
-
-
-end Characteristics;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/Characteristics/package.order b/AixLib/Fluid/HeatPumps/BaseClasses/Functions/Characteristics/package.order
deleted file mode 100644
index fef91e64d2..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/Characteristics/package.order
+++ /dev/null
@@ -1,3 +0,0 @@
-ConstantCoP
-ConstantQualityGrade
-PartialBaseFct
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/DefrostCorrection/NoModel.mo b/AixLib/Fluid/HeatPumps/BaseClasses/Functions/DefrostCorrection/NoModel.mo
deleted file mode 100644
index 504321f57b..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/DefrostCorrection/NoModel.mo
+++ /dev/null
@@ -1,18 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses.Functions.DefrostCorrection;
-function NoModel "No model"
- extends
- AixLib.Fluid.HeatPumps.BaseClasses.Functions.DefrostCorrection.PartialBaseFct(
- T_eva);
-
-algorithm
-f_CoPicing:=1;
-
- annotation (Documentation(info="
-
Formatted documentation appropriately
-
-"));
-end NoModel;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/DefrostCorrection/PartialBaseFct.mo b/AixLib/Fluid/HeatPumps/BaseClasses/Functions/DefrostCorrection/PartialBaseFct.mo
deleted file mode 100644
index 767c78c12d..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/DefrostCorrection/PartialBaseFct.mo
+++ /dev/null
@@ -1,15 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses.Functions.DefrostCorrection;
-partial function PartialBaseFct
- "Base class for correction model, icing and defrosting of evaporator"
- extends Modelica.Icons.Function;
- input Real T_eva;
- output Real f_CoPicing;
- annotation (Documentation(info="
-
Formatted documentation appropriately
-
-"));
-end PartialBaseFct;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/DefrostCorrection/WetterAfjei1996.mo b/AixLib/Fluid/HeatPumps/BaseClasses/Functions/DefrostCorrection/WetterAfjei1996.mo
deleted file mode 100644
index e9f2208083..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/DefrostCorrection/WetterAfjei1996.mo
+++ /dev/null
@@ -1,34 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses.Functions.DefrostCorrection;
-function WetterAfjei1996
- "Correction of CoP (Icing, Defrost) according to Wetter,Afjei 1996"
- extends
- AixLib.Fluid.HeatPumps.BaseClasses.Functions.DefrostCorrection.PartialBaseFct(
- T_eva);
-
-parameter Real A=0.03;
-parameter Real B=-0.004;
-parameter Real C=0.1534;
-parameter Real D=0.8869;
-parameter Real E=26.06;
-protected
-Real factor;
-Real linear_term;
-Real gauss_curve;
-algorithm
-linear_term:=A + B*T_eva;
-gauss_curve:=C*Modelica.Math.exp(-(T_eva - D)*(T_eva - D)/E);
-if linear_term>0 then
- factor:=linear_term + gauss_curve;
-else
- factor:=gauss_curve;
-end if;
-f_CoPicing:=1-factor;
- annotation (Documentation(info="
-
Formatted documentation appropriately
-
-"));
-end WetterAfjei1996;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/DefrostCorrection/package.mo b/AixLib/Fluid/HeatPumps/BaseClasses/Functions/DefrostCorrection/package.mo
deleted file mode 100644
index 3d271ac6de..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/DefrostCorrection/package.mo
+++ /dev/null
@@ -1,7 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses.Functions;
-package DefrostCorrection
- extends Modelica.Icons.Package;
-
-
-
-end DefrostCorrection;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/DefrostCorrection/package.order b/AixLib/Fluid/HeatPumps/BaseClasses/Functions/DefrostCorrection/package.order
deleted file mode 100644
index 6446620fe7..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/DefrostCorrection/package.order
+++ /dev/null
@@ -1,3 +0,0 @@
-NoModel
-PartialBaseFct
-WetterAfjei1996
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/IcingFactor/BasicIcingApproach.mo b/AixLib/Fluid/HeatPumps/BaseClasses/Functions/IcingFactor/BasicIcingApproach.mo
deleted file mode 100644
index 253352cbc4..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/IcingFactor/BasicIcingApproach.mo
+++ /dev/null
@@ -1,20 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses.Functions.IcingFactor;
-function BasicIcingApproach
- "A function which utilizes the outdoor air temperature and current heat flow from the evaporator"
- extends PartialBaseFct;
-protected
- Real TEva_m "Medium temperature at evaporator in degC";
- Modelica.SIunits.Time timer = 0 "Timer to reduce icing factor";
- Modelica.SIunits.Time maxTimeNoDefrost = 86400*3 "Maximal time without defrost";
- Real rel_value "Relative value based on time and outside temperature";
- Modelica.SIunits.ThermodynamicTemperature T_flow_ev_crit=273.15;
-algorithm
- //Check if icing is an issue at current Toda (greater 5 degC defrost is not regarded)
- rel_value :=(timer/maxTimeNoDefrost)*(T_flow_ev/T_flow_ev_crit);
- if T_oda < 278.15 then
- iceFac :=sqrt(1-rel_value^2);
- else
- iceFac :=1;
- end if;
-
-end BasicIcingApproach;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/IcingFactor/PartialBaseFct.mo b/AixLib/Fluid/HeatPumps/BaseClasses/Functions/IcingFactor/PartialBaseFct.mo
deleted file mode 100644
index 2042f8edc1..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/IcingFactor/PartialBaseFct.mo
+++ /dev/null
@@ -1,10 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses.Functions.IcingFactor;
-partial function PartialBaseFct "Base function for all icing factor functions"
- extends Modelica.Icons.Function;
- input Modelica.SIunits.ThermodynamicTemperature T_flow_ev;
- input Modelica.SIunits.ThermodynamicTemperature T_ret_ev;
- input Modelica.SIunits.ThermodynamicTemperature T_oda;
- input Modelica.SIunits.MassFlowRate m_flow_ev;
- output Real iceFac;
-
-end PartialBaseFct;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/IcingFactor/package.mo b/AixLib/Fluid/HeatPumps/BaseClasses/Functions/IcingFactor/package.mo
deleted file mode 100644
index 563df9a183..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/IcingFactor/package.mo
+++ /dev/null
@@ -1,3 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses.Functions;
-package IcingFactor "Package with functions to calculate current icing factor on evaporator"
-end IcingFactor;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/IcingFactor/package.order b/AixLib/Fluid/HeatPumps/BaseClasses/Functions/IcingFactor/package.order
deleted file mode 100644
index ac92aa35d8..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/IcingFactor/package.order
+++ /dev/null
@@ -1,2 +0,0 @@
-BasicIcingApproach
-PartialBaseFct
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/package.mo b/AixLib/Fluid/HeatPumps/BaseClasses/Functions/package.mo
deleted file mode 100644
index 76a89c960e..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/package.mo
+++ /dev/null
@@ -1,4 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses;
-package Functions "Functions for AixLib.Fluid.HeatPumps"
-extends Modelica.Icons.Package;
-end Functions;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/package.order b/AixLib/Fluid/HeatPumps/BaseClasses/Functions/package.order
deleted file mode 100644
index 4b9ff6a5eb..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/Functions/package.order
+++ /dev/null
@@ -1,3 +0,0 @@
-Characteristics
-DefrostCorrection
-IcingFactor
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/InnerCycle.mo b/AixLib/Fluid/HeatPumps/BaseClasses/InnerCycle.mo
deleted file mode 100644
index 1ada0a9df9..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/InnerCycle.mo
+++ /dev/null
@@ -1,197 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses;
-model InnerCycle "Blackbox model of refrigerant cycle of a HP"
- replaceable model PerDataHea =
- AixLib.Fluid.HeatPumps.BaseClasses.PerformanceData.BaseClasses.PartialPerformanceData
- constrainedby
- AixLib.Fluid.HeatPumps.BaseClasses.PerformanceData.BaseClasses.PartialPerformanceData(final scalingFactor = scalingFactor)
- "Replaceable model for performance data of HP in heating mode"
- annotation (choicesAllMatching=true);
-
- replaceable model PerDataChi =
- AixLib.Fluid.HeatPumps.BaseClasses.PerformanceData.BaseClasses.PartialPerformanceData
- constrainedby
- AixLib.Fluid.HeatPumps.BaseClasses.PerformanceData.BaseClasses.PartialPerformanceData(final scalingFactor = scalingFactor)
- "Replaceable model for performance data of HP in cooling mode"
- annotation (Dialog(enable=use_revHP),choicesAllMatching=true);
- parameter Boolean use_revHP=true "True if the HP is reversible";
- parameter Real scalingFactor=1 "Scaling factor of heat pump";
- AixLib.Controls.Interfaces.HeatPumpControlBus sigBusHP annotation (Placement(
- transformation(extent={{-16,88},{18,118}}), iconTransformation(extent={{
- -16,88},{18,118}})));
- Modelica.Blocks.Interfaces.RealOutput QCon(unit="W", displayUnit="kW") "Heat Flow to condenser"
- annotation (Placement(transformation(extent={{100,-10},{120,10}})));
- Modelica.Blocks.Interfaces.RealOutput QEva(unit="W", displayUnit="kW") "Heat flow from evaporator"
- annotation (Placement(transformation(extent={{-100,-10},{-120,10}})));
- PerDataHea PerformanceDataHeater
- annotation (Placement(transformation(extent={{13,20},{
- 67,76}}, rotation=0)));
- Utilities.Logical.SmoothSwitch switchQEva(
- u1(unit="W", displayUnit="kW"),
- u3(unit="W", displayUnit="kW"),
- y(unit="W", displayUnit="kW"))
- "If mode is false, Condenser becomes Evaporator and vice versa"
- annotation (Placement(transformation(extent={{-70,-24},{-90,-4}})));
- Utilities.Logical.SmoothSwitch switchQCon( y(unit="W",displayUnit="kW"),
- u1(unit="W", displayUnit="kW"),
- u3(unit="W", displayUnit="kW"))
- "If mode is false, Condenser becomes Evaporator and vice versa"
- annotation (Placement(transformation(extent={{72,-22},{92,-2}})));
- Modelica.Blocks.Interfaces.RealOutput Pel(unit="W", displayUnit="kW")
- "Electrical power consumed by compressor" annotation (Placement(
- transformation(
- extent={{-10.5,-10.5},{10.5,10.5}},
- rotation=-90,
- origin={0.5,-110.5})));
-
- PerDataChi PerformanceDataChiller if use_revHP
- annotation(Placement(transformation(
- extent={{-27,-28},{27,28}},
- rotation=0,
- origin={-46,48})));
-
- AixLib.Utilities.Logical.SmoothSwitch switchPel(
- u1(unit="W", displayUnit="kW"),
- u3(unit="W", displayUnit="kW"),
- y(unit="W", displayUnit="kW"))
- "Whether to use cooling or heating power consumption" annotation (Placement(
- transformation(
- extent={{-10,-10},{10,10}},
- rotation=270,
- origin={0,-76})));
- Modelica.Blocks.Sources.Constant constZero(final k=0) if not use_revHP
- "If no heating is used, the switches may still be connected"
- annotation (Placement(transformation(extent={{-80,-74},{-60,-54}})));
-equation
- assert(use_revHP or (use_revHP==false and sigBusHP.mode==true), "Can't turn to chilling on irreversible HP", level = AssertionLevel.error);
- connect(sigBusHP.mode, switchQEva.u2) annotation (Line(
- points={{1.085,103.075},{1.085,104},{-68,104},{-68,-14}},
- color={255,204,51},
- thickness=0.5), Text(
- string="%first",
- index=-1,
- extent={{-3,6},{-3,6}},
- horizontalAlignment=TextAlignment.Right));
- connect(sigBusHP.mode, switchQCon.u2) annotation (Line(
- points={{1.085,103.075},{1.085,102},{70,102},{70,-12}},
- color={255,204,51},
- thickness=0.5), Text(
- string="%first",
- index=-1,
- extent={{-3,6},{-3,6}},
- horizontalAlignment=TextAlignment.Right));
- connect(sigBusHP, PerformanceDataHeater.sigBusHP) annotation (Line(
- points={{1,103},{1,86},{2,86},{2,86},{38,86},{38,77.12},{40.27,77.12}},
- color={255,204,51},
- thickness=0.5), Text(
- string="%first",
- index=-1,
- extent={{-6,3},{-6,3}},
- horizontalAlignment=TextAlignment.Right));
- connect(switchQEva.y, QEva) annotation (Line(points={{-91,-14},{-92,-14},{-92,
- 0},{-110,0}}, color={0,0,127}));
- connect(PerformanceDataHeater.QCon, switchQCon.u1)
- annotation (Line(points={{18.4,17.2},{18.4,-4},{70,-4}}, color={0,0,127}));
- connect(switchPel.y, Pel) annotation (Line(points={{-2.22045e-015,-87},{-2.22045e-015,
- -110.5},{0.5,-110.5}}, color={0,0,127}));
- connect(sigBusHP.mode, switchPel.u2) annotation (Line(
- points={{1.085,103.075},{1.085,-64},{2.22045e-015,-64}},
- color={255,204,51},
- thickness=0.5), Text(
- string="%first",
- index=-1,
- extent={{-6,3},{-6,3}}));
- connect(PerformanceDataHeater.Pel, switchPel.u1) annotation (Line(points={{40,
- 17.2},{40,-30},{8,-30},{8,-64}}, color={0,0,127}));
- connect(PerformanceDataChiller.Pel, switchPel.u3) annotation (Line(points={{-46,
- 17.2},{-46,-30},{-8,-30},{-8,-64}}, color={0,0,127},
- pattern=LinePattern.Dash));
- connect(PerformanceDataChiller.QCon, switchQCon.u3) annotation (Line(
- points={{-67.6,17.2},{-67.6,4},{-4,4},{-4,-20},{70,-20}},
- color={0,0,127},
- pattern=LinePattern.Dash));
- connect(PerformanceDataHeater.QEva, switchQEva.u1) annotation (Line(points={{61.6,
- 17.2},{61.6,-6},{-68,-6}}, color={0,0,127}));
- connect(PerformanceDataChiller.QEva, switchQEva.u3) annotation (Line(points={{-24.4,
- 17.2},{-24.4,-22},{-68,-22}}, color={0,0,127},
- pattern=LinePattern.Dash));
- connect(sigBusHP, PerformanceDataChiller.sigBusHP) annotation (Line(
- points={{1,103},{1,86},{-45.73,86},{-45.73,77.12}},
- color={255,204,51},
- thickness=0.5), Text(
- string="%first",
- index=-1,
- extent={{-6,3},{-6,3}}));
- connect(constZero.y, switchPel.u3)
- annotation (Line(points={{-59,-64},{-8,-64}}, color={0,0,127}));
- connect(constZero.y, switchQEva.u3) annotation (Line(points={{-59,-64},{-52,
- -64},{-52,-22},{-68,-22}}, color={0,0,127}));
- connect(constZero.y, switchQCon.u3) annotation (Line(points={{-59,-64},{-52,
- -64},{-52,-38},{70,-38},{70,-20}}, color={0,0,127}));
- connect(switchQCon.y, QCon) annotation (Line(points={{93,-12},{94,-12},{94,0},
- {110,0}}, color={0,0,127}));
- annotation (Icon(coordinateSystem(preserveAspectRatio=false), graphics={
- Rectangle(
- extent={{-100,100},{100,-100}},
- lineColor={238,46,47},
- fillColor={0,0,0},
- fillPattern=FillPattern.Solid),
- Ellipse(
- extent={{-24,88},{22,44}},
- lineColor={28,108,200},
- lineThickness=0.5),
- Line(
- points={{-16,82},{20,74}},
- color={28,108,200},
- thickness=0.5),
- Line(
- points={{-18,52},{20,58}},
- color={28,108,200},
- thickness=0.5),
- Rectangle(
- extent={{-98,40},{-60,-28}},
- lineColor={28,108,200},
- lineThickness=0.5),
- Line(
- points={{-20,-60},{-20,-70},{-20,-80},{20,-60},{20,-80},{-20,-60}},
- color={28,108,200},
- thickness=0.5),
- Line(
- points={{-122,34},{-66,34},{-82,10},{-66,-22},{-120,-22}},
- color={28,108,200},
- thickness=0.5),
- Rectangle(
- extent={{60,40},{98,-28}},
- lineColor={28,108,200},
- lineThickness=0.5),
- Line(
- points={{120,34},{64,34},{80,10},{64,-22},{118,-22}},
- color={28,108,200},
- thickness=0.5),
- Line(
- points={{-80,40},{-80,68},{-24,68}},
- color={28,108,200},
- thickness=0.5),
- Line(
- points={{22,66},{80,66},{80,40}},
- color={28,108,200},
- thickness=0.5),
- Line(
- points={{78,-28},{78,-70}},
- color={28,108,200},
- thickness=0.5),
- Line(
- points={{78,-70},{62,-70},{20,-70}},
- color={28,108,200},
- thickness=0.5),
- Line(
- points={{-80,-26},{-80,-68},{-20,-68}},
- color={28,108,200},
- thickness=0.5),
- Text(
- extent={{-30,28},{30,-28}},
- lineColor={28,108,200},
- lineThickness=0.5,
- textString="%name",
- origin={0,-8},
- rotation=90)}), Diagram(coordinateSystem(preserveAspectRatio=false)));
-end InnerCycle;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/InnerCycle_HeatPump.mo b/AixLib/Fluid/HeatPumps/BaseClasses/InnerCycle_HeatPump.mo
new file mode 100644
index 0000000000..6e4cd540e1
--- /dev/null
+++ b/AixLib/Fluid/HeatPumps/BaseClasses/InnerCycle_HeatPump.mo
@@ -0,0 +1,203 @@
+within AixLib.Fluid.HeatPumps.BaseClasses;
+model InnerCycle_HeatPump
+ "Blackbox model of refrigerant cycle of a heat pump"
+ extends AixLib.Fluid.BaseClasses.PartialInnerCycle;
+
+ replaceable model PerDataMainHP =
+ AixLib.DataBase.ThermalMachines.HeatPump.PerformanceData.BaseClasses.PartialPerformanceData
+ constrainedby
+ AixLib.DataBase.ThermalMachines.HeatPump.PerformanceData.BaseClasses.PartialPerformanceData(
+ final scalingFactor = scalingFactor)
+ "Replaceable model for performance data of a heat pump in main operation mode"
+ annotation (choicesAllMatching=true);
+
+ replaceable model PerDataRevHP =
+ AixLib.DataBase.ThermalMachines.Chiller.PerformanceData.BaseClasses.PartialPerformanceData
+ constrainedby
+ AixLib.DataBase.ThermalMachines.Chiller.PerformanceData.BaseClasses.PartialPerformanceData(
+ final scalingFactor = scalingFactor)
+ "Replaceable model for performance data of a heat pump in reversible operation mode"
+ annotation (Dialog(enable=use_rev),choicesAllMatching=true);
+
+ PerDataMainHP PerformanceDataHPHeating
+ annotation (Placement(transformation(
+ extent={{7,20},{61,76}}, rotation=0)));
+ PerDataRevHP PerformanceDataHPCooling if use_rev
+ annotation (Placement(transformation(extent={{-27,-28},{27,28}},
+ rotation=0,origin={-34,48})));
+ Modelica.Blocks.Math.Gain gainEva(final k=-1)
+ "Negate QEva to match definition of heat flow direction" annotation (
+ Placement(transformation(
+ extent={{-4,-4},{4,4}},
+ rotation=180,
+ origin={-56,-6})));
+ Modelica.Blocks.Math.Gain gainCon(final k=-1) if use_rev
+ "Negate QCon to match definition of heat flow direction" annotation (
+ Placement(transformation(
+ extent={{-4,-4},{4,4}},
+ rotation=0,
+ origin={58,-20})));
+
+
+equation
+
+ connect(PerformanceDataHPHeating.QCon, switchQCon.u1)
+ annotation (Line(points={{12.4,17.2},{12.4,-4},{68,-4}}, color={0,0,127}));
+ connect(PerformanceDataHPHeating.Pel, switchPel.u1) annotation (Line(
+ points={{34,17.2},{34,-30},{8,-30},{8,-68}}, color={0,0,127}));
+ connect(PerformanceDataHPCooling.Pel, switchPel.u3) annotation (
+ Line(
+ points={{-34,17.2},{-34,-30},{-8,-30},{-8,-68}},
+ color={0,0,127},
+ pattern=LinePattern.Dash));
+ connect(PerformanceDataHPCooling.QEva, switchQEva.u3) annotation (
+ Line(
+ points={{-12.4,17.2},{-12.4,-22},{-68,-22}},
+ color={0,0,127},
+ pattern=LinePattern.Dash));
+ connect(constZero.y, switchPel.u3)
+ annotation (Line(points={{-59,-68},{-34,-68},{-34,-68},{-8,-68}},
+ color={0,0,127}));
+ connect(constZero.y, switchQEva.u3) annotation (Line(points={{-59,-68},{-52,-68},
+ {-52,-22},{-68,-22}}, color={0,0,127},
+ pattern=LinePattern.Dash));
+ connect(constZero.y, switchQCon.u3) annotation (Line(points={{-59,-68},{-52,-68},
+ {-52,-38},{68,-38},{68,-20}}, color={0,0,127},
+ pattern=LinePattern.Dash));
+ connect(gainEva.y, switchQEva.u1)
+ annotation (Line(points={{-60.4,-6},{-68,-6}}, color={0,0,127}));
+ connect(switchQCon.u3, gainCon.y) annotation (Line(
+ points={{68,-20},{62.4,-20}},
+ color={0,0,127},
+ pattern=LinePattern.Dash));
+ connect(PerformanceDataHPCooling.QCon, gainCon.u) annotation (Line(
+ points={{-55.6,17.2},{-55.6,2},{-24,2},{-24,-20},{53.2,-20}},
+ color={0,0,127},
+ pattern=LinePattern.Dash));
+ connect(PerformanceDataHPHeating.QEva, gainEva.u) annotation (Line(points={{55.6,
+ 17.2},{55.6,-6},{-51.2,-6}}, color={0,0,127}));
+ connect(sigBus, PerformanceDataHPCooling.sigBus) annotation (Line(
+ points={{0,102},{0,86},{-33.73,86},{-33.73,77.12}},
+ color={255,204,51},
+ thickness=0.5));
+ connect(sigBus, PerformanceDataHPHeating.sigBus) annotation (Line(
+ points={{0,102},{0,86},{34.27,86},{34.27,77.12}},
+ color={255,204,51},
+ thickness=0.5));
+ annotation (Icon(coordinateSystem(preserveAspectRatio=false), graphics={
+ Rectangle(
+ extent={{-100,100},{100,-100}},
+ lineColor={238,46,47},
+ fillColor={0,0,0},
+ fillPattern=FillPattern.Solid),
+ Ellipse(
+ extent={{-24,88},{22,44}},
+ lineColor={28,108,200},
+ lineThickness=0.5),
+ Line(
+ points={{-16,82},{20,74}},
+ color={28,108,200},
+ thickness=0.5),
+ Line(
+ points={{-18,52},{20,58}},
+ color={28,108,200},
+ thickness=0.5),
+ Rectangle(
+ extent={{-98,40},{-60,-28}},
+ lineColor={28,108,200},
+ lineThickness=0.5),
+ Line(
+ points={{-20,-60},{-20,-70},{-20,-80},{20,-60},{20,-80},{-20,-60}},
+ color={28,108,200},
+ thickness=0.5),
+ Line(
+ points={{-122,34},{-66,34},{-82,10},{-66,-22},{-120,-22}},
+ color={28,108,200},
+ thickness=0.5),
+ Rectangle(
+ extent={{60,40},{98,-28}},
+ lineColor={28,108,200},
+ lineThickness=0.5),
+ Line(
+ points={{120,34},{64,34},{80,10},{64,-22},{118,-22}},
+ color={28,108,200},
+ thickness=0.5),
+ Line(
+ points={{-80,40},{-80,68},{-24,68}},
+ color={28,108,200},
+ thickness=0.5),
+ Line(
+ points={{22,66},{80,66},{80,40}},
+ color={28,108,200},
+ thickness=0.5),
+ Line(
+ points={{78,-28},{78,-70}},
+ color={28,108,200},
+ thickness=0.5),
+ Line(
+ points={{78,-70},{62,-70},{20,-70}},
+ color={28,108,200},
+ thickness=0.5),
+ Line(
+ points={{-80,-26},{-80,-68},{-20,-68}},
+ color={28,108,200},
+ thickness=0.5),
+ Text(
+ extent={{-30,28},{30,-28}},
+ lineColor={28,108,200},
+ lineThickness=0.5,
+ textString="%name",
+ origin={0,-8},
+ rotation=90)}), Diagram(coordinateSystem(preserveAspectRatio=false)),
+ Documentation(revisions="
Formatted documentation appropriately
+
+", info="
+
+ Rebuild due to the introducion of the thermal machine partial model
+ (see issue #715)
+
+ First implementation (see issue #577)
+
+
+"));
+end InnerCycle_HeatPump;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/BaseClasses/PartialPerformanceData.mo b/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/BaseClasses/PartialPerformanceData.mo
deleted file mode 100644
index 6bc1e0c233..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/BaseClasses/PartialPerformanceData.mo
+++ /dev/null
@@ -1,41 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses.PerformanceData.BaseClasses;
-partial model PartialPerformanceData
- "Model with a replaceable for different methods of data aggregation"
-
- Modelica.Blocks.Interfaces.RealOutput Pel(final unit="W", final displayUnit="kW")
- "Electrical Power consumed by HP" annotation (Placement(
- transformation(
- extent={{-10,-10},{10,10}},
- rotation=270,
- origin={0,-110})));
- Modelica.Blocks.Interfaces.RealOutput QCon(final unit="W", final displayUnit="kW")
- "Heat flow rate through Condenser" annotation (Placement(transformation(
- extent={{-10,-10},{10,10}},
- rotation=270,
- origin={-80,-110})));
- Controls.Interfaces.HeatPumpControlBus sigBusHP annotation (Placement(
- transformation(
- extent={{-15,-14},{15,14}},
- rotation=0,
- origin={1,104})));
- Modelica.Blocks.Interfaces.RealOutput QEva(final unit="W", final displayUnit="kW")
- "Heat flow rate through Condenser" annotation (Placement(
- transformation(
- extent={{-10,-10},{10,10}},
- rotation=270,
- origin={80,-110})));
-protected
- parameter Real scalingFactor=1 "Scaling factor of heat pump";
- annotation (Icon(coordinateSystem(preserveAspectRatio=false), graphics={
- Rectangle(
- extent={{-100,-100},{100,100}},
- lineColor={0,0,127},
- fillColor={255,255,255},
- fillPattern=FillPattern.Solid), Text(
- extent={{-47.5,-26.5},{47.5,26.5}},
- lineColor={0,0,127},
- pattern=LinePattern.Dash,
- textString="%name
-", origin={0.5,60.5},
- rotation=180)}),Diagram(coordinateSystem(preserveAspectRatio=false)));
-end PartialPerformanceData;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/IcingBlock.mo b/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/IcingBlock.mo
deleted file mode 100644
index f0b80f4518..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/IcingBlock.mo
+++ /dev/null
@@ -1,53 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses.PerformanceData;
-model IcingBlock
- "Block which decreases evaporator power by an icing factor"
-
- replaceable function iceFunc =
- AixLib.Fluid.HeatPumps.BaseClasses.Functions.IcingFactor.PartialBaseFct
- constrainedby
- AixLib.Fluid.HeatPumps.BaseClasses.Functions.IcingFactor.PartialBaseFct "Replaceable function to calculate current icing factor" annotation(choicesAllMatching=true);
- Modelica.Blocks.Sources.RealExpression calcIceFac(final y=iceFac_internal)
- annotation (Placement(transformation(extent={{-10,-10},{10,10}})));
- Modelica.Blocks.Interfaces.RealInput T_flow_ev
- "Temperature at evaporator inlet"
- annotation (Placement(transformation(extent={{-128,0},{-100,28}}),
- iconTransformation(extent={{-116,12},{-100,28}})));
-
- Modelica.Blocks.Interfaces.RealInput T_ret_ev
- "Temperature at evaporator outlet" annotation (Placement(transformation(
- extent={{-128,-40},{-100,-12}}),iconTransformation(extent={{-116,-28},
- {-100,-12}})));
- Modelica.Blocks.Interfaces.RealInput T_oda "Outdoor air temperature"
- annotation (Placement(transformation(extent={{-128,46},{-100,74}}),
- iconTransformation(extent={{-116,52},{-100,68}})));
- Modelica.Blocks.Interfaces.RealInput m_flow_ev "Mass flow rate at evaporator"
- annotation (Placement(transformation(extent={{-128,-80},{-100,-52}}),
- iconTransformation(extent={{-116,-68},{-100,-52}})));
- Modelica.Blocks.Interfaces.RealOutput iceFac "Output of current icing factor"
- annotation (Placement(transformation(
- extent={{-10,-10},{10,10}},
- rotation=0,
- origin={110,0})));
-protected
- parameter Real iceFac_default = 1;
- Real iceFac_internal "Calculated value of icing factor";
-equation
- iceFac_internal = iceFunc(T_flow_ev,T_ret_ev,T_oda,m_flow_ev);
- connect(calcIceFac.y, iceFac)
- annotation (Line(points={{11,0},{110,0}}, color={0,0,127}));
- annotation (Icon(coordinateSystem(preserveAspectRatio=false), graphics={
- Text(
- lineColor={0,0,255},
- extent={{-150,105},{150,145}},
- textString="%name"),
- Ellipse(
- lineColor = {108,88,49},
- fillColor = {255,215,136},
- fillPattern = FillPattern.Solid,
- extent = {{-100,-100},{100,100}}),
- Text(
- lineColor={108,88,49},
- extent={{-90.0,-90.0},{90.0,90.0}},
- textString="f")}), Diagram(
- coordinateSystem(preserveAspectRatio=false)));
-end IcingBlock;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/LookUpTable2D.mo b/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/LookUpTable2D.mo
deleted file mode 100644
index fdf190a870..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/LookUpTable2D.mo
+++ /dev/null
@@ -1,213 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses.PerformanceData;
-model LookUpTable2D "Performance data coming from manufacturer"
- extends BaseClasses.PartialPerformanceData;
-
- parameter Modelica.Blocks.Types.Smoothness smoothness=Modelica.Blocks.Types.Smoothness.LinearSegments
- "Smoothness of table interpolation";
- parameter DataBase.HeatPump.HeatPumpBaseDataDefinition dataTable = AixLib.DataBase.HeatPump.EN255.Vitocal350AWI114()
- "Data Table of HP" annotation(choicesAllMatching = true);
-
- Modelica.Blocks.Tables.CombiTable2D Qdot_ConTable(
- tableName="NoName",
- fileName="NoName",
- table=dataTable.tableQdot_con,
- final tableOnFile=false,
- u1(unit="degC"),
- u2(unit="degC"),
- y(unit="W",displayUnit="kW"),
- final smoothness=smoothness)
- annotation (extent=[-60,40; -40,60], Placement(transformation(extent={{-14,-14},
- {14,14}},
- rotation=-90,
- origin={44,34})));
- Modelica.Blocks.Tables.CombiTable2D P_eleTable(
- tableName="NoName",
- fileName="NoName",
- table=dataTable.tableP_ele,
- final tableOnFile=false,
- u1(unit="degC"),
- u2(unit="degC"),
- y(unit="W",displayUnit="kW"),
- final smoothness=smoothness)
- "Electrical power table"
- annotation (extent=[-60,-20; -40,0], Placement(transformation(extent={{-14,-14},
- {14,14}},
- rotation=-90,
- origin={-62,36})));
-
- Modelica.Blocks.Math.UnitConversions.To_degC t_Ev_in
- annotation (extent=[-88,38; -76,50], Placement(transformation(extent={{-6,-6},
- {6,6}},
- rotation=270,
- origin={52,72})));
- Modelica.Blocks.Math.UnitConversions.To_degC t_Co_ou annotation (extent=[-88,38;
- -76,50], Placement(transformation(extent={{-6,-6},{6,6}},
- rotation=270,
- origin={-54,76})));
- Modelica.Blocks.Math.Product nTimesPel annotation (Placement(transformation(
- extent={{-7,-7},{7,7}},
- rotation=-90,
- origin={-47,-3})));
- Modelica.Blocks.Math.Product nTimesQCon annotation (Placement(transformation(
- extent={{-6,-6},{6,6}},
- rotation=-90,
- origin={60,0})));
- Modelica.Blocks.Math.Product proRedQEva
- "Based on the icing factor, the heat flow to the evaporator is reduced"
- annotation (Placement(transformation(
- extent={{-6,-6},{6,6}},
- rotation=270,
- origin={76,-76})));
- Modelica.Blocks.Math.Add calcRedQCon
- "Based on redcued heat flow to the evaporator, the heat flow to the condenser is also reduced"
- annotation (Placement(transformation(
- extent={{-6,-6},{6,6}},
- rotation=270,
- origin={-80,-86})));
- Modelica.Blocks.Logical.GreaterThreshold greaterThreshold(final threshold=
- Modelica.Constants.eps) annotation (Placement(transformation(
- extent={{-6,-6},{6,6}},
- rotation=270,
- origin={-8,78})));
-
- Modelica.Blocks.Math.Gain gain(final k=-1)
- "Negate QEva to match definition of heat flow direction"
- annotation (Placement(transformation(extent={{-4,-4},{4,4}},
- rotation=270,
- origin={76,-92})));
-protected
- Modelica.Blocks.Sources.RealExpression realCorr(final y=scalingFactor*
- sigBusHP.N)
- "Calculates correction of table output based on compressor speed and scaling factor"
- annotation (Placement(transformation(
- extent={{-10,-10},{10,10}},
- rotation=270,
- origin={-14,34})));
-
- Real minSou = min(dataTable.tableP_ele[1,2:end]);
- Real minSup = min(dataTable.tableP_ele[2:end,1]);
- Real maxSou = max(dataTable.tableP_ele[1,2:end]);
- Real maxSup = max(dataTable.tableP_ele[2:end,1]);
- Modelica.Blocks.Math.Feedback feedbackHeatFlowEvaporator
- "Calculates evaporator heat flow with total energy balance" annotation(Placement(transformation(extent={{-10,-10},
- {10,10}},
- rotation=270,
- origin={80,-54})));
- Utilities.Logical.SmoothSwitch switchPel
- "If HP is off, no heat will be exchanged"
- annotation (Placement(transformation(extent={{-10,-10},{10,10}},
- rotation=-90,
- origin={-56,-34})));
- Utilities.Logical.SmoothSwitch switchQCon
- "If HP is off, no heat will be exchanged"
- annotation (Placement(transformation(extent={{-10,-10},{10,10}},
- rotation=-90,
- origin={52,-34})));
- Modelica.Blocks.Sources.Constant constZero(final k=0)
- "Power if HP is turned off"
- annotation (Placement(transformation(extent={{-8,-8},{8,8}},
- rotation=-90,
- origin={6,32})));
-equation
- assert(minSou+273.15 < sigBusHP.T_flow_ev, "Current T_flow_ev is too low. Extrapolation of data will result in unrealistic results", level = AssertionLevel.warning);
- assert(maxSou+273.15 > sigBusHP.T_flow_ev, "Current T_flow_ev is too high. Extrapolation of data will result in unrealistic results", level = AssertionLevel.warning);
- assert(minSup+273.15 < sigBusHP.T_ret_co, "Current T_ret_co is too low. Extrapolation of data will result in unrealistic results", level = AssertionLevel.warning);
- assert(maxSup+273.15 > sigBusHP.T_ret_co, "Current T_ret_co is too high. Extrapolation of data will result in unrealistic results", level = AssertionLevel.warning);
-
- connect(t_Ev_in.y, Qdot_ConTable.u2) annotation (Line(points={{52,65.4},{52,
- 60},{35.6,60},{35.6,50.8}}, color={0,0,127}));
- connect(t_Ev_in.y, P_eleTable.u2) annotation (Line(points={{52,65.4},{-70.4,
- 65.4},{-70.4,52.8}}, color={0,0,127}));
- connect(t_Co_ou.y, P_eleTable.u1) annotation (Line(points={{-54,69.4},{-54,
- 52.8},{-53.6,52.8}}, color={0,0,127}));
- connect(t_Co_ou.y, Qdot_ConTable.u1) annotation (Line(points={{-54,69.4},{-54,
- 60},{52,60},{52,50.8},{52.4,50.8}},
- color={0,0,127}));
- connect(sigBusHP.T_ret_co, t_Co_ou.u) annotation (Line(
- points={{1.075,104.07},{-54,104.07},{-54,83.2}},
- color={255,204,51},
- thickness=0.5), Text(
- string="%first",
- index=-1,
- extent={{-6,3},{-6,3}}));
- connect(sigBusHP.T_flow_ev, t_Ev_in.u) annotation (Line(
- points={{1.075,104.07},{2,104.07},{2,104},{52,104},{52,79.2}},
- color={255,204,51},
- thickness=0.5), Text(
- string="%first",
- index=-1,
- extent={{-6,3},{-6,3}}));
- connect(switchPel.y, Pel) annotation (Line(points={{-56,-45},{-56,-80},{0,-80},
- {0,-110}}, color={0,0,127}));
- connect(constZero.y, switchQCon.u3) annotation (Line(points={{6,23.2},{6,-16},
- {44,-16},{44,-22}}, color={0,0,127}));
- connect(constZero.y, switchPel.u3) annotation (Line(points={{6,23.2},{6,-16},{
- -64,-16},{-64,-22}},
- color={0,0,127}));
- connect(P_eleTable.y, nTimesPel.u2) annotation (Line(points={{-62,20.6},{-62,
- 10},{-51.2,10},{-51.2,5.4}},
- color={0,0,127}));
- connect(nTimesPel.y, switchPel.u1) annotation (Line(points={{-47,-10.7},{-47,
- -20.35},{-48,-20.35},{-48,-22}}, color={0,0,127}));
- connect(Qdot_ConTable.y, nTimesQCon.u1) annotation (Line(points={{44,18.6},{
- 64,18.6},{64,7.2},{63.6,7.2}},color={0,0,127}));
- connect(switchQCon.u1, nTimesQCon.y)
- annotation (Line(points={{60,-22},{60,-6.6}}, color={0,0,127}));
- connect(sigBusHP.iceFac, proRedQEva.u2) annotation (Line(
- points={{1.075,104.07},{2,104.07},{2,46},{18,46},{18,-70},{72.4,-70},{
- 72.4,-68.8}},
- color={255,204,51},
- thickness=0.5), Text(
- string="%first",
- index=-1,
- extent={{-3,6},{-3,6}},
- horizontalAlignment=TextAlignment.Right));
- connect(feedbackHeatFlowEvaporator.y, proRedQEva.u1) annotation (Line(points={{80,-63},
- {80,-68},{79.6,-68},{79.6,-68.8}}, color={0,0,127}));
- connect(switchPel.y, calcRedQCon.u2) annotation (Line(points={{-56,-45},{-82,
- -45},{-82,-78.8},{-83.6,-78.8}}, color={0,0,127}));
- connect(QCon, calcRedQCon.y)
- annotation (Line(points={{-80,-110},{-80,-92.6}}, color={0,0,127}));
- connect(proRedQEva.y, calcRedQCon.u1) annotation (Line(points={{76,-82.6},{66,
- -82.6},{66,-88},{-60,-88},{-60,-62},{-76.4,-62},{-76.4,-78.8}}, color=
- {0,0,127}));
- connect(sigBusHP.N, greaterThreshold.u) annotation (Line(
- points={{1.075,104.07},{-8,104.07},{-8,85.2}},
- color={255,204,51},
- thickness=0.5), Text(
- string="%first",
- index=-1,
- extent={{6,3},{6,3}},
- horizontalAlignment=TextAlignment.Left));
- connect(greaterThreshold.y, switchPel.u2) annotation (Line(points={{-8,71.4},{
- -8,48},{-20,48},{-20,-12},{-56,-12},{-56,-22}}, color={255,0,255}));
- connect(greaterThreshold.y, switchQCon.u2) annotation (Line(points={{-8,71.4},
- {-8,48},{-20,48},{-20,-12},{52,-12},{52,-22}}, color={255,0,255}));
- connect(switchQCon.y, feedbackHeatFlowEvaporator.u1)
- annotation (Line(points={{52,-45},{52,-46},{80,-46}}, color={0,0,127}));
- connect(switchPel.y, feedbackHeatFlowEvaporator.u2)
- annotation (Line(points={{-56,-45},{-56,-54},{72,-54}}, color={0,0,127}));
- connect(realCorr.y, nTimesPel.u1) annotation (Line(points={{-14,23},{-14,12},{
- -42.8,12},{-42.8,5.4}}, color={0,0,127}));
- connect(realCorr.y, nTimesQCon.u2) annotation (Line(points={{-14,23},{-14,12},
- {56.4,12},{56.4,7.2}}, color={0,0,127}));
- connect(proRedQEva.y, gain.u)
- annotation (Line(points={{76,-82.6},{76,-87.2}}, color={0,0,127}));
- connect(QEva, gain.y) annotation (Line(points={{80,-110},{80,-96.4},{76,-96.4}},
- color={0,0,127}));
- annotation (Icon(graphics={
- Line(points={{-60.0,40.0},{-60.0,-40.0},{60.0,-40.0},{60.0,40.0},{30.0,40.0},{30.0,-40.0},{-30.0,-40.0},{-30.0,40.0},{-60.0,40.0},{-60.0,20.0},{60.0,20.0},{60.0,0.0},{-60.0,0.0},{-60.0,-20.0},{60.0,-20.0},{60.0,-40.0},{-60.0,-40.0},{-60.0,40.0},{60.0,40.0},{60.0,-40.0}}),
- Line(points={{0.0,40.0},{0.0,-40.0}}),
- Rectangle(fillColor={255,215,136},
- fillPattern=FillPattern.Solid,
- extent={{-60.0,20.0},{-30.0,40.0}}),
- Rectangle(fillColor={255,215,136},
- fillPattern=FillPattern.Solid,
- extent={{-60.0,0.0},{-30.0,20.0}}),
- Rectangle(fillColor={255,215,136},
- fillPattern=FillPattern.Solid,
- extent={{-60.0,-20.0},{-30.0,0.0}}),
- Rectangle(fillColor={255,215,136},
- fillPattern=FillPattern.Solid,
- extent={{-60.0,-40.0},{-30.0,-20.0}})}));
-end LookUpTable2D;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/LookUpTableND.mo b/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/LookUpTableND.mo
deleted file mode 100644
index 5305849640..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/LookUpTableND.mo
+++ /dev/null
@@ -1,152 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses.PerformanceData;
-model LookUpTableND "N-dimensional table with data for heat pump"
- extends BaseClasses.PartialPerformanceData;
-
-
-
-
- Modelica.Blocks.Math.Gain nConGain(final k=nConv)
- "Convert relative speed n to an absolute value for interpolation in sdf tables"
- annotation (Placement(transformation(
- extent={{-8,-8},{8,8}},
- rotation=-90,
- origin={0,68})));
- Modelica.Blocks.Math.UnitConversions.To_degC t_Ev_in
- annotation (extent=[-88,38; -76,50], Placement(transformation(extent={{-6,-6},
- {6,6}},
- rotation=-90,
- origin={60,40})));
- Modelica.Blocks.Math.UnitConversions.To_degC t_Co_ou annotation (extent=[-88,38;
- -76,50], Placement(transformation(extent={{-6,-6},{6,6}},
- rotation=-90,
- origin={-40,40})));
- Modelica.Blocks.Math.Feedback feedbackHeatFlowEvaporator
- "Calculates evaporator heat flow with total energy balance" annotation(Placement(transformation(extent={{-10,-10},
- {10,10}},
- rotation=-90,
- origin={80,-80})));
- Utilities.Logical.SmoothSwitch switchPel
- "If HP is off, no heat will be exchanged"
- annotation (Placement(transformation(extent={{-10,-10},{10,10}},
- rotation=-90,
- origin={50,-60})));
- Utilities.Logical.SmoothSwitch switchQCon
- "If HP is off, no heat will be exchanged"
- annotation (Placement(transformation(extent={{-10,-10},{10,10}},
- rotation=-90,
- origin={-50,-56})));
- Modelica.Blocks.Sources.Constant constZero(final k=0)
- "Power if HP is turned off"
- annotation (Placement(transformation(extent={{-6,-6},{6,6}},
- rotation=-90,
- origin={-4,-18})));
- SDF.NDTable nDTableQCon(nin=3)
- annotation (Placement(transformation(extent={{-12,-12},{12,12}},
- rotation=-90,
- origin={-42,-10})));
- SDF.NDTable nDTablePel(nin=3)
- annotation (Placement(transformation(extent={{-12,-12},{12,12}},
- rotation=-90,
- origin={58,-8})));
- Modelica.Blocks.Routing.Multiplex3 multiplex3_1(
- final n1=1,
- final n2=1,
- final n3=1) "Concat all inputs into an array"
- annotation (Placement(transformation(extent={{-8,-8},{8,8}},
- rotation=-90,
- origin={0,20})));
- parameter Real nConv=1
- "Gain value multiplied with relative compressor speed n to calculate matching value based on sdf tables";
-equation
- connect(feedbackHeatFlowEvaporator.y, QEva)
- annotation (Line(points={{80,-89},{80,-110}},
- color={0,0,127}));
- connect(switchPel.y, Pel) annotation (Line(points={{50,-71},{50,-76},{0,-76},
- {0,-110}},
- color={0,0,127}));
- connect(switchPel.y, feedbackHeatFlowEvaporator.u1) annotation (Line(points={{50,-71},
- {66,-71},{66,-72},{80,-72}}, color={0,0,127}));
- connect(switchQCon.y, feedbackHeatFlowEvaporator.u2)
- annotation (Line(points={{-50,-67},{-50,-80},{72,-80}},
- color={0,0,127}));
- connect(switchQCon.y, QCon) annotation (Line(points={{-50,-67},{-50,-67},{-50,
- -80},{-80,-80},{-80,-82},{-80,-82},{-80,-110},{-80,-110}},
- color={0,0,127}));
-
- connect(constZero.y, switchQCon.u3) annotation (Line(points={{-4,-24.6},{-4,
- -24},{-4,-24},{-4,-28},{-4,-30},{-58,-30},{-58,-42},{-58,-42},{-58,
- -44},{-58,-44}}, color={0,0,127}));
- connect(constZero.y, switchPel.u3) annotation (Line(points={{-4,-24.6},{-4,
- -30},{42,-30},{42,-48}},
- color={0,0,127}));
- connect(nDTableQCon.y, switchQCon.u1)
- annotation (Line(points={{-42,-23.2},{-42,-44}},
- color={0,0,127}));
- connect(nDTablePel.y, switchPel.u1)
- annotation (Line(points={{58,-21.2},{58,-48}},color={0,0,127}));
- connect(t_Ev_in.y,multiplex3_1. u1[1]) annotation (Line(points={{60,33.4},{8,
- 33.4},{8,29.6},{5.6,29.6}}, color={0,0,127}));
- connect(t_Co_ou.y,multiplex3_1. u3[1]) annotation (Line(points={{-40,33.4},{
- -5.6,33.4},{-5.6,29.6}}, color={0,0,127}));
- connect(multiplex3_1.y, nDTableQCon.u) annotation (Line(points={{-1.55431e-15,
- 11.2},{-1.55431e-15,4.4},{-42,4.4}},
- color={0,0,127}));
- connect(multiplex3_1.y, nDTablePel.u) annotation (Line(points={{-1.77636e-15,
- 11.2},{-1.77636e-15,6.4},{58,6.4}},color={0,0,127}));
- connect(nConGain.y, multiplex3_1.u2[1]) annotation (Line(
- points={{-1.77636e-15,59.2},{-1.77636e-15,60},{0,60},{0,42},{1.77636e-15,
- 42},{1.77636e-15,29.6}},
- color={0,0,127},
- pattern=LinePattern.Dash));
- connect(sigBusHP.T_flow_ev, t_Ev_in.u) annotation (Line(
- points={{1.075,104.07},{60,104.07},{60,54},{60,48},{60,48},{60,47.2}},
- color={255,204,51},
- thickness=0.5), Text(
- string="%first",
- index=-1,
- extent={{-6,3},{-6,3}}));
- connect(sigBusHP.N, nConGain.u) annotation (Line(
- points={{1.075,104.07},{1.77636e-15,104.07},{1.77636e-15,77.6}},
- color={255,204,51},
- thickness=0.5,
- pattern=LinePattern.Dash), Text(
- string="%first",
- index=-1,
- extent={{-6,3},{-6,3}}));
- connect(sigBusHP.T_ret_co, t_Co_ou.u) annotation (Line(
- points={{1.075,104.07},{-40,104.07},{-40,47.2}},
- color={255,204,51},
- thickness=0.5), Text(
- string="%first",
- index=-1,
- extent={{-6,3},{-6,3}}));
- connect(sigBusHP.onOff, switchPel.u2) annotation (Line(
- points={{1.075,104.07},{-78,104.07},{-78,-34},{50,-34},{50,-48}},
- color={255,204,51},
- thickness=0.5), Text(
- string="%first",
- index=-1,
- extent={{-6,3},{-6,3}}));
- connect(sigBusHP.onOff, switchQCon.u2) annotation (Line(
- points={{1.075,104.07},{-78,104.07},{-78,-34},{-50,-34},{-50,-44}},
- color={255,204,51},
- thickness=0.5), Text(
- string="%first",
- index=-1,
- extent={{-6,3},{-6,3}}));
- annotation (Icon(graphics={
- Line(points={{-60.0,40.0},{-60.0,-40.0},{60.0,-40.0},{60.0,40.0},{30.0,40.0},{30.0,-40.0},{-30.0,-40.0},{-30.0,40.0},{-60.0,40.0},{-60.0,20.0},{60.0,20.0},{60.0,0.0},{-60.0,0.0},{-60.0,-20.0},{60.0,-20.0},{60.0,-40.0},{-60.0,-40.0},{-60.0,40.0},{60.0,40.0},{60.0,-40.0}}),
- Line(points={{0.0,40.0},{0.0,-40.0}}),
- Rectangle(fillColor={255,215,136},
- fillPattern=FillPattern.Solid,
- extent={{-60.0,20.0},{-30.0,40.0}}),
- Rectangle(fillColor={255,215,136},
- fillPattern=FillPattern.Solid,
- extent={{-60.0,0.0},{-30.0,20.0}}),
- Rectangle(fillColor={255,215,136},
- fillPattern=FillPattern.Solid,
- extent={{-60.0,-20.0},{-30.0,0.0}}),
- Rectangle(fillColor={255,215,136},
- fillPattern=FillPattern.Solid,
- extent={{-60.0,-40.0},{-30.0,-20.0}})}));
-end LookUpTableND;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/PolynomalApproach.mo b/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/PolynomalApproach.mo
deleted file mode 100644
index aaeb6b0af5..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/PolynomalApproach.mo
+++ /dev/null
@@ -1,37 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses.PerformanceData;
-model PolynomalApproach
- "Calculating heat pump data based on a polynomal approach"
- extends BaseClasses.PartialPerformanceData;
-
- replaceable function PolyData =
- AixLib.Fluid.HeatPumps.BaseClasses.Functions.Characteristics.PartialBaseFct
- "Function to calculate peformance Data" annotation(choicesAllMatching=true);
-protected
- Real Char[2];
-equation
- Char = PolyData(sigBusHP.N,sigBusHP.T_ret_co,sigBusHP.T_flow_ev,sigBusHP.m_flow_co,sigBusHP.m_flow_ev);
- if sigBusHP.N > Modelica.Constants.eps then
- //Get's the data from the signal Bus and calculates the power and heat flow based on the function one chooses.
- QCon = Char[2];
- Pel = Char[1];
- QEva = QCon-Pel;
- else //If heat pump is turned off, all values become zero.
- QCon = 0;
- Pel = 0;
- QEva = 0;
- end if;
- annotation (Icon(graphics={
- Text(
- lineColor={0,0,255},
- extent={{-136,109},{164,149}},
- textString="%name"),
- Ellipse(
- lineColor = {108,88,49},
- fillColor = {255,215,136},
- fillPattern = FillPattern.Solid,
- extent={{-86,-96},{88,64}}),
- Text(
- lineColor={108,88,49},
- extent={{-90,-108},{90,72}},
- textString="f")}));
-end PolynomalApproach;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/calcCOP.mo b/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/calcCOP.mo
deleted file mode 100644
index 1e06f4c72f..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/calcCOP.mo
+++ /dev/null
@@ -1,53 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses.PerformanceData;
-model calcCOP
- "To calculate the COP or EER of a device, this model ensures no integration failure will happen"
-
- parameter Modelica.SIunits.Power lowBouPel "If P_el falls below this value, COP will not be calculated";
- parameter Real T=60 "Time span for average";
-
- Modelica.Blocks.Interfaces.RealInput Pel(final unit="W", final displayUnit=
- "kW")
- "Input for all electrical power consumed by the system"
- annotation (Placement(transformation(extent={{-140,-60},{-100,-20}}),
- iconTransformation(extent={{-140,-60},{-100,-20}})));
- Modelica.Blocks.Interfaces.RealInput QHeat(final unit="W", final displayUnit=
- "kW")
- "Input for all heating power delivered to the system"
- annotation (Placement(transformation(extent={{-140,20},{-100,60}}),
- iconTransformation(extent={{-140,20},{-100,60}})));
- Modelica.Blocks.Interfaces.RealOutput y_COP "Output for calculated COP value"
- annotation (Placement(transformation(extent={{100,-10},{120,10}})));
-protected
- AixLib.Utilities.Math.MovingAverage movAve(final T=T) "To calculate the moving average of Pel values";
-equation
- //Check if any of the two sums are lower than the given threshold. If so, set COP to zero
- if Pel < lowBouPel or QHeat < Modelica.Constants.eps then
- movAve.u = 0;
- else
- movAve.u = QHeat/Pel;
- end if;
- connect(movAve.y, y_COP);
- annotation (Icon(coordinateSystem(preserveAspectRatio=false), graphics={
- Line(
- points={{-82,0},{-12,0}},
- color={28,108,200},
- thickness=0.5),
- Text(
- extent={{-92,32},{-2,12}},
- lineColor={28,108,200},
- lineThickness=0.5,
- textString="QHeat"),
- Text(
- extent={{-92,-8},{-2,-28}},
- lineColor={28,108,200},
- lineThickness=0.5,
- textString="Pel"),
- Line(points={{-6,6},{22,6}}, color={28,108,200}),
- Line(points={{-6,-6},{22,-6}}, color={28,108,200}),
- Text(
- extent={{12,8},{102,-12}},
- lineColor={28,108,200},
- lineThickness=0.5,
- textString="COP")}), Diagram(
- coordinateSystem(preserveAspectRatio=false)));
-end calcCOP;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/package.mo b/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/package.mo
deleted file mode 100644
index 95fdc557ed..0000000000
--- a/AixLib/Fluid/HeatPumps/BaseClasses/PerformanceData/package.mo
+++ /dev/null
@@ -1,3 +0,0 @@
-within AixLib.Fluid.HeatPumps.BaseClasses;
-package PerformanceData "Different blocks to get performance data of heat pumps"
-end PerformanceData;
diff --git a/AixLib/Fluid/HeatPumps/BaseClasses/package.order b/AixLib/Fluid/HeatPumps/BaseClasses/package.order
index 78b95a67cb..8b7dd633de 100644
--- a/AixLib/Fluid/HeatPumps/BaseClasses/package.order
+++ b/AixLib/Fluid/HeatPumps/BaseClasses/package.order
@@ -1,6 +1,3 @@
CycleHP
-EvaporatorCondenserWithCapacity
-InnerCycle
+InnerCycle_HeatPump
PartialWaterToWater
-Functions
-PerformanceData
diff --git a/AixLib/Fluid/HeatPumps/Calibration/BaseClasses/PartialWaterToWater.mo b/AixLib/Fluid/HeatPumps/Calibration/BaseClasses/PartialWaterToWater.mo
index 62c50b918b..f31eb961a9 100644
--- a/AixLib/Fluid/HeatPumps/Calibration/BaseClasses/PartialWaterToWater.mo
+++ b/AixLib/Fluid/HeatPumps/Calibration/BaseClasses/PartialWaterToWater.mo
@@ -36,9 +36,10 @@ model PartialWaterToWater
"De-multiplex"
annotation (Placement(transformation(extent={{-100,0},{-80,20}})));
- AixLib.Fluid.Sources.FixedBoundary sin2(redeclare final package Medium =
- Medium2, nPorts=1) "Boundary condition" annotation (Placement(
- transformation(extent={{-10,-10},{10,10}}, origin={-50,-40})));
+ AixLib.Fluid.Sources.Boundary_pT sin2(
+ redeclare final package Medium = Medium2,
+ nPorts=1) "Boundary condition"
+ annotation (Placement(transformation(extent={{-10,-10},{10,10}}, origin={-50,-40})));
Modelica.Fluid.Sources.MassFlowSource_T Sou(
redeclare final package Medium = Medium2,
nPorts=1,
@@ -46,9 +47,10 @@ model PartialWaterToWater
use_T_in=true)
"Mass flow source"
annotation (Placement(transformation(extent={{60,-16},{40,4}})));
- AixLib.Fluid.Sources.FixedBoundary sin1(redeclare final package Medium =
- Medium1, nPorts=1) "Pressure boundary condition" annotation (Placement(
- transformation(extent={{10,-10},{-10,10}}, origin={50,30})));
+ AixLib.Fluid.Sources.Boundary_pT sin1(
+ redeclare final package Medium = Medium1,
+ nPorts=1) "Pressure boundary condition"
+ annotation (Placement(transformation(extent={{10,-10},{-10,10}}, origin={50,30})));
Modelica.Fluid.Sources.MassFlowSource_T loa(
redeclare final package Medium = Medium1,
@@ -111,6 +113,11 @@ Source and load temperatures and flow rates are read from an external time table
", revisions="
+Replaced fluid source. This is for
+ #1072.
+
First implementation.
+Added start value to avoid warning in JModelica.
+
Removed pressure_error as
this is replaced by
diff --git a/AixLib/Fluid/HeatPumps/Compressors/ScrollCompressor.mo b/AixLib/Fluid/HeatPumps/Compressors/ScrollCompressor.mo
index fa21c10f2a..75048c4e24 100644
--- a/AixLib/Fluid/HeatPumps/Compressors/ScrollCompressor.mo
+++ b/AixLib/Fluid/HeatPumps/Compressors/ScrollCompressor.mo
@@ -32,7 +32,7 @@ model ScrollCompressor
Modelica.SIunits.Power PThe
"Theoretical power consumed by the compressor";
- Modelica.SIunits.Efficiency COP
+ Modelica.SIunits.Efficiency COP(start=5)
"Heating COP of the compressor";
protected
@@ -136,6 +136,10 @@ PhD Thesis. Oklahoma State University. Stillwater, Oklahoma, USA. 2012.
", revisions="
+Added start value to avoid warning in JModelica.
+
Removed pressure_error as
this is replaced by
diff --git a/AixLib/Fluid/HeatPumps/Examples/Carnot_TCon.mo b/AixLib/Fluid/HeatPumps/Examples/Carnot_TCon.mo
index e83f1548d2..b9b373f8e1 100644
--- a/AixLib/Fluid/HeatPumps/Examples/Carnot_TCon.mo
+++ b/AixLib/Fluid/HeatPumps/Examples/Carnot_TCon.mo
@@ -2,8 +2,8 @@ within AixLib.Fluid.HeatPumps.Examples;
model Carnot_TCon
"Test model for heat pump based on Carnot efficiency and condenser outlet temperature control signal"
extends Modelica.Icons.Example;
- package Medium1 = AixLib.Media.Water "Medium model";
- package Medium2 = AixLib.Media.Water "Medium model";
+ package Medium1 = AixLib.Media.Water "Medium model";
+ package Medium2 = AixLib.Media.Water "Medium model";
parameter Modelica.SIunits.TemperatureDifference dTEva_nominal=-5
"Temperature difference evaporator inlet-outlet";
@@ -40,19 +40,6 @@ model Carnot_TCon
use_m_flow_in=true,
T=288.15)
annotation (Placement(transformation(extent={{60,-16},{40,4}})));
- AixLib.Fluid.Sources.FixedBoundary sin1(
- redeclare package Medium = Medium1,
- nPorts=1)
- annotation (Placement(
- transformation(
- extent={{10,-10},{-10,10}},
- origin={50,30})));
- AixLib.Fluid.Sources.FixedBoundary sin2(nPorts=1,
- redeclare package Medium = Medium2)
- annotation (Placement(
- transformation(
- extent={{-10,-10},{10,10}},
- origin={-50,-30})));
Modelica.Blocks.Sources.Ramp TConLvg(
duration=60,
startTime=1800,
@@ -64,6 +51,14 @@ model Carnot_TCon
annotation (Placement(transformation(extent={{34,-88},{54,-68}})));
Modelica.Blocks.Math.Add QEva_flow(k2=-1) "Evaporator heat flow rate"
annotation (Placement(transformation(extent={{32,-48},{52,-28}})));
+ AixLib.Fluid.Sources.Boundary_pT sin2(
+ redeclare package Medium = Medium2,
+ nPorts=1)
+ annotation (Placement(transformation(extent={{-60,-40},{-40,-20}})));
+ AixLib.Fluid.Sources.Boundary_pT sin1(
+ redeclare package Medium = Medium1,
+ nPorts=1)
+ annotation (Placement(transformation(extent={{60,28},{40,48}})));
final parameter Modelica.SIunits.SpecificHeatCapacity cp2_default=
Medium2.specificHeatCapacityCp(Medium2.setState_pTX(
@@ -71,6 +66,7 @@ model Carnot_TCon
Medium2.T_default,
Medium2.X_default))
"Specific heat capacity of medium 2 at default medium state";
+
equation
connect(sou1.ports[1], heaPum.port_a1) annotation (Line(
points={{-40,6},{-10,6}},
@@ -80,24 +76,20 @@ equation
points={{40,-6},{10,-6}},
color={0,127,255},
smooth=Smooth.None));
- connect(sin2.ports[1], heaPum.port_b2) annotation (Line(
- points={{-40,-30},{-16,-30},{-16,-6},{-10,-6}},
- color={0,127,255},
- smooth=Smooth.None));
-
connect(QEva_flow.y,mEva_flow. u) annotation (Line(points={{53,-38},{64,-38},
{64,-58},{24,-58},{24,-78},{32,-78}}, color={0,0,127}));
- connect(heaPum.port_b1, sin1.ports[1]) annotation (Line(points={{10,6},{30,6},
- {30,30},{40,30}}, color={0,127,255}));
connect(TConLvg.y, heaPum.TSet) annotation (Line(points={{-59,50},{-20,50},{
- -20,9},{-12,9}},
- color={0,0,127}));
+ -20,9},{-12,9}}, color={0,0,127}));
connect(mEva_flow.y, sou2.m_flow_in) annotation (Line(points={{55,-78},{74,
-78},{74,-10},{74,2},{62,2}}, color={0,0,127}));
connect(QEva_flow.u1, heaPum.QCon_flow) annotation (Line(points={{30,-32},{20,
-32},{20,9},{11,9}}, color={0,0,127}));
connect(QEva_flow.u2, heaPum.P) annotation (Line(points={{30,-44},{16,-44},{16,
0},{11,0}}, color={0,0,127}));
+ connect(sin2.ports[1], heaPum.port_b2) annotation (Line(points={{-40,-30},{-20,
+ -30},{-20,-6},{-10,-6}}, color={0,127,255}));
+ connect(heaPum.port_b1, sin1.ports[1]) annotation (Line(points={{10,6},{30,6},
+ {30,38},{40,38}}, color={0,127,255}));
annotation (experiment(Tolerance=1e-6, StopTime=3600),
__Dymola_Commands(file="modelica://AixLib/Resources/Scripts/Dymola/Fluid/HeatPumps/Examples/Carnot_TCon.mos"
"Simulate and plot"),
@@ -114,6 +106,11 @@ a temperature difference equal to dTEva_nominal.
revisions="
+Replaced fluid source. This is for
+ #1072.
+
First implementation.
+Replaced fluid source. This is for
+ #1072.
+
Changed sign of dTEva_nominal to be consistent.
Overview
-
+ Overview
+
+
+ revisions="
+"),
+ __Dymola_Commands(file="Modelica://AixLib/Resources/Scripts/Dymola/Fluid/HeatPumps/Examples/HeatPump.mos" "Simulate and plot"),
Icon(coordinateSystem(extent={{-100,-100},{100,80}})));
end HeatPump;
diff --git a/AixLib/Fluid/HeatPumps/Examples/ScrollWaterToWater_OneRoomRadiator.mo b/AixLib/Fluid/HeatPumps/Examples/ScrollWaterToWater_OneRoomRadiator.mo
index 395715c977..16995f76cb 100644
--- a/AixLib/Fluid/HeatPumps/Examples/ScrollWaterToWater_OneRoomRadiator.mo
+++ b/AixLib/Fluid/HeatPumps/Examples/ScrollWaterToWater_OneRoomRadiator.mo
@@ -13,10 +13,14 @@ model ScrollWaterToWater_OneRoomRadiator
"Radiator nominal supply water temperature";
parameter Modelica.SIunits.Temperature TRadRet_nominal = 273.15+45
"Radiator nominal return water temperature";
-
parameter Modelica.SIunits.MassFlowRate mHeaPum_flow_nominal=
Q_flow_nominal/4200/5
"Heat pump nominal mass flow rate";
+ parameter Modelica.SIunits.Volume V=6*10*3 "Room volume";
+ parameter Modelica.SIunits.MassFlowRate mA_flow_nominal = V*6/3600
+ "Nominal mass flow rate";
+ parameter Modelica.SIunits.HeatFlowRate QRooInt_flow = 4000
+ "Internal heat gains of the room";
//------------------------------------------------------------------------------//
AixLib.Fluid.MixingVolumes.MixingVolume vol(
@@ -28,11 +32,6 @@ model ScrollWaterToWater_OneRoomRadiator
Modelica.Thermal.HeatTransfer.Components.ThermalConductor theCon(G=20000/40)
"Thermal conductance with the ambient"
annotation (Placement(transformation(extent={{20,40},{40,60}})));
- parameter Modelica.SIunits.Volume V=6*10*3 "Room volume";
- parameter Modelica.SIunits.MassFlowRate mA_flow_nominal = V*6/3600
- "Nominal mass flow rate";
- parameter Modelica.SIunits.HeatFlowRate QRooInt_flow = 4000
- "Internal heat gains of the room";
Modelica.Thermal.HeatTransfer.Sources.PrescribedHeatFlow preHea
"Prescribed heat flow"
annotation (Placement(transformation(extent={{20,70},{40,90}})));
@@ -54,7 +53,7 @@ model ScrollWaterToWater_OneRoomRadiator
T_b_nominal=TRadRet_nominal,
m_flow_nominal=mHeaPum_flow_nominal,
T_start=TRadSup_nominal) "Radiator"
- annotation (Placement(transformation(extent={{0,-20},{20,0}})));
+ annotation (Placement(transformation(extent={{0,-10},{20,10}})));
AixLib.Fluid.Sensors.TemperatureTwoPort temSup(
redeclare package Medium = MediumW,
m_flow_nominal=mHeaPum_flow_nominal,
@@ -62,7 +61,7 @@ model ScrollWaterToWater_OneRoomRadiator
annotation (Placement(transformation(
extent={{-10,-10},{10,10}},
rotation=90,
- origin={-50,-20})));
+ origin={-70,-20})));
Modelica.Thermal.HeatTransfer.Sensors.TemperatureSensor temRoo
"Room temperature" annotation (Placement(transformation(
extent={{10,-10},{-10,10}},
@@ -78,25 +77,21 @@ model ScrollWaterToWater_OneRoomRadiator
T_start=TRadSup_nominal,
nominalValuesDefineDefaultPressureCurve=true,
use_inputFilter=false,
- energyDynamics=Modelica.Fluid.Types.Dynamics.SteadyState)
- "Pump for radiator side" annotation (Placement(transformation(
+ energyDynamics=Modelica.Fluid.Types.Dynamics.SteadyState) "Pump for radiator side"
+ annotation (Placement(transformation(
extent={{-10,-10},{10,10}},
rotation=90,
- origin={-50,-100})));
+ origin={-70,-110})));
//----------------------------------------------------------------------------//
- AixLib.Fluid.Sources.FixedBoundary preSou(redeclare package Medium = MediumW,
- nPorts=1,
- T=TRadSup_nominal)
- "Source for pressure and to account for thermal expansion of water"
- annotation (Placement(transformation(extent={{90,-140},{70,-120}})));
- AixLib.Fluid.Sensors.TemperatureTwoPort temRet(redeclare package Medium =
- MediumW, m_flow_nominal=mHeaPum_flow_nominal,
- T_start=TRadSup_nominal) "Return water temperature"
- annotation (Placement(transformation(
+ AixLib.Fluid.Sensors.TemperatureTwoPort temRet(
+ redeclare package Medium = MediumW,
+ m_flow_nominal=mHeaPum_flow_nominal,
+ T_start=TRadSup_nominal) "Return water temperature"
+ annotation (Placement(transformation(
extent={{-10,-10},{10,10}},
rotation=270,
- origin={58,-20})));
+ origin={60,-20})));
//------------------------------------------------------------------------------------//
@@ -128,20 +123,8 @@ model ScrollWaterToWater_OneRoomRadiator
datHeaPum=Data.ScrollWaterToWater.Heating.Daikin_WRA072_24kW_4_30COP_R410A(),
T1_start=TRadSup_nominal)
"Heat pump"
- annotation (Placement(transformation(extent={{34,-146},{14,-126}})));
+ annotation (Placement(transformation(extent={{30,-160},{10,-140}})));
- AixLib.Fluid.Sources.FixedBoundary sou(
- redeclare package Medium = MediumW,
- use_T=true,
- nPorts=1,
- T=281.15) "Fluid source on source side"
- annotation (Placement(transformation(extent={{-38,-208},{-18,-188}})));
- AixLib.Fluid.Sources.FixedBoundary sin(
- redeclare package Medium = MediumW,
- use_T=true,
- nPorts=1,
- T=283.15) "Fluid sink on source side"
- annotation (Placement(transformation(extent={{88,-210},{68,-190}})));
AixLib.Fluid.Movers.FlowControlled_m_flow pumHeaPumSou(
redeclare package Medium = MediumW,
y_start=1,
@@ -153,46 +136,63 @@ model ScrollWaterToWater_OneRoomRadiator
"Pump for heat pump source side" annotation (Placement(transformation(
extent={{-10,-10},{10,10}},
rotation=90,
- origin={2,-178})));
+ origin={-30,-180})));
Modelica.Blocks.Logical.Hysteresis hysteresis(
uLow=273.15 + 19,
uHigh=273.15 + 21) "Hysteresis controller"
- annotation (Placement(transformation(
+ annotation (Placement(transformation(
extent={{-10,-10},{10,10}},
- origin={-190,-50})));
+ origin={-190,-40})));
Modelica.Blocks.Logical.Not not2 "Negate output of hysteresis"
annotation (Placement(transformation(extent={{-10,-10},{10,10}},
- origin={-150,-50})));
+ origin={-150,-40})));
Modelica.Blocks.Math.BooleanToReal booToReaPum(realTrue=1, y(start=0))
"Pump signal" annotation (Placement(transformation(
extent={{10,-10},{-10,10}},
rotation=180,
- origin={-110,-100})));
+ origin={-110,-110})));
Modelica.Blocks.Logical.And and1
- annotation (Placement(transformation(extent={{6,-82},{16,-72}})));
+ annotation (Placement(transformation(extent={{-20,-90},{0,-70}})));
Modelica.Blocks.Logical.And and2
- annotation (Placement(transformation(extent={{26,-56},{38,-44}})));
+ annotation (Placement(transformation(extent={{20,-50},{40,-30}})));
Modelica.Blocks.Math.BooleanToReal booToReaPum1(
realTrue=1,
y(start=0))
"Pump signal" annotation (Placement(transformation(
- extent={{5,-5},{-5,5}},
+ extent={{10,-10},{-10,10}},
rotation=90,
- origin={41,-79})));
+ origin={40,-110})));
Modelica.Blocks.Logical.Hysteresis tesConHea(
uHigh=0.25*mHeaPum_flow_nominal,
uLow=0.20*mHeaPum_flow_nominal) "Test for flow rate of condenser pump"
annotation (Placement(transformation(
- extent={{5,-5},{-5,5}},
+ extent={{10,10},{-10,-10}},
rotation=180,
- origin={-31,-77})));
+ origin={-50,-80})));
Modelica.Blocks.Logical.Hysteresis tesEvaPum(
uLow=0.20*mHeaPum_flow_nominal,
uHigh=0.25*mHeaPum_flow_nominal) "Test for flow rate of evaporator pump"
annotation (Placement(transformation(
- extent={{6,-6},{-6,6}},
+ extent={{10,-10},{-10,10}},
rotation=-90,
- origin={0,-102})));
+ origin={-30,-110})));
+ AixLib.Fluid.Sources.Boundary_pT sou(
+ redeclare package Medium = MediumW,
+ T=281.15,
+ nPorts=1) "Fluid source on source side"
+ annotation (Placement(transformation(extent={{-80,-210},{-60,-190}})));
+ AixLib.Fluid.Sources.Boundary_pT sin(
+ redeclare package Medium = MediumW,
+ T=283.15,
+ nPorts=1) "Fluid sink on source side"
+ annotation (Placement(transformation(extent={{80,-210},{60,-190}})));
+ AixLib.Fluid.Sources.Boundary_pT preSou(
+ redeclare package Medium = MediumW,
+ T=TRadSup_nominal,
+ nPorts=1)
+ "Source for pressure and to account for thermal expansion of water"
+ annotation (Placement(transformation(extent={{90,-130},{70,-110}})));
+
equation
connect(theCon.port_b, vol.heatPort) annotation (Line(
points={{40,50},{50,50},{50,30},{60,30}},
@@ -211,7 +211,7 @@ equation
color={0,0,127},
smooth=Smooth.None));
connect(temSup.port_b, rad.port_a) annotation (Line(
- points={{-50,-10},{-5.55112e-016,-10}},
+ points={{-70,-10},{-70,0},{0,0}},
color={0,127,255},
smooth=Smooth.None));
connect(temRoo.port, vol.heatPort) annotation (Line(
@@ -219,20 +219,19 @@ equation
color={191,0,0},
smooth=Smooth.None));
connect(rad.heatPortCon, vol.heatPort) annotation (Line(
- points={{8,-2.8},{8,30},{60,30}},
+ points={{8,7.2},{8,30},{60,30}},
color={191,0,0},
smooth=Smooth.None));
connect(rad.heatPortRad, vol.heatPort) annotation (Line(
- points={{12,-2.8},{12,30},{60,30}},
+ points={{12,7.2},{12,30},{60,30}},
color={191,0,0},
smooth=Smooth.None));
-
connect(weaDat.weaBus, weaBus) annotation (Line(
points={{-200,50},{-150,50}},
color={255,204,51},
thickness=0.5,
smooth=Smooth.None), Text(
- string="%second",
+ textString="%second",
index=1,
extent={{6,3},{6,3}}));
connect(weaBus.TDryBul, TOut.T) annotation (Line(
@@ -240,58 +239,56 @@ equation
color={255,204,51},
thickness=0.5,
smooth=Smooth.None), Text(
- string="%first",
+ textString="%first",
index=-1,
extent={{-6,3},{-6,3}}));
connect(TOut.port, theCon.port_a) annotation (Line(
points={{0,50},{20,50}},
color={191,0,0},
smooth=Smooth.None));
-
- connect(temRet.port_b, heaPum.port_a1) annotation (Line(points={{58,-30},{58,-30},
- {58,-130},{34,-130}}, color={0,127,255}));
- connect(preSou.ports[1], temRet.port_b) annotation (Line(points={{70,-130},{58,
- -130},{58,-30}}, color={0,127,255}));
- connect(sou.ports[1], pumHeaPumSou.port_a) annotation (Line(points={{-18,-198},
- {2,-198},{2,-188}}, color={0,127,255}));
- connect(pumHeaPumSou.port_b, heaPum.port_a2) annotation (Line(points={{2,-168},
- {2,-168},{2,-142},{14,-142}}, color={0,127,255}));
- connect(sin.ports[1], heaPum.port_b2) annotation (Line(points={{68,-200},{42,-200},
- {42,-142},{34,-142}}, color={0,127,255}));
- connect(hysteresis.y, not2.u) annotation (Line(points={{-179,-50},{-179,-50},{
- -162,-50}}, color={255,0,255}));
+ connect(temRet.port_b, heaPum.port_a1) annotation (Line(points={{60,-30},{60,-144},
+ {30,-144}}, color={0,127,255}));
+ connect(pumHeaPumSou.port_b, heaPum.port_a2) annotation (Line(points={{-30,-170},
+ {-30,-156},{10,-156}}, color={0,127,255}));
+ connect(hysteresis.y, not2.u) annotation (Line(points={{-179,-40},{-162,-40}},
+ color={255,0,255}));
connect(temRoo.T, hysteresis.u)
- annotation (Line(points={{-50,30},{-220,30},{-220,30},{-220,-50},{-202,-50},
- {-202,-50}}, color={0,0,127}));
+ annotation (Line(points={{-50,30},{-220,30},{-220,-40},{-202,-40}},
+ color={0,0,127}));
connect(pumHeaPum.port_b, temSup.port_a)
- annotation (Line(points={{-50,-90},{-50,-30}}, color={0,127,255}));
+ annotation (Line(points={{-70,-100},{-70,-30}},color={0,127,255}));
connect(temRet.port_a, rad.port_b)
- annotation (Line(points={{58,-10},{42,-10},{20,-10}}, color={0,127,255}));
- connect(and2.u2, and1.y) annotation (Line(points={{24.8,-54.8},{18,-54.8},{18,
- -77},{16.5,-77}},
- color={255,0,255}));
- connect(booToReaPum1.y, heaPum.y) annotation (Line(points={{41,-84.5},{41,
- -84.5},{41,-133},{36,-133}}, color={0,0,127}));
- connect(booToReaPum1.u, and2.y) annotation (Line(points={{41,-73},{41,-73},{41,
- -50},{38.6,-50}}, color={255,0,255}));
+ annotation (Line(points={{60,-10},{60,0},{20,0}}, color={0,127,255}));
+ connect(booToReaPum1.y, heaPum.y) annotation (Line(points={{40,-121},{40,-147},
+ {32,-147}}, color={0,0,127}));
connect(tesConHea.y, and1.u1)
- annotation (Line(points={{-25.5,-77},{5,-77}}, color={255,0,255}));
- connect(tesEvaPum.y, and1.u2) annotation (Line(points={{1.11022e-15,-95.4},{0,
- -95.4},{0,-81},{5,-81}}, color={255,0,255}));
- connect(pumHeaPum.m_flow_actual, tesConHea.u) annotation (Line(points={{-55,-89},
- {-52,-89},{-52,-78},{-52,-77},{-44,-77},{-37,-77}}, color={0,0,127}));
- connect(pumHeaPumSou.m_flow_actual, tesEvaPum.u) annotation (Line(points={{-3,-167},
- {0,-167},{0,-109.2},{-1.33227e-15,-109.2}}, color={0,0,127}));
- connect(heaPum.port_b1, pumHeaPum.port_a) annotation (Line(points={{14,-130},{
- -10,-130},{-50,-130},{-50,-110}}, color={0,127,255}));
- connect(booToReaPum.y, pumHeaPum.m_flow_in) annotation (Line(points={{-99,-100},
- {-62,-100},{-62,-100}}, color={0,0,127}));
- connect(booToReaPum.y, pumHeaPumSou.m_flow_in) annotation (Line(points={{-99,-100},
- {-80,-100},{-80,-178},{-10,-178}}, color={0,0,127}));
- connect(not2.y, and2.u1) annotation (Line(points={{-139,-50},{24.8,-50},{24.8,
- -50}}, color={255,0,255}));
- connect(not2.y, booToReaPum.u) annotation (Line(points={{-139,-50},{-130,-50},
- {-130,-100},{-122,-100}}, color={255,0,255}));
+ annotation (Line(points={{-39,-80},{-22,-80}}, color={255,0,255}));
+ connect(tesEvaPum.y, and1.u2) annotation (Line(points={{-30,-99},{-30,-88},{-22,
+ -88}}, color={255,0,255}));
+ connect(heaPum.port_b1, pumHeaPum.port_a) annotation (Line(points={{10,-144},{
+ -70,-144},{-70,-120}}, color={0,127,255}));
+ connect(booToReaPum.y, pumHeaPum.m_flow_in) annotation (Line(points={{-99,-110},
+ {-82,-110}}, color={0,0,127}));
+ connect(booToReaPum.y, pumHeaPumSou.m_flow_in) annotation (Line(points={{-99,-110},
+ {-90,-110},{-90,-180},{-42,-180}}, color={0,0,127}));
+ connect(not2.y, and2.u1) annotation (Line(points={{-139,-40},{18,-40}},
+ color={255,0,255}));
+ connect(not2.y, booToReaPum.u) annotation (Line(points={{-139,-40},{-130,-40},
+ {-130,-110},{-122,-110}}, color={255,0,255}));
+ connect(sou.ports[1], pumHeaPumSou.port_a) annotation (Line(points={{-60,-200},
+ {-30,-200},{-30,-190}}, color={0,127,255}));
+ connect(sin.ports[1], heaPum.port_b2) annotation (Line(points={{60,-200},{40,-200},
+ {40,-156},{30,-156}}, color={0,127,255}));
+ connect(pumHeaPum.m_flow_actual, tesConHea.u)
+ annotation (Line(points={{-75,-99},{-75,-80},{-62,-80}}, color={0,0,127}));
+ connect(and1.y, and2.u2) annotation (Line(points={{1,-80},{10,-80},{10,-48},{18,
+ -48}}, color={255,0,255}));
+ connect(pumHeaPumSou.m_flow_actual, tesEvaPum.u) annotation (Line(points={{-35,
+ -169},{-35,-140},{-30,-140},{-30,-122}}, color={0,0,127}));
+ connect(and2.y, booToReaPum1.u) annotation (Line(points={{41,-40},{50,-40},{50,
+ -80},{40,-80},{40,-98}}, color={255,0,255}));
+ connect(preSou.ports[1], temRet.port_b) annotation (Line(points={{70,-120},{60,
+ -120},{60,-30}}, color={0,127,255}));
annotation (Documentation(info="
-
-"), __Dymola_Commands(file="Modelica://AixLib/Resources/Scripts/Dymola/Fluid/HeatPumps/Examples/HeatPump.mos" "Simulate and plot"),
+
- Added missing documentation (see issue 391).
+ May 22, 2019 by Julian Matthes:
+ Rebuild due to the introducion of the thermal machine partial model
+ (see issue #715)
- Implemented especially for comparison to simple heat pump model.
+ November 26, 2018 by Fabian Wüllhorst:
+ First implementation (see issue #577)
+Replaced fluid source. This is for
+ #1072.
+
Changed mass flow test to use a hysteresis as a threshold test
can cause chattering.
diff --git a/AixLib/Fluid/HeatPumps/Examples/package.order b/AixLib/Fluid/HeatPumps/Examples/package.order
index 2567df0595..e4216dd7de 100644
--- a/AixLib/Fluid/HeatPumps/Examples/package.order
+++ b/AixLib/Fluid/HeatPumps/Examples/package.order
@@ -1,6 +1,4 @@
Carnot_TCon
Carnot_y
HeatPump
-HeatPumpDetailed
-HeatPumpSimple
ScrollWaterToWater_OneRoomRadiator
diff --git a/AixLib/Fluid/HeatPumps/HeatPump.mo b/AixLib/Fluid/HeatPumps/HeatPump.mo
index 0a82cd6b41..35fcfb11c9 100644
--- a/AixLib/Fluid/HeatPumps/HeatPump.mo
+++ b/AixLib/Fluid/HeatPumps/HeatPump.mo
@@ -1,531 +1,25 @@
-within AixLib.Fluid.HeatPumps;
-model HeatPump "Base model of realistic heat pump"
- extends AixLib.Fluid.Interfaces.PartialFourPortInterface(
- redeclare final package Medium1 = Medium_con,
- redeclare final package Medium2 = Medium_eva,
- final m1_flow_nominal=mFlow_conNominal,
- final m2_flow_nominal=mFlow_evaNominal,
- final allowFlowReversal1=allowFlowReversalCon,
- final allowFlowReversal2=allowFlowReversalEva,
- final m1_flow_small=1E-4*abs(mFlow_conNominal),
- final m2_flow_small=1E-4*abs(mFlow_evaNominal),
- final show_T=show_TPort);
+within AixLib.Fluid.HeatPumps;
+model HeatPump
+ "Grey-box model for reversible heat pumps using a black-box to simulate the refrigeration cycle"
+ extends AixLib.Fluid.BaseClasses.PartialReversibleThermalMachine(
+ use_rev=true,
+ final machineType = true,
+ redeclare AixLib.Fluid.HeatPumps.BaseClasses.InnerCycle_HeatPump innerCycle(
+ final use_rev=use_rev,
+ final scalingFactor=scalingFactor,
+ redeclare model PerDataMainHP = PerDataMainHP,
+ redeclare model PerDataRevHP = PerDataRevHP));
-//General
- replaceable package Medium_con = Modelica.Media.Air.MoistAir constrainedby
- Modelica.Media.Interfaces.PartialMedium "Medium at sink side"
- annotation (Dialog(tab = "Condenser"),choicesAllMatching=true);
- replaceable package Medium_eva = Modelica.Media.Air.MoistAir constrainedby
- Modelica.Media.Interfaces.PartialMedium "Medium at source side"
- annotation (Dialog(tab = "Evaporator"),choicesAllMatching=true);
- parameter Boolean use_revHP=true "True if the HP is reversible" annotation(choices(choice=true "reversible HP",
- choice=false "only heating",
- radioButtons=true), Dialog(descriptionLabel=true));
- replaceable model PerDataHea =
- AixLib.Fluid.HeatPumps.BaseClasses.PerformanceData.BaseClasses.PartialPerformanceData
- "Performance data of HP in heating mode"
- annotation (choicesAllMatching=true);
- replaceable model PerDataChi =
- AixLib.Fluid.HeatPumps.BaseClasses.PerformanceData.BaseClasses.PartialPerformanceData
- "Performance data of HP in chilling mode"
- annotation (Dialog(enable=use_revHP),choicesAllMatching=true);
-
- parameter Real scalingFactor=1 "Scaling-factor of HP";
- parameter Boolean use_refIne=true
- "Consider the inertia of the refrigerant cycle" annotation(choices(checkBox=true), Dialog(
- group="Refrigerant inertia"));
-
- parameter Modelica.SIunits.Frequency refIneFre_constant
- "Cut off frequency for inertia of refrigerant cycle"
- annotation (Dialog(enable=use_refIne, group="Refrigerant inertia"),Evaluate=true);
- parameter Integer nthOrder=3 "Order of refrigerant cycle interia" annotation (Dialog(enable=
- use_refIne, group="Refrigerant inertia"));
-
-//Condenser
- parameter Modelica.SIunits.MassFlowRate mFlow_conNominal
- "Nominal mass flow rate"
- annotation (Dialog(group="Parameters", tab="Condenser"),Evaluate=true);
- parameter Modelica.SIunits.Volume VCon "Volume in condenser"
- annotation (Evaluate=true,Dialog(group="Parameters", tab="Condenser"));
- parameter Modelica.SIunits.PressureDifference dpCon_nominal
- "Pressure drop at nominal mass flow rate"
- annotation (Dialog(group="Flow resistance", tab="Condenser"), Evaluate=true);
- parameter Real deltaM_con=0.1
- "Fraction of nominal mass flow rate where transition to turbulent occurs"
- annotation (Dialog(tab="Condenser", group="Flow resistance"));
- parameter Boolean use_ConCap=true
- "If heat losses at capacitor side are considered or not"
- annotation (Dialog(group="Heat Losses", tab="Condenser"),
- choices(checkBox=true));
- parameter Modelica.SIunits.HeatCapacity CCon
- "Heat capacity of Condenser (= cp*m)" annotation (Evaluate=true,Dialog(group="Heat Losses",
- tab="Condenser",
- enable=use_ConCap));
- parameter Modelica.SIunits.ThermalConductance GCon
- "Constant thermal conductance of condenser material"
- annotation (Evaluate=true,Dialog(group="Heat Losses", tab="Condenser",
- enable=use_ConCap));
- parameter Modelica.SIunits.ThermalConductance GConIns
- "Constant thermal conductance of condenser material"
- annotation (Evaluate=true,Dialog(group="Heat Losses", tab="Condenser",
- enable=use_ConCap));
-//Evaporator
- parameter Modelica.SIunits.MassFlowRate mFlow_evaNominal
- "Nominal mass flow rate" annotation (Dialog(group="Parameters", tab="Evaporator"),Evaluate=true);
-
- parameter Modelica.SIunits.Volume VEva "Volume in evaporator"
- annotation (Evaluate=true,Dialog(group="Parameters", tab="Evaporator"));
- parameter Modelica.SIunits.PressureDifference dpEva_nominal
- "Pressure drop at nominal mass flow rate"
- annotation (Dialog(group="Flow resistance", tab="Evaporator"),Evaluate=true);
- parameter Real deltaM_eva=0.1
- "Fraction of nominal mass flow rate where transition to turbulent occurs"
- annotation (Dialog(tab="Evaporator", group="Flow resistance"));
- parameter Boolean use_EvaCap=true
- "If heat losses at capacitor side are considered or not"
- annotation (Dialog(group="Heat Losses", tab="Evaporator"),
- choices(checkBox=true));
- parameter Modelica.SIunits.HeatCapacity CEva
- "Heat capacity of Evaporator (= cp*m)"
- annotation (Evaluate=true,Dialog(group="Heat Losses", tab="Evaporator",
- enable=use_EvaCap));
- parameter Modelica.SIunits.ThermalConductance GEva
- "Constant thermal conductance of Evaporator material"
- annotation (Evaluate=true,Dialog(group="Heat Losses", tab="Evaporator",
- enable=use_EvaCap));
- parameter Modelica.SIunits.ThermalConductance GEvaIns
- "Constant thermal conductance of Evaporator material"
- annotation (Evaluate=true,Dialog(group="Heat Losses", tab="Evaporator",
- enable=use_EvaCap));
-//Assumptions
- parameter Boolean allowFlowReversalEva=true
- "= false to simplify equations, assuming, but not enforcing, no flow reversal"
- annotation (Dialog(group="Evaporator", tab="Assumptions"));
- parameter Boolean allowFlowReversalCon=true
- "= false to simplify equations, assuming, but not enforcing, no flow reversal"
- annotation (Dialog(group="Condenser", tab="Assumptions"));
-
- parameter Modelica.SIunits.Time tauSenT=1
- "Time constant at nominal flow rate (use tau=0 for steady-state sensor, but see user guide for potential problems)"
- annotation (Dialog(tab="Assumptions", group="Temperature sensors"));
-
- parameter Boolean transferHeat=true
- "If true, temperature T converges towards TAmb when no flow"
- annotation (Dialog(tab="Assumptions", group="Temperature sensors"),choices(checkBox=true));
- parameter Modelica.SIunits.Time tauHeaTra=1200
- "Time constant for heat transfer in temperature sensors, default 20 minutes"
- annotation (Dialog(tab="Assumptions", group="Temperature sensors"),Evaluate=true);
- parameter Modelica.SIunits.Temperature TAmbCon_nominal=291.15
- "Fixed ambient temperature for heat transfer of sensors at the condenser side" annotation ( Dialog(tab=
- "Assumptions", group=
- "Condenser"));
- parameter Modelica.SIunits.Temperature TAmbEva_nominal=273.15
- "Fixed ambient temperature for heat transfer of sensors at the evaporator side"
- annotation ( Dialog(tab="Assumptions",group="Evaporator"));
-
-//Initialization
- parameter Modelica.Blocks.Types.Init initType=Modelica.Blocks.Types.Init.InitialState
- "Type of initialization (InitialState and InitialOutput are identical)"
- annotation (Dialog(tab="Initialization", group="Parameters"));
- parameter Modelica.Media.Interfaces.Types.AbsolutePressure pCon_start=
- Medium_con.p_default "Start value of pressure"
- annotation (Evaluate=true,Dialog(tab="Initialization", group="Condenser"));
- parameter Modelica.Media.Interfaces.Types.Temperature TCon_start=Medium_con.T_default
- "Start value of temperature"
- annotation (Evaluate=true,Dialog(tab="Initialization", group="Condenser"));
- parameter Modelica.Media.Interfaces.Types.MassFraction XCon_start[Medium_con.nX]=
- Medium_con.X_default "Start value of mass fractions m_i/m"
- annotation (Evaluate=true,Dialog(tab="Initialization", group="Condenser"));
- parameter Modelica.Media.Interfaces.Types.AbsolutePressure pEva_start=
- Medium_eva.p_default "Start value of pressure"
- annotation (Evaluate=true,Dialog(tab="Initialization", group="Evaporator"));
- parameter Modelica.Media.Interfaces.Types.Temperature TEva_start=Medium_eva.T_default
- "Start value of temperature"
- annotation (Evaluate=true,Dialog(tab="Initialization", group="Evaporator"));
- parameter Modelica.Media.Interfaces.Types.MassFraction XEva_start[Medium_eva.nX]=
- Medium_eva.X_default "Start value of mass fractions m_i/m"
- annotation (Evaluate=true,Dialog(tab="Initialization", group="Evaporator"));
- parameter Real x_start[nthOrder]=zeros(nthOrder)
- "Initial or guess values of states"
- annotation (Dialog(tab="Initialization", group="Refrigerant inertia", enable=use_refIne));
- parameter Real yRefIne_start=0 "Initial or guess value of output (= state)"
- annotation (Dialog(tab="Initialization", group="Refrigerant inertia",enable=initType ==
- Init.InitialOutput and use_refIne));
-//Dynamics
- parameter Modelica.Fluid.Types.Dynamics massDynamics=Modelica.Fluid.Types.Dynamics.DynamicFreeInitial
- "Type of mass balance: dynamic (3 initialization options) or steady state"
- annotation (Dialog(tab="Dynamics", group="Equation"));
- parameter Modelica.Fluid.Types.Dynamics energyDynamics=Modelica.Fluid.Types.Dynamics.DynamicFreeInitial
- "Type of energy balance: dynamic (3 initialization options) or steady state"
- annotation (Dialog(tab="Dynamics", group="Equation"));
- parameter Real mSenFacCon=1
- "Factor for scaling the sensible thermal mass of the volume in the condenser"
- annotation (Dialog(tab="Dynamics",group="Condenser"));
- parameter Real mSenFacEva=1
- "Factor for scaling the sensible thermal mass of the volume in the evaporator"
- annotation (Dialog(tab="Dynamics", group="Evaporator"));
-//Advanced
- parameter Boolean show_TPort=false
- "= true, if actual temperature at port is computed"
- annotation(Dialog(tab="Advanced",group="Diagnostics"));
- parameter Boolean from_dp=false
- "= true, use m_flow = f(dp) else dp = f(m_flow)"
- annotation (Dialog(tab="Advanced", group="Flow resistance"));
- parameter Boolean homotopyInitialization=false "= true, use homotopy method"
- annotation (Dialog(tab="Advanced", group="Flow resistance"));
- parameter Boolean linearized=false
- "= true, use linear relation between m_flow and dp for any flow rate"
- annotation (Dialog(tab="Advanced", group="Flow resistance"));
- AixLib.Fluid.HeatPumps.BaseClasses.EvaporatorCondenserWithCapacity con(
- redeclare final package Medium = Medium_con,
- final allowFlowReversal=allowFlowReversalCon,
- final m_flow_small=1E-4*abs(mFlow_conNominal),
- final show_T=show_TPort,
- final deltaM=deltaM_con,
- final dp_nominal=dpCon_nominal,
- final tau=tauSenT,
- final T_start=TCon_start,
- final p_start=pCon_start,
- final kAOut_nominal=GCon,
- final use_cap=use_ConCap,
- final X_start=XCon_start,
- final from_dp=from_dp,
- final homotopyInitialization=homotopyInitialization,
- final massDynamics=massDynamics,
- final energyDynamics=energyDynamics,
- final is_con=true,
- final V=VCon*scalingFactor,
- final C=CCon*scalingFactor,
- final m_flow_nominal=mFlow_conNominal,
- final kAInn=GCon + GConIns*abs(mFlow_con.m_flow/mFlow_conNominal)^0.88)
- "Heat exchanger model for the condenser"
- annotation (Placement(transformation(extent={{-16,76},{16,108}})));
- AixLib.Fluid.HeatPumps.BaseClasses.EvaporatorCondenserWithCapacity eva(
- redeclare final package Medium = Medium_eva,
- final deltaM=deltaM_eva,
- final dp_nominal=dpEva_nominal,
- final use_cap=use_EvaCap,
- final kAOut_nominal=GEva,
- final allowFlowReversal=allowFlowReversalEva,
- final m_flow_small=1E-4*abs(mFlow_evaNominal),
- final show_T=show_TPort,
- final tau=tauSenT,
- final T_start=TEva_start,
- final p_start=pEva_start,
- final X_start=XEva_start,
- final from_dp=from_dp,
- final homotopyInitialization=homotopyInitialization,
- final massDynamics=massDynamics,
- final energyDynamics=energyDynamics,
- final is_con=false,
- final V=VEva*scalingFactor,
- final C=CEva*scalingFactor,
- final m_flow_nominal=mFlow_evaNominal,
- kAInn=GEva + GEvaIns*abs(mFlow_eva.m_flow/mFlow_evaNominal)^0.88)
- "Heat exchanger model for the evaporator"
- annotation (Placement(transformation(extent={{16,-70},{-16,-102}})));
- Modelica.Blocks.Continuous.CriticalDamping heatFlowIneEva(
- final initType=initType,
- final normalized=true,
- final n=nthOrder,
- final f=refIneFre_constant,
- final x_start=x_start,
- final y_start=yRefIne_start) if
- use_refIne
- "This n-th order block represents the inertia of the refrigerant cycle and delays the heat flow"
- annotation (Placement(transformation(
- extent={{6,6},{-6,-6}},
- rotation=90,
- origin={-14,-52})));
- Modelica.Blocks.Routing.RealPassThrough realPassThroughnSetCon if
- not use_refIne
- "Use default nSet value" annotation (Placement(transformation(
- extent={{-6,-6},{6,6}},
- rotation=90,
- origin={16,58})));
- Modelica.Blocks.Continuous.CriticalDamping heatFlowIneCon(
- final initType=initType,
- final normalized=true,
- final n=nthOrder,
- final f=refIneFre_constant,
- final x_start=x_start,
- final y_start=yRefIne_start) if
- use_refIne
- "This n-th order block represents the inertia of the refrigerant cycle and delays the heat flow"
- annotation (Placement(transformation(
- extent={{-6,-6},{6,6}},
- rotation=90,
- origin={-16,58})));
- Modelica.Blocks.Routing.RealPassThrough realPassThroughnSetEva if
- not use_refIne
- "Use default nSet value" annotation (Placement(transformation(
- extent={{6,-6},{-6,6}},
- rotation=90,
- origin={16,-52})));
- Modelica.Blocks.Interfaces.RealInput iceFac_in
- "Input signal for icing factor" annotation (Placement(transformation(
- extent={{-16,-16},{16,16}},
- rotation=90,
- origin={-76,-136})));
- Modelica.Thermal.HeatTransfer.Sources.PrescribedTemperature varTempOutEva if
- use_EvaCap "Foreces heat losses according to ambient temperature"
- annotation (Placement(transformation(
- extent={{-8,-8},{8,8}},
- rotation=180,
- origin={68,-108})));
- Modelica.Thermal.HeatTransfer.Sources.PrescribedTemperature varTempOutCon if
- use_ConCap "Foreces heat losses according to ambient temperature"
- annotation (Placement(transformation(
- extent={{-8,-8},{8,8}},
- rotation=180,
- origin={68,110})));
-
- Modelica.Blocks.Interfaces.RealInput nSet
- "Input signal speed for compressor relative between 0 and 1" annotation (Placement(
- transformation(extent={{-132,4},{-100,36}})));
- AixLib.Controls.Interfaces.HeatPumpControlBus
- sigBusHP
- annotation (Placement(transformation(extent={{-120,-60},{-90,-26}}),
- iconTransformation(extent={{-108,-52},{-90,-26}})));
- AixLib.Fluid.HeatPumps.BaseClasses.InnerCycle innerCycle(redeclare final
- model PerDataHea =
- PerDataHea,
- redeclare final model PerDataChi = PerDataChi,
- final use_revHP=use_revHP,
- final scalingFactor=scalingFactor) annotation (
- Placement(transformation(
- extent={{-27,-26},{27,26}},
- rotation=90,
- origin={0,-1})));
- Modelica.Blocks.Interfaces.RealInput T_amb_eva(final unit="K", final
- displayUnit="degC")
- "Ambient temperature on the evaporator side"
- annotation (Placement(transformation(extent={{10,-10},{-10,10}},
- rotation=0,
- origin={110,-100})));
- Modelica.Blocks.Interfaces.RealInput T_amb_con(final unit="K", final
- displayUnit="degC")
- "Ambient temperature on the condenser side"
- annotation (Placement(transformation(extent={{-10,10},{10,-10}},
- rotation=180,
- origin={110,100})));
-
- Modelica.Blocks.Interfaces.BooleanInput modeSet "Set value of HP mode"
- annotation (Placement(transformation(extent={{-132,-36},{-100,-4}})));
-
- Sensors.TemperatureTwoPort senT_a2(
- redeclare final package Medium = Medium_eva,
- final allowFlowReversal=allowFlowReversalEva,
- final m_flow_nominal=mFlow_evaNominal,
- final m_flow_small=1E-4*mFlow_evaNominal,
- final initType=initType,
- final T_start=TEva_start,
- final transferHeat=transferHeat,
- final TAmb=TAmbEva_nominal,
- final tauHeaTra=tauHeaTra,
- final tau=tauSenT) "Temperature at sink inlet" annotation (
- Placement(transformation(
- extent={{10,-10},{-10,10}},
- rotation=0,
- origin={38,-86})));
- Sensors.TemperatureTwoPort senT_b2(
- redeclare final package Medium = Medium_eva,
- final allowFlowReversal=allowFlowReversalEva,
- final m_flow_nominal=mFlow_evaNominal,
- final m_flow_small=1E-4*mFlow_evaNominal,
- final initType=initType,
- final T_start=TEva_start,
- final transferHeat=transferHeat,
- final TAmb=TAmbEva_nominal,
- final tauHeaTra=tauHeaTra,
- final tau=tauSenT) "Temperature at sink outlet" annotation (
- Placement(transformation(
- extent={{10,-10},{-10,10}},
- rotation=0,
- origin={-52,-86})));
- Sensors.MassFlowRate mFlow_eva(redeclare final package Medium = Medium_eva,
- final allowFlowReversal=allowFlowReversalEva)
- "Mass flow sensor at the evaporator" annotation (Placement(transformation(
- origin={72,-60},
- extent={{10,-10},{-10,10}},
- rotation=0)));
- Sensors.TemperatureTwoPort senT_b1(
- final initType=initType,
- final transferHeat=transferHeat,
- final TAmb=TAmbEva_nominal,
- final tauHeaTra=tauHeaTra,
- redeclare final package Medium = Medium_con,
- final allowFlowReversal=allowFlowReversalCon,
- final m_flow_nominal=mFlow_conNominal,
- final m_flow_small=1E-4*mFlow_conNominal,
- final T_start=TCon_start,
- final tau=tauSenT) "Temperature at sink outlet" annotation (
- Placement(transformation(
- extent={{-10,10},{10,-10}},
- rotation=0,
- origin={38,92})));
- Sensors.TemperatureTwoPort senT_a1(
- final initType=initType,
- final transferHeat=transferHeat,
- final tauHeaTra=tauHeaTra,
- redeclare final package Medium = Medium_con,
- final allowFlowReversal=allowFlowReversalCon,
- final m_flow_nominal=mFlow_conNominal,
- final m_flow_small=1E-4*mFlow_conNominal,
- final T_start=TCon_start,
- final TAmb=TAmbCon_nominal,
- final tau=tauSenT) "Temperature at sink inlet" annotation (
- Placement(transformation(
- extent={{-10,10},{10,-10}},
- rotation=0,
- origin={-34,92})));
- Sensors.MassFlowRate mFlow_con(final allowFlowReversal=allowFlowReversalEva,
- redeclare final package Medium = Medium_con)
- "Mass flow sensor at the evaporator" annotation (Placement(transformation(
- origin={-76,60},
- extent={{-10,10},{10,-10}},
- rotation=0)));
-
-equation
+ replaceable model PerDataMainHP =
+ AixLib.DataBase.ThermalMachines.HeatPump.PerformanceData.BaseClasses.PartialPerformanceData
+ "Performance data of a heat pump in main operation mode"
+ annotation (choicesAllMatching=true);
+ replaceable model PerDataRevHP =
+ AixLib.DataBase.ThermalMachines.Chiller.PerformanceData.BaseClasses.PartialPerformanceData
+ "Performance data of a heat pump in reversible operation mode"
+ annotation (Dialog(enable=use_rev),choicesAllMatching=true);
- connect(modeSet, sigBusHP.mode) annotation (Line(points={{-116,-20},{-76,-20},
- {-76,-42.915},{-104.925,-42.915}}, color={255,0,255}), Text(
- string="%second",
- index=1,
- extent={{6,3},{6,3}},
- horizontalAlignment=TextAlignment.Left));
- connect(innerCycle.Pel, sigBusHP.Pel) annotation (Line(points={{28.73,-0.865},
- {38,-0.865},{38,-36},{-52,-36},{-52,-42.915},{-104.925,-42.915}},
- color={0,0,127}), Text(
- string="%second",
- index=1,
- extent={{6,3},{6,3}}));
- connect(nSet, sigBusHP.N) annotation (Line(points={{-116,20},{-76,20},{-76,-42.915},
- {-104.925,-42.915}},
- color={0,0,127}), Text(
- string="%second",
- index=1,
- extent={{6,3},{6,3}},
- horizontalAlignment=TextAlignment.Left));
- connect(innerCycle.QEva, realPassThroughnSetEva.u) annotation (Line(
- points={{-1.77636e-15,-30.7},{-1.77636e-15,-38},{16,-38},{16,-44.8}},
- color={0,0,127},
- pattern=LinePattern.Dash));
- connect(innerCycle.QEva, heatFlowIneEva.u) annotation (Line(
- points={{-1.77636e-15,-30.7},{-1.77636e-15,-38},{-14,-38},{-14,-44.8}},
- color={0,0,127},
- pattern=LinePattern.Dash));
- connect(innerCycle.QCon, heatFlowIneCon.u) annotation (Line(
- points={{1.77636e-15,28.7},{1.77636e-15,30},{0,30},{0,40},{-16,40},{-16,50.8}},
- color={0,0,127},
- pattern=LinePattern.Dash));
- connect(innerCycle.QCon, realPassThroughnSetCon.u) annotation (Line(
- points={{1.77636e-15,28.7},{0,28.7},{0,40},{16,40},{16,50.8}},
- color={0,0,127},
- pattern=LinePattern.Dash));
- connect(sigBusHP, innerCycle.sigBusHP) annotation (Line(
- points={{-105,-43},{-54,-43},{-54,-0.73},{-26.78,-0.73}},
- color={255,204,51},
- thickness=0.5), Text(
- string="%first",
- index=-1,
- extent={{-6,3},{-6,3}},
- horizontalAlignment=TextAlignment.Right));
- connect(iceFac_in, sigBusHP.iceFac) annotation (Line(points={{-76,-136},{-76,-42.915},
- {-104.925,-42.915}}, color={0,0,127}), Text(
- string="%second",
- index=1,
- extent={{-3,6},{-3,6}},
- horizontalAlignment=TextAlignment.Right));
- connect(T_amb_con, varTempOutCon.T) annotation (Line(
- points={{110,100},{84,100},{84,110},{77.6,110}},
- color={0,0,127},
- pattern=LinePattern.Dash));
- connect(varTempOutCon.port, con.port_out) annotation (Line(
- points={{60,110},{0,110},{0,108}},
- color={191,0,0},
- pattern=LinePattern.Dash));
- connect(T_amb_eva, varTempOutEva.T) annotation (Line(
- points={{110,-100},{94,-100},{94,-108},{77.6,-108}},
- color={0,0,127},
- pattern=LinePattern.Dash));
- connect(eva.port_out, varTempOutEva.port) annotation (Line(
- points={{0,-102},{0,-108},{60,-108}},
- color={191,0,0},
- pattern=LinePattern.Dash));
- connect(port_b2, port_b2) annotation (Line(points={{-100,-60},{-100,-60},{-100,
- -60}}, color={0,127,255}));
- connect(realPassThroughnSetCon.y, con.QFlow_in) annotation (Line(
- points={{16,64.6},{16,75.04},{0,75.04}},
- color={0,0,127},
- pattern=LinePattern.Dash));
- connect(heatFlowIneCon.y, con.QFlow_in) annotation (Line(
- points={{-16,64.6},{-16,75.04},{0,75.04}},
- color={0,0,127},
- pattern=LinePattern.Dash));
- connect(realPassThroughnSetEva.y, eva.QFlow_in) annotation (Line(points={{16,-58.6},
- {16,-69.04},{0,-69.04}}, color={0,0,127}));
- connect(heatFlowIneEva.y, eva.QFlow_in) annotation (Line(points={{-14,-58.6},{
- -14,-69.04},{0,-69.04}}, color={0,0,127}));
- connect(senT_a2.port_b, eva.port_a)
- annotation (Line(points={{28,-86},{16,-86}}, color={0,127,255}));
- connect(senT_b2.port_a, eva.port_b)
- annotation (Line(points={{-42,-86},{-16,-86}}, color={0,127,255}));
- connect(senT_b2.port_b, port_b2) annotation (Line(points={{-62,-86},{-62,-60},
- {-100,-60}}, color={0,127,255}));
- connect(mFlow_eva.port_a, port_a2)
- annotation (Line(points={{82,-60},{100,-60}}, color={0,127,255}));
- connect(mFlow_eva.port_b, senT_a2.port_a) annotation (Line(points={{62,-60},{58,
- -60},{58,-86},{48,-86}}, color={0,127,255}));
- connect(con.port_a, senT_a1.port_b)
- annotation (Line(points={{-16,92},{-24,92}}, color={0,127,255}));
- connect(senT_a1.port_a, mFlow_con.port_b) annotation (Line(points={{-44,92},{
- -56,92},{-56,60},{-66,60}}, color={0,127,255}));
- connect(port_a1, mFlow_con.port_a)
- annotation (Line(points={{-100,60},{-86,60}}, color={0,127,255}));
- connect(con.port_b, senT_b1.port_a)
- annotation (Line(points={{16,92},{28,92}}, color={0,127,255}));
- connect(port_b1, senT_b1.port_b) annotation (Line(points={{100,60},{72,60},{72,
- 92},{48,92}}, color={0,127,255}));
- connect(senT_b2.T, sigBusHP.T_ret_ev) annotation (Line(points={{-52,-75},{-52,
- -42.915},{-104.925,-42.915}}, color={0,0,127}), Text(
- string="%second",
- index=1,
- extent={{-3,6},{-3,6}},
- horizontalAlignment=TextAlignment.Right));
- connect(senT_a2.T, sigBusHP.T_flow_ev) annotation (Line(points={{38,-75},{38,-36},
- {-52,-36},{-52,-42.915},{-104.925,-42.915}}, color={0,0,127}), Text(
- string="%second",
- index=1,
- extent={{-3,6},{-3,6}},
- horizontalAlignment=TextAlignment.Right));
- connect(mFlow_eva.m_flow, sigBusHP.m_flow_ev) annotation (Line(points={{72,-49},
- {72,-36},{-52,-36},{-52,-42.915},{-104.925,-42.915}}, color={0,0,127}),
- Text(
- string="%second",
- index=1,
- extent={{-3,6},{-3,6}},
- horizontalAlignment=TextAlignment.Right));
- connect(senT_b1.T, sigBusHP.T_ret_co) annotation (Line(points={{38,81},{38,-36},
- {-52,-36},{-52,-42.915},{-104.925,-42.915}}, color={0,0,127}), Text(
- string="%second",
- index=1,
- extent={{-3,-6},{-3,-6}},
- horizontalAlignment=TextAlignment.Right));
- connect(senT_a1.T, sigBusHP.T_flow_co) annotation (Line(points={{-34,81},{-34,
- 40},{-76,40},{-76,-42.915},{-104.925,-42.915}}, color={0,0,127}),
- Text(
- string="%second",
- index=1,
- extent={{-3,-6},{-3,-6}},
- horizontalAlignment=TextAlignment.Right));
- connect(mFlow_con.m_flow, sigBusHP.m_flow_co) annotation (Line(points={{-76,
- 49},{-76,-42.915},{-104.925,-42.915}}, color={0,0,127}), Text(
- string="%second",
- index=1,
- extent={{-3,-6},{-3,-6}},
- horizontalAlignment=TextAlignment.Right));
annotation (Icon(coordinateSystem(extent={{-100,-120},{100,120}}), graphics={
Rectangle(
extent={{-16,83},{16,-83}},
@@ -546,8 +40,8 @@ equation
lineColor={28,108,200},
fillColor={215,215,215},
fillPattern=FillPattern.Solid,
- textString="%name
-"), Line(
+ textString="%name"),
+ Line(
points={{-9,40},{9,40},{-5,-2},{9,-40},{-9,-40}},
color={0,0,0},
smooth=Smooth.None,
@@ -571,24 +65,24 @@ equation
points={{43.5,8.3333},{37.5,0.3333},{25.5,-1.667},{33.5,-9.667},{17.5,-11.667},{27.5,-21.667},{13.5,-23.667},
{11.5,-31.667}},
smooth=Smooth.Bezier,
- visible=use_EvaCap),
+ visible=use_evaCap),
Polygon(
points={{-70,-122},{-68,-108},{-58,-114},{-70,-122}},
lineColor={0,0,0},
fillPattern=FillPattern.Solid,
fillColor={0,0,0},
- visible=use_EvaCap),
+ visible=use_evaCap),
Line( origin={40.5,93.667},
points={{39.5,6.333},{37.5,0.3333},{25.5,-1.667},{33.5,-9.667},{17.5,
-11.667},{27.5,-21.667},{13.5,-23.667},{11.5,-27.667}},
smooth=Smooth.Bezier,
- visible=use_ConCap),
+ visible=use_conCap),
Polygon(
points={{86,110},{84,96},{74,102},{86,110}},
lineColor={0,0,0},
fillPattern=FillPattern.Solid,
fillColor={0,0,0},
- visible=use_ConCap),
+ visible=use_conCap),
Line(
points={{-42,72},{34,72}},
color={0,0,0},
@@ -601,5 +95,157 @@ equation
thickness=0.5,
origin={0,-74},
rotation=180)}), Diagram(coordinateSystem(extent={{-100,
- -120},{100,120}})));
+ -120},{100,120}})),
+ Documentation(revisions="
+
+", info="
+
+ Rebuild due to the introducion of the thermal machine partial model
+ (see issue #715)
+
+ First implementation (see issue #577)
+
+
+
+ Concept
+
+
+
+
+
+
+ Parametrization
+
+
+ Assumptions
+
+
+
+
+ Known Limitations
+
+
+
+"));
end HeatPump;
diff --git a/AixLib/Fluid/HeatPumps/Validation/Carnot_TCon_reverseFlow.mo b/AixLib/Fluid/HeatPumps/Validation/Carnot_TCon_reverseFlow.mo
index 02e8e78022..bac2a2cc5b 100644
--- a/AixLib/Fluid/HeatPumps/Validation/Carnot_TCon_reverseFlow.mo
+++ b/AixLib/Fluid/HeatPumps/Validation/Carnot_TCon_reverseFlow.mo
@@ -55,53 +55,47 @@ model Carnot_TCon_reverseFlow
use_T_in=false,
use_m_flow_in=true,
T=288.15)
- annotation (Placement(transformation(extent={{52,-14},{32,6}})));
- Sources.FixedBoundary sin1(
+ annotation (Placement(transformation(extent={{60,-16},{40,4}})));
+ AixLib.Fluid.Sources.Boundary_pT sin1(
redeclare package Medium = Medium1,
nPorts=1)
- annotation (Placement(
- transformation(
- extent={{10,-10},{-10,10}},
- origin={64,32})));
- Sources.FixedBoundary sin2(
+ annotation (Placement(transformation(extent={{10,-10},{-10,10}}, origin={50,30})));
+ AixLib.Fluid.Sources.Boundary_pT sin2(
nPorts=1,
redeclare package Medium = Medium2)
- annotation (Placement(
- transformation(
- extent={{-10,-10},{10,10}},
- origin={-56,-28})));
+ annotation (Placement(transformation(extent={{-10,-10},{10,10}}, origin={-50,-30})));
Modelica.Blocks.Math.Gain mEva_flow(k=-1/cp2_default/dTEva_nominal)
"Evaporator mass flow rate"
- annotation (Placement(transformation(extent={{34,-88},{54,-68}})));
+ annotation (Placement(transformation(extent={{40,-90},{60,-70}})));
Modelica.Blocks.Math.Add QEva_flow(k2=-1) "Evaporator heat flow rate"
- annotation (Placement(transformation(extent={{32,-48},{52,-28}})));
+ annotation (Placement(transformation(extent={{40,-50},{60,-30}})));
equation
connect(sou1.ports[1],heaPum. port_a1) annotation (Line(
points={{-32,6},{-10,6}},
color={0,127,255},
smooth=Smooth.None));
connect(sou2.ports[1],heaPum. port_a2) annotation (Line(
- points={{32,-4},{22,-4},{22,-6},{10,-6}},
+ points={{40,-6},{10,-6}},
color={0,127,255},
smooth=Smooth.None));
connect(sin2.ports[1],heaPum. port_b2) annotation (Line(
- points={{-46,-28},{-16,-28},{-16,-6},{-10,-6}},
+ points={{-40,-30},{-20,-30},{-20,-6},{-10,-6}},
color={0,127,255},
smooth=Smooth.None));
- connect(QEva_flow.y,mEva_flow. u) annotation (Line(points={{53,-38},{64,-38},
- {64,-58},{24,-58},{24,-78},{32,-78}}, color={0,0,127}));
- connect(heaPum.port_b1,sin1. ports[1]) annotation (Line(points={{10,6},{34,6},
- {34,32},{54,32}}, color={0,127,255}));
- connect(mEva_flow.y, sou2.m_flow_in) annotation (Line(points={{55,-78},{74,
- -78},{74,-10},{74,4},{54,4}}, color={0,0,127}));
+ connect(QEva_flow.y,mEva_flow. u) annotation (Line(points={{61,-40},{76,-40},{
+ 76,-60},{20,-60},{20,-80},{38,-80}}, color={0,0,127}));
+ connect(heaPum.port_b1,sin1. ports[1]) annotation (Line(points={{10,6},{30,6},
+ {30,30},{40,30}}, color={0,127,255}));
+ connect(mEva_flow.y, sou2.m_flow_in) annotation (Line(points={{61,-80},{80,-80},
+ {80,2},{62,2}}, color={0,0,127}));
connect(TConLvg.y, heaPum.TSet) annotation (Line(points={{-29,40},{-20,40},{
-20,9},{-12,9}}, color={0,0,127}));
connect(mCon_flow.y, sou1.m_flow_in) annotation (Line(points={{-69,10},{-60,
10},{-60,14},{-54,14}}, color={0,0,127}));
connect(heaPum.QCon_flow, QEva_flow.u1) annotation (Line(points={{11,9},{20,9},
- {20,-32},{30,-32}}, color={0,0,127}));
- connect(QEva_flow.u2, heaPum.P) annotation (Line(points={{30,-44},{16,-44},{
- 16,0},{11,0}}, color={0,0,127}));
+ {20,-34},{38,-34}}, color={0,0,127}));
+ connect(QEva_flow.u2, heaPum.P) annotation (Line(points={{38,-46},{16,-46},{16,
+ 0},{11,0}}, color={0,0,127}));
annotation (experiment(Tolerance=1e-6, StopTime=3600),
__Dymola_Commands(file="modelica://AixLib/Resources/Scripts/Dymola/Fluid/HeatPumps/Validation/Carnot_TCon_reverseFlow.mos"
"Simulate and plot"),
@@ -121,6 +115,11 @@ This example checks the correct behavior if a mass flow rate attains zero.
revisions="
+Replaced fluid source. This is for
+ #1072.
+
First implementation.
+Replaced fluid source. This is for
+ #1072.
+
First implementation.
+Replaced fluid source. This is for
+ #1072.
+
First implementation.
+Replaced fluid source. This is for
+ #1072.
+
First implementation.
+Replaced fluid source. This is for
+ #1072.
+
Changed input signal from ramp to a trapezoid to test switching it off.
+Replaced fluid source. This is for
+ #1072.
+
First implementation.
+Replaced fluid source. This is for
+ #1072.
+
First implementation.
+Replaced fluid source. This is for
+ #1072.
+
First implementation.
+Replaced fluid source. This is for
+ #1072.
+
First implementation.
See #769.
diff --git a/AixLib/Fluid/HeatPumps/Validation/ScrollWaterToWater_VariableSpeed.mo b/AixLib/Fluid/HeatPumps/Validation/ScrollWaterToWater_VariableSpeed.mo
index e704f0b93a..4ecd40eb37 100644
--- a/AixLib/Fluid/HeatPumps/Validation/ScrollWaterToWater_VariableSpeed.mo
+++ b/AixLib/Fluid/HeatPumps/Validation/ScrollWaterToWater_VariableSpeed.mo
@@ -15,18 +15,12 @@ model ScrollWaterToWater_VariableSpeed
parameter Modelica.SIunits.MassFlowRate flowLoad = 0.47
"Mass flow rate on the evaporator side";
- AixLib.Fluid.Sources.FixedBoundary sin2(
+ AixLib.Fluid.Sources.Boundary_pT sin2(
redeclare package Medium = Medium2, nPorts=1) "Source side sink"
- annotation (Placement(
- transformation(
- extent={{-10,-10},{10,10}},
- origin={-70,-40})));
- AixLib.Fluid.Sources.FixedBoundary sin1(
+ annotation (Placement(transformation(extent={{-10,-10},{10,10}}, origin={-70,-40})));
+ AixLib.Fluid.Sources.Boundary_pT sin1(
redeclare package Medium = Medium1, nPorts=1) "Load side sink"
- annotation (Placement(
- transformation(
- extent={{10,-10},{-10,10}},
- origin={58,20})));
+ annotation (Placement(transformation(extent={{10,-10},{-10,10}}, origin={58,20})));
Modelica.Fluid.Sources.MassFlowSource_T loa(
redeclare package Medium = Medium1,
m_flow=flowLoad,
@@ -117,6 +111,11 @@ is increased linearly to its full load value.
", revisions="
+Replaced fluid source. This is for
+ #1072.
+
First implementation.
+
+"),
+ experiment(StopTime=1400, Tolerance=1e-06));
+end GenericHumidifier_u;
diff --git a/AixLib/Fluid/Humidifiers/Examples/package.order b/AixLib/Fluid/Humidifiers/Examples/package.order
index 4b07492b8c..2a7b7829e4 100644
--- a/AixLib/Fluid/Humidifiers/Examples/package.order
+++ b/AixLib/Fluid/Humidifiers/Examples/package.order
@@ -1 +1,2 @@
+GenericHumidifier_u
Humidifier_u
diff --git a/AixLib/Fluid/Humidifiers/GenericHumidifier_u.mo b/AixLib/Fluid/Humidifiers/GenericHumidifier_u.mo
new file mode 100644
index 0000000000..899e3ae59b
--- /dev/null
+++ b/AixLib/Fluid/Humidifiers/GenericHumidifier_u.mo
@@ -0,0 +1,262 @@
+within AixLib.Fluid.Humidifiers;
+model GenericHumidifier_u
+ "Steam or adiabatic humidifier with relative mass flow rate as input"
+ extends AixLib.Fluid.Interfaces.TwoPortHeatMassExchanger(
+ redeclare replaceable package Medium =
+ Modelica.Media.Interfaces.PartialCondensingGases,
+ redeclare final AixLib.Fluid.MixingVolumes.MixingVolumeMoistAir vol(
+ final prescribedHeatFlowRate=true));
+
+ parameter Modelica.SIunits.MassFlowRate mWat_flow_nominal
+ "Water mass flow rate at u=1, positive for humidification";
+
+ parameter Modelica.SIunits.Temperature TLiqWat_in "Temperature of liquid water that is vaporized";
+
+ parameter Boolean steamHumidifier=true "True: steam humidifier, false: adiabatic (water) humidifier";
+
+ parameter Boolean TVapFixed = true "True: fixed vaporization temperature, false: vaporization temperature from pressure" annotation (Dialog(enable=steamHumidifier, tab = "Advanced", group = "Vaporization"));
+
+ parameter Modelica.SIunits.Temperature TVap=373.15 "Vaporization temperature of steam" annotation (Dialog(enable=TVapFixed and steamHumidifier,tab = "Advanced", group = "Vaporization"));
+
+ Modelica.Blocks.Interfaces.RealInput u(unit="1") "Control input"
+ annotation (Placement(transformation(
+ extent={{-140,40},{-100,80}}), iconTransformation(extent={{-120,50},{
+ -100,70}})));
+
+ Modelica.Blocks.Interfaces.RealOutput mWat_flow(unit="kg/s")
+ "Water added to the fluid"
+ annotation (Placement(transformation(extent={{100,50},{120,70}})));
+
+ Modelica.Blocks.Interfaces.RealOutput powerEva if steamHumidifier
+ "Consumed power for evaporization" annotation (Placement(transformation(
+ extent={{100,90},{120,110}}), iconTransformation(extent={{100,90},{120,
+ 110}})));
+ Modelica.Blocks.Sources.RealExpression steamEnthalpyFlow(y=
+ Medium.enthalpyOfCondensingGas(T=Tsteam.y)*mWat_flow) if steamHumidifier
+ annotation (Placement(transformation(extent={{-100,-50},{-80,-30}})));
+ Modelica.Blocks.Sources.RealExpression waterEnthalpyFlow(y=Medium.enthalpyOfLiquid(T=TLiqWat_in)*mWat_flow) annotation (Placement(transformation(extent={{-100,-70},{-80,-50}})));
+ Modelica.Thermal.HeatTransfer.Sources.PrescribedHeatFlow prescribedHeatFlow
+ annotation (Placement(transformation(extent={{-40,-50},{-20,-30}})));
+ Modelica.Blocks.Sources.RealExpression TVapPoint(y=
+ AixLib.Utilities.Psychrometrics.Functions.TDewPoi_pW(vol.p)) if not TVapFixed and steamHumidifier
+ annotation (Placement(transformation(extent={{-100,-90},{-80,-70}})));
+ Modelica.Blocks.Sources.RealExpression TVapPointFix(y=TVap) if TVapFixed and steamHumidifier
+ annotation (Placement(transformation(extent={{-100,-104},{-80,-84}})));
+ Modelica.Blocks.Routing.RealPassThrough Tsteam if steamHumidifier
+ annotation (Placement(transformation(extent={{-60,-98},{-40,-78}})));
+
+protected
+ Modelica.Blocks.Nonlinear.Limiter limiter(uMax=1, uMin=0)
+ annotation (Placement(transformation(extent={{-90,50},{-70,70}})));
+
+ Modelica.Blocks.Math.Gain gai(final k=mWat_flow_nominal) "Gain"
+ annotation (Placement(transformation(extent={{-58,50},{-38,70}})));
+
+ Modelica.Blocks.Math.Add add(k2=-1) if steamHumidifier
+ annotation (Placement(transformation(extent={{20,-60},{40,-40}})));
+equation
+ connect(gai.y, vol.mWat_flow) annotation (Line(
+ points={{-37,60},{-30,60},{-30,-18},{-11,-18}},
+ color={0,0,127}));
+
+ connect(gai.y, mWat_flow)
+ annotation (Line(points={{-37,60},{110,60}}, color={0,0,127}));
+ connect(u, limiter.u)
+ annotation (Line(points={{-120,60},{-92,60}}, color={0,0,127}));
+ connect(limiter.y, gai.u)
+ annotation (Line(points={{-69,60},{-60,60}}, color={0,0,127}));
+ connect(prescribedHeatFlow.port, vol.heatPort) annotation (Line(points={{-20,-40},
+ {-20,-10},{-9,-10}}, color={191,0,0}));
+
+ connect(steamEnthalpyFlow.y, add.u1) annotation (Line(points={{-79,-40},{-76,-40},
+ {-76,-44},{18,-44}}, color={0,0,127}));
+ connect(waterEnthalpyFlow.y, add.u2) annotation (Line(points={{-79,-60},{-76,-60},
+ {-76,-56},{18,-56}}, color={0,0,127}));
+ connect(add.y, powerEva) annotation (Line(points={{41,-50},{60,-50},{60,100},{
+ 110,100}}, color={0,0,127},
+ pattern=LinePattern.Dash));
+ if steamHumidifier then
+ connect(steamEnthalpyFlow.y, prescribedHeatFlow.Q_flow) annotation (Line(
+ points={{-79,-40},{-40,-40}},
+ color={0,0,127},
+ pattern=LinePattern.Dash));
+ else
+ connect(waterEnthalpyFlow.y, prescribedHeatFlow.Q_flow) annotation (Line(
+ points={{-79,-60},{-40,-60},{-40,-40}},
+ color={0,0,127},
+ pattern=LinePattern.Dash));
+ end if;
+ connect(TVapPoint.y, Tsteam.u) annotation (Line(
+ points={{-79,-80},{-72,-80},{-72,-88},{-62,-88}},
+ color={0,0,127},
+ pattern=LinePattern.Dash));
+ connect(TVapPointFix.y, Tsteam.u) annotation (Line(
+ points={{-79,-94},{-72,-94},{-72,-88},{-62,-88}},
+ color={0,0,127},
+ pattern=LinePattern.Dash));
+ annotation (Icon(coordinateSystem(preserveAspectRatio=false, extent={{-100,
+ -100},{100,100}}), graphics={
+ Text(
+ extent={{-52,-60},{58,-120}},
+ textString="m=%m_flow_nominal",
+ pattern=LinePattern.None,
+ lineColor={0,0,127}),
+ Rectangle(
+ extent={{-100,61},{-70,58}},
+ lineColor={0,0,255},
+ pattern=LinePattern.None,
+ fillColor={0,0,127},
+ fillPattern=FillPattern.Solid),
+ Text(
+ extent={{-118,104},{-74,76}},
+ lineColor={0,0,127},
+ textString="u"),
+ Rectangle(
+ extent={{-100,5},{101,-5}},
+ lineColor={0,0,255},
+ pattern=LinePattern.None,
+ fillColor={0,0,0},
+ fillPattern=FillPattern.Solid),
+ Rectangle(
+ extent={{-70,60},{70,-60}},
+ lineColor={0,0,255},
+ pattern=LinePattern.None,
+ fillColor={95,95,95},
+ fillPattern=FillPattern.Solid),
+ Polygon(
+ points={{42,42},{54,34},{54,34},{42,28},{42,30},{50,34},{50,34},{42,
+ 40},{42,42}},
+ lineColor={255,255,255},
+ fillColor={255,255,255},
+ fillPattern=FillPattern.Solid),
+ Rectangle(
+ extent={{58,-54},{54,52}},
+ lineColor={255,255,255},
+ fillColor={255,255,255},
+ fillPattern=FillPattern.Solid),
+ Rectangle(
+ extent={{70,61},{100,58}},
+ lineColor={0,0,255},
+ pattern=LinePattern.None,
+ fillColor={0,0,127},
+ fillPattern=FillPattern.Solid),
+ Text(
+ extent={{32,98},{98,44}},
+ lineColor={0,0,127},
+ textString="mWat_flow"),
+ Polygon(
+ points={{42,10},{54,2},{54,2},{42,-4},{42,-2},{50,2},{50,2},{42,8},{
+ 42,10}},
+ lineColor={255,255,255},
+ fillColor={255,255,255},
+ fillPattern=FillPattern.Solid),
+ Polygon(
+ points={{42,-26},{54,-34},{54,-34},{42,-40},{42,-38},{50,-34},{50,-34},
+ {42,-28},{42,-26}},
+ lineColor={255,255,255},
+ fillColor={255,255,255},
+ fillPattern=FillPattern.Solid),
+ Text(extent={{30,130},{96,76}},
+ lineColor={0,0,127},
+ textString="powerEva",
+ visible=steamHumidifier),
+ Ellipse(visible=steamHumidifier,
+ extent={{-14,44},{10,30}},
+ lineColor={28,108,200},
+ fillColor={255,255,255},
+ fillPattern=FillPattern.Solid),
+ Ellipse(visible=steamHumidifier,
+ extent={{24,38},{34,32}},
+ lineColor={28,108,200},
+ fillColor={255,255,255},
+ fillPattern=FillPattern.Solid),
+ Ellipse(visible=steamHumidifier,
+ extent={{26,30},{8,42}},
+ lineColor={28,108,200},
+ fillColor={255,255,255},
+ fillPattern=FillPattern.Solid),
+ Ellipse(visible=steamHumidifier,
+ extent={{-28,12},{-4,-2}},
+ lineColor={28,108,200},
+ fillColor={255,255,255},
+ fillPattern=FillPattern.Solid),
+ Ellipse(visible=steamHumidifier,
+ extent={{12,-2},{-6,10}},
+ lineColor={28,108,200},
+ fillColor={255,255,255},
+ fillPattern=FillPattern.Solid),
+ Ellipse(visible=steamHumidifier,
+ extent={{10,6},{20,0}},
+ lineColor={28,108,200},
+ fillColor={255,255,255},
+ fillPattern=FillPattern.Solid),
+ Ellipse(visible=steamHumidifier,
+ extent={{-12,-24},{12,-38}},
+ lineColor={28,108,200},
+ fillColor={255,255,255},
+ fillPattern=FillPattern.Solid),
+ Ellipse(visible=steamHumidifier,
+ extent={{28,-38},{10,-26}},
+ lineColor={28,108,200},
+ fillColor={255,255,255},
+ fillPattern=FillPattern.Solid),
+ Ellipse(visible=steamHumidifier,
+ extent={{26,-30},{36,-36}},
+ lineColor={28,108,200},
+ fillColor={255,255,255},
+ fillPattern=FillPattern.Solid),
+ Line(visible=not steamHumidifier,
+ points={{28,40},{14,40}}, color={28,
+ 108,200},
+ thickness=0.5),
+ Line(visible=not steamHumidifier,points={{-6,36},{-20,30}},color={28,
+ 108,200},
+ thickness=0.5),
+ Line(visible=not steamHumidifier,points={{30,4},{16,6}}, color={28,
+ 108,200},
+ thickness=0.5),
+ Line(visible=not steamHumidifier,points={{0,4},{-14,-2}}, color={28,
+ 108,200},
+ thickness=0.5),
+ Line(visible=not steamHumidifier,points={{30,-32},{16,-30}}, color={28,
+ 108,200},
+ thickness=0.5),
+ Line(visible=not steamHumidifier,points={{0,-34},{-14,-40}}, color={28,
+ 108,200},
+ thickness=0.5),
+ Line(visible=not steamHumidifier,points={{-32,-24},{-42,-38}},color={28,
+ 108,200},
+ thickness=0.5),
+ Line(visible=not steamHumidifier,points={{-32,10},{-42,-4}}, color={28,
+ 108,200},
+ thickness=0.5)}),
+defaultComponentName="hum",
+Documentation(info="
+
+First implementation.
+mWat_flow_nominal.
+The parameter mWat_flow_nominal must be positive.
+
+
+"));
+end GenericHumidifier_u;
diff --git a/AixLib/Fluid/Humidifiers/SprayAirWasher_X.mo b/AixLib/Fluid/Humidifiers/SprayAirWasher_X.mo
index 6c36d7f9f2..1c826afa78 100644
--- a/AixLib/Fluid/Humidifiers/SprayAirWasher_X.mo
+++ b/AixLib/Fluid/Humidifiers/SprayAirWasher_X.mo
@@ -2,6 +2,8 @@ within AixLib.Fluid.Humidifiers;
model SprayAirWasher_X
"Spray air washer with leaving water mass fraction as input"
extends AixLib.Fluid.HeatExchangers.BaseClasses.PartialPrescribedOutlet(
+ redeclare replaceable package Medium =
+ Modelica.Media.Interfaces.PartialCondensingGases,
outCon(
final T_start=293.15,
final X_start=X_start,
@@ -191,6 +193,13 @@ is adiabatic.
revisions="
+First implementation.
+
+Restricted base class for medium to one that implements
+the function enthalpyOfLiquid.
+This is for
+#1057.
+
First implementation.
getInstanceName() in asserts.
+This is for 1133.
+computeCSen to avoid the volume to become
+a structural parameter.This model is identical to Modelica.Fluid.Interfaces.PartialTwoPort, except that it has eight ports.
", revisions="This component transports four fluid streams between eight ports. It provides the basic model for implementing a dynamic heat exchanger.
The model can be used as-is, although there will be no heat or mass transfer between the four fluid streams. To add heat transfer, heat flow can be added to the heat port of the four volumes.
The variable names follow the conventions used in Modelica.Fluid.HeatExchangers.BasicHX.
+The variable names follow the conventions used in Modelica.Fluid.Examples.HeatExchanger.BaseClasses.BasicHX.
", revisions="+This component transports two fluid streams between four ports. +It provides the basic model for implementing a dynamic heat exchanger. +
+
+The model can be used as-is, although there will be no heat or mass transfer
+between the two fluid streams.
+To add heat transfer, heat flow can be added to the heat port of the two volumes.
+See for example
+
+AixLib.Fluid.Chillers.Carnot_y.
+To add moisture input into (or moisture output from) volume vol2,
+the model can be replaced with
+
+AixLib.Fluid.MixingVolumes.MixingVolumeMoistAir.
+
+The variable names follow the conventions used in + +Modelica.Fluid.Examples.HeatExchanger.BaseClasses.BasicHX. +
+", revisions=" +vol1 replaceable. This is required for
+Buildings, issue 1013.
+use_dh is no longer a parameter in the pressure drop model.quantity attributes.
+extends statement.
+This is for issue
+#299.
+mSenFac in
+vol1 and vol2.
+This is for issue
+#258.
+allowFlowReversal to
+instances vol1 and vol2.
+This is for issue
+#412.
+annotation(Evaluate=true) for parameters tau1
+and tau2.
+This is needed to allow changing the time constant after translation.
+import Modelica.Constants statement.
+show_V_flow.
+sum operator.
+m_flow_small as it is no
+longer used in its base class.
+h_outflow_a1_start,
+h_outflow_b1_start,
+h_outflow_a2_start and
+h_outflow_b2_start, and
+declared them as final.
+vol1.C and vol2.C.
+tau = 0.
+stateSelect=StateSelect.always for temperature of volume 1.
+Delays.DelayFirstOrder with instances of
+MixingVolumes.MixingVolume. This allows to extract liquid for a condensing cooling
+coil model.
+-This component transports two fluid streams between four ports. -It provides the basic model for implementing a dynamic heat exchanger. -
-
-The model can be used as-is, although there will be no heat or mass transfer
-between the two fluid streams.
-To add heat transfer, heat flow can be added to the heat port of the two volumes.
-See for example
-
-AixLib.Fluid.Chillers.Carnot_y.
-To add moisture input into (or moisture output from) volume vol2,
-the model can be replaced with
-
-AixLib.Fluid.MixingVolumes.MixingVolumeMoistAir.
-
-The variable names follow the conventions used in - -Modelica.Fluid.Examples.HeatExchanger.BaseClasses.BasicHX. -
-", revisions=" -vol1 replaceable. This is required for
-Buildings, issue 1013.
-use_dh is no longer a parameter in the pressure drop model.quantity attributes.
-extends statement.
-This is for issue
-#299.
-mSenFac in
-vol1 and vol2.
-This is for issue
-#258.
-allowFlowReversal to
-instances vol1 and vol2.
-This is for issue
-#412.
-annotation(Evaluate=true) for parameters tau1
-and tau2.
-This is needed to allow changing the time constant after translation.
-import Modelica.Constants statement.
-show_V_flow.
-sum operator.
-m_flow_small as it is no
-longer used in its base class.
-h_outflow_a1_start,
-h_outflow_b1_start,
-h_outflow_a2_start and
-h_outflow_b2_start, and
-declared them as final.
-vol1.C and vol2.C.
-tau = 0.
-stateSelect=StateSelect.always for temperature of volume 1.
-Delays.DelayFirstOrder with instances of
-MixingVolumes.MixingVolume. This allows to extract liquid for a condensing cooling
-coil model.
-+This component transports two fluid streams between four ports. +It provides the basic model for implementing a dynamic heat exchanger. +
+
+The model can be used as-is, although there will be no heat or mass transfer
+between the two fluid streams.
+To add heat transfer, heat flow can be added to the heat port of the two volumes.
+See for example
+
+AixLib.Fluid.Chillers.Carnot_y.
+To add moisture input into (or moisture output from) volume vol2,
+the model can be replaced with
+
+AixLib.Fluid.MixingVolumes.MixingVolumeMoistAir.
+
+The variable names follow the conventions used in + +Modelica.Fluid.Examples.HeatExchanger.BaseClasses.BasicHX. +
+", revisions=" +vol1 replaceable. This is required for
+Buildings, issue 1013.
+use_dh is no longer a parameter in the pressure drop model.quantity attributes.
+extends statement.
+This is for issue
+#299.
+mSenFac in
+vol1 and vol2.
+This is for issue
+#258.
+allowFlowReversal to
+instances vol1 and vol2.
+This is for issue
+#412.
+annotation(Evaluate=true) for parameters tau1
+and tau2.
+This is needed to allow changing the time constant after translation.
+import Modelica.Constants statement.
+show_V_flow.
+sum operator.
+m_flow_small as it is no
+longer used in its base class.
+h_outflow_a1_start,
+h_outflow_b1_start,
+h_outflow_a2_start and
+h_outflow_b2_start, and
+declared them as final.
+vol1.C and vol2.C.
+tau = 0.
+stateSelect=StateSelect.always for temperature of volume 1.
+Delays.DelayFirstOrder with instances of
+MixingVolumes.MixingVolume. This allows to extract liquid for a condensing cooling
+coil model.
+-This component defines the interface for models that transport four fluid streams between eight ports. -It is similar to AixLib.Fluid.Interfaces.PartialTwoPortInterface, +This component defines the interface for models that transport four fluid streams between eight ports. +It is similar to AixLib.Fluid.Interfaces.PartialTwoPortInterface, but it has eight ports instead of two.
-The model is used by other models in this package that add heat transfer, -mass transfer and pressure drop equations. +The model is used by other models in this package that add heat transfer, +mass transfer and pressure drop equations.
", revisions="m4_flow.
+h_outflow in FluidPorts.
See #977.
diff --git a/AixLib/Fluid/Interfaces/PartialFourPortParallel.mo b/AixLib/Fluid/Interfaces/PartialFourPortParallel.mo
index 1b6a0adf50..c9c9938c7f 100644
--- a/AixLib/Fluid/Interfaces/PartialFourPortParallel.mo
+++ b/AixLib/Fluid/Interfaces/PartialFourPortParallel.mo
@@ -3,11 +3,25 @@ partial model PartialFourPortParallel
"Partial model with four ports for components with parallel flow"
replaceable package Medium1 =
- Modelica.Media.Interfaces.PartialMedium "Medium 1 in the component"
- annotation (choicesAllMatching = true);
+ Modelica.Media.Interfaces.PartialMedium "Medium 1 in the component"
+ annotation (choices(
+ choice(redeclare package Medium = AixLib.Media.Air "Moist air"),
+ choice(redeclare package Medium = AixLib.Media.Water "Water"),
+ choice(redeclare package Medium =
+ AixLib.Media.Antifreeze.PropyleneGlycolWater (
+ property_T=293.15,
+ X_a=0.40)
+ "Propylene glycol water, 40% mass fraction")));
replaceable package Medium2 =
- Modelica.Media.Interfaces.PartialMedium "Medium 2 in the component"
- annotation (choicesAllMatching = true);
+ Modelica.Media.Interfaces.PartialMedium "Medium 2 in the component"
+ annotation (choices(
+ choice(redeclare package Medium = AixLib.Media.Air "Moist air"),
+ choice(redeclare package Medium = AixLib.Media.Water "Water"),
+ choice(redeclare package Medium =
+ AixLib.Media.Antifreeze.PropyleneGlycolWater (
+ property_T=293.15,
+ X_a=0.40)
+ "Propylene glycol water, 40% mass fraction")));
parameter Boolean allowFlowReversal1 = true
"= true to allow flow reversal in medium 1, false restricts to design direction (port_a -> port_b)"
@@ -63,6 +77,11 @@ except for the following:
", revisions="
h_outflow in FluidPorts.
See #977.
diff --git a/AixLib/Fluid/Interfaces/PartialTwoPort.mo b/AixLib/Fluid/Interfaces/PartialTwoPort.mo
index 49d72af977..345de4c1f6 100644
--- a/AixLib/Fluid/Interfaces/PartialTwoPort.mo
+++ b/AixLib/Fluid/Interfaces/PartialTwoPort.mo
@@ -1,9 +1,15 @@
within AixLib.Fluid.Interfaces;
partial model PartialTwoPort "Partial component with two ports"
-
replaceable package Medium =
- Modelica.Media.Interfaces.PartialMedium "Medium in the component"
- annotation (choicesAllMatching = true);
+ Modelica.Media.Interfaces.PartialMedium "Medium in the component"
+ annotation (choices(
+ choice(redeclare package Medium = AixLib.Media.Air "Moist air"),
+ choice(redeclare package Medium = AixLib.Media.Water "Water"),
+ choice(redeclare package Medium =
+ AixLib.Media.Antifreeze.PropyleneGlycolWater (
+ property_T=293.15,
+ X_a=0.40)
+ "Propylene glycol water, 40% mass fraction")));
parameter Boolean allowFlowReversal = true
"= false to simplify equations, assuming, but not enforcing, no flow reversal"
@@ -42,6 +48,11 @@ users have not used this global definition to assign parameters.
", revisions="
h_outflow in FluidPorts.
See #977.
diff --git a/AixLib/Fluid/Interfaces/PartialTwoPortVector.mo b/AixLib/Fluid/Interfaces/PartialTwoPortVector.mo
index c12ec0fff8..2c7fb79974 100644
--- a/AixLib/Fluid/Interfaces/PartialTwoPortVector.mo
+++ b/AixLib/Fluid/Interfaces/PartialTwoPortVector.mo
@@ -1,8 +1,16 @@
within AixLib.Fluid.Interfaces;
partial model PartialTwoPortVector "Partial component with two ports, one of which being vectorized"
- replaceable package Medium = Modelica.Media.Interfaces.PartialMedium
- "Medium in the component" annotation (choicesAllMatching=true);
+ replaceable package Medium =
+ Modelica.Media.Interfaces.PartialMedium "Medium in the component"
+ annotation (choices(
+ choice(redeclare package Medium = AixLib.Media.Air "Moist air"),
+ choice(redeclare package Medium = AixLib.Media.Water "Water"),
+ choice(redeclare package Medium =
+ AixLib.Media.Antifreeze.PropyleneGlycolWater (
+ property_T=293.15,
+ X_a=0.40)
+ "Propylene glycol water, 40% mass fraction")));
parameter Integer nPorts "Number of ports"
annotation(Evaluate=true, Dialog(connectorSizing=true, tab="General",group="Ports"));
parameter Boolean allowFlowReversal=true
@@ -22,6 +30,23 @@ partial model PartialTwoPortVector "Partial component with two ports, one of whi
each h_outflow(start=Medium.h_default, nominal=Medium.h_default))
"Fluid connectors b (positive design flow direction is from port_a to ports_b)"
annotation (Placement(transformation(extent={{90,-40},{110,40}})));
+
+ // Diagnostics
+ parameter Boolean show_T = false
+ "= true, if actual temperature at port is computed"
+ annotation(Dialog(tab="Advanced",group="Diagnostics"));
+
+ Medium.ThermodynamicState sta_a=
+ Medium.setState_phX(port_a.p,
+ noEvent(actualStream(port_a.h_outflow)),
+ noEvent(actualStream(port_a.Xi_outflow))) if
+ show_T "Medium properties in port_a";
+
+ Medium.ThermodynamicState sta_b[nPorts]=
+ Medium.setState_phX(ports_b.p,
+ noEvent(actualStream(ports_b.h_outflow)),
+ noEvent(actualStream(ports_b.Xi_outflow))) if
+ show_T "Medium properties in ports_b";
annotation (
Documentation(info="
@@ -46,6 +71,16 @@ users have not used this global definition to assign parameters. ", revisions="
h_outflow in FluidPorts.
See #977.
diff --git a/AixLib/Fluid/Interfaces/PassThroughMedium.mo b/AixLib/Fluid/Interfaces/PassThroughMedium.mo
index abfda2f21b..1f6075274c 100644
--- a/AixLib/Fluid/Interfaces/PassThroughMedium.mo
+++ b/AixLib/Fluid/Interfaces/PassThroughMedium.mo
@@ -1,6 +1,6 @@
within AixLib.Fluid.Interfaces;
model PassThroughMedium "To make medium connectors conditional"
- extends AixLib.Fluid.Interfaces.PartialTwoPortInterface;
+ extends AixLib.Fluid.Interfaces.PartialTwoPort;
equation
connect(port_a, port_b)
annotation (Line(points={{-100,0},{100,0}}, color={0,127,255}));
@@ -11,5 +11,13 @@ equation
fillPattern=FillPattern.Solid), Line(
points={{-94,0},{92,0}},
color={0,127,255},
- thickness=0.5)}));
+ thickness=0.5)}), Documentation(info="
+Model to make models extending the TwoPort-Model optional.
+Idea is based on the model RealPassThrough of the standard library.
+", revisions=" +TMax in assert.getInstanceName() to flow
+reversal check.
+This if or
+issue 1228.
+constant to a parameter.partial keyword as this model is not partial.each.each statement.m_flow_nominal.filteredSpeed to use_inputFilter.+This is a base model for compression processes that are used, for example, +in rotary or scroll compressors. +
++Seven equations need to be added by an extending class using this component: +
+ṁ.Pel.pInl and pOut.hInl and
+hOut.port_b.h_outflow for flow in design direction.port_a.h_outflow for flow in reverse direction.+Moreover, appropriate values shall be assigned to the following parameters: +
+dp_start for a guess of the pressure dropm_flow_small for regularization of zero flow.dp_nominal for nominal pressure drop.m_flow_nominal for nominal mass flow rate.
+Actually, three different efficiency models are suggested and the modelling
+approaches of these efficiencies are shortly characterised below:
+
| Efficiency | +Formula | +Comment | +
|---|---|---|
| Engine | +ηeng = Q̇ref /
+Pel |
+Used for calculation of compressor's power consumption | +
| Isentropic | +ηise = (houtIse - hinl) /
+(hout - hinl) |
+Used for calculation of thermodynamic change of state | +
| Volumetric | +ηvol = V̇ide /
+V̇rea |
+Used for calculation of mass flow rate | +
+These efficiency models are stored in + +AixLib.Fluid.Movers.Compressors.Utilities.EngineEfficiency, + +AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency and + +AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency. +Therefore, the calculation procedure of the efficiencies are introduced as +replaceable models and must be defined by the User. +
+
+The base model has a parameter useInpFil that is used to model
+the compressors's transient behaviour while changing rotational speed.
+Generally, this approach uses the same modeling attempt as the stat-up and
+shut-down transients introtuced for flow machines (see
+
+AixLib.Fluid.Movers.UsersGuide). Therefore, just the parameter's
+affections are presented here:
+
useInpFil=false, then the input signal opeSet.y
+is equal to the compressor's rotational speed. Thus, a step change in the
+input signal causes a step change in the rotational speed.
+useInpFil=true, which is the default, then the rotational
+speed is equal to the output of a filter. This filter is implemented as a
+2nd order differential equation. Thus, a step change in the compressor's
+input signal will cause a gradual change in the rotational speed. The filter
+has a parameter risTim, which by default is set to 1 second.
+The rise time is the time required to reach 99.6% of the full rotational
+speed, or, if the compressor is shut-down, to reach a rotational speed
+of 0.4%.
++In the following, some general references are given for information about +modelling compressors. The modelling approach presented here is alligned +to the modelling approaches presented in the literature: +
++W. Eifler, E. Schlücker, U. Spicher and G. Will (2009): + +Küttner Kolbenmaschinen: Kolbenpumpen, Kolbenverdichter, Brennkraftmaschinen +(in German). Publisher: Vieweg + Teubner +
++H. Qiao, R. Radermacher and V. Aute (2010): + A review for numerical simulation +of vapor compression systems. In: International +Refrigeration and Air Conditioning Conference +
++P.C. Hanlon (2011): + +Compressor Handbook. Publisher: McGraw-Hill +
++V. A. Cara Martin and R. Radermacher (2015): + +AHRI Project 8013: A Study of Methods to Represent Compressor Performance +Data over an Operating Envelope Based on a Finite Set of Test Data. +Publisher: Air-Conditioning, Heating, and Refrigeration Institute (AHRI) +
+")); +end PartialCompression; diff --git a/AixLib/Fluid/Movers/Compressors/BaseClasses/PartialCompressor.mo b/AixLib/Fluid/Movers/Compressors/BaseClasses/PartialCompressor.mo new file mode 100644 index 0000000000..0134848e67 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/BaseClasses/PartialCompressor.mo @@ -0,0 +1,378 @@ +within AixLib.Fluid.Movers.Compressors.BaseClasses; +partial model PartialCompressor + "Partial model for compressor that contains basic definitions used in + various compressor models" + + // Definition of the medium + // + replaceable package Medium = + Modelica.Media.R134a.R134a_ph + constrainedby Modelica.Media.Interfaces.PartialTwoPhaseMedium + "Medium in the component" + annotation (choicesAllMatching = true); + + // Definition of parameters describing general options + // + parameter Modelica.SIunits.Volume + VDis(min=0) = 13e-6 + "Displacement volume of the compressor" + annotation(Dialog(tab="General",group="Geometry")); + parameter Modelica.SIunits.Efficiency + epsRef(min=0, max=1, nominal=0.05) = 0.04 + "Ratio of the real and the ideal displacement volume" + annotation(Dialog(tab="General",group="Geometry")); + parameter Modelica.SIunits.Diameter + diameterInl(min=0) = 12e-3 + "Diameter of the pipe at compressor's inlet" + annotation(Dialog(tab="General",group="Geometry")); + parameter Modelica.SIunits.Diameter + diameterOut(min=0) = 8e-3 + "Diameter of the pipe at compressor's outlet" + annotation(Dialog(tab="General",group="Geometry")); + + parameter Modelica.SIunits.Frequency + rotSpeMax(min=0) = 120 + "Maximal rotational speed executable by the compressor" + annotation(Dialog(tab="General",group="Compressor's characterisitcs"), + HideResult=true); + parameter Real + piPreMax(min=1, unit="1") = 15 + "Maximal pressure ratio executable by the compressor" + annotation(Dialog(tab="General",group="Compressor's characterisitcs"), + HideResult=true); + + parameter Boolean useInpFil = true + "= true, if transient behaviour of rotational speed is computed" + annotation(Dialog(group="Transient behaviour")); + parameter Modelica.SIunits.Time risTim = 0.5 + "Time until rotational speed reaches 99.6 % of its set value" + annotation(Dialog(enable = useInpFil, + group="Transient behaviour")); + + // Definition of models describing efficiencies + // + replaceable model EngineEfficiency = + Utilities.EngineEfficiency.SpecifiedEfficiencies.ConstantEfficiency + constrainedby Utilities.EngineEfficiency.PartialEngineEfficiency + "Model that describes the calculation of the overall mechanic efficiency" + annotation (Placement( + transformation( + extent={{-36,-40},{-16,-20}})), + choicesAllMatching=true, + Dialog( + tab = "Efficiencies and similitude theory", group="Engine efficiency")); + replaceable model VolumetricEfficiency = + Utilities.VolumetricEfficiency.SpecifiedEfficiencies.ConstantEfficiency + constrainedby Utilities.VolumetricEfficiency.PartialVolumetricEfficiency + "Model that describes the calculation of the overall volumetric efficiency" + annotation (Placement( + transformation( + extent={{-36,-40},{-16,-20}})), + choicesAllMatching=true, + Dialog( + tab = "Efficiencies and similitude theory", group="Volumetric efficiency")); + replaceable model IsentropicEfficiency = + AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency.SpecifiedEfficiencies.ConstantEfficiency + constrainedby Utilities.IsentropicEfficiency.PartialIsentropicEfficiency + "Model that describes the calculation of the overall isentropic efficiency" + annotation (Placement( + transformation( + extent={{-36,-40},{-16,-20}})), + choicesAllMatching=true, + Dialog( + tab = "Efficiencies and similitude theory", group="Isentropic efficiency")); + + // Definition of parameters describing pressure losses + // + parameter Real zetInl= + ((1/0.59-1)^2+(1-(diameterInl/0.066)^2))*(1-(diameterInl/0.066)^2) + "Pressure loss factor at compressor's inlet for flow of port_a -> port_b" + annotation(Dialog(tab = "Pressure losses",group="General", + enable = if (simCom == Utilities.Types.SimpleCompressor.RotaryCompressorPressureLosses + or simCom == Utilities.Types.SimpleCompressor.RotaryCompressorPressureHeatLosses) + then true else false)); + parameter Real zetOut= + ((1/0.59-1)^2+(1-(diameterOut/0.1122)^2))*(1-(diameterOut/0.1122)^2) + "Pressure loss factor at compressor's outlet for flow of port_a -> port_b" + annotation(Dialog(tab = "Pressure losses",group="General", + enable = if (simCom == Utilities.Types.SimpleCompressor.RotaryCompressorPressureLosses + or simCom == Utilities.Types.SimpleCompressor.RotaryCompressorPressureHeatLosses) + then true else false)); + + parameter Boolean from_dp=false + "= true, use m_flow = f(dp) else dp = f(m_flow)" + annotation(Dialog(tab = "Pressure losses",group="Advanced", + enable = if (simCom == Utilities.Types.SimpleCompressor.RotaryCompressorPressureLosses + or simCom == Utilities.Types.SimpleCompressor.RotaryCompressorPressureHeatLosses) + then true else false)); + parameter Boolean homotopyInitialization=true + "= true, use homotopy method for initialisation" + annotation(Dialog(tab = "Pressure losses",group="Advanced", + enable = if (simCom == Utilities.Types.SimpleCompressor.RotaryCompressorPressureLosses + or simCom == Utilities.Types.SimpleCompressor.RotaryCompressorPressureHeatLosses) + then true else false)); + parameter Boolean linearized=false + "= true, use linear relation between m_flow and dp for any flow rate" + annotation(Dialog(tab = "Pressure losses",group="Advanced", + enable = if (simCom == Utilities.Types.SimpleCompressor.RotaryCompressorPressureLosses + or simCom == Utilities.Types.SimpleCompressor.RotaryCompressorPressureHeatLosses) + then true else false)); + + // Definition of parameters describing heat losses + // + parameter Utilities.Types.HeatTransferModels + heaTraMod=Utilities.Types.HeatTransferModels.Simplified + "Choose heat transfer model for heat losses at compressor's inlet + and outlet" + annotation(Dialog(tab = "Heat losses",group="General", + enable = if (simCom == Utilities.Types.SimpleCompressor.RotaryCompressorPressureHeatLosses) + then true else false)); + parameter Modelica.SIunits.Mass mWal=2.5 + "Mass of the fictitious wall" + annotation(Dialog(tab = "Heat losses",group="Geometry", + enable = if (simCom == Utilities.Types.SimpleCompressor.RotaryCompressorPressureHeatLosses) + then true else false)); + parameter Modelica.SIunits.SpecificHeatCapacity cpWal=450 + "Specific heat capacity of the fictitious wall" + annotation(Dialog(tab = "Heat losses",group="Geometry", + enable = if (simCom == Utilities.Types.SimpleCompressor.RotaryCompressorPressureHeatLosses) + then true else false)); + parameter Modelica.SIunits.ThermalConductance kAMeaInl=25 + "Effective mean thermal conductance between medium and fictitious wall + at inlet" + annotation(Dialog(tab = "Heat losses",group="Thermal conductances", + enable = if (simCom == Utilities.Types.SimpleCompressor.RotaryCompressorPressureHeatLosses) + then true else false)); + parameter Modelica.SIunits.ThermalConductance kAMeaOut=35 + "Effective mean thermal conductance between medium and fictitious wall + at outlet" + annotation(Dialog(tab = "Heat losses",group="Thermal conductances", + enable = if (simCom == Utilities.Types.SimpleCompressor.RotaryCompressorPressureHeatLosses) + then true else false)); + parameter Modelica.SIunits.ThermalConductance kAMeaAmb=5 + "Effective mean thermal conductance coefficient between fictitious wall + and ambient" + annotation(Dialog(tab = "Heat losses",group="Thermal conductances", + enable = if (simCom == Utilities.Types.SimpleCompressor.RotaryCompressorPressureHeatLosses) + then true else false)); + parameter Boolean iniTWal0=true + "= true, if wall is initialised at fixed temperature; Otherwise, steady state + initialisation" + annotation(Dialog(tab = "Heat losses",group="Initialisation", + enable = if (simCom == Utilities.Types.SimpleCompressor.RotaryCompressorPressureHeatLosses) + then true else false)); + parameter Modelica.SIunits.Temperature TWal0=293.15 + "Temperature of wall at initialisation" + annotation(Dialog(tab = "Heat losses",group="Initialisation", + enable = if (simCom == Utilities.Types.SimpleCompressor.RotaryCompressorPressureHeatLosses) + then true else false)); + + // Definition of parameters deschribing assumptions + // + parameter Boolean allowFlowReversal = true + "= false to simplify equations, assuming, but not enforcing, no flow reversal" + annotation(Dialog(tab="Assumptions"), Evaluate=true); + parameter Utilities.Types.SimpleCompressor simCom= + Utilities.Types.SimpleCompressor.Default + "Parameter used to activate or deactivate menue choices" + annotation(Dialog(tab="Assumptions",enable=false), Evaluate=true, + HideResult=true); + + // Definition of parameters describing advanced options + // + parameter Modelica.SIunits.PressureDifference + dp_start(displayUnit="Pa") = -20e5 + "Guess value of compressor's dp = port_a.p - port_b.p" + annotation(Dialog(tab = "Advanced",group="General")); + parameter Medium.MassFlowRate m_flow_start = 0.5*m_flow_nominal + "Guess value of compressor's m_flow = port_a.m_flowr" + annotation(Dialog(tab = "Advanced",group="General")); + parameter Medium.MassFlowRate m_flow_small = 1e-6*m_flow_nominal + "Small mass flow rate for regularization of compressor's zero flow" + annotation(Dialog(tab = "Advanced",group="General")); + parameter Modelica.SIunits.MassFlowRate m_flow_nominal = 0.1 + "Nominal mass flow rate" + annotation(Dialog(tab="Advanced",group="General"), + HideResult=true); + + // Definition of parameters describing diagnostics + // + parameter Boolean show_T = false + "= true, if compressor's temperatures at port_a and port_b are computed" + annotation(Dialog(tab="Advanced",group="Diagnostics")); + parameter Boolean show_V_flow = false + "= true, if compressor's volume flow rate at inflowing port is computed" + annotation(Dialog(tab="Advanced",group="Diagnostics")); + parameter Boolean show_staEff = false + "= true, if thermodynamic states and efficiencies are computed" + annotation(Dialog(tab="Advanced",group="Diagnostics"), + HideResult=true); + parameter Boolean show_qua = false + "= true, if vapour qualities are computed" + annotation(Dialog(tab="Advanced",group="Diagnostics"), + HideResult=true); + + // Definition of parameters used for initialisation + // + parameter Modelica.SIunits.Frequency rotSpe0 = 60 + "Compressor's rotational spped at initialisation" + annotation(Dialog(tab="Advanced",group="Initialisation"), + HideResult=true); + parameter Modelica.SIunits.AbsolutePressure pInl0 = 3e5 + "Pressure at compressor's inlet at initialisation" + annotation(Dialog(tab="Advanced",group="Initialisation"), + HideResult=true); + parameter Modelica.SIunits.Temperature TInl0 = 283.15 + "Temperature at compressor's inlet at initialisation" + annotation(Dialog(tab="Advanced",group="Initialisation"), + HideResult=true); + + // Definition of submodels + // + replaceable model CompressionProcess = + SimpleCompressors.CompressionProcesses.RotaryCompression + constrainedby PartialCompression + "Model of the compression process" + annotation (choicesAllMatching=true); + + CompressionProcess comPro( + redeclare final package Medium = Medium, + final VDis=VDis, + final epsRef=epsRef, + final rotSpeMax=rotSpeMax, + final piPreMax=piPreMax, + final useInpFil=useInpFil, + final risTim=risTim, + redeclare final model EngineEfficiency = EngineEfficiency, + redeclare final model VolumetricEfficiency = VolumetricEfficiency, + redeclare final model IsentropicEfficiency = IsentropicEfficiency, + final allowFlowReversal=allowFlowReversal, + final dp_start=dp_start, + final m_flow_start=m_flow_start, + final m_flow_small=m_flow_small, + final show_T=show_T, + final show_V_flow=show_V_flow, + final m_flow_nominal=m_flow_nominal, + final show_staEff=show_staEff, + final show_qua=show_qua, + final rotSpe0=rotSpe0, + final pInl0=pInl0, + final TInl0=TInl0) + "Model describing compression process" + annotation (Placement(transformation(extent={{-10,-10},{10,10}}))); + + /*To enable propagation of parameters, the compression process is introduced + as a replaceable model and its instance propagates all parameters + required. + */ + + // Definition of connectors + // + Modelica.Fluid.Interfaces.FluidPort_a port_a( + redeclare final package Medium=Medium, + m_flow(min=if allowFlowReversal then -Modelica.Constants.inf else 0), + h_outflow(start=Medium.h_default)) + "Fluid connector a (positive design flow direction is from port_a to port_b)" + annotation (Placement(transformation(extent={{-110,-10},{-90,10}}))); + Modelica.Fluid.Interfaces.FluidPort_b port_b( + redeclare final package Medium=Medium, + m_flow(max=if allowFlowReversal then +Modelica.Constants.inf else 0), + h_outflow(start = Medium.h_default)) + annotation (Placement(transformation(extent={{90,-10},{110,10}}))); + + Modelica.Thermal.HeatTransfer.Interfaces.HeatPort_b heatPort + "Heat port connector to calculate heat losses to ambient" + annotation (Placement(transformation(extent={{-10,-110},{10,-90}}))); + Modelica.Blocks.Interfaces.RealInput + manVarCom(start=rotSpe0, quantity = "Velocity", unit = ("1/s")) + "Prescribed compressor's rotational speed" + annotation (Placement( + transformation( + extent={{-20,-20},{20,20}}, + rotation=-90, + origin={-60,100})), + HideResult=true); + Modelica.Blocks.Interfaces.RealOutput + curManVarCom(quantity="Velocity", unit=("1/s")) + "Current compressor's rotational speed" + annotation (Placement( + transformation( + extent={{-20,-20},{20,20}}, + rotation=90, + origin={60,100})), HideResult=true); + + +equation + // Connection of control signals + // + connect(manVarCom,comPro. manVarCom) + annotation (Line(points={{-60,100},{-60,40},{-6,40},{-6,10}}, + color={0,0,127})); + connect(comPro.curManVarCom, curManVarCom) + annotation (Line(points={{6,10},{6,40},{60,40},{60,100}}, + color={0,0,127})); + + annotation (Icon(coordinateSystem(preserveAspectRatio=false), graphics={ + Ellipse( + extent={{80,80},{-80,-80}}, + lineColor={0,0,0}, + startAngle=0, + endAngle=360, + fillPattern=FillPattern.Sphere, + fillColor={214,214,214}), + Line( + points={{74,-30},{-60,-52}}, + color={0,0,0}, + thickness=0.5), + Line( + points={{74,30},{-58,54}}, + color={0,0,0}, + thickness=0.5), + Text( + extent={{-100,-130},{100,-150}}, + lineColor={28,108,200}, + textString="%name")}), Diagram(coordinateSystem( + preserveAspectRatio=false)), + Documentation(revisions=" ++This is a base model for simple compressor models that are used, for +example, in close-loop systems like heat pumps or chillers. +
++Three definitions need to be added by an extending class using this +component: +
+parCom.parCom.heatPort with
+heatPort.port_a and port_b with
+parCom.port_a and parCom.port_b.+The latter provides the possibility to add further components (e.g. pressure +losses or heat transfers) located at the compressor's inlet and outlet. +
++This base model mainly consists of one sub-models and, therefore, please +checkout this model for further information of underlying modeling +approaches: +
+ +")); +end PartialCompressor; diff --git a/AixLib/Fluid/Movers/Compressors/BaseClasses/PartialEfficiency.mo b/AixLib/Fluid/Movers/Compressors/BaseClasses/PartialEfficiency.mo new file mode 100644 index 0000000000..fe0ffbf718 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/BaseClasses/PartialEfficiency.mo @@ -0,0 +1,121 @@ +within AixLib.Fluid.Movers.Compressors.BaseClasses; +partial model PartialEfficiency + "Base model that is used to define all further efficiencies" + + // Definition of the medium used for calculations + // + replaceable package Medium = + Modelica.Media.R134a.R134a_ph + constrainedby Modelica.Media.Interfaces.PartialTwoPhaseMedium + "Medium of the model"; + + // Definition of inputs + // + input Modelica.SIunits.Efficiency epsRef(min=0, max=1, nominal=0.05) + "Ratio of the real and the ideal displacement volume"; + input Modelica.SIunits.Volume VDis(min=0) + "Displacement volume"; + input Real piPre(min=0, unit="1") + "Ratio of compressor's outlet and inlet pressure"; + input Modelica.SIunits.Frequency rotSpe(min=0) + "Compressor's current rotational speed"; + input Medium.ThermodynamicState staInl + "Thermodynamic state at compressor's inlet"; + input Medium.ThermodynamicState staOut + "Thermodynamic state at compressor's outlet"; + input Modelica.SIunits.Temperature TAmb + "Ambient temperature"; + + annotation (Icon(coordinateSystem(preserveAspectRatio=false), + graphics={ + Ellipse( + extent={{-90,-90},{90,90}}, + lineThickness=0.25, + pattern=LinePattern.None, + lineColor={215,215,215}, + fillColor={215,215,215}, + fillPattern=FillPattern.Solid), + Line( + points={{-40,60},{-30,70},{-20,60},{-20,60}}, + color={0,0,0}, + smooth=Smooth.Bezier, + thickness=0.5), + Line( + points={{-20,60},{-20,-30},{-20,38},{-16,50}, + {-6,58},{0,60},{6,58}}, + color={0,0,0}, + smooth=Smooth.Bezier, + thickness=0.5), + Line( + points={{6,58},{16,50},{20,40},{20,-70}, + {20,-70},{20,-70},{20,-70}}, + color={0,0,0}, + smooth=Smooth.Bezier, + thickness=0.5)}), + Diagram(coordinateSystem(preserveAspectRatio=false)), + Documentation(revisions=" +
+This is a base model for efficiency models that are required for
+various compressor models. It defines some basic inputs that are
+commonly used by efficiency models presented in
+
+AixLib.Fluid.Movers.Compressors.Utilities.EngineEfficiency,
+
+AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency and
+
+AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency.
+These inputs are summarised below:
+
| Type | +Name | +Comment | +
|---|---|---|
| input | +epsRef |
+Ratio of the real and the ideal displacement volume | +
| input | +VDis |
+Displacement volume | +
| input | +piPre |
+Pressure ratio | +
| input | +rotSpe |
+Rotational speed | +
| input | +staInl |
+Thermodynamic state at compressor's inlet conditions | +
| input | +staOut |
+Thermodynamic state at compressor's out conditions | +
| input | +TAmb |
+Ambient temperature | +
+This is a base model for modular compressors that are used, +for example, in close-loop systems like heat pumps or chillers. +
++Three definitions need to be added by an extending class using this component: +
+modCom.modCon.modCom[i].port_b with port_b.+The latter provides the possibility to add further components (e.g. sensors or +pipes) located at the compressors' outlets. +
++This base model mainly consists of two sub-models and, therefore, please +checkout these models for further information of underlying modeling +approaches: +
++This package contains base models used for simple +and modular compressor models. +
+")); +end BaseClasses; diff --git a/AixLib/Fluid/Movers/Compressors/BaseClasses/package.order b/AixLib/Fluid/Movers/Compressors/BaseClasses/package.order new file mode 100644 index 0000000000..b2a725472d --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/BaseClasses/package.order @@ -0,0 +1,4 @@ +PartialCompression +PartialCompressor +PartialEfficiency +PartialModularCompressors diff --git a/AixLib/Fluid/Movers/Compressors/Examples/ModularRotaryCompressor.mo b/AixLib/Fluid/Movers/Compressors/Examples/ModularRotaryCompressor.mo new file mode 100644 index 0000000000..27bd2d4e10 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Examples/ModularRotaryCompressor.mo @@ -0,0 +1,183 @@ +within AixLib.Fluid.Movers.Compressors.Examples; +model ModularRotaryCompressor + "Example model to test modular rotary compressors" + extends Modelica.Icons.Example; + + // Define medium and parameters + // + package Medium = + Modelica.Media.R134a.R134a_ph + "Medium of the compressor"; + + parameter Integer nCom = 2 + "Number of compressors"; + parameter Modelica.SIunits.AbsolutePressure pInl= + Medium.pressure(Medium.setBubbleState(Medium.setSat_T(TInl+1))) + "Current pressure at inlet conditions"; + parameter Modelica.SIunits.Temperature TInl = 283.15 + "Current temperature at inlet conditions"; + parameter Modelica.SIunits.AbsolutePressure pOut= + Medium.pressure(Medium.setDewState(Medium.setSat_T(TOut-5))) + "Current set point of the compressor's outlet pressure"; + parameter Modelica.SIunits.Temperature TOut = 333.15 + "Current temperature at outlet conditions"; + + // Definition of models + // + Sources.Boundary_pT source( + redeclare package Medium = Medium, + p=pInl, + T=TOut, + nPorts=1) "Source with constant pressure and temperature" + annotation (Placement(transformation(extent={{-10,-10},{10,10}}, + rotation=-90, + origin={40,70}))); + Modelica.Thermal.HeatTransfer.Sources.FixedTemperature fixTem[nCom]( + each T=283.15) + "Fixed ambient temperature" + annotation (Placement(transformation(extent={{90,-10},{70,10}}))); + replaceable ModularCompressors.ModularCompressors modCom( + nCom=nCom, + redeclare package Medium = Medium, + redeclare model SimpleCompressor = + SimpleCompressors.RotaryCompressors.RotaryCompressor, + redeclare model EngineEfficiency = + Utilities.EngineEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare model VolumetricEfficiency = + Utilities.VolumetricEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare model IsentropicEfficiency = + AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare model ModularController = + Controls.HeatPump.ModularHeatPumps.ModularCompressorController, + useExt=false, + show_parCom=false, + show_parCon=false, + VDis={5e-6,14e-6}, + useInpFil={true,true}, + risTim={0.25,0.5}, + yMax={120,120}) + "Model of modular compressors in parallel" + annotation (Placement(transformation(extent={{-18,-18},{18,18}}, + rotation=-90, + origin={40,0}))); + Modelica.Blocks.Sources.Sine valOpe( + offset=0.5, + amplitude=0.3, + freqHz=1) + "Prescribed valve's opening" + annotation (Placement(transformation(extent={{-88,-80},{-68,-60}}))); + Actuators.Valves.SimpleValve simVal( + redeclare package Medium = Medium, + m_flow_start=0.025, + m_flow_small=1e-6, + Kvs=1.4) "Model of a simple valve to simulate pressure losses" + annotation (Placement(transformation(extent={{-10,10},{10,-10}}, + rotation=-90, + origin={40,-40}))); + Sources.Boundary_pT sink( + redeclare package Medium = Medium, + nPorts=1, + p=pInl, + T=TInl) "Sink with constant pressure and temperature" + annotation (Placement(transformation(extent={{10,-10},{-10,10}}, + rotation=-90, + origin={40,-72}))); + + Controls.Interfaces.ModularHeatPumpControlBus dataBus( + nCom=nCom) "Connector that contains all control signals" + annotation (Placement(transformation(extent={{-20,-20},{20,20}}, + rotation=-90, + origin={0,0}))); + Modelica.Blocks.Sources.Sine rotSpe( + freqHz=1, + amplitude=50, + offset=50) + "Input signal to prediscribe compressors' rotational speeds" + annotation (Placement(transformation(extent={{-88,20},{-68,40}}))); + Modelica.Blocks.Routing.Replicator repRotSpe(nout=nCom) + "Replicating the compressors' rotational speedsl" + annotation (Placement(transformation(extent={{-50,40},{-30,60}}))); + Modelica.Blocks.Routing.Replicator repInt(nout=nCom) + "Replicating the internal set signal" + annotation (Placement(transformation(extent={{-50,0},{-30,20}}))); + Modelica.Blocks.Routing.Replicator repMea(nout=nCom) + "Replicating the current value of the controlled variables" + annotation (Placement(transformation(extent={{-50,-40},{-30,-20}}))); + Modelica.Blocks.Sources.Ramp ramMea( + duration=1, + height=60, + offset=40) + "Ramp to fake current value sof the controlled variables" + annotation (Placement(transformation(extent={{-88,-40},{-68,-20}}))); + + +equation + // Connection of main components + // + connect(source.ports[1], modCom.port_a) + annotation (Line(points={{40,60},{40,40},{40,18}}, color={0,127,255})); + connect(fixTem.port, modCom.heatPort) + annotation (Line(points={{70,0},{64,0},{58,0}}, color={191,0,0})); + connect(modCom.port_b, simVal.port_a) + annotation (Line(points={{40,-18},{40,-18},{40,-30}}, color={0,127,255})); + connect(simVal.port_b, sink.ports[1]) + annotation (Line(points={{40,-50},{40,-62}},color={0,127,255})); + + // Connection of control signals + // + connect(valOpe.y, simVal.opening) + annotation (Line(points={{-67,-70},{0,-70},{0,-40},{32,-40}}, + color={0,0,127})); + + connect(dataBus, modCom.dataBus) + annotation (Line(points={{0,0},{11,0},{22,0}},color={255,204,51}, + thickness=0.5)); + connect(ramMea.y, repMea.u) + annotation (Line(points={{-67,-30},{-60,-30},{-52,-30}}, color={0,0,127})); + connect(rotSpe.y, repRotSpe.u) + annotation (Line(points={{-67,30},{-60,30},{-60,50},{-52,50}}, + color={0,0,127})); + connect(rotSpe.y, repInt.u) + annotation (Line(points={{-67,30},{-60,30},{-60,10},{-52,10}}, + color={0,0,127})); + connect(repInt.y, dataBus.comBus.intSetPoiCom) + annotation (Line(points={{-29,10},{-24,10},{-20,10},{-20,-0.1},{0.1,-0.1}}, + color={0,0,127})); + connect(repRotSpe.y, dataBus.comBus.extManVarCom) + annotation (Line(points={{-29,50},{-20,50},{-20,-0.1},{0.1,-0.1}}, + color={0,0,127})); + connect(repMea.y, dataBus.comBus.meaConVarCom) + annotation (Line(points={{-29,-30},{-24,-30},{-20,-30},{-20,-0.1}, + {0.1,-0.1}}, color={0,0,127})); + + annotation (Documentation(revisions=" ++This is a example model to test different modular rotary compressor +presented in + +AixLib.Fluid.Movers.Compressors.ModularCompressors, whereby the +thermodynamic states at inlet and outlet of the compressor are +prescribed in terms of pressure and temperature. +Therefore, the User can select both different modular modelling approaches (e.g. + +AixLib.Fluid.Movers.Compressors.ModularCompressors.ModularCompressors or + +AixLib.Fluid.Movers.Compressors.ModularCompressors.ModularCompressorsSensors) +and various efficiency models byusing the dialog menu. +
+"), +experiment(StopTime=1), +Diagram(graphics={Text(extent={{-88,86},{-12,74}}, + lineColor={28,108,200}, + textString="Provide dummy signals"), + Rectangle(extent={{-90,90},{-10,70}}, + lineColor={28,108,200})})); +end ModularRotaryCompressor; diff --git a/AixLib/Fluid/Movers/Compressors/Examples/RotaryCompressor.mo b/AixLib/Fluid/Movers/Compressors/Examples/RotaryCompressor.mo new file mode 100644 index 0000000000..83df5d4ca4 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Examples/RotaryCompressor.mo @@ -0,0 +1,108 @@ +within AixLib.Fluid.Movers.Compressors.Examples; +model RotaryCompressor + "Example model to test simple rotary compressors" + extends Modelica.Icons.Example; + + // Define medium and parameters + // + package Medium = + Modelica.Media.R134a.R134a_ph + "Medium of the compressor"; + + parameter Modelica.SIunits.AbsolutePressure pInl= + Medium.pressure(Medium.setBubbleState(Medium.setSat_T(TInl+1))) + "Current pressure at inlet conditions"; + parameter Modelica.SIunits.Temperature TInl = 283.15 + "Current temperature at inlet conditions"; + parameter Modelica.SIunits.AbsolutePressure pOut= + Medium.pressure(Medium.setDewState(Medium.setSat_T(TOut-5))) + "Current set point of the compressor's outlet pressure"; + parameter Modelica.SIunits.Temperature TOut = 333.15 + "Current temperature at outlet conditions"; + + // Definition of models + // + Sources.Boundary_pT source( + redeclare package Medium = Medium, + nPorts=1, + p=pInl, + T=TOut) "Source with constant pressure and temperature" + annotation (Placement(transformation(extent={{-80,-10},{-60,10}}))); + Modelica.Blocks.Sources.Sine rotSpe( + amplitude=40, + offset=80, + freqHz=1) + "Prescribed compressor's rotational speed" + annotation (Placement(transformation(extent={{-80,30},{-60,50}}))); + Modelica.Thermal.HeatTransfer.Sources.FixedTemperature fixTem(T=283.15) + "Fixed ambient temperature" + annotation (Placement(transformation(extent={{-80,-60},{-60,-40}}))); + SimpleCompressors.RotaryCompressors.RotaryCompressor rotCom( + redeclare package Medium = Medium, + show_staEff=true, + show_qua=true, + useInpFil=true, + redeclare model EngineEfficiency = + Utilities.EngineEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare model VolumetricEfficiency = + Utilities.VolumetricEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare model IsentropicEfficiency = + AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll) + "Model of a rotary compressor" + annotation (Placement(transformation(extent={{-30,-10},{-10,10}}))); + + Modelica.Blocks.Sources.Sine valOpe( + offset=0.5, + amplitude=0.3, + freqHz=1) + "Prescribed valve's opening" + annotation (Placement(transformation(extent={{-80,70},{-60,90}}))); + Actuators.Valves.SimpleValve simVal( + redeclare package Medium = Medium, + m_flow_start=0.025, + m_flow_small=1e-6, + Kvs=1.4) "Model of a simple valve to simulate pressure losses" + annotation (Placement(transformation(extent={{20,-10},{40,10}}))); + Sources.Boundary_pT sink( + redeclare package Medium = Medium, + nPorts=1, + p=pInl, + T=TInl) "Sink with constant pressure and temperature" + annotation (Placement(transformation(extent={{80,-10},{60,10}}))); + +equation + // Connection of components + // + connect(source.ports[1], rotCom.port_a) + annotation (Line(points={{-60,0},{-60,0},{-30,0}}, color={0,127,255})); + connect(rotCom.port_b, simVal.port_a) + annotation (Line(points={{-10,0},{6,0},{20,0}}, color={0,127,255})); + connect(simVal.port_b, sink.ports[1]) + annotation (Line(points={{40,0},{50,0},{60,0}}, color={0,127,255})); + connect(rotSpe.y, rotCom.manVarCom) + annotation (Line(points={{-59,40},{-26,40},{-26,10}}, color={0,0,127})); + connect(valOpe.y, simVal.opening) + annotation (Line(points={{-59,80},{30,80},{30,8}}, color={0,0,127})); + connect(fixTem.port, rotCom.heatPort) + annotation (Line(points={{-60,-50},{-20,-50},{-20,-10}}, color={191,0,0})); + + annotation (Documentation(revisions=" ++This is a example model to test the simple rotary compressor presented in + +AixLib.Fluid.Movers.Compressors.SimpleCompressors.RotaryCompressors.RotaryCompressor. +Therefore, both the compressor's inlet and outlet conditions are prescribed +in terms of pressure and temperature and the User can select different +efficiency models using the dialog menu. +
+"), +experiment(StopTime=1)); +end RotaryCompressor; diff --git a/AixLib/Fluid/Movers/Compressors/Examples/RotaryCompressorPressureHeatLosses.mo b/AixLib/Fluid/Movers/Compressors/Examples/RotaryCompressorPressureHeatLosses.mo new file mode 100644 index 0000000000..d38dee94dc --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Examples/RotaryCompressorPressureHeatLosses.mo @@ -0,0 +1,116 @@ +within AixLib.Fluid.Movers.Compressors.Examples; +model RotaryCompressorPressureHeatLosses + "Example model to test simple rotary compressors with pressure and heat losses" + extends Modelica.Icons.Example; + extends Modelica.Icons.UnderConstruction; + + // Define medium and parameters + // + package Medium = + Modelica.Media.R134a.R134a_ph + "Medium of the compressor"; + + parameter Modelica.SIunits.AbsolutePressure pInl= + Medium.pressure(Medium.setBubbleState(Medium.setSat_T(TInl+1))) + "Current pressure at inlet conditions"; + parameter Modelica.SIunits.Temperature TInl = 283.15 + "Current temperature at inlet conditions"; + parameter Modelica.SIunits.AbsolutePressure pOut= + Medium.pressure(Medium.setDewState(Medium.setSat_T(TOut-5))) + "Current set point of the compressor's outlet pressure"; + parameter Modelica.SIunits.Temperature TOut = 333.15 + "Current temperature at outlet conditions"; + + // Definition of models + // + Sources.Boundary_pT source( + redeclare package Medium = Medium, + nPorts=1, + p=pInl, + T=TOut) "Source with constant pressure and temperature" + annotation (Placement(transformation(extent={{-80,-10},{-60,10}}))); + Modelica.Blocks.Sources.Sine rotSpe( + amplitude=40, + offset=80, + freqHz=1) + "Prescribed compressor's rotational speed" + annotation (Placement(transformation(extent={{-80,30},{-60,50}}))); + Modelica.Thermal.HeatTransfer.Sources.FixedTemperature fixTem(T=283.15) + "Fixed ambient temperature" + annotation (Placement(transformation(extent={{-80,-60},{-60,-40}}))); + SimpleCompressors.RotaryCompressors.RotaryCompressorPressureHeatLosses rotCom( + redeclare package Medium = Medium, + show_staEff=true, + show_qua=true, + useInpFil=true, + redeclare model EngineEfficiency = + Utilities.EngineEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare model VolumetricEfficiency = + Utilities.VolumetricEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare model IsentropicEfficiency = + AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + kAMeaInl=5, + kAMeaOut=15, + kAMeaAmb=3) "Model of a rotary compressor" + annotation (Placement(transformation(extent={{-30,-10},{-10,10}}))); + + Modelica.Blocks.Sources.Sine valOpe( + offset=0.5, + amplitude=0.3, + freqHz=1) + "Prescribed valve's opening" + annotation (Placement(transformation(extent={{-80,70},{-60,90}}))); + Actuators.Valves.SimpleValve simVal( + redeclare package Medium = Medium, + m_flow_start=0.025, + m_flow_small=1e-6, + Kvs=1.4) "Model of a simple valve to simulate pressure losses" + annotation (Placement(transformation(extent={{20,-10},{40,10}}))); + MixingVolumes.MixingVolume sink( + redeclare package Medium = Medium, + V=10e-3, + m_flow_nominal=0.1, + energyDynamics=Modelica.Fluid.Types.Dynamics.DynamicFreeInitial, + massDynamics=Modelica.Fluid.Types.Dynamics.DynamicFreeInitial, + nPorts=1) "Sink with constant pressure and temperature" + annotation (Placement(transformation(extent={{10,-10},{-10,10}}, + rotation=-90, + origin={70,0}))); + +equation + // Connection of components + // + connect(source.ports[1], rotCom.port_a) + annotation (Line(points={{-60,0},{-60,0},{-30,0}}, color={0,127,255})); + connect(rotCom.port_b, simVal.port_a) + annotation (Line(points={{-10,0},{6,0},{20,0}}, color={0,127,255})); + connect(simVal.port_b, sink.ports[1]) + annotation (Line(points={{40,0},{60,0},{60,1.77636e-015}}, + color={0,127,255})); + connect(rotSpe.y, rotCom.manVarCom) + annotation (Line(points={{-59,40},{-26,40},{-26,10}}, color={0,0,127})); + connect(valOpe.y, simVal.opening) + annotation (Line(points={{-59,80},{30,80},{30,8}}, color={0,0,127})); + connect(fixTem.port, rotCom.heatPort) + annotation (Line(points={{-60,-50},{-20,-50},{-20,-10}}, color={191,0,0})); + + annotation (Documentation(revisions=" ++This is a example model to test the simple rotary compressor presented in + +AixLib.Fluid.Movers.Compressors.SimpleCompressors.RotaryCompressors.RotaryCompressorPressureHeatLosses. +Therefore, both the compressor's inlet and outlet conditions are prescribed +in terms of pressure and temperature and the User can select different +efficiency models using the dialog menu. +
+"), +experiment(StopTime=1)); +end RotaryCompressorPressureHeatLosses; diff --git a/AixLib/Fluid/Movers/Compressors/Examples/RotaryCompressorPressureLosses.mo b/AixLib/Fluid/Movers/Compressors/Examples/RotaryCompressorPressureLosses.mo new file mode 100644 index 0000000000..6260f9073a --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Examples/RotaryCompressorPressureLosses.mo @@ -0,0 +1,108 @@ +within AixLib.Fluid.Movers.Compressors.Examples; +model RotaryCompressorPressureLosses + "Example model to test simple rotary compressors with pressure losses" + extends Modelica.Icons.Example; + + // Define medium and parameters + // + package Medium = + Modelica.Media.R134a.R134a_ph + "Medium of the compressor"; + + parameter Modelica.SIunits.AbsolutePressure pInl= + Medium.pressure(Medium.setBubbleState(Medium.setSat_T(TInl+1))) + "Current pressure at inlet conditions"; + parameter Modelica.SIunits.Temperature TInl = 283.15 + "Current temperature at inlet conditions"; + parameter Modelica.SIunits.AbsolutePressure pOut= + Medium.pressure(Medium.setDewState(Medium.setSat_T(TOut-5))) + "Current set point of the compressor's outlet pressure"; + parameter Modelica.SIunits.Temperature TOut = 333.15 + "Current temperature at outlet conditions"; + + // Definition of models + // + Sources.Boundary_pT source( + redeclare package Medium = Medium, + nPorts=1, + p=pInl, + T=TOut) "Source with constant pressure and temperature" + annotation (Placement(transformation(extent={{-80,-10},{-60,10}}))); + Modelica.Blocks.Sources.Sine rotSpe( + amplitude=40, + offset=80, + freqHz=1) + "Prescribed compressor's rotational speed" + annotation (Placement(transformation(extent={{-80,30},{-60,50}}))); + Modelica.Thermal.HeatTransfer.Sources.FixedTemperature fixTem(T=283.15) + "Fixed ambient temperature" + annotation (Placement(transformation(extent={{-80,-60},{-60,-40}}))); + SimpleCompressors.RotaryCompressors.RotaryCompressorPressureLosses rotCom( + redeclare package Medium = Medium, + show_staEff=true, + show_qua=true, + useInpFil=true, + redeclare model EngineEfficiency = + Utilities.EngineEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare model VolumetricEfficiency = + Utilities.VolumetricEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare model IsentropicEfficiency = + AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll) + "Model of a rotary compressor" + annotation (Placement(transformation(extent={{-30,-10},{-10,10}}))); + + Modelica.Blocks.Sources.Sine valOpe( + offset=0.5, + amplitude=0.3, + freqHz=1) + "Prescribed valve's opening" + annotation (Placement(transformation(extent={{-80,70},{-60,90}}))); + Actuators.Valves.SimpleValve simVal( + redeclare package Medium = Medium, + m_flow_start=0.025, + m_flow_small=1e-6, + Kvs=1.4) "Model of a simple valve to simulate pressure losses" + annotation (Placement(transformation(extent={{20,-10},{40,10}}))); + Sources.Boundary_pT sink( + redeclare package Medium = Medium, + nPorts=1, + p=pInl, + T=TInl) "Sink with constant pressure and temperature" + annotation (Placement(transformation(extent={{80,-10},{60,10}}))); + +equation + // Connection of components + // + connect(source.ports[1], rotCom.port_a) + annotation (Line(points={{-60,0},{-60,0},{-30,0}}, color={0,127,255})); + connect(rotCom.port_b, simVal.port_a) + annotation (Line(points={{-10,0},{6,0},{20,0}}, color={0,127,255})); + connect(simVal.port_b, sink.ports[1]) + annotation (Line(points={{40,0},{50,0},{60,0}}, color={0,127,255})); + connect(rotSpe.y, rotCom.manVarCom) + annotation (Line(points={{-59,40},{-26,40},{-26,10}}, color={0,0,127})); + connect(valOpe.y, simVal.opening) + annotation (Line(points={{-59,80},{30,80},{30,8}}, color={0,0,127})); + connect(fixTem.port, rotCom.heatPort) + annotation (Line(points={{-60,-50},{-20,-50},{-20,-10}}, color={191,0,0})); + + annotation (Documentation(revisions=" ++This is a example model to test the simple rotary compressor presented in + +AixLib.Fluid.Movers.Compressors.SimpleCompressors.RotaryCompressors.RotaryCompressorPressureLosses. +Therefore, both the compressor's inlet and outlet conditions are prescribed +in terms of pressure and temperature and the User can select different +efficiency models using the dialog menu. +
+"), +experiment(StopTime=1)); +end RotaryCompressorPressureLosses; diff --git a/AixLib/Fluid/Movers/Compressors/Examples/package.mo b/AixLib/Fluid/Movers/Compressors/Examples/package.mo new file mode 100644 index 0000000000..44fe742712 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Examples/package.mo @@ -0,0 +1,26 @@ +within AixLib.Fluid.Movers.Compressors; +package Examples "Package that contains example models" + extends Modelica.Icons.ExamplesPackage; + + + + +annotation (Documentation(revisions=" ++This package provides models to test the compressor models provided in + +AixLib.Fluid.Movers.Compressors.SimpleCompressors +and + +AixLib.Fluid.Movers.Compressors.ModularCompressors. +
+")); +end Examples; diff --git a/AixLib/Fluid/Movers/Compressors/Examples/package.order b/AixLib/Fluid/Movers/Compressors/Examples/package.order new file mode 100644 index 0000000000..2138466c66 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Examples/package.order @@ -0,0 +1,4 @@ +ModularRotaryCompressor +RotaryCompressor +RotaryCompressorPressureHeatLosses +RotaryCompressorPressureLosses diff --git a/AixLib/Fluid/Movers/Compressors/ModularCompressors/ModularCompressors.mo b/AixLib/Fluid/Movers/Compressors/ModularCompressors/ModularCompressors.mo new file mode 100644 index 0000000000..dd1ec7c72e --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/ModularCompressors/ModularCompressors.mo @@ -0,0 +1,56 @@ +within AixLib.Fluid.Movers.Compressors.ModularCompressors; +model ModularCompressors + "Model of simple modular compressors" + extends BaseClasses.PartialModularCompressors; + +equation + // Connect port_b with compressors' port_b + // + for i in 1:nCom loop + connect(modCom[i].port_b,port_b); + end for; + + annotation (Documentation(revisions=" +
+This is a model of modular compressors that are used, for example,
+in close-loop systems like heat pumps or chillers.
+It consists of nCom compressors in parallel and also
+nCom PID conrollers if no external controller is used.
+
+This base model mainly consists of two sub-models. Therefore, please +checkout these sub-models for further information of underlying modeling +approaches and parameterisation: +
++The first sub-model describes a simple compressor that is defined in + +AixLib.Fluid.Movers.Compressors.SimpleCompressors; the second +sub-model describes the internal controller model. +
+"), Diagram(graphics={Line(points={{-100,0},{-10,0}}, + color={0,127,255}), + Line(points={{10,0},{100,0}}, + color={0,127,255}), + Line(points={{0,10},{0,100}}, + color={191,0,0})})); +end ModularCompressors; diff --git a/AixLib/Fluid/Movers/Compressors/ModularCompressors/ModularCompressorsSensors.mo b/AixLib/Fluid/Movers/Compressors/ModularCompressors/ModularCompressorsSensors.mo new file mode 100644 index 0000000000..3e749ee2a4 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/ModularCompressors/ModularCompressorsSensors.mo @@ -0,0 +1,173 @@ +within AixLib.Fluid.Movers.Compressors.ModularCompressors; +model ModularCompressorsSensors + "Model of simple modular compressors with sensors at each compressor's outlet" + extends BaseClasses.PartialModularCompressors; + + // Definition of parameters + // + parameter Modelica.SIunits.Time tau = 1 + "Time constant at nominal flow rate" + annotation(Dialog(tab="General",group="Sensors"), + HideResult=not show_parSen); + + parameter Boolean transferHeat = false + "if true, temperature T converges towards TAmb when no flow" + annotation(Dialog(tab="General",group="Sensors"), + HideResult=not show_parSen); + parameter Modelica.SIunits.Temperature TAmb = Medium.T_default + "Fixed ambient temperature for heat transfer" + annotation(Dialog(tab="General",group="Sensors"), + HideResult=not show_parSen); + parameter Modelica.SIunits.Time tauHeaTra = 1200 + "Time constant for heat transfer, default 20 minutes" + annotation(Dialog(tab="General",group="Sensors"), + HideResult=not show_parSen); + + parameter Modelica.Blocks.Types.Init initTypeSen= + Modelica.Blocks.Types.Init.InitialState + "Type of initialization (InitialState and InitialOutput are identical)" + annotation(Dialog(tab="Advanced",group="Initialisation Sensors"), + HideResult=not show_parSen); + parameter Modelica.SIunits.Temperature T_start = Medium.T_default + "Initial or guess value of output (= state)" + annotation(Dialog(tab="Advanced",group="Initialisation Sensors"), + HideResult=not show_parSen); + parameter Modelica.SIunits.SpecificEnthalpy h_out_start= + Medium.specificEnthalpy_pTX( + p=Medium.p_default, + T=Medium.T_default, + X=Medium.X_default) + "Initial or guess value of output (= state)" + annotation(Dialog(tab="Advanced",group="Initialisation Sensors"), + HideResult=not show_parSen); + + parameter Boolean show_parSen = false + "= true, if sensors' input parameters are shown in results" + annotation(Dialog(tab="Advanced",group="Diagnostics")); + + // Definition of submodels and connectors + // + Sensors.ModularSensors modSen( + redeclare final package Medium = Medium, + final nPorts=nCom, + final tau=tau, + final transferHeat=transferHeat, + final TAmb=TAmb, + final tauHeaTra=tauHeaTra, + final initType=initTypeSen, + final T_start=T_start, + final h_out_start=h_out_start, + final m_flow_nominal=m_flow_nominal, + final m_flow_small=1e-6*m_flow_nominal) + "Model that contains different sensors located behind compressors" + annotation (Placement(transformation(extent={{28,-10},{48,10}}))); + + +equation + // Connect compressors' port_b with sensors and sensors with port_b + // + for i in 1:nCom loop + connect(modCom[i].port_b,modSen.ports_a[i]); + connect(modSen.ports_b[i],port_b); + end for; + + // Connect sensors + // + connect(modSen.meaPre, dataBus.senBus.meaPreCom) + annotation (Line(points={{32,-10},{32,-90},{0.05,-90},{0.05,-99.95}}, + color={0,0,127})); + connect(modSen.meaTem, dataBus.senBus.meaTemCom) + annotation (Line(points={{36,-10},{36,-90},{0.05,-90},{0.05,-99.95}}, + color={0,0,127})); + connect(modSen.meaMasFlo, dataBus.senBus.meaMasFloCom) + annotation (Line(points={{40,-10},{40,-10},{40,-22},{40,-90},{0.05,-90}, + {0.05,-99.95}},color={0,0,127})); + connect(modSen.meaQua, dataBus.senBus.meaPhaCom) + annotation (Line(points={{44,-10},{44,-90},{0.05,-90},{0.05,-99.95}}, + color={0,0,127})); + + annotation (Documentation(revisions=" +
+This is a model of modular compressors that are used, for example,
+in close-loop systems like heat pumps or chillers.
+It consists of nCom compressors in parallel and also
+nCom PID conrollers if no external controller is used.
+Additionally, four different sensors (i.e. absolute pressure, temperature,
+mass flow rate, steam quality) are located at each compressor's outlet.
+
+This base model mainly consists of two sub-models. Therefore, please +checkout these sub-models for further information of underlying modeling +approaches and parameterisation: +
++The first sub-model describes a simple compressor that is defined in + +AixLib.Fluid.Movers.Compressors.SimpleCompressors; the second +sub-model describes the internal controller model. +
+"), Icon(graphics={ + Rectangle( + extent={{38,34},{82,-34}}, + lineColor={0,0,0}, + fillColor={255,255,255}, + fillPattern=FillPattern.Solid), + Ellipse( + fillColor={245,245,245}, + fillPattern=FillPattern.Solid, + extent={{40,-20},{80,20}}), + Line(points={{60,20},{60,12}}), + Line(points={{66,10},{70.2,17.3}}), + Line(points={{54,10},{49.8,17.3}}), + Line(points={{70,4},{77.8,7.9}}), + Line(points={{50,4},{42.2,7.9}}), + Ellipse( + lineColor={64,64,64}, + fillColor={255,255,255}, + extent={{54,-6},{66,6}}), + Ellipse( + fillColor={64,64,64}, + pattern=LinePattern.None, + fillPattern=FillPattern.Solid, + extent={{56,-4},{64,4}}), + Polygon( + points={{60,2},{62,0},{68,6},{70,10},{66,8},{60,2}}, + lineColor={0,0,0}, + fillColor={0,0,0}, + fillPattern=FillPattern.Solid)}), + Diagram(graphics={ Line(points={{-100,0},{-10,0}}, + color={0,127,255}), + Line(points={{0,10},{0,100}}, + color={191,0,0}), + Line(points={{10,0},{28,4}}, + color={0,127,255}), + Line(points={{10,0},{28,-4}}, + color={0,127,255}), + Line(points={{10,0},{28,0}}, + color={0,127,255}), + Line(points={{48,4},{100,0}}, + color={0,127,255}), + Line(points={{48,-4},{100,0}}, + color={0,127,255}), + Line(points={{48,0},{100,0}}, + color={0,127,255})})); +end ModularCompressorsSensors; diff --git a/AixLib/Fluid/Movers/Compressors/ModularCompressors/package.mo b/AixLib/Fluid/Movers/Compressors/ModularCompressors/package.mo new file mode 100644 index 0000000000..d1c456a3a0 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/ModularCompressors/package.mo @@ -0,0 +1,18 @@ +within AixLib.Fluid.Movers.Compressors; +package ModularCompressors "Package that contains modular compressor models based on simple compressors" + extends Modelica.Icons.VariantsPackage; + + annotation (Documentation(revisions=" ++This package contains models describing modular compressors. +
+")); +end ModularCompressors; diff --git a/AixLib/Fluid/Movers/Compressors/ModularCompressors/package.order b/AixLib/Fluid/Movers/Compressors/ModularCompressors/package.order new file mode 100644 index 0000000000..b33528c649 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/ModularCompressors/package.order @@ -0,0 +1,2 @@ +ModularCompressors +ModularCompressorsSensors diff --git a/AixLib/Fluid/Movers/Compressors/SimpleCompressors/CompressionProcesses/RotaryCompression.mo b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/CompressionProcesses/RotaryCompression.mo new file mode 100644 index 0000000000..0c1f8af0fd --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/CompressionProcesses/RotaryCompression.mo @@ -0,0 +1,121 @@ +within AixLib.Fluid.Movers.Compressors.SimpleCompressors.CompressionProcesses; +model RotaryCompression + "Model that describes the compression process of a rotary compressor" + extends BaseClasses.PartialCompression; + +equation + // Calculation of mass flow + // + m_flow = homotopy(rotSpe*oveVolEff.lamH*VDis*dInl, + rotSpe*oveVolEff.lamH*VDis*dInl0) + "This covers initialisation case as well as shut-down case"; + + // Calculation of energy balances + // + hOutIse = Medium.specificEnthalpy(Medium.setState_psX(p=pOut, + s=Medium.specificEntropy(staInl))) + "Isentropic specific enthalpy at outlet"; + oveIseEff.etaIse*dh = dhIse "Specific enthalpy difference"; + dhIse = (hOutIse - hInl) "Isentropic specific enthalpy difference"; + + Q_flow_ref = m_flow *dh "Power absorbed by refrigerant"; + if not useIseWor then + oveEngEff.etaEng*PEle = Q_flow_ref "Compressor's power consumption"; + else + oveEngEff.etaEng*PEle = m_flow *dhIse "Compressor's power consumption"; + end if; + /*Some efficiency models calculate the compressor's power consumptions based + on the compressors isentropic work. Therefore, a distinction is made above. + */ + + // Calculate pressures at inlet and outlet of compressor + // + pInl = port_a.p "Pressure at inlet"; + pOut = port_b.p "Pressure at outlet"; + + // Calculate specific enthalpies + // + hInl = actualStream(port_a.h_outflow) "Specific enthalpy at inlet"; + hOut = actualStream(port_b.h_outflow) "Specific enthalpy at outlet"; + + port_a.h_outflow = inStream(port_a.h_outflow) + "Compressor behaves as perfect valve if flow is reserved"; + port_b.h_outflow = smooth(1,noEvent(if m_flow > 0 + then hInl + dh else inStream(port_a.h_outflow))) + "Compressor behaves as perfect valve if flow is reserved"; + /*It is assumed that the compressor works as perfectly closed valve if the + mass flow is reserved. Hence, specific enthalpies flowing out of the system + will meet the specific enthalpies flowing into the system. + */ + + // Connect heat port with internal variables + // + heatPort.Q_flow = Q_flow_ref-PEle; + + annotation (Documentation(revisions=" ++This is a model describing the compression process of a rolling piston +type rotary (i.e. rotary) compressor. The model is based on a grey-box +approach and, therefore, it inherits from + +AixLib.Fluid.Movers.Compressors.BaseClasses.PartialCompression. +Consequently, the model uses three efficiencies that must be redefined +by the User: +
++In the following, some general references are given for information about +the compression process: +
++W. Eifler, E. Schlücker, U. Spicher and G. Will (2009): + +Küttner Kolbenmaschinen: Kolbenpumpen, Kolbenverdichter, Brennkraftmaschinen +(in German). Publisher: Vieweg + Teubner +
++P.C. Hanlon (2011): + +Compressor Handbook. Publisher: McGraw-Hill +
+"), Icon(graphics={ + Ellipse( + extent={{-60,40},{20,-40}}, + lineColor={0,0,0}, + fillColor={230,230,230}, + fillPattern=FillPattern.Solid), + Ellipse( + extent={{-40,28},{20,-32}}, + lineColor={0,0,0}, + fillColor={182,182,182}, + fillPattern=FillPattern.CrossDiag), + Ellipse( + extent={{-26,6},{-14,-6}}, + lineColor={0,0,0}, + fillColor={0,0,0}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-22,46},{-18,26}}, + lineColor={0,0,0}, + fillColor={0,0,0}, + fillPattern=FillPattern.Solid)})); +end RotaryCompression; diff --git a/AixLib/Fluid/Movers/Compressors/SimpleCompressors/CompressionProcesses/package.mo b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/CompressionProcesses/package.mo new file mode 100644 index 0000000000..dbb56c9d28 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/CompressionProcesses/package.mo @@ -0,0 +1,22 @@ +within AixLib.Fluid.Movers.Compressors.SimpleCompressors; +package CompressionProcesses "Package that contains different compression models" + extends Modelica.Icons.InternalPackage; + +annotation (Documentation(revisions=" ++This package contains models describing compression processes. These models +inherit from + +AixLib.Fluid.Movers.Compressors.BaseClasses.PartialCompression and +add the missing definitions for completition. +
+")); +end CompressionProcesses; diff --git a/AixLib/Fluid/Movers/Compressors/SimpleCompressors/CompressionProcesses/package.order b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/CompressionProcesses/package.order new file mode 100644 index 0000000000..9ecf7de344 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/CompressionProcesses/package.order @@ -0,0 +1 @@ +RotaryCompression diff --git a/AixLib/Fluid/Movers/Compressors/SimpleCompressors/RotaryCompressors/RotaryCompressor.mo b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/RotaryCompressors/RotaryCompressor.mo new file mode 100644 index 0000000000..90d314c543 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/RotaryCompressors/RotaryCompressor.mo @@ -0,0 +1,72 @@ +within AixLib.Fluid.Movers.Compressors.SimpleCompressors.RotaryCompressors; +model RotaryCompressor + "Model that describes a simple rotary compressor" + extends BaseClasses.PartialCompressor( + redeclare final model CompressionProcess = + SimpleCompressors.CompressionProcesses.RotaryCompression, + final simCom = Utilities.Types.SimpleCompressor.RotaryCompressor); + + +equation + // Conncections of main components + // + connect(port_a,comPro.port_a) + annotation (Line(points={{-100,0},{-90,0},{-10,0}}, color={0,127,255})); + connect(comPro.port_b, port_b) + annotation (Line(points={{10,0},{55,0},{100,0}}, color={0,127,255})); + connect(heatPort,comPro.heatPort) + annotation (Line(points={{0,-100},{0,-100},{0,-78},{0,-10}}, + color={191,0,0})); + + annotation (Icon(graphics={ + Ellipse( + extent={{-60,40},{20,-40}}, + lineColor={0,0,0}, + fillColor={230,230,230}, + fillPattern=FillPattern.Solid), + Ellipse( + extent={{-40,28},{20,-32}}, + lineColor={0,0,0}, + fillColor={182,182,182}, + fillPattern=FillPattern.CrossDiag), + Ellipse( + extent={{-26,6},{-14,-6}}, + lineColor={0,0,0}, + fillColor={0,0,0}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-22,46},{-18,26}}, + lineColor={0,0,0}, + fillColor={0,0,0}, + fillPattern=FillPattern.Solid)}), Documentation(revisions=" ++This is a model of a simple rotary compressor that is used, for example, +in close-loop systems like heat pumps or chillers. It inherits from +PartialCompressor which inherits from PartialCompression. Therefore, please +checkout these sub-models for further information of underlying modeling +approaches and parameterisation: +
++For this model, no further losses are assumed at inlet and outlet of +the compressor. +
+")); +end RotaryCompressor; diff --git a/AixLib/Fluid/Movers/Compressors/SimpleCompressors/RotaryCompressors/RotaryCompressorPressureHeatLosses.mo b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/RotaryCompressors/RotaryCompressorPressureHeatLosses.mo new file mode 100644 index 0000000000..e3ca320127 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/RotaryCompressors/RotaryCompressorPressureHeatLosses.mo @@ -0,0 +1,263 @@ +within AixLib.Fluid.Movers.Compressors.SimpleCompressors.RotaryCompressors; +model RotaryCompressorPressureHeatLosses + "Model that describes a simple rotary compressor with pressure and heat losses" + extends BaseClasses.PartialCompressor( + redeclare final model CompressionProcess = + SimpleCompressors.CompressionProcesses.RotaryCompression, + final simCom = Utilities.Types.SimpleCompressor.RotaryCompressorPressureHeatLosses); + extends Modelica.Icons.UnderConstruction; + + // Definition of submodels and connectors + // + FixedResistances.HydraulicResistance hydResInl( + redeclare final package Medium=Medium, + final zeta=zetInl, + final diameter=diameterInl, + final m_flow_nominal=m_flow_nominal, + final allowFlowReversal=allowFlowReversal, + final show_T=false, + final from_dp=from_dp, + final homotopyInitialization=homotopyInitialization, + final linearized=linearized, + final dp_start=(1/40)*dp_start, + final m_flow_start=m_flow_start) + "Calculation of pressure drop at inlet of compressor" + annotation (Placement(transformation(extent={{-80,-10},{-60,10}}))); + Utilities.HeatTransfer.SimpleHeatTransfer heaTraInl( + redeclare final package Medium=Medium, + final allowFlowReversal=allowFlowReversal, + final show_T=show_T, + final show_V_flow=show_V_flow, + final heaTraMod=heaTraMod, + final kAMea=kAMeaInl, + final m_flow_nominal=m_flow_nominal) + "Model to calculate heat transfer at inlet of compressor" + annotation (Placement(transformation(extent={{-50,-10},{-30,10}}))); + + Utilities.HeatTransfer.SimpleHeatTransfer heaTraOut( + redeclare final package Medium=Medium, + final allowFlowReversal=allowFlowReversal, + final show_T=show_T, + final show_V_flow=show_V_flow, + final heaTraMod=heaTraMod, + final kAMea=kAMeaOut, + final m_flow_nominal=m_flow_nominal) + "Model to calculate heat transfer at outlet of compressor" + annotation (Placement(transformation(extent={{30,-10},{50,10}}))); + FixedResistances.HydraulicResistance hydResOut( + redeclare final package Medium=Medium, + final zeta=zetOut, + final diameter=diameterOut, + final m_flow_nominal=m_flow_nominal, + final allowFlowReversal=allowFlowReversal, + final show_T=false, + final from_dp=from_dp, + final homotopyInitialization=homotopyInitialization, + final linearized=linearized, + final dp_start=(1/40)*dp_start, + final m_flow_start=m_flow_start) + "Calculation of pressure drop at outlet of compressor" + annotation (Placement(transformation(extent={{60,-10},{80,10}}))); + + Utilities.HeatTransfer.SimpleFictitiousWall ficWal( + final mWal=mWal, + final cpWal=cpWal, + final kAMeaAmb=kAMeaAmb, + final TWal0=TWal0, + final iniTWal0=iniTWal0) + "Simple fictitious wall to calculate heat losses at compressor's inlet + and outlet" + annotation (Placement(transformation(extent={{-40,-90},{40,-10}}))); + +equation + // Connection of main components + // + connect(port_a, hydResInl.port_a) + annotation (Line(points={{-100,0},{-80,0}}, color={0,127,255})); + connect(hydResInl.port_b, heaTraInl.port_a) + annotation (Line(points={{-60,0},{-55,0},{-50,0}}, color={0,127,255})); + connect(heaTraInl.port_b,comPro.port_a) + annotation (Line(points={{-30,0},{-20,0},{-10,0}}, color={0,127,255})); + connect(comPro.port_b, heaTraOut.port_a) + annotation (Line(points={{10,0},{20,0},{30,0}}, color={0,127,255})); + connect(heaTraOut.port_b, hydResOut.port_a) + annotation (Line(points={{50,0},{55,0},{60,0}}, color={0,127,255})); + connect(hydResOut.port_b, port_b) + annotation (Line(points={{80,0},{100,0}}, color={0,127,255})); + + // Connection of heat ports + // + connect(heaTraInl.heatPort, ficWal.heaPorComInl) + annotation (Line(points={{-40,-10},{-40,-10},{-40,-30}, + {-20,-30},{-20,-42}}, color={191,0,0})); + connect(comPro.heatPort, ficWal.heaPorCom) + annotation (Line(points={{0,-10},{0,-26},{0,-42},{0,-42}}, + color={191,0,0})); + connect(heaTraOut.heatPort, ficWal.heaPorComOut) + annotation (Line(points={{40,-10},{40,-30},{20,-30},{20,-42}}, + color={191,0,0})); + connect(ficWal.heaPorAmb, heatPort) + annotation (Line(points={{0,-58},{0,-100}}, color={191,0,0})); + + annotation (Icon(graphics={ + Ellipse( + extent={{80,80},{-80,-80}}, + lineColor={0,0,0}, + startAngle=0, + endAngle=360, + fillPattern=FillPattern.Sphere, + fillColor={214,214,214}), + Ellipse( + extent={{-60,40},{20,-40}}, + lineColor={0,0,0}, + fillColor={230,230,230}, + fillPattern=FillPattern.Solid), + Ellipse( + extent={{-40,28},{20,-32}}, + lineColor={0,0,0}, + fillColor={182,182,182}, + fillPattern=FillPattern.CrossDiag), + Ellipse( + extent={{-26,6},{-14,-6}}, + lineColor={0,0,0}, + fillColor={0,0,0}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-22,46},{-18,26}}, + lineColor={0,0,0}, + fillColor={0,0,0}, + fillPattern=FillPattern.Solid), + Line( + points={{74,-30},{-60,-52}}, + color={0,0,0}, + thickness=0.5), + Line( + points={{74,30},{-58,54}}, + color={0,0,0}, + thickness=0.5), + Ellipse( + extent={{-60,40},{20,-40}}, + lineColor={0,0,0}, + fillColor={230,230,230}, + fillPattern=FillPattern.Solid), + Ellipse( + extent={{-40,28},{20,-32}}, + lineColor={0,0,0}, + fillColor={182,182,182}, + fillPattern=FillPattern.CrossDiag), + Ellipse( + extent={{-26,6},{-14,-6}}, + lineColor={0,0,0}, + fillColor={0,0,0}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-22,46},{-18,26}}, + lineColor={0,0,0}, + fillColor={0,0,0}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-88,6},{-64,-6}}, + lineColor={0,0,0}, + fillColor={0,0,255}, + fillPattern=FillPattern.Backward), + Ellipse( + extent={{-86,6},{-66,-6}}, + lineColor={0,0,255}, + fillColor={255,255,0}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-88,6},{-64,8}}, + lineColor={0,0,0}, + fillColor={95,95,95}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-88,-8},{-64,-6}}, + lineColor={0,0,0}, + fillColor={95,95,95}, + fillPattern=FillPattern.Solid), + Polygon( + points={{-74,6},{-80,2},{-78,-2},{-80,-6},{-74,-2},{-76,2},{-74,6}}, + lineColor={0,0,0}, + fillColor={255,0,0}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{64,6},{88,-6}}, + lineColor={0,0,0}, + fillColor={0,0,255}, + fillPattern=FillPattern.Backward), + Ellipse( + extent={{66,6},{86,-6}}, + lineColor={0,0,255}, + fillColor={255,255,0}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{64,6},{88,8}}, + lineColor={0,0,0}, + fillColor={95,95,95}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{64,-8},{88,-6}}, + lineColor={0,0,0}, + fillColor={95,95,95}, + fillPattern=FillPattern.Solid), + Polygon( + points={{78,6},{72,2},{74,-2},{72,-6},{78,-2},{76,2},{78,6}}, + lineColor={0,0,0}, + fillColor={255,0,0}, + fillPattern=FillPattern.Solid), + Line( + points={{-76,-8},{-76,-82},{0,-82},{0,-90}}, + color={255,0,0}, + thickness=0.5, + arrow={Arrow.Filled,Arrow.Filled}), + Line( + points={{76,-8},{76,-82},{0,-82},{0,-90}}, + color={255,0,0}, + thickness=0.5, + arrow={Arrow.Filled,Arrow.Filled})}), + Documentation(revisions=" ++This is a model of a simple rotary compressor that is used, for example, +in close-loop systems like heat pumps or chillers. It inherits from +PartialCompressor which inherits from PartialCompression. Therefore, please +checkout these sub-models for further information of underlying modeling +approaches and parameterisation: +
++For this model, pressure and heat losses are assumed at inlet and outlet +of the compressor. These pressure losses may occur due to reduction or +enlargement of the cross-section and these heat losses may occure due to +heat exchange with a fictitious wall that describes the shell of the +compressor. +
++The modelling approach presented here is alligned to the modelling approaches +presented in the literature: +
++P. Byrne, R. Ghoubali and J. Miriel (2012): + +Development of a scroll compressor model for propane +. In: The 10th Gustav Lorentzen Conference +
+")); +end RotaryCompressorPressureHeatLosses; diff --git a/AixLib/Fluid/Movers/Compressors/SimpleCompressors/RotaryCompressors/RotaryCompressorPressureLosses.mo b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/RotaryCompressors/RotaryCompressorPressureLosses.mo new file mode 100644 index 0000000000..b46d995577 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/RotaryCompressors/RotaryCompressorPressureLosses.mo @@ -0,0 +1,195 @@ +within AixLib.Fluid.Movers.Compressors.SimpleCompressors.RotaryCompressors; +model RotaryCompressorPressureLosses + "Model that describes a simple rotary compressor with pressure losses" + extends BaseClasses.PartialCompressor( + redeclare final model CompressionProcess = + SimpleCompressors.CompressionProcesses.RotaryCompression, + final simCom = Utilities.Types.SimpleCompressor.RotaryCompressorPressureLosses); + + // Definition of submodels and connectors + // + FixedResistances.HydraulicResistance hydResInl( + redeclare final package Medium=Medium, + final zeta=zetInl, + final diameter=diameterInl, + final m_flow_nominal=m_flow_nominal, + final allowFlowReversal=allowFlowReversal, + final show_T=false, + final from_dp=from_dp, + final homotopyInitialization=homotopyInitialization, + final linearized=linearized, + final dp_start=(1/40)*dp_start, + final m_flow_start=m_flow_start) + "Calculation of pressure drop at inlet of compressor" + annotation (Placement(transformation(extent={{-80,-10},{-60,10}}))); + FixedResistances.HydraulicResistance hydResOut( + redeclare final package Medium=Medium, + final zeta=zetOut, + final diameter=diameterOut, + final m_flow_nominal=m_flow_nominal, + final allowFlowReversal=allowFlowReversal, + final show_T=false, + final from_dp=from_dp, + final homotopyInitialization=homotopyInitialization, + final linearized=linearized, + final dp_start=(1/40)*dp_start, + final m_flow_start=m_flow_start) + "Calculation of pressure drop at outlet of compressor" + annotation (Placement(transformation(extent={{60,-10},{80,10}}))); + + +equation + // Connections of main components + // + connect(port_a, hydResInl.port_a) + annotation (Line(points={{-100,0},{-80,0}}, color={0,127,255})); + connect(hydResInl.port_b,comPro.port_a) + annotation (Line(points={{-60,0},{-10,0}}, color={0,127,255})); + connect(comPro.port_b, hydResOut.port_a) + annotation (Line(points={{10,0},{60,0}}, color={0,127,255})); + connect(hydResOut.port_b, port_b) + annotation (Line(points={{80,0},{100,0}}, color={0,127,255})); + + // Connection of further components + // + connect(comPro.heatPort, heatPort) + annotation (Line(points={{0,-10},{0,-100}}, color={191,0,0})); + + annotation (Icon(graphics={ + Ellipse( + extent={{-60,40},{20,-40}}, + lineColor={0,0,0}, + fillColor={230,230,230}, + fillPattern=FillPattern.Solid), + Ellipse( + extent={{-40,28},{20,-32}}, + lineColor={0,0,0}, + fillColor={182,182,182}, + fillPattern=FillPattern.CrossDiag), + Ellipse( + extent={{-26,6},{-14,-6}}, + lineColor={0,0,0}, + fillColor={0,0,0}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-22,46},{-18,26}}, + lineColor={0,0,0}, + fillColor={0,0,0}, + fillPattern=FillPattern.Solid), + Ellipse( + extent={{80,80},{-80,-80}}, + lineColor={0,0,0}, + startAngle=0, + endAngle=360, + fillPattern=FillPattern.Sphere, + fillColor={214,214,214}), + Line( + points={{74,-30},{-60,-52}}, + color={0,0,0}, + thickness=0.5), + Line( + points={{74,30},{-58,54}}, + color={0,0,0}, + thickness=0.5), + Ellipse( + extent={{-60,40},{20,-40}}, + lineColor={0,0,0}, + fillColor={230,230,230}, + fillPattern=FillPattern.Solid), + Ellipse( + extent={{-40,28},{20,-32}}, + lineColor={0,0,0}, + fillColor={182,182,182}, + fillPattern=FillPattern.CrossDiag), + Ellipse( + extent={{-26,6},{-14,-6}}, + lineColor={0,0,0}, + fillColor={0,0,0}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-22,46},{-18,26}}, + lineColor={0,0,0}, + fillColor={0,0,0}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-88,6},{-64,-6}}, + lineColor={0,0,0}, + fillColor={0,0,255}, + fillPattern=FillPattern.Backward), + Ellipse( + extent={{-86,6},{-66,-6}}, + lineColor={0,0,255}, + fillColor={255,255,0}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-88,6},{-64,8}}, + lineColor={0,0,0}, + fillColor={95,95,95}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-88,-8},{-64,-6}}, + lineColor={0,0,0}, + fillColor={95,95,95}, + fillPattern=FillPattern.Solid), + Polygon( + points={{-74,6},{-80,2},{-78,-2},{-80,-6},{-74,-2},{-76,2},{-74,6}}, + lineColor={0,0,0}, + fillColor={255,0,0}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{64,6},{88,-6}}, + lineColor={0,0,0}, + fillColor={0,0,255}, + fillPattern=FillPattern.Backward), + Ellipse( + extent={{66,6},{86,-6}}, + lineColor={0,0,255}, + fillColor={255,255,0}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{64,6},{88,8}}, + lineColor={0,0,0}, + fillColor={95,95,95}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{64,-8},{88,-6}}, + lineColor={0,0,0}, + fillColor={95,95,95}, + fillPattern=FillPattern.Solid), + Polygon( + points={{78,6},{72,2},{74,-2},{72,-6},{78,-2},{76,2},{78,6}}, + lineColor={0,0,0}, + fillColor={255,0,0}, + fillPattern=FillPattern.Solid)}), Documentation(revisions=" ++This is a model of a simple rotary compressor that is used, for example, +in close-loop systems like heat pumps or chillers. It inherits from +PartialCompressor which inherits from PartialCompression. Therefore, please +checkout these sub-models for further information of underlying modeling +approaches and parameterisation: +
++For this model, pressure losses are assumed at inlet and outlet of +the compressor. These pressure losses may occur due to reduction or +enlargement of the cross-section. +
+")); +end RotaryCompressorPressureLosses; diff --git a/AixLib/Fluid/Movers/Compressors/SimpleCompressors/RotaryCompressors/package.mo b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/RotaryCompressors/package.mo new file mode 100644 index 0000000000..46cd7d4974 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/RotaryCompressors/package.mo @@ -0,0 +1,20 @@ +within AixLib.Fluid.Movers.Compressors.SimpleCompressors; +package RotaryCompressors "Package that contains different models of rotary compressors" + extends Modelica.Icons.VariantsPackage; + + + +annotation (Documentation(revisions=" ++This package contains models describing simple rotary compressors. +
+")); +end RotaryCompressors; diff --git a/AixLib/Fluid/Movers/Compressors/SimpleCompressors/RotaryCompressors/package.order b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/RotaryCompressors/package.order new file mode 100644 index 0000000000..9529d38a91 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/RotaryCompressors/package.order @@ -0,0 +1,3 @@ +RotaryCompressor +RotaryCompressorPressureHeatLosses +RotaryCompressorPressureLosses diff --git a/AixLib/Fluid/Movers/Compressors/SimpleCompressors/package.mo b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/package.mo new file mode 100644 index 0000000000..26b1d61471 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/package.mo @@ -0,0 +1,18 @@ +within AixLib.Fluid.Movers.Compressors; +package SimpleCompressors "Package that contains models of simple compressors" + extends Modelica.Icons.VariantsPackage; + +annotation (Documentation(revisions=" ++This package contains models describing simple compressors. +
+")); +end SimpleCompressors; diff --git a/AixLib/Fluid/Movers/Compressors/SimpleCompressors/package.order b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/package.order new file mode 100644 index 0000000000..2b3bf4c83c --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/SimpleCompressors/package.order @@ -0,0 +1,2 @@ +CompressionProcesses +RotaryCompressors diff --git a/AixLib/Fluid/Movers/Compressors/UsersGuide/Approaches.mo b/AixLib/Fluid/Movers/Compressors/UsersGuide/Approaches.mo new file mode 100644 index 0000000000..f1ed97bbe6 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/UsersGuide/Approaches.mo @@ -0,0 +1,655 @@ +within AixLib.Fluid.Movers.Compressors.UsersGuide; +class Approaches + "Approaches implemented to calculate different efficiencies" + extends Modelica.Icons.Information; + + class MechanicEfficiency "Mechanic Efficiencies" + extends Modelica.Icons.Information; + + annotation (Documentation(revisions=" +
+Generally, two kinds of calculation approaches can be identified: A
+polynomial and a power approach.
+A generic polynomial approach is presented below:
+ηeng = corFact *
+sum(a[i]*P[i]^b[i] for i in 1:nT)
+A generic power approach is presented below:
+ηeng = corFact * a *
+product(P[i]^b[i] for i in 1:nT)
+All engine efficiency models presented in this library are based
+on a literature review. Therefore, the variable corFact
+allows a correction of the engine efficiency if the general modelling
+approach presented in the litarature differs from
+ηeng = Q̇ref /
+Pel or from ηeng =
+Q̇refIse / Pel, respectively.
+
+Calculation procedures presented in the litarture have some variables
+in commen and these variables are presented below:
+
| Type | +Name | +Comment | +
|---|---|---|
| input | +epsRef |
+Ratio of the real and the ideal displacement volume | +
| input | +VDis |
+Displacement volume | +
| input | +piPre |
+Pressure ratio | +
| input | +rotSpe |
+Rotational speed | +
| input | +staInl |
+Thermodynamic state at compressor's inlet conditions | +
| input | +staOut |
+Thermodynamic state at compressor's out conditions | +
| input | +TAmb |
+Ambient temperature | +
+Actually, four polynomial approaches are implemented in this package.
+To add further calculation procedures, just add its name in
+
+AixLib.Fluid.Movers.Compressors.Utilities.Types
+and expand the if-structure defined in
+
+AixLib.Fluid.Movers.Compressors.Utilities.EngineEfficiency.PolynomialEngineEfficiency.
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| JahningEtAl2000 | +ηeng = a1 +
+a2*exp(pInl)^b2 |
+Generic model | +Generic model |
+Generic model |
+
| DurprezEtAl2007 | +ηeng = a1 + a2*π + a3*π^2 +
+a4*π^3 + a5*π^4 + a6*π^5 + a7*π^6 |
+Generic model | +Generic model |
+Generic model |
+
| KinarbEtAl2010 | +ηeng = a1 + a2*π +
+a3*π^2 |
+Generic model | +Generic model |
+Generic model |
+
| Engelpracht2017 | +ηeng = a1 + a2*π + a3*π^2 + a4*n*π +
+a5*n^2 + a6*π^2*n + a7*π*n^2 + a8*n^3 + a9*π^2n^2 + a10*π*π^3
++ a11*n^4 |
+Generic model | +0 - 120 |
+1 - 10 |
+
+Actually, one power approache is implemented in this package.
+To add further calculation procedures, just add its name in
+
+AixLib.Fluid.Movers.Compressors.Utilities.Types
+and expand the if-structure defined in
+
+AixLib.Fluid.Movers.Compressors.Utilities.EngineEfficiency.PowerEngineEfficiency.
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| MendozaMirandaEtAl2016 | +ηeng = a1 * π^b1 * (nref/n)^b2 *
+(1/((TInl+TOutIse)/2-TOut))^b3 *
+(Mref/M)^b4 |
+R134a,R450a,R1324yf,R1234ze(E) | +0 - 50 |
+1 - 6 |
+
+Generally, two kinds of calculation approaches can be identified: A
+polynomial and a power approach.
+A generic polynomial approach is presented below:
+ηvol = corFact *
+sum(a[i]*P[i]^b[i] for i in 1:nT)
+A generic power approach is presented below:
+ηvol = corFact * a *
+product(P[i]^b[i] for i in 1:nT)
+All volumetric efficiency models presented in this library are based
+on a literature review. Therefore, the variable corFact
+allows a correction of the volumetric efficiency if the general modelling
+approach presented in the litarature differs from
+ηvol = V̇ide /
+V̇rea.
+
+Calculation procedures presented in the litarture have some variables
+in commen and these variables are presented below:
+
| Type | +Name | +Comment | +
|---|---|---|
| input | +epsRef |
+Ratio of the real and the ideal displacement volume | +
| input | +VDis |
+Displacement volume | +
| input | +piPre |
+Pressure ratio | +
| input | +rotSpe |
+Rotational speed | +
| input | +staInl |
+Thermodynamic state at compressor's inlet conditions | +
| input | +staOut |
+Thermodynamic state at compressor's out conditions | +
| input | +TAmb |
+Ambient temperature | +
+Actually, four polynomial approaches are implemented in this package.
+To add further calculation procedures, just add its name in
+
+AixLib.Fluid.Movers.Compressors.Utilities.Types
+and expand the if-structure defined in
+
+AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency.PolynomialVolumetricEfficiency.
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| DarrAndCrawford1992 | +ηvol = a1 + a2*n -
+a3*epsRef*(ρinlIse/ρinl-1) -
+a4*n*(ρinlIse/ρinl-1) |
+R134a | +40 - 75 |
+3 - 10 |
+
| Karlsson2007 | +ηvol = a1*Tinl*π +
+a2*π + a3 + a4*Tinl +
+a5*n + a6*n^2 |
+R407c | +No information |
+No information |
+
| KinarbEtAl2010 | +ηvol = a1 + a2*π |
+Generic model | +Generic model |
+Generic model |
+
| ZhouEtAl2010 | +ηvol = 1 + a1 -
+a2*π^(1/κ) |
+Generic model | +Generic model |
+Generic model |
+
| Li2013 | +ηvol = ηvolRef *
+(a1 + a2*(n/nref) + a3*(n/nref)^2)
+ |
+R22,R134a | +30 - 120 |
+4 - 12 |
+
| HongtaoLaughmannEtAl2017 | +ηvol = a1 + a2*(n/nref) +
+a3*(n/nref)^2 + a4*π + a5*(n/nref)*π +
+a6*(n/nref)^2*π + a7*π^2 +
+a8*(n/nref)*π^2 + a9*(n/nref)^2*π^2 +
+a10*pout + a11*(n/nref)*pout +
+a12*(n/nref)^2*pout - a13*pinl -
+a14*(n/nref)*pinl -
+a15*(n/nref)^2*pinl +
+a16*pinl*pout +
+a17*(n/nref)*pinl*pout +
+a18*(n/nref)^2*pinl*pout +
+a19*(n/nref)^3*pinl*pout +
+a20*(n/nref)^4*pinl*pout -
+a21*pinl^2 -
+a22*(n/nref)*pinl^2 -
+a23*(n/nref)^2*pinl^2 -
+a24*(n/nref)^3*pinl^2 -
+a25*(n/nref)^4*pinl^2 |
+Generic model | +Generic model |
+Generic model |
+
| Koerner2017 | +ηvol =
+a1*π^b1 |
+R410a | +50 - 120 |
+1 - 10 |
+
| Engelpracht2017 | +ηvol = a1 + a2*((π-c1)/c2) +
+a3*((Tinl-c3)/c4)*((π-c1)/c2) +
+a4*((Tinl-c3)/c4) + a5*((n-c5)/c6) +
+a6*((n-c5)/c6)^2 |
+Generic model | +0 - 120 |
+1 - 10 |
+
+Actually, one power approache is implemented in this package.
+To add further calculation procedures, just add its name in
+
+AixLib.Fluid.Movers.Compressors.Utilities.Types
+and expand the if-structure defined in
+
+AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency.PowerVolumetricEfficiency.
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| MendozaMirandaEtAl2016 | +ηvol = a1 * π^b1 *
+(π^1.5*n^3*Vdis)^b2 * (Mref/M)^b3
+ |
+R134a,R450a,R1324yf,R1234ze(E) | +0 - 50 |
+1 - 6 |
+
+Generally, two kinds of calculation approaches can be identified: A
+polynomial and a power approach.
+A generic polynomial approach is presented below:
+ηise = corFact *
+sum(a[i]*P[i]^b[i] for i in 1:nT)
+A generic power approach is presented below:
+ηise = corFact * a *
+product(P[i]^b[i] for i in 1:nT)
+All isentropic efficiency models presented in this library are based
+on a literature review. Therefore, the variable corFact
+allows a correction of the isentropic efficiency if the general modelling
+approach presented in the litarature differs from
+ηise = (houtIse - hinl) /
+(hout - hinl).
+
+Calculation procedures presented in the litarture have some variables
+in commen and these variables are presented below:
+
| Type | +Name | +Comment | +
|---|---|---|
| input | +epsRef |
+Ratio of the real and the ideal displacement volume | +
| input | +VDis |
+Displacement volume | +
| input | +piPre |
+Pressure ratio | +
| input | +rotSpe |
+Rotational speed | +
| input | +staInl |
+Thermodynamic state at compressor's inlet conditions | +
| input | +staOut |
+Thermodynamic state at compressor's out conditions | +
| input | +TAmb |
+Ambient temperature | +
+Actually, three polynomial approaches are implemented in this package.
+To add further calculation procedures, just add its name in
+
+AixLib.Fluid.Movers.Compressors.Utilities.Types
+and expand the if-structure defined in
+
+AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency.PolynomialIsentropicEfficiency.
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| DarrAndCrawford1992 | +ηise = a1 +
+a2*n + a3/ρinlet |
+R134a | +40 - 75 |
+3 - 10 |
+
| Karlsson2007 | +ηise = a1 + a2*π +
+a3*π^2 + a4*n + a5*n^2 |
+R407c | +No information |
+No information |
+
| Engelpracht2017 | +ηise = a1 + a2*n +
+a3*n^3 + a5*π^2 |
+Generic model | +0 - 120 |
+1 - 10 |
+
+Actually, one power approache is implemented in this package.
+To add further calculation procedures, just add its name in
+
+AixLib.Fluid.Movers.Compressors.Utilities.Types
+and expand the if-structure defined in
+
+AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency.PowerIsentropicEfficiency.
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| MendozaMirandaEtAl2016 | +ηise = a1 * π^b1 *
+(nref/n)^b2 *
+(n^3*Vdis/dhise^1.5)^b3 *
+(1/((Tinl+ToutIse)/2-Tout))^b4
+ |
+R134a,R450a,R1324yf,R1234ze(E) | +0 - 50 |
+1 - 6 |
+
+Compressor models implemented in this library often use three different +efficiencies to calculate the mass flow rate, thermodynamic change of +state and power consumption of the compressor. In the following, all +efficiency models implemented in this library are shortly summarised. +Furthermore, all compressor models have a parameter to calculate +transient behaviour of changing the rotational speed. This approach is +also summarised in this information section. +
+
+Actually, three different efficiency models are suggested and the modelling
+approaches of these efficiencies are shortly characterised below:
+
| Efficiency | +Formula | +Comment | +
|---|---|---|
| Engine | +ηeng = Q̇ref /
+Pel |
+Used for calculation of compressor's power consumption | +
| Isentropic | +ηise = (houtIse - hinl) /
+(hout - hinl) |
+Used for calculation of thermodynamic change of state | +
| Volumetric | +ηvol = V̇ide /
+V̇rea |
+Used for calculation of mass flow rate | +
+These efficiency models are stored in + +AixLib.Fluid.Movers.Compressors.Utilities.EngineEfficiency, + +AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency and + +AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency. +Therefore, the calculation procedure of the efficiencies are introduced as +replaceable models and must be defined by the User. Further information +is given in the following sections: +
+ ++In the following, a guideline of naming efficiency models is +summarised: +
++Approach of calculating efficiency _ +Valid refrigerants _ +Displacement volume _ +Type of compressor +
+
+The base model has a parameter useInpFil that is used to model
+the compressors's transient behaviour while changing rotational speed.
+Generally, this approach uses the same modeling attempt as the stat-up and
+shut-down transients introtuced for flow machines (see
+
+AixLib.Fluid.Movers.UsersGuide). Therefore, just the parameter's
+affections are presented here:
+
useInpFil=false, then the input signal opeSet.y
+is equal to the compressor's rotational speed. Thus, a step change in the
+input signal causes a step change in the rotational speed.
+useInpFil=true, which is the default, then the rotational
+speed is equal to the output of a filter. This filter is implemented as a
+2nd order differential equation. Thus, a step change in the compressor's
+input signal will cause a gradual change in the rotational speed. The filter
+has a parameter risTim, which by default is set to 1 second.
+The rise time is the time required to reach 99.6% of the full rotational
+speed, or, if the compressor is shut-down, to reach a rotational speed
+of 0.4%.
++The library of the compressors consists mainly of six packages. +
++In the following, the literature used for the compressor library is +summarised. +
++W. Eifler, E. Schlücker, U. Spicher and G. Will (2009): + +Küttner Kolbenmaschinen: Kolbenpumpen, Kolbenverdichter, Brennkraftmaschinen +(in German). Publisher: Vieweg + Teubner +
++H. Qiao, R. Radermacher and V. Aute (2010): + A review for numerical simulation +of vapor compression systems. In: International +Refrigeration and Air Conditioning Conference +
++P.C. Hanlon (2011): + +Compressor Handbook. Publisher: McGraw-Hill +
++V. A. Cara Martin and R. Radermacher (2015): + +AHRI Project 8013: A Study of Methods to Represent Compressor Performance +Data over an Operating Envelope Based on a Finite Set of Test Data. +Publisher: Air-Conditioning, Heating, and Refrigeration Institute (AHRI) +
++I.D. Jähnig, D. Reindl and S.A. Klein, S. A. (2000): + +Semi-empirical method for representing domestic refrigerator/freezer +compressor calorimeter test data. +
++M.-E Duprez, E. Dumont and M. Frère (2007): + +Modelling of reciprocating and scroll compressors. In: International +Journal of Refrigeration 30(5), S. 873–886 +
++E. Kinab, D. Marchio, P. Rivière and A. Zoughaib (2010): + +Reversible heat pump model for seasonal performance optimization. In: +Energy and Buildings 42(12), S. 2269–2280 +
++J.M. Mendoza-Miranda, A. Mota-Babiloni, J.J. Ramírez-Minguela, +V.D. Muñoz-Carpio, M. Carrera-Rodríguez, +J. Navarro-Esbrí and C. Salazar-Hernández (2016): + +Comparative evaluation of R1234yf, R1234ze(E) and R450A as +alternatives to R134a in a variable speed reciprocating +compressor. In: Energy 114, S. 753–766 +
++M. Engelpracht (2017): Development of modular and scalable simulation +models for heat pumps and chillers considering various refrigerants. +Master Thesis +
++J.H. Darr and R.R. Crawford (1992): + +Modeling of an Automotive Air Conditioning Compressor +Based on Experimental Data: ACRC Technical Report 14. +Publisher: Air Conditioning and Refrigeration Center. +College of Engineering. University of Illinois at +Urbana-Champaign. +
++F. Karlsson (2007): + +Capacity Control of Residential Heat Pump Heating Systems. In: PhD thesis +
++R. Zhou, T. Zhang, J. Catano, J.T. Wen, G.J. Michna, +Y. Peles, and M.K. Jensen, M. K. (2010): + +The steady-state modeling and optimization of a refrigeration +system for high heat flux removal. In: +Applied Thermal Engineering 30(16), S. 2347–2356 +
++E. Kinab, D. Marchio, P. Rivière and A. Zoughaib (2010): + +Reversible heat pump model for seasonal performance optimization. In: +Energy and Buildings 42(12), S. 2269–2280 +
++W. Li (2013): + +Simplified steady-state modeling for variable speed compressor. +In: Applied Thermal Engineering 50(1), S. 318–326 +
++J.M. Mendoza-Miranda, A. Mota-Babiloni, J.J. Ramírez-Minguela, +V.D. Muñoz-Carpio, M. Carrera-Rodríguez, +J. Navarro-Esbrí and C. Salazar-Hernández (2016): + +Comparative evaluation of R1234yf, R1234ze(E) and R450A as +alternatives to R134a in a variable speed reciprocating +compressor. In: Energy 114, S. 753–766 +
++Q. Hongtao, C.R. Laughman, D.J. Burns and S.A. Bortoff, (2017): + +Dynamic Characteristics of an R-410A Multi-split Variable Refrigerant +Flow Air-conditioning System. In: IEA Heat Pump Conference 2017 +
++D. Körner (2017): Development of dynamic compression heat pump models +to evaluate promising refrigerants considering legal regulations. +Master Thesis +
++M. Engelpracht (2017): Development of modular and scalable simulation +models for heat pumps and chillers considering various refrigerants. +Master Thesis +
+ ++J.H. Darr and R.R. Crawford (1992): + +Modeling of an Automotive Air Conditioning Compressor +Based on Experimental Data: ACRC Technical Report 14. +Publisher: Air Conditioning and Refrigeration Center. +College of Engineering. University of Illinois at +Urbana-Champaign. +
++F. Karlsson (2007): + +Capacity Control of Residential Heat Pump Heating Systems. In: PhD thesis +
++J.M. Mendoza-Miranda, A. Mota-Babiloni, J.J. Ramírez-Minguela, +V.D. Muñoz-Carpio, M. Carrera-Rodríguez, +J. Navarro-Esbrí and C. Salazar-Hernández (2016): + +Comparative evaluation of R1234yf, R1234ze(E) and R450A as +alternatives to R134a in a variable speed reciprocating +compressor. In: Energy 114, S. 753–766 +
++M. Engelpracht (2017): Development of modular and scalable simulation +models for heat pumps and chillers considering various refrigerants. +Master Thesis +
+", +revisions=" ++This library provides different compressor models that are used, for +example, for heat pumps or chillers. In the following User's Guide, a short +summary of the compressor's library is given to allow the User +an easy use of the compressor models. +
++Additionally, detailed descriptions of the models are provided in +each model's information section. +
+", revisions=" +
+This is a base model for overall engine efficiency models that
+are required for various compressor models. It defines some
+basic inputs and outputs that are commonly used by efficiency
+models and these inputs and outputs are summarised below:
+
| Type | +Name | +Comment | +
|---|---|---|
| input | +epsRef |
+Ratio of the real and the ideal displacement volume | +
| input | +VDis |
+Displacement volume | +
| input | +piPre |
+Pressure ratio | +
| input | +rotSpe |
+Rotational speed | +
| input | +staInl |
+Thermodynamic state at compressor's inlet conditions | +
| input | +staOut |
+Thermodynamic state at compressor's out conditions | +
| input | +TAmb |
+Ambient temperature | +
| output | +ηeng |
+Overall engine efficiency | +
+This model contains a calculation procedure for engine efficiency +models (for more information, please check out + +AixLib.Fluid.Movers.Compressors.BaseClasses.PartialCompression). +The calculation procedures based on a polynomial approach are presented +below. +
+
+Actually, four polynomial approaches are implemented in this package.
+To add further calculation procedures, just add its name in
+
+AixLib.Fluid.Movers.Compressors.Utilities.Types
+and expand the if-structure.
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| JahningEtAl2000 | +ηeng = a1 +
+a2*exp(pInl)^b2 |
+Generic model | +Generic model |
+Generic model |
+
| DurprezEtAl2007 | +ηeng = a1 + a2*π + a3*π^2 +
+a4*π^3 + a5*π^4 + a6*π^5 + a7*π^6 |
+Generic model | +Generic model |
+Generic model |
+
| KinarbEtAl2010 | +ηeng = a1 + a2*π +
+a3*π^2 |
+Generic model | +Generic model |
+Generic model |
+
| Engelpracht2017 | +ηeng = a1 + a2*π + a3*π^2 + a4*n*π +
+a5*n^2 + a6*π^2*n + a7*π*n^2 + a8*n^3 + a9*π^2n^2 + a10*π*π^3
++ a11*n^4 |
+Generic model | +0 - 120 |
+1 - 10 |
+
+I.D. Jähnig, D. Reindl and S.A. Klein, S. A. (2000): + +Semi-empirical method for representing domestic refrigerator/freezer +compressor calorimeter test data. +
++M.-E Duprez, E. Dumont and M. Frère (2007): + +Modelling of reciprocating and scroll compressors. In: International +Journal of Refrigeration 30(5), S. 873–886 +
++E. Kinab, D. Marchio, P. Rivière and A. Zoughaib (2010): + +Reversible heat pump model for seasonal performance optimization. In: +Energy and Buildings 42(12), S. 2269–2280 +
++M. Engelpracht (2017): Development of modular and scalable simulation +models for heat pumps and chillers considering various refrigerants. +Master Thesis +
+")); +end PolynomialEngineEfficiency; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/PowerEngineEfficiency.mo b/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/PowerEngineEfficiency.mo new file mode 100644 index 0000000000..a23f56013c --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/PowerEngineEfficiency.mo @@ -0,0 +1,128 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.EngineEfficiency; +model PowerEngineEfficiency + "Model describing flow engine efficiency on power approach" + extends PartialEngineEfficiency; + + // Definition of parameters + // + parameter Types.EnginePowerModels powMod=Types.EnginePowerModels.MendozaMirandaEtAl2016 + "Chose predefined power model for flow coefficient" + annotation (Dialog(group="Modelling approach")); + parameter Real a + "Multiplication factor for generic power approach" + annotation(Dialog(group="Modelling approach")); + parameter Real b[:] + "Exponents for each multiplier" + annotation(Dialog(group="Modelling approach")); + parameter Integer nT = size(b,1) + "Number of terms used for the calculation procedure" + annotation(Dialog(group="Modelling approach", + enable=false)); + + // Definition of further parameters required for special approaches + // + parameter Modelica.SIunits.MolarMass MRef=0.1 + "Reference molar wheight" + annotation(Dialog(group="Reference properties")); + parameter Modelica.SIunits.Frequency rotSpeRef = 9.334 + "Reference rotational speed" + annotation(Dialog(group="Reference properties")); + + // Definition of coefficients + // + Real p[nT] + "Array that contains all coefficients used for the calculation procedure"; + Real corFac[2] + "Array of correction factors used if efficiency model proposed in literature + differs from efficiency model defined in PartialCompressor model"; + +equation + // Calculation of coefficients + // + if (powMod == Types.EnginePowerModels.MendozaMirandaEtAl2016) then + /*Power approach presented by Mendoza et al. (2016): + etaEng = piPre^b1 * (rotSpeRef/rotSpe)^b2 * (1/((TInl+TOutISe)/2-TOut))^b3 + * (MRef/M)^b4 + + Caution with parameters - Uses isentropic specific enthalpy difference + */ + p[1] = piPre + "Pressure ratio"; + p[2] = rotSpeRef/rotSpe + "Rotational Speed"; + p[3] = 1/((Medium.temperature(staInl)+Medium.temperature( + Medium.setState_psX(s=Medium.specificEntropy(staInl), + p=Medium.pressure(staOut))))/2-TAmb) + "Temperature difference isentropic compression and ambient"; + p[4] = MRef/Medium.fluidConstants[1].molarMass + "Molar Mass"; + + corFac = {1,1} + "No correction factors are needed"; + + else + assert(false, "Invalid choice of power approach"); + end if; + + // Calculationg of flow coefficient + // + etaEng = min(1, corFac[1] * a * + product(abs(p[i])^b[i] for i in 1:nT)^corFac[2]) + "Calculation procedure of generic power approach"; + + annotation (Documentation(revisions=" ++This model contains a calculation procedure for engine efficiency +models (for more information, please check out + +AixLib.Fluid.Movers.Compressors.BaseClasses.PartialCompression). +The calculation procedures based on a power approach are presented +below. +
+
+Actually, one power approache is implemented in this package.
+To add further calculation procedures, just add its name in
+
+AixLib.Fluid.Movers.Compressors.Utilities.Types
+and expand the if-structure.
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| MendozaMirandaEtAl2016 | +ηeng = a1 * π^b1 * (nref/n)^b2 *
+(1/((TInl+TOutIse)/2-TOut))^b3 *
+(Mref/M)^b4 |
+R134a,R450a,R1324yf,R1234ze(E) | +0 - 50 |
+1 - 6 |
+
+J.M. Mendoza-Miranda, A. Mota-Babiloni, J.J. Ramírez-Minguela, +V.D. Muñoz-Carpio, M. Carrera-Rodríguez, +J. Navarro-Esbrí and C. Salazar-Hernández (2016): + +Comparative evaluation of R1234yf, R1234ze(E) and R450A as +alternatives to R134a in a variable speed reciprocating +compressor. In: Energy 114, S. 753–766 +
+")); +end PowerEngineEfficiency; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_ReciprocatingRotaryScroll.mo b/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_ReciprocatingRotaryScroll.mo new file mode 100644 index 0000000000..c65b8bdc5a --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_ReciprocatingRotaryScroll.mo @@ -0,0 +1,55 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.EngineEfficiency.SpecifiedEfficiencies; +model Buck_R134aR450aR1234yfR1234zee_VarDisVol_ReciprocatingRotaryScroll + "Reciporating/Rotary/Scroll Compressor - R134a, R450a, R1234yf, R1234ze(e) - Similitude - Power" + extends PowerEngineEfficiency( + final useIseWor=true, + final MRef=0.102032, + final rotSpeRef=9.334, + final powMod=Types.EnginePowerModels.MendozaMirandaEtAl2016, + final a=1, + final b={-0.1642,0.2050,0.0659,07669}); + + annotation (Documentation(revisions=" +
+This model contains a calculation procedure for the engine efficiency
+presented by Mendoza-Miranda et al. (2016).
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| MendozaMirandaEtAl2016 | +ηeng = π^b1 * (nref/n)^b2 *
+(1/((TInl+TOutIse)/2-TOut))^b3 *
+(Mref/M)^b4 |
+R134a,R450a,R1324yf,R1234ze(E) | +0 - 50 |
+1 - 6 |
+
+J.M. Mendoza-Miranda, A. Mota-Babiloni, J.J. Ramírez-Minguela, +V.D. Muñoz-Carpio, M. Carrera-Rodríguez, +J. Navarro-Esbrí and C. Salazar-Hernández (2016): + +Comparative evaluation of R1234yf, R1234ze(E) and R450A as +alternatives to R134a in a variable speed reciprocating +compressor. In: Energy 114, S. 753–766 +
+")); +end Buck_R134aR450aR1234yfR1234zee_VarDisVol_ReciprocatingRotaryScroll; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/SpecifiedEfficiencies/ConstantEfficiency.mo b/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/SpecifiedEfficiencies/ConstantEfficiency.mo new file mode 100644 index 0000000000..fb7681766d --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/SpecifiedEfficiencies/ConstantEfficiency.mo @@ -0,0 +1,35 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.EngineEfficiency.SpecifiedEfficiencies; +model ConstantEfficiency + "General model that describes a constant overall engine efficiency" + extends PartialEngineEfficiency( + final useIseWor=false); + + // Definition of parameters + // + parameter Modelica.SIunits.Efficiency etaEngCon = 0.9 + "Constant overall engine efficiency"; + +equation + // Calculate overall engine efficiency + // + etaEng = etaEngCon "Allocation of constant overall engine efficiency"; + + annotation (Documentation(revisions=" ++This model contains a simple calculation procedure for engine efficiency +models (for more information, please check out + +AixLib.Fluid.Movers.Compressors.BaseClasses.PartialCompression). +The model provides a constant overall engine efficiency and is the most +basic engine efficiency model. +
+")); +end ConstantEfficiency; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/SpecifiedEfficiencies/Generic_VarRef_VarDisVol_RotaryScroll.mo b/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/SpecifiedEfficiencies/Generic_VarRef_VarDisVol_RotaryScroll.mo new file mode 100644 index 0000000000..56ef277d79 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/SpecifiedEfficiencies/Generic_VarRef_VarDisVol_RotaryScroll.mo @@ -0,0 +1,52 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.EngineEfficiency.SpecifiedEfficiencies; +model Generic_VarRef_VarDisVol_RotaryScroll "Generic overall engine efficiency based on literature review for + various compressors" + extends PolynomialEngineEfficiency( + final useIseWor=false, + final polyMod=Types.EnginePolynomialModels.Engelpracht2017, + final a={0.2199,-0.0193,0.02503,-0.001345,8.817e-5,-0.0003382,1.584e-5, + -1.083e-6,1.976e-6,-5.321e-8,4.053e-9,-4.329e-9}, + final b={1,1,1,1,1,1,1,1,1,1,1,1}); + + annotation (Documentation(revisions=" +
+This model contains a calculation procedure for the engine efficiency
+presented by Engelpracht (2017). However, this approach is just fitted
+to various experimental data obtained by a literature review and,
+therefore, to use with caution.
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| Engelpracht2017 | +ηeng = a1 + a2*π + a3*π^2 + a4*n*π +
+a5*n^2 + a6*π^2*n + a7*π*n^2 + a8*n^3 + a9*π^2n^2 + a10*π*π^3
++ a11*n^4 |
+Generic model | +0 - 120 |
+1 - 10 |
+
+Engelpracht, Mirko (2017): Development of modular and scalable simulation +models for heat pumps and chillers considering various refrigerants. +Master Thesis +
+")); +end Generic_VarRef_VarDisVol_RotaryScroll; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/SpecifiedEfficiencies/package.mo b/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/SpecifiedEfficiencies/package.mo new file mode 100644 index 0000000000..3f089d565b --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/SpecifiedEfficiencies/package.mo @@ -0,0 +1,37 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.EngineEfficiency; +package SpecifiedEfficiencies "Package that engine efficiencies that are specifiied" +extends Modelica.Icons.VariantsPackage; + +annotation (Documentation(revisions=" ++This package contains engine efficiencies that are already specified. +This means that the calculation approaches of the engine efficiency +presented before are adapted for a specific compressor type and +a specific refrigerant. +
++In the following, a guideline of naming efficiency models is +summarised: +
++Approach of calculating efficiency _ +Valid refrigerants _ +Displacement volume _ +Type of compressor +
++Moreover, the modeles are saved in a specific order. First, generic +models are saved and then models based on the similitude theory are +saved. Last, models of specific compressors are saved. +
+")); +end SpecifiedEfficiencies; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/SpecifiedEfficiencies/package.order b/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/SpecifiedEfficiencies/package.order new file mode 100644 index 0000000000..f7a6cd32d5 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/SpecifiedEfficiencies/package.order @@ -0,0 +1,3 @@ +Buck_R134aR450aR1234yfR1234zee_VarDisVol_ReciprocatingRotaryScroll +ConstantEfficiency +Generic_VarRef_VarDisVol_RotaryScroll diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/package.mo b/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/package.mo new file mode 100644 index 0000000000..08d0c73a7c --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/package.mo @@ -0,0 +1,125 @@ +within AixLib.Fluid.Movers.Compressors.Utilities; +package EngineEfficiency "Package that contains models describing different engine efficiencies" + extends Modelica.Icons.Library; + +annotation (Icon(coordinateSystem(preserveAspectRatio=false), + graphics={ + Ellipse( + extent={{-90,-90},{90,90}}, + lineThickness=0.25, + pattern=LinePattern.None, + lineColor={215,215,215}, + fillColor={215,215,215}, + fillPattern=FillPattern.Solid), + Line( + points={{-40,60},{-30,70},{-20,60},{-20,60}}, + color={0,0,0}, + smooth=Smooth.Bezier, + thickness=0.5), + Line( + points={{-20,60},{-20,-30},{-20,38},{-16,50}, + {-6,58},{0,60},{6,58}}, + color={0,0,0}, + smooth=Smooth.Bezier, + thickness=0.5), + Line( + points={{6,58},{16,50},{20,40},{20,-70}, + {20,-70},{20,-70},{20,-70}}, + color={0,0,0}, + smooth=Smooth.Bezier, + thickness=0.5)}), +Documentation(revisions=" +
+This package contains models describing calculations procedures of
+engine efficiencies that are based on a literature review. However,
+in this library the engine efficiency is implemented in such a way
+that it fulfills
+ηeng = Q̇ref /
+Pel.
+For more information, please checkout
+
+AixLib.Fluid.Movers.Compressors.BaseClasses.PartialCompression.
+
+Calculation procedures presented in the litarture have some variables
+in commen and these variables are presented below:
+
| Variable | +Comment | +
|---|---|
epsRef |
+Ratio of the real and the ideal displacement volume | +
VDis |
+Displacement volume | +
piPre |
+Pressure ratio | +
rotSpe |
+Rotational speed | +
staInl |
+Thermodynamic state at compressor's inlet conditions | +
staOut |
+Thermodynamic state at compressor's out conditions | +
TAmb |
+Ambient temperature | +
+Moreover, two approaches can be identified in general: A +polynomial and a power approach. The characteristics of these +approaches are presented below. +
+
+A generic polynomial approach is presented below:
+ηeng = corFact *
+sum(a[i]*P[i]^b[i] for i in 1:nT)
+Actually, four polynomial approaches are implemented in this
+package.
+
+A generic power approach is presented below:
+ηeng = corFact * a *
+product(P[i]^b[i] for i in 1:nT)
+Actually, one power approache is implemented in this
+package.
+
+In the following, some general references are given for information about +calculating efficiencies of compressors: +
++V. A. Cara Martin and R. Radermacher (2015): + +AHRI Project 8013: A Study of Methods to Represent Compressor Performance +Data over an Operating Envelope Based on a Finite Set of Test Data. +Publisher: Air-Conditioning, Heating, and Refrigeration Institute (AHRI) +
+")); +end EngineEfficiency; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/package.order b/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/package.order new file mode 100644 index 0000000000..10740cc15e --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/EngineEfficiency/package.order @@ -0,0 +1,4 @@ +PartialEngineEfficiency +PolynomialEngineEfficiency +PowerEngineEfficiency +SpecifiedEfficiencies diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/HeatTransfer/SimpleFictitiousWall.mo b/AixLib/Fluid/Movers/Compressors/Utilities/HeatTransfer/SimpleFictitiousWall.mo new file mode 100644 index 0000000000..f14f3f81e9 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/HeatTransfer/SimpleFictitiousWall.mo @@ -0,0 +1,115 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.HeatTransfer; +model SimpleFictitiousWall + "Model of a simple fictitious wall to compute compressor's heat losses" + + // Definition of parameters describing the fictitious wall + // + parameter Modelica.SIunits.Mass mWal = 2.5 + "Mass of the fictitious wall" + annotation (Dialog(tab="General",group="General")); + parameter Modelica.SIunits.SpecificHeatCapacity cpWal = 450 + "Specific heat capacity of the fictitious wall" + annotation (Dialog(tab="General",group="General")); + parameter Modelica.SIunits.ThermalConductance kAMeaAmb = 10 + "Effective mean thermal conductance coefficient between fictitious wall + and ambient" + annotation (Dialog(tab="General",group="General")); + + // Definition of parameters describing advanced options + // + parameter Boolean iniTWal0 = true + "= true, if wall is initialised at fixed temperature; Otherwise, steady state + initialisation" + annotation (Dialog(tab="Advanced",group="Initialisation")); + parameter Modelica.SIunits.Temperature TWal0 = 343.15 + "Temperature of wall at initialisation" + annotation (Dialog(tab="Advanced",group="Initialisation")); + + // Definition of submodels and connectors + // + Modelica.Thermal.HeatTransfer.Interfaces.HeatPort_a heaPorComInl + "Heart port for compressor's inlet" + annotation (Placement(transformation(extent={{-50,10},{-30,30}}), + iconTransformation(extent={{-56,14},{-44,26}}))); + Modelica.Thermal.HeatTransfer.Interfaces.HeatPort_a heaPorCom + "Heart port for compresso's engine (compression chamber)" + annotation (Placement(transformation(extent={{-10,10},{10,30}}), + iconTransformation(extent={{-6,14},{6,26}}))); + Modelica.Thermal.HeatTransfer.Interfaces.HeatPort_a heaPorComOut + "Heart port for compressor's outlet" + annotation (Placement(transformation(extent={{30,10},{50,30}}), + iconTransformation(extent={{44,14},{56,26}}))); + Modelica.Thermal.HeatTransfer.Interfaces.HeatPort_b heaPorAmb + "Heart port for ambient" + annotation (Placement(transformation(extent={{-10,-32},{10,-12}}), + iconTransformation(extent={{-6,-26},{6,-14}}))); + + // Definition of parameters + // + Modelica.SIunits.Temperature TWal + "Temperature of fictitious wall"; + +protected + Modelica.SIunits.Power Q_flow_amb + "Heat flow between ambient and fictitious wall"; + +initial equation + if iniTWal0 then + TWal=TWal0; + else + der(TWal)=0; + end if; + +equation + // Calculation of energy balance + // + mWal*cpWal*der(TWal) = heaPorComInl.Q_flow + heaPorCom.Q_flow + + heaPorComOut.Q_flow - Q_flow_amb + "Energy balance of fictitious wall"; + heaPorComInl.T = TWal "Connect temperature with heat port"; + heaPorCom.T = heaPorAmb.T "Connect temperature with heat port"; + heaPorComOut.T = TWal "Connect temperature with heat port"; + + // Calculation of heat flow between ambient and fictious wall + // + Q_flow_amb =kAMeaAmb*(TWal - heaPorAmb.T) "Calculation of heat flow"; + heaPorAmb.Q_flow = -Q_flow_amb "Connect heat flow with heat port"; + + /*It is assumed that the heat flow flows out of the system*/ + + annotation (Documentation(revisions=" ++This is a model of a fictitious wall that describes the shell of the +compressor. It consists of four heat ports, i.e. for the inlet and +outlet of the compressor as well as for the ambient and compression +chamber. +It is assumed that the wall consists of a time invariante heat capacity; +additionally, it is assumed that the thermal conductance for the +calculation of the heat flow between ambient and fictitious wall is +also time invariante. +
+"), Icon(graphics={Rectangle( + extent={{-80,20},{80,-20}}, + lineColor={0,0,0}, + fillColor={95,95,95}, + fillPattern=FillPattern.Solid, + lineThickness=0.5), Text( + extent={{-70,30},{70,-30}}, + lineColor={0,0,0}, + fillColor={0,0,255}, + fillPattern=FillPattern.Solid, + textString="Fictitious Wall")}), + Diagram(graphics={Rectangle( + extent={{-70,20},{70,-22}}, + lineColor={0,0,0}, + fillColor={255,255,255}, + fillPattern=FillPattern.Forward)})); +end SimpleFictitiousWall; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/HeatTransfer/SimpleHeatTransfer.mo b/AixLib/Fluid/Movers/Compressors/Utilities/HeatTransfer/SimpleHeatTransfer.mo new file mode 100644 index 0000000000..2525b48d01 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/HeatTransfer/SimpleHeatTransfer.mo @@ -0,0 +1,135 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.HeatTransfer; +model SimpleHeatTransfer + "Model of a simple 1-dimensional heat transfer for compressor's + inlet and outlet" + + // Definition of parameters describing heat transfer + // + parameter Types.HeatTransferModels heaTraMod= + Types.HeatTransferModels.Simplified + "Choose heat transfer model" + annotation (Dialog(tab="General",group="Heat transfer")); + parameter Modelica.SIunits.ThermalConductance kAMea = 25 + "Effective mean thermal conductance between medium and fictitious wall" + annotation (Dialog(tab="General",group="Heat transfer")); + + // Extensions and parameter propagation + // + extends AixLib.Fluid.Interfaces.PartialTwoPortTransport( + redeclare replaceable package Medium=Modelica.Media.R134a.R134a_ph, + final dp_start=0, + m_flow_start=0.5*m_flow_nominal, + m_flow_small=1e-6*m_flow_nominal, + show_T=false, + show_V_flow=false); + + // Definition of parameters describing advanced options + // + parameter Modelica.SIunits.MassFlowRate m_flow_nominal = 0.1 + "Nominal mass flow rate" + annotation(Dialog(tab="Advanced"), + HideResult=true); + + // Definition of submodels and connectors + // + Modelica.Thermal.HeatTransfer.Interfaces.HeatPort_b heatPort + "Heat port to calculate heat losses" + annotation (Placement(transformation(extent={{-10,-110},{10,-90}}))); + + +protected + Medium.ThermodynamicState staInl + "Thermodynamic state at inlet"; + Medium.ThermodynamicState staOut + "Thermodynamic state at outlet"; + + Modelica.SIunits.TemperatureDifference effTemDif + "Effective temperature difference between medium and wall"; + Modelica.SIunits.Power Q_flow + "Heat flow exchanged between medium and heat port"; + + +equation + // Calculation of thermodynamic states + // + staInl = Medium.setState_phX(p=port_a.p, h=actualStream(port_a.h_outflow)) + "Thermodynamic state at inlet"; + staOut = Medium.setState_phX(p=port_b.p, h=actualStream(port_b.h_outflow)) + "Thermodynamic state at outlet"; + + // Calculation of heat flow + // + if heaTraMod == Types.HeatTransferModels.Simplified then + effTemDif = (Medium.temperature(staOut)+Medium.temperature(staInl))/2- + heatPort.T + "Effective temperature difference between medium and fictitious wall"; + Q_flow = kAMea*effTemDif "Simplified calculation of heat transfer"; + + /*It is assumed that the heat flow flows out of the system and, thus, a + heat flow flowing out of the system has a positive algebraic sign. + */ + else + assert(false, "Invalid choice of heat transfer model"); + end if; + + // Calculation of boundary conditions + // + port_a.h_outflow = inStream(port_b.h_outflow)-Q_flow/port_a.m_flow + "Heat exchange with fictitious wall"; + port_b.h_outflow = inStream(port_a.h_outflow)-Q_flow/port_a.m_flow + "Heat exchange with fictitious wall"; + dp = 0 "Assuming no pressure loss"; + + heatPort.Q_flow = -Q_flow "Connect heat flow with heat port"; + + annotation (Documentation(revisions=" ++This is a model of a simple one-directional heat transfer without storage of +energy or mass. Therefore, some assumptions are made: +
++This package contains models to compute heat transfers such as at the +inlet and outlet of a compressor. +
+")); +end HeatTransfer; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/HeatTransfer/package.order b/AixLib/Fluid/Movers/Compressors/Utilities/HeatTransfer/package.order new file mode 100644 index 0000000000..350bb01354 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/HeatTransfer/package.order @@ -0,0 +1,2 @@ +SimpleFictitiousWall +SimpleHeatTransfer diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/PartialIsentropicEfficiency.mo b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/PartialIsentropicEfficiency.mo new file mode 100644 index 0000000000..8cdda77886 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/PartialIsentropicEfficiency.mo @@ -0,0 +1,75 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency; +partial model PartialIsentropicEfficiency + "Based model used by all models describing isentropic efficiencies" + extends BaseClasses.PartialEfficiency; + + // Definition of outputs + // + output Modelica.SIunits.Efficiency etaIse(min=0, max=1, nominal= 0.9) + "Overall isentropic efficiency"; + + annotation (Documentation(revisions=" +
+This is a base model for overall isentropic efficiency models
+that are required for various compressor models. It defines some
+basic inputs and outputs that are commonly used by efficiency
+models and these inputs and outputs are summarised below:
+
| Type | +Name | +Comment | +
|---|---|---|
| input | +epsRef |
+Ratio of the real and the ideal displacement volume | +
| input | +VDis |
+Displacement volume | +
| input | +piPre |
+Pressure ratio | +
| input | +rotSpe |
+Rotational speed | +
| input | +staInl |
+Thermodynamic state at compressor's inlet conditions | +
| input | +staOut |
+Thermodynamic state at compressor's out conditions | +
| input | +TAmb |
+Ambient temperature | +
| output | +ηise |
+Overall isentropic efficiency | +
+This model contains a calculation procedure for isentropic efficiency +models (for more information, please check out + +AixLib.Fluid.Movers.Compressors.BaseClasses.PartialCompression). +The calculation procedures based on a polynomial approach are presented +below. +
+
+Actually, three polynomial approaches are implemented in this package.
+To add further calculation procedures, just add its name in
+
+AixLib.Fluid.Movers.Compressors.Utilities.Types
+and expand the if-structure.
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| DarrAndCrawford1992 | +ηise = a1 +
+a2*n + a3/ρinlet |
+R134a | +40 - 75 |
+3 - 10 |
+
| Karlsson2007 | +ηise = a1 + a2*π +
+a3*π^2 + a4*n + a5*n^2 |
+R407c | +No information |
+No information |
+
| Engelpracht2017 | +ηise = a1 + a2*n +
+a3*n^3 + a5*π^2 |
+Generic model | +0 - 120 |
+1 - 10 |
+
+J.H. Darr and R.R. Crawford (1992): + +Modeling of an Automotive Air Conditioning Compressor +Based on Experimental Data: ACRC Technical Report 14. +Publisher: Air Conditioning and Refrigeration Center. +College of Engineering. University of Illinois at +Urbana-Champaign. +
++F. Karlsson (2007): + +Capacity Control of Residential Heat Pump Heating Systems. In: PhD thesis +
++M. Engelpracht (2017): Development of modular and scalable simulation +models for heat pumps and chillers considering various refrigerants. +Master Thesis +
+")); +end PolynomialIsentropicEfficiency; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/PowerIsentropicEfficiency.mo b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/PowerIsentropicEfficiency.mo new file mode 100644 index 0000000000..f22d8a11de --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/PowerIsentropicEfficiency.mo @@ -0,0 +1,127 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency; +model PowerIsentropicEfficiency + "Model describing flow isentropic efficiency on power approach" + extends PartialIsentropicEfficiency; + + // Definition of parameters + // + parameter Types.IsentropicPowerModels powMod=Types.IsentropicPowerModels.MendozaMirandaEtAl2016 + "Chose predefined power model for flow coefficient" + annotation (Dialog(group="Modelling approach")); + parameter Real a + "Multiplication factor for generic power approach" + annotation(Dialog(group="Modelling approach")); + parameter Real b[:] + "Exponents for each multiplier" + annotation(Dialog(group="Modelling approach")); + parameter Integer nT = size(b,1) + "Number of terms used for the calculation procedure" + annotation(Dialog(group="Modelling approach", + enable=false)); + + // Definition of further parameters required for special approaches + // + parameter Modelica.SIunits.MolarMass MRef=0.1 + "Reference molar wheight" + annotation(Dialog(group="Reference properties")); + parameter Modelica.SIunits.Frequency rotSpeRef = 9.334 + "Reference rotational speed" + annotation(Dialog(group="Reference properties")); + + // Definition of coefficients + // + Real p[nT] + "Array that contains all coefficients used for the calculation procedure"; + Real corFac[2] + "Array of correction factors used if efficiency model proposed in literature + differs from efficiency model defined in PartialCompressor model"; + +equation + // Calculation of coefficients + // + if (powMod == Types.IsentropicPowerModels.MendozaMirandaEtAl2016) then + /*Power approach presented by Mendoza et al. (2016): + etaIse = piPre^b1 * (rotSpeRef/rotSpe)^b2 * (rotSpe^3*VDis/dhISe^1.5)^b3 + * (1/((TInl+TOutISe)/2-TOut))^b4 + */ + p[1] = piPre + "Pressure ratio"; + p[2] = rotSpeRef/rotSpe + "Rotational Speed"; + p[3] = rotSpe^3*VDis/(Medium.specificEnthalpy(Medium.setState_psX(s= + Medium.specificEntropy(staInl),p=Medium.pressure(staOut))))^1.5 + "Isentropic specific enthalpy difference"; + p[4] = MRef/Medium.fluidConstants[1].molarMass + "Molar Mass"; + + corFac = {1,1} + "No correction factors are needed"; + + else + assert(false, "Invalid choice of power approach"); + end if; + + // Calculationg of flow coefficient + // + etaIse = min(1, corFac[1] * a * + product(p[i]^b[i] for i in 1:nT)^corFac[2]) + "Calculation procedure of generic power approach"; + + annotation (Documentation(revisions=" ++This model contains a calculation procedure for isentropic efficiency +models (for more information, please check out + +AixLib.Fluid.Movers.Compressors.BaseClasses.PartialCompression). +The calculation procedures based on a power approach are presented +below. +
+
+Actually, one power approache is implemented in this package.
+To add further calculation procedures, just add its name in
+
+AixLib.Fluid.Movers.Compressors.Utilities.Types
+and expand the if-structure.
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| MendozaMirandaEtAl2016 | +ηise = a1 * π^b1 *
+(nref/n)^b2 *
+(n^3*Vdis/dhise^1.5)^b3 *
+(1/((Tinl+ToutIse)/2-Tout))^b4
+ |
+R134a,R450a,R1324yf,R1234ze(E) | +0 - 50 |
+1 - 6 |
+
+J.M. Mendoza-Miranda, A. Mota-Babiloni, J.J. Ramírez-Minguela, +V.D. Muñoz-Carpio, M. Carrera-Rodríguez, +J. Navarro-Esbrí and C. Salazar-Hernández (2016): + +Comparative evaluation of R1234yf, R1234ze(E) and R450A as +alternatives to R134a in a variable speed reciprocating +compressor. In: Energy 114, S. 753–766 +
+")); +end PowerIsentropicEfficiency; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_Reciprocating.mo b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_Reciprocating.mo new file mode 100644 index 0000000000..40a5aa8348 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_Reciprocating.mo @@ -0,0 +1,56 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency.SpecifiedEfficiencies; +model Buck_R134aR450aR1234yfR1234zee_VarDisVol_Reciprocating + "Reciporating Compressor - R134a, R450a, R1234yf, R1234ze(e) - Similitude - Power" + extends PowerIsentropicEfficiency( + final MRef=0.102032, + final rotSpeRef=9.334, + final powMod=Types.IsentropicPowerModels.MendozaMirandaEtAl2016, + final a=1, + final b={0.0753,0.2183,0.0015,0.0972}); + + annotation (Documentation(revisions=" +
+This model contains a calculation procedure for the isentropic
+efficiency presented by Mendoza-Miranda et al. (2016).
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| MendozaMirandaEtAl2016 | +ηise = a1 * π^b1 *
+(nref/n)^b2 *
+(n^3*Vdis/dhise^1.5)^b3 *
+(1/((Tinl+ToutIse)/2-Tout))^b4
+ |
+R134a,R450a,R1324yf,R1234ze(E) | +0 - 50 |
+1 - 6 |
+
+J.M. Mendoza-Miranda, A. Mota-Babiloni, J.J. Ramírez-Minguela, +V.D. Muñoz-Carpio, M. Carrera-Rodríguez, +J. Navarro-Esbrí and C. Salazar-Hernández (2016): + +Comparative evaluation of R1234yf, R1234ze(E) and R450A as +alternatives to R134a in a variable speed reciprocating +compressor. In: Energy 114, S. 753–766 +
+")); +end Buck_R134aR450aR1234yfR1234zee_VarDisVol_Reciprocating; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_Rotary.mo b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_Rotary.mo new file mode 100644 index 0000000000..8a9c60812e --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_Rotary.mo @@ -0,0 +1,56 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency.SpecifiedEfficiencies; +model Buck_R134aR450aR1234yfR1234zee_VarDisVol_Rotary + "Rotary Compressor - R134a, R450a, R1234yf, R1234ze(e) - Similitude - Power" + extends PowerIsentropicEfficiency( + final MRef=0.102032, + final rotSpeRef=9.334, + final powMod=Types.IsentropicPowerModels.MendozaMirandaEtAl2016, + final a=0.85, + final b={0.0753,0.2183,0.0015,0.0972}); + + annotation (Documentation(revisions=" +
+This model contains a calculation procedure for the isentropic
+efficiency presented by Mendoza-Miranda et al. (2016).
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| MendozaMirandaEtAl2016 | +ηise = a1 * π^b1 *
+(nref/n)^b2 *
+(n^3*Vdis/dhise^1.5)^b3 *
+(1/((Tinl+ToutIse)/2-Tout))^b4
+ |
+R134a,R450a,R1324yf,R1234ze(E) | +0 - 50 |
+1 - 6 |
+
+J.M. Mendoza-Miranda, A. Mota-Babiloni, J.J. Ramírez-Minguela, +V.D. Muñoz-Carpio, M. Carrera-Rodríguez, +J. Navarro-Esbrí and C. Salazar-Hernández (2016): + +Comparative evaluation of R1234yf, R1234ze(E) and R450A as +alternatives to R134a in a variable speed reciprocating +compressor. In: Energy 114, S. 753–766 +
+")); +end Buck_R134aR450aR1234yfR1234zee_VarDisVol_Rotary; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_Scroll.mo b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_Scroll.mo new file mode 100644 index 0000000000..4079a11fb1 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_Scroll.mo @@ -0,0 +1,56 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency.SpecifiedEfficiencies; +model Buck_R134aR450aR1234yfR1234zee_VarDisVol_Scroll + "Scroll Compressor - R134a, R450a, R1234yf, R1234ze(e) - Similutude - Power" + extends PowerIsentropicEfficiency( + final MRef=0.102032, + final rotSpeRef=9.334, + final powMod=Types.IsentropicPowerModels.MendozaMirandaEtAl2016, + final a=1, + final b={0.0753,0.2183,0.0015,0.0972}); + + annotation (Documentation(revisions=" +
+This model contains a calculation procedure for the isentropic
+efficiency presented by Mendoza-Miranda et al. (2016).
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| MendozaMirandaEtAl2016 | +ηise = a1 * π^b1 *
+(nref/n)^b2 *
+(n^3*Vdis/dhise^1.5)^b3 *
+(1/((Tinl+ToutIse)/2-Tout))^b4
+ |
+R134a,R450a,R1324yf,R1234ze(E) | +0 - 50 |
+1 - 6 |
+
+J.M. Mendoza-Miranda, A. Mota-Babiloni, J.J. Ramírez-Minguela, +V.D. Muñoz-Carpio, M. Carrera-Rodríguez, +J. Navarro-Esbrí and C. Salazar-Hernández (2016): + +Comparative evaluation of R1234yf, R1234ze(E) and R450A as +alternatives to R134a in a variable speed reciprocating +compressor. In: Energy 114, S. 753–766 +
+")); +end Buck_R134aR450aR1234yfR1234zee_VarDisVol_Scroll; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/ConstantEfficiency.mo b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/ConstantEfficiency.mo new file mode 100644 index 0000000000..2e80d4d1ca --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/ConstantEfficiency.mo @@ -0,0 +1,34 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency.SpecifiedEfficiencies; +model ConstantEfficiency + "General model that describes a constant overall isentropic efficiency" + extends PartialIsentropicEfficiency; + + // Definition of parameters + // + parameter Modelica.SIunits.Efficiency etaIseCon = 0.9 + "Constant overall isentropic efficiency"; + +equation + // Calculate overall isentropic efficiency + // + etaIse = etaIseCon "Allocation of constant overall isentropic efficiency"; + + annotation (Documentation(revisions=" ++This model contains a simple calculation procedure for isentropic +efficiency models (for more information, please check out + +AixLib.Fluid.Movers.Compressors.BaseClasses.PartialCompression). +The model provides a constant overall isentropic efficiency and is +the most basic engine efficiency model. +
+")); +end ConstantEfficiency; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/Generic_VarRef_VarDisVol_RotaryScroll.mo b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/Generic_VarRef_VarDisVol_RotaryScroll.mo new file mode 100644 index 0000000000..9c2f7061ce --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/Generic_VarRef_VarDisVol_RotaryScroll.mo @@ -0,0 +1,50 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency.SpecifiedEfficiencies; +model Generic_VarRef_VarDisVol_RotaryScroll + "Generic overall isentropic efficiency based on literature review for + various compressors" + extends PolynomialIsentropicEfficiency( + final polyMod=Types.IsentropicPolynomialModels.Engelpracht2017, + final a={0.5816, 0.002604,-1.515e-7,-0.00473}, + final b={1,1,1,1}); + + annotation (Documentation(revisions=" +
+This model contains a calculation procedure for the isentropic efficiency
+presented by Engelpracht (2017). However, this approach is just fitted
+to various experimental data obtained by a literature review and,
+therefore, to use with caution.
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| Engelpracht2017 | +ηise = a1 + a2*n +
+a3*n^3 + a5*π^2 |
+Generic model | +0 - 120 |
+1 - 10 |
+
+Engelpracht, Mirko (2017): Development of modular and scalable simulation +models for heat pumps and chillers considering various refrigerants. +Master Thesis +
+")); +end Generic_VarRef_VarDisVol_RotaryScroll; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/Poly_R134a_169_Reciprocating.mo b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/Poly_R134a_169_Reciprocating.mo new file mode 100644 index 0000000000..33516dfa77 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/Poly_R134a_169_Reciprocating.mo @@ -0,0 +1,51 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency.SpecifiedEfficiencies; +model Poly_R134a_169_Reciprocating + "Reciporating Compressor - R134a - 169 cm³ - Polynomial" + extends PolynomialIsentropicEfficiency( + final polyMod=Types.IsentropicPolynomialModels.DarrAndCrawford1992, + final a={0.8405,-4.8711*1e-5,-0.1105}, + final b={1,1,1}); + + annotation (Documentation(revisions=" +
+This model contains a calculation procedure for the isentropic
+efficiency presented by Darr and Crawford (1992).
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| DarrAndCrawford1992 | +ηise = a1 +
+a2*n + a3/ρinlet |
+R134a | +40 - 75 |
+3 - 10 |
+
+J.H. Darr and R.R. Crawford (1992): + +Modeling of an Automotive Air Conditioning Compressor +Based on Experimental Data: ACRC Technical Report 14. +Publisher: Air Conditioning and Refrigeration Center. +College of Engineering. University of Illinois at +Urbana-Champaign. +
+")); +end Poly_R134a_169_Reciprocating; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/Poly_R407C_Unknown_Scroll.mo b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/Poly_R407C_Unknown_Scroll.mo new file mode 100644 index 0000000000..1fba6a24a7 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/Poly_R407C_Unknown_Scroll.mo @@ -0,0 +1,47 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency.SpecifiedEfficiencies; +model Poly_R407C_Unknown_Scroll + "Scroll Compressor - R407C - Unknown displacement volume - Polynomial" + extends PolynomialIsentropicEfficiency( + final polyMod=Types.IsentropicPolynomialModels.Karlsson2007, + final a={0.926,-0.0823,0.00352,0.00294,-0.000022}, + final b={1,1,1,1,1}); + + annotation (Documentation(revisions=" +
+This model contains a calculation procedure for the isentropic
+efficiency presented by Karlsson (2007).
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| Karlsson2007 | +ηise = a1 + a2*π +
+a3*π^2 + a4*n + a5*n^2 |
+R407c | +No information |
+No information |
+
+F. Karlsson (2007): + +Capacity Control of Residential Heat Pump Heating Systems. In: PhD thesis +
+")); +end Poly_R407C_Unknown_Scroll; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/package.mo b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/package.mo new file mode 100644 index 0000000000..d125af6b0e --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/package.mo @@ -0,0 +1,37 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency; +package SpecifiedEfficiencies "Package that engine efficiencies that are specifiied" + extends Modelica.Icons.VariantsPackage; + + annotation (Documentation(revisions=" ++This package contains volumetrtic efficiencies that are already specified. +This means that the calculation approaches of the volumetrtic efficiency +presented before are adapted for a specific compressor type and +a specific refrigerant. +
++In the following, a guideline of naming efficiency models is +summarised: +
++Approach of calculating efficiency _ +Valid refrigerants _ +Displacement volume _ +Type of compressor +
++Moreover, the modeles are saved in a specific order. First, generic +models are saved and then models based on the similitude theory are +saved. Last, models of specific compressors are saved. +
+")); +end SpecifiedEfficiencies; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/package.order b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/package.order new file mode 100644 index 0000000000..a8d7f82731 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/SpecifiedEfficiencies/package.order @@ -0,0 +1,7 @@ +Buck_R134aR450aR1234yfR1234zee_VarDisVol_Reciprocating +Buck_R134aR450aR1234yfR1234zee_VarDisVol_Rotary +Buck_R134aR450aR1234yfR1234zee_VarDisVol_Scroll +ConstantEfficiency +Generic_VarRef_VarDisVol_RotaryScroll +Poly_R134a_169_Reciprocating +Poly_R407C_Unknown_Scroll diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/package.mo b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/package.mo new file mode 100644 index 0000000000..33008aee03 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/package.mo @@ -0,0 +1,135 @@ +within AixLib.Fluid.Movers.Compressors.Utilities; +package IsentropicEfficiency "Package that contains models describing different isentropic efficiencies" + extends Modelica.Icons.Library; + + + + + + + + + + + +annotation (Icon(coordinateSystem(preserveAspectRatio=false), + graphics={ + Ellipse( + extent={{-90,-90},{90,90}}, + lineThickness=0.25, + pattern=LinePattern.None, + lineColor={215,215,215}, + fillColor={215,215,215}, + fillPattern=FillPattern.Solid), + Line( + points={{-40,60},{-30,70},{-20,60},{-20,60}}, + color={0,0,0}, + smooth=Smooth.Bezier, + thickness=0.5), + Line( + points={{-20,60},{-20,-30},{-20,38},{-16,50}, + {-6,58},{0,60},{6,58}}, + color={0,0,0}, + smooth=Smooth.Bezier, + thickness=0.5), + Line( + points={{6,58},{16,50},{20,40},{20,-70}, + {20,-70},{20,-70},{20,-70}}, + color={0,0,0}, + smooth=Smooth.Bezier, + thickness=0.5)}), +Documentation(revisions=" +
+This package contains models describing calculations procedures of
+isentropic efficiencies that are based on a literature review. However,
+in this library the isentropic efficiency is implemented in such a way
+that it fulfills
+ηise = (houtIse - hinl) /
+(hout - hinl).
+For more information, please checkout
+
+AixLib.Fluid.Movers.Compressors.BaseClasses.PartialCompression.
+
+Calculation procedures presented in the litarture have some variables
+in commen and these variables are presented below:
+
| Variable | +Comment | +
|---|---|
epsRef |
+Ratio of the real and the ideal displacement volume | +
VDis |
+Displacement volume | +
piPre |
+Pressure ratio | +
rotSpe |
+Rotational speed | +
staInl |
+Thermodynamic state at compressor's inlet conditions | +
staOut |
+Thermodynamic state at compressor's out conditions | +
TAmb |
+Ambient temperature | +
+Moreover, two approaches can be identified in general: A +polynomial and a power approach. The characteristics of these +approaches are presented below. +
+
+A generic polynomial approach is presented below:
+ηise = corFact *
+sum(a[i]*P[i]^b[i] for i in 1:nT)
+Actually, three polynomial approaches are implemented in this
+package.
+
+A generic power approach is presented below:
+ηise = corFact * a *
+product(P[i]^b[i] for i in 1:nT)
+Actually, one power approache is implemented in this
+package.
+
+In the following, some general references are given for information about +calculating efficiencies of compressors: +
++V. A. Cara Martin and R. Radermacher (2015): + +AHRI Project 8013: A Study of Methods to Represent Compressor Performance +Data over an Operating Envelope Based on a Finite Set of Test Data. +Publisher: Air-Conditioning, Heating, and Refrigeration Institute (AHRI) +
+")); +end IsentropicEfficiency; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/package.order b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/package.order new file mode 100644 index 0000000000..0ec428bd1a --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/IsentropicEfficiency/package.order @@ -0,0 +1,4 @@ +PartialIsentropicEfficiency +PolynomialIsentropicEfficiency +PowerIsentropicEfficiency +SpecifiedEfficiencies diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/Types.mo b/AixLib/Fluid/Movers/Compressors/Utilities/Types.mo new file mode 100644 index 0000000000..bd252c6ec1 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/Types.mo @@ -0,0 +1,87 @@ +within AixLib.Fluid.Movers.Compressors.Utilities; +package Types + "Types, constants to define menu choices" + extends Modelica.Icons.TypesPackage; + + type EnginePolynomialModels = enumeration( + JahningEtAl2000 + "JahningEtAl2000 - Function of inlet pressure", + KinarbEtAl2010 + "KinarbEtAl2010 - Function of pressure ratio", + DurprezEtAl2007 + "DurprezEtAl2007 - Function of pressure ratio", + Engelpracht2017 + "Engelpracht2017 - Function of pressure ratio and rotational speed") + "Enumeration to define polynomial models for calculating engine efficiency" + annotation (Evaluate=true); + type EnginePowerModels = enumeration( + MendozaMirandaEtAl2016 + "MendozaMirandaEtAl2016 - Function of various properties") + "Enumeration to define polynomial models for calculating engine efficiency" + annotation (Evaluate=true); + type IsentropicPolynomialModels = enumeration( + DarrAndCrawford1992 + "DarrAndCrawford1992 - Function of rotational speed and densities", + Karlsson2007 + "Karlsson2007 - Function of pressure ratio and rotational speed", + Engelpracht2017 + "Engelpracht2017 - Function of pressure ratio and rotational speed") + "Enumeration to define polynomial models for calculating isentropic efficiency" + annotation (Evaluate=true); + type IsentropicPowerModels = enumeration( + MendozaMirandaEtAl2016 + "MendozaMirandaEtAl2016 - Function of various properties") + "Enumeration to define polynomial models for calculating isentropic efficiency" + annotation (Evaluate=true); + type VolumetricPolynomialModels = enumeration( + DarrAndCrawford1992 + "DarrAndCrawford1992 - Function of rotational speed and densities", + Karlsson2007 + "Karlsson2007 - Function of pressure ratio and rotational speed", + KinarbEtAl2010 + "KinarbEtAl2010 - Function of pressure ratio", + ZhouEtAl2010 + "ZhouEtAl2010 - Function of pressure ratio and isentropic exponent", + Li2013 + "Li2013 - Function of rotational speed and reference rotational speed", + HongtaoLaughmannEtAl2017 + "HongtaoLaughmannEtAl2017 - Function of pressures and rotational speed", + Koerner2017 + "Koerner2017 - Function of pressure ratio", + Engelpracht2017 + "Engelpracht2017 - Function of pressure ratio and rotational speed") + "Enumeration to define polynomial models for calculating volumetric efficiency" + annotation (Evaluate=true); + type VolumetricPowerModels = enumeration( + MendozaMirandaEtAl2016 + "MendozaMirandaEtAl2016 - Function of various properties") + "Enumeration to define polynomial models for calculating volumetric efficiency" + annotation (Evaluate=true); + type HeatTransferModels = enumeration( + Simplified + "Calculation of heat transfer using simplified temperature difference") + "Enumeration to define heat transfer models for calculations of heat losses" + annotation (Evaluate=true); + type SimpleCompressor = enumeration( + Default + "Default value used for partial compressor", + RotaryCompressor + "Simple rotary compressor", + RotaryCompressorPressureLosses + "Simple rotary compressor with pressure losses", + RotaryCompressorPressureHeatLosses + "Simple rotary compressor with pressure and heat losses") + "Enumeration to define simple compressor model" + annotation (Evaluate=true); + annotation (Documentation(revisions=" +This package contains types and constants to define menue choices.
+")); +end Types; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/PartialVolumetricEfficiency.mo b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/PartialVolumetricEfficiency.mo new file mode 100644 index 0000000000..caf78d0410 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/PartialVolumetricEfficiency.mo @@ -0,0 +1,75 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency; +partial model PartialVolumetricEfficiency + "Based model used by all models describing volumetric efficiencies" + extends BaseClasses.PartialEfficiency; + + // Definition of outputs + // + output Modelica.SIunits.Efficiency lamH(min=0, max=1, nominal= 0.9) + "Overall volumetric efficiency"; + + annotation (Documentation(revisions=" +
+This is a base model for overall volumetric efficiency models
+that are required for various compressor models. It defines some
+basic inputs and outputs that are commonly used by efficiency
+models and these inputs and outputs are summarised below:
+
| Type | +Name | +Comment | +
|---|---|---|
| input | +epsRef |
+Ratio of the real and the ideal displacement volume | +
| input | +VDis |
+Displacement volume | +
| input | +piPre |
+Pressure ratio | +
| input | +rotSpe |
+Rotational speed | +
| input | +staInl |
+Thermodynamic state at compressor's inlet conditions | +
| input | +staOut |
+Thermodynamic state at compressor's out conditions | +
| input | +TAmb |
+Ambient temperature | +
| output | +ηvol |
+Overall volumetric efficiency | +
+This model contains a calculation procedure for volumetric efficiency +models (for more information, please check out + +AixLib.Fluid.Movers.Compressors.BaseClasses.PartialCompression). +The calculation procedures based on a polynomial approach are presented +below. +
+
+Actually, eigtht polynomial approaches are implemented in this package.
+To add further calculation procedures, just add its name in
+
+AixLib.Fluid.Movers.Compressors.Utilities.Types
+and expand the if-structure.
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| DarrAndCrawford1992 | +ηvol = a1 + a2*n -
+a3*epsRef*(ρinlIse/ρinl-1) -
+a4*n*(ρinlIse/ρinl-1) |
+R134a | +40 - 75 |
+3 - 10 |
+
| Karlsson2007 | +ηvol = a1*Tinl*π +
+a2*π + a3 + a4*Tinl +
+a5*n + a6*n^2 |
+R407c | +No information |
+No information |
+
| KinarbEtAl2010 | +ηvol = a1 + a2*π |
+Generic model | +Generic model |
+Generic model |
+
| ZhouEtAl2010 | +ηvol = 1 + a1 -
+a2*π^(1/κ) |
+Generic model | +Generic model |
+Generic model |
+
| Li2013 | +ηvol = ηvolRef *
+(a1 + a2*(n/nref) + a3*(n/nref)^2)
+ |
+R22,R134a | +30 - 120 |
+4 - 12 |
+
| HongtaoLaughmannEtAl2017 | +ηvol = a1 + a2*(n/nref) +
+a3*(n/nref)^2 + a4*π + a5*(n/nref)*π +
+a6*(n/nref)^2*π + a7*π^2 +
+a8*(n/nref)*π^2 + a9*(n/nref)^2*π^2 +
+a10*pout + a11*(n/nref)*pout +
+a12*(n/nref)^2*pout - a13*pinl -
+a14*(n/nref)*pinl -
+a15*(n/nref)^2*pinl +
+a16*pinl*pout +
+a17*(n/nref)*pinl*pout +
+a18*(n/nref)^2*pinl*pout +
+a19*(n/nref)^3*pinl*pout +
+a20*(n/nref)^4*pinl*pout -
+a21*pinl^2 -
+a22*(n/nref)*pinl^2 -
+a23*(n/nref)^2*pinl^2 -
+a24*(n/nref)^3*pinl^2 -
+a25*(n/nref)^4*pinl^2 |
+Generic model | +Generic model |
+Generic model |
+
| Koerner2017 | +ηvol =
+a1*π^b1 |
+R410a | +50 - 120 |
+1 - 10 |
+
| Engelpracht2017 | +ηvol = a1 + a2*((π-c1)/c2) +
+a3*((Tinl-c3)/c4)*((π-c1)/c2) +
+a4*((Tinl-c3)/c4) + a5*((n-c5)/c6) +
+a6*((n-c5)/c6)^2 |
+Generic model | +0 - 120 |
+1 - 10 |
+
+J.H. Darr and R.R. Crawford (1992): + +Modeling of an Automotive Air Conditioning Compressor +Based on Experimental Data: ACRC Technical Report 14. +Publisher: Air Conditioning and Refrigeration Center. +College of Engineering. University of Illinois at +Urbana-Champaign. +
++F. Karlsson (2007): + +Capacity Control of Residential Heat Pump Heating Systems. In: PhD thesis +
++R. Zhou, T. Zhang, J. Catano, J.T. Wen, G.J. Michna, +Y. Peles, and M.K. Jensen, M. K. (2010): + +The steady-state modeling and optimization of a refrigeration +system for high heat flux removal. In: +Applied Thermal Engineering 30(16), S. 2347–2356 +
++E. Kinab, D. Marchio, P. Rivière and A. Zoughaib (2010): + +Reversible heat pump model for seasonal performance optimization. In: +Energy and Buildings 42(12), S. 2269–2280 +
++W. Li (2013): + +Simplified steady-state modeling for variable speed compressor. +In: Applied Thermal Engineering 50(1), S. 318–326 +
++Q. Hongtao, C.R. Laughman, D.J. Burns and S.A. Bortoff, (2017): + +Dynamic Characteristics of an R-410A Multi-split Variable Refrigerant +Flow Air-conditioning System. In: IEA Heat Pump Conference 2017 +
++D. Körner (2017): Development of dynamic compression heat pump models +to evaluate promising refrigerants considering legal regulations. +Master Thesis +
++M. Engelpracht (2017): Development of modular and scalable simulation +models for heat pumps and chillers considering various refrigerants. +Master Thesis +
+")); +end PolynomialVolumetricEfficiency; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/PowerVolumetricEfficiency.mo b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/PowerVolumetricEfficiency.mo new file mode 100644 index 0000000000..4440455cec --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/PowerVolumetricEfficiency.mo @@ -0,0 +1,121 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency; +model PowerVolumetricEfficiency + "Model describing flow volumetric efficiency on power approach" + extends PartialVolumetricEfficiency; + + // Definition of parameters + // + parameter Types.VolumetricPowerModels powMod=Types.VolumetricPowerModels.MendozaMirandaEtAl2016 + "Chose predefined power model for flow coefficient" + annotation (Dialog(group="Modelling approach")); + parameter Real a + "Multiplication factor for generic power approach" + annotation(Dialog(group="Modelling approach")); + parameter Real b[:] + "Exponents for each multiplier" + annotation(Dialog(group="Modelling approach")); + parameter Integer nT = size(b,1) + "Number of terms used for the calculation procedure" + annotation(Dialog(group="Modelling approach", + enable=false)); + + // Definition of further parameters required for special approaches + // + parameter Modelica.SIunits.MolarMass MRef=0.1 + "Reference molar wheight" + annotation(Dialog(group="Reference properties")); + parameter Modelica.SIunits.Frequency rotSpeRef = 9.334 + "Reference rotational speed" + annotation(Dialog(group="Reference properties")); + + // Definition of coefficients + // + Real p[nT] + "Array that contains all coefficients used for the calculation procedure"; + Real corFac[2] + "Array of correction factors used if efficiency model proposed in literature + differs from efficiency model defined in PartialCompressor model"; + +equation + // Calculation of coefficients + // + if (powMod == Types.VolumetricPowerModels.MendozaMirandaEtAl2016) then + /*Power approach presented by Mendoza et al. (2005): + lamH = piPre^b1 * (piPre^1.5*rotSpe^3*VDis)^b2 * (MRef/M)^b3 + */ + p[1] = piPre + "Pressure ratio"; + p[2] = piPre^1.5*rotSpe^3*VDis + "Rotational Speed"; + p[3] = MRef/Medium.fluidConstants[1].molarMass + "Molar Mass"; + + corFac = {1,1} + "No correction factors are needed"; + + else + assert(false, "Invalid choice of power approach"); + end if; + + // Calculationg of flow coefficient + // + lamH = min(1, corFac[1] * a * + product(abs(p[i])^b[i] for i in 1:nT)^corFac[2]) + "Calculation procedure of generic power approach"; + + annotation (Documentation(revisions=" ++This model contains a calculation procedure for volumetric efficiency +models (for more information, please check out + +AixLib.Fluid.Movers.Compressors.BaseClasses.PartialCompression). +The calculation procedures based on a power approach are presented +below. +
+
+Actually, one power approache is implemented in this package.
+To add further calculation procedures, just add its name in
+
+AixLib.Fluid.Movers.Compressors.Utilities.Types
+and expand the if-structure.
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| MendozaMirandaEtAl2016 | +ηvol = a1 * π^b1 *
+(π^1.5*n^3*Vdis)^b2 * (Mref/M)^b3
+ |
+R134a,R450a,R1324yf,R1234ze(E) | +0 - 50 |
+1 - 6 |
+
+J.M. Mendoza-Miranda, A. Mota-Babiloni, J.J. Ramírez-Minguela, +V.D. Muñoz-Carpio, M. Carrera-Rodríguez, +J. Navarro-Esbrí and C. Salazar-Hernández (2016): + +Comparative evaluation of R1234yf, R1234ze(E) and R450A as +alternatives to R134a in a variable speed reciprocating +compressor. In: Energy 114, S. 753–766 +
+")); +end PowerVolumetricEfficiency; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_Reciprocating.mo b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_Reciprocating.mo new file mode 100644 index 0000000000..656b2db2d9 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_Reciprocating.mo @@ -0,0 +1,54 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency.SpecifiedEfficiencies; +model Buck_R134aR450aR1234yfR1234zee_VarDisVol_Reciprocating + "Reciporating Compressor - R134a, R450a, R1234yf, R1234ze(e) - Similitude - Power" + extends PowerVolumetricEfficiency( + final MRef=0.102032, + final rotSpeRef=9.334, + final powMod=Types.VolumetricPowerModels.MendozaMirandaEtAl2016, + final a=1, + final b={-0.2678,-0.0106,0.7195}); + + annotation (Documentation(revisions=" +
+This model contains a calculation procedure for the isentropic
+efficiency presented by Mendoza-Miranda et al. (2016).
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| MendozaMirandaEtAl2016 | +ηvol = a1 * π^b1 *
+(π^1.5*n^3*Vdis)^b2 * (Mref/M)^b3
+ |
+R134a,R450a,R1324yf,R1234ze(E) | +0 - 50 |
+1 - 6 |
+
+J.M. Mendoza-Miranda, A. Mota-Babiloni, J.J. Ramírez-Minguela, +V.D. Muñoz-Carpio, M. Carrera-Rodríguez, +J. Navarro-Esbrí and C. Salazar-Hernández (2016): + +Comparative evaluation of R1234yf, R1234ze(E) and R450A as +alternatives to R134a in a variable speed reciprocating +compressor. In: Energy 114, S. 753–766 +
+")); +end Buck_R134aR450aR1234yfR1234zee_VarDisVol_Reciprocating; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_Rotary.mo b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_Rotary.mo new file mode 100644 index 0000000000..688c771e71 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_Rotary.mo @@ -0,0 +1,54 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency.SpecifiedEfficiencies; +model Buck_R134aR450aR1234yfR1234zee_VarDisVol_Rotary + "Rotary Compressor - R134a, R450a, R1234yf, R1234ze(e) - Similitude - Power" + extends PowerVolumetricEfficiency( + final MRef=0.102032, + final rotSpeRef=9.334, + final powMod=Types.VolumetricPowerModels.MendozaMirandaEtAl2016, + final a=1.2, + final b={-0.2678,-0.0106,0.7195}); + + annotation (Documentation(revisions=" +
+This model contains a calculation procedure for the isentropic
+efficiency presented by Mendoza-Miranda et al. (2016).
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| MendozaMirandaEtAl2016 | +ηvol = a1 * π^b1 *
+(π^1.5*n^3*Vdis)^b2 * (Mref/M)^b3
+ |
+R134a,R450a,R1324yf,R1234ze(E) | +0 - 50 |
+1 - 6 |
+
+J.M. Mendoza-Miranda, A. Mota-Babiloni, J.J. Ramírez-Minguela, +V.D. Muñoz-Carpio, M. Carrera-Rodríguez, +J. Navarro-Esbrí and C. Salazar-Hernández (2016): + +Comparative evaluation of R1234yf, R1234ze(E) and R450A as +alternatives to R134a in a variable speed reciprocating +compressor. In: Energy 114, S. 753–766 +
+")); +end Buck_R134aR450aR1234yfR1234zee_VarDisVol_Rotary; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_Scroll.mo b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_Scroll.mo new file mode 100644 index 0000000000..4e0720fa5b --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Buck_R134aR450aR1234yfR1234zee_VarDisVol_Scroll.mo @@ -0,0 +1,54 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency.SpecifiedEfficiencies; +model Buck_R134aR450aR1234yfR1234zee_VarDisVol_Scroll + "Scroll Compressor - R134a, R450a, R1234yf, R1234ze(e) - Similitude - Power" + extends PowerVolumetricEfficiency( + final MRef=0.102032, + final rotSpeRef=9.334, + final powMod=Types.VolumetricPowerModels.MendozaMirandaEtAl2016, + final a=1.35, + final b={-0.2678,-0.0106,0.7195}); + + annotation (Documentation(revisions=" +
+This model contains a calculation procedure for the isentropic
+efficiency presented by Mendoza-Miranda et al. (2016).
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| MendozaMirandaEtAl2016 | +ηvol = a1 * π^b1 *
+(π^1.5*n^3*Vdis)^b2 * (Mref/M)^b3
+ |
+R134a,R450a,R1324yf,R1234ze(E) | +0 - 50 |
+1 - 6 |
+
+J.M. Mendoza-Miranda, A. Mota-Babiloni, J.J. Ramírez-Minguela, +V.D. Muñoz-Carpio, M. Carrera-Rodríguez, +J. Navarro-Esbrí and C. Salazar-Hernández (2016): + +Comparative evaluation of R1234yf, R1234ze(E) and R450A as +alternatives to R134a in a variable speed reciprocating +compressor. In: Energy 114, S. 753–766 +
+")); +end Buck_R134aR450aR1234yfR1234zee_VarDisVol_Scroll; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/ConstantEfficiency.mo b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/ConstantEfficiency.mo new file mode 100644 index 0000000000..0d8950d89f --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/ConstantEfficiency.mo @@ -0,0 +1,34 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency.SpecifiedEfficiencies; +model ConstantEfficiency + "General model that describes a constant overall volumetric efficiency" + extends PartialVolumetricEfficiency; + + // Definition of parameters + // + parameter Modelica.SIunits.Efficiency lamHCon = 0.9 + "Constant overall volumetric efficiency"; + +equation + // Calculate overall volumetric efficiency + // + lamH = lamHCon "Allocation of constant overall volumetric efficiency"; + + annotation (Documentation(revisions=" ++This model contains a simple calculation procedure for volumetric +efficiency models (for more information, please check out + +AixLib.Fluid.Movers.Compressors.BaseClasses.PartialCompression). +The model provides a constant overall volumetric efficiency and is +the most basic engine efficiency model. +
+")); +end ConstantEfficiency; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Generic_VarRef_VarDisVol_RotaryScroll.mo b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Generic_VarRef_VarDisVol_RotaryScroll.mo new file mode 100644 index 0000000000..a670947861 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Generic_VarRef_VarDisVol_RotaryScroll.mo @@ -0,0 +1,54 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency.SpecifiedEfficiencies; +model Generic_VarRef_VarDisVol_RotaryScroll + "Generic overall volumetric efficiency based on literature review for various compressors" + extends PolynomialVolumetricEfficiency( + final polyMod=Types.VolumetricPolynomialModels.Engelpracht2017, + final a={0.801790164842882, -0.0521044823322188, 3.216164809959999e-04, + -0.00493895583430215, 0.049805496348618, -0.021900176265525}, + final b={1,1,1,1,1,1}, + final c={4.54069854496490, 1.63495326341915, 263.864279610770, + 8.43796869242862, 64.4107142857143, 20.8137823859887}); + + annotation (Documentation(revisions=" +
+This model contains a calculation procedure for the isentropic efficiency
+presented by Engelpracht (2017). However, this approach is just fitted
+to various experimental data obtained by a literature review and,
+therefore, to use with caution.
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| Engelpracht2017 | +ηvol = a1 + a2*((π-c1)/c2) +
+a3*((Tinl-c3)/c4)*((π-c1)/c2) +
+a4*((Tinl-c3)/c4) + a5*((n-c5)/c6) +
+a6*((n-c5)/c6)^2 |
+Generic model | +0 - 120 |
+1 - 10 |
+
+Engelpracht, Mirko (2017): Development of modular and scalable simulation +models for heat pumps and chillers considering various refrigerants. +Master Thesis +
+")); +end Generic_VarRef_VarDisVol_RotaryScroll; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Poly_R134a_169_Reciprocating.mo b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Poly_R134a_169_Reciprocating.mo new file mode 100644 index 0000000000..de5d99b81a --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Poly_R134a_169_Reciprocating.mo @@ -0,0 +1,52 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency.SpecifiedEfficiencies; +model Poly_R134a_169_Reciprocating + "Reciporating Compressor - R134a - 169 cm³ - Polynomial" + extends PolynomialVolumetricEfficiency( + final polyMod=Types.VolumetricPolynomialModels.DarrAndCrawford1992, + final a={0.8889,-1.0025*1e-4,0.8889,-1.0025*1e-4}, + final b={1,1,1,1}); + + annotation (Documentation(revisions=" +
+This model contains a calculation procedure for the isentropic
+efficiency presented by Darr and Crawford (1992).
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| DarrAndCrawford1992 | +ηvol = a1 + a2*n -
+a3*epsRef*(ρinlIse/ρinl-1) -
+a4*n*(ρinlIse/ρinl-1) |
+R134a | +40 - 75 |
+3 - 10 |
+
+J.H. Darr and R.R. Crawford (1992): + +Modeling of an Automotive Air Conditioning Compressor +Based on Experimental Data: ACRC Technical Report 14. +Publisher: Air Conditioning and Refrigeration Center. +College of Engineering. University of Illinois at +Urbana-Champaign. +
+")); +end Poly_R134a_169_Reciprocating; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Poly_R134a_170_Reciprocating.mo b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Poly_R134a_170_Reciprocating.mo new file mode 100644 index 0000000000..608ba9e30f --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Poly_R134a_170_Reciprocating.mo @@ -0,0 +1,51 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency.SpecifiedEfficiencies; +model Poly_R134a_170_Reciprocating + "Reciporating Compressor - R134a - 170 cm³ - Polynomial" + extends PolynomialVolumetricEfficiency( + final polyMod=Types.VolumetricPolynomialModels.Li2013, + final rotSpeRef=2000/60, + final a={1.223,-0.206,-0.017}, + final b={1,1,1}, + final c={0.779,-0.036,0}); + + annotation (Documentation(revisions=" +
+This model contains a calculation procedure for the isentropic
+efficiency presented by Li (2013).
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| Li2013 | +ηvol = ηvolRef *
+(a1 + a2*(n/nref) + a3*(n/nref)^2)
+ |
+R22,R134a | +30 - 120 |
+4 - 12 |
+
+W. Li (2013): + +Simplified steady-state modeling for variable speed compressor. +In: Applied Thermal Engineering 50(1), S. 318–326 +
+")); +end Poly_R134a_170_Reciprocating; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Poly_R134a_54_Scroll.mo b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Poly_R134a_54_Scroll.mo new file mode 100644 index 0000000000..e9b77f4299 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Poly_R134a_54_Scroll.mo @@ -0,0 +1,51 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency.SpecifiedEfficiencies; +model Poly_R134a_54_Scroll + "Scroll Compressor - R134a - 54.24 cm³ - Polynomial " + extends PolynomialVolumetricEfficiency( + final polyMod=Types.VolumetricPolynomialModels.Li2013, + final rotSpeRef=50, + final a={0.693,0.543,-0.236}, + final b={1,1,1}, + final c={1.047,-0.051,0}); + + annotation (Documentation(revisions=" +
+This model contains a calculation procedure for the isentropic
+efficiency presented by Li (2013).
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| Li2013 | +ηvol = ηvolRef *
+(a1 + a2*(n/nref) + a3*(n/nref)^2)
+ |
+R22,R134a | +30 - 120 |
+4 - 12 |
+
+W. Li (2013): + +Simplified steady-state modeling for variable speed compressor. +In: Applied Thermal Engineering 50(1), S. 318–326 +
+")); +end Poly_R134a_54_Scroll; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Poly_R22_20_Rotary.mo b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Poly_R22_20_Rotary.mo new file mode 100644 index 0000000000..53c5f71ed9 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Poly_R22_20_Rotary.mo @@ -0,0 +1,50 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency.SpecifiedEfficiencies; +model Poly_R22_20_Rotary "Rotary Compressor - R22 - 20.7 cm³ - Polynomial" + extends PolynomialVolumetricEfficiency( + final polyMod=Types.VolumetricPolynomialModels.Li2013, + final rotSpeRef=60, + final a={0.709,0.416,-0.125}, + final b={1,1,1}, + final c={1.083,-0.077,0}); + + annotation (Documentation(revisions=" +
+This model contains a calculation procedure for the isentropic
+efficiency presented by Li (2013).
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| Li2013 | +ηvol = ηvolRef *
+(a1 + a2*(n/nref) + a3*(n/nref)^2)
+ |
+R22,R134a | +30 - 120 |
+4 - 12 |
+
+W. Li (2013): + +Simplified steady-state modeling for variable speed compressor. +In: Applied Thermal Engineering 50(1), S. 318–326 +
+")); +end Poly_R22_20_Rotary; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Poly_R407C_Unknown_Scroll.mo b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Poly_R407C_Unknown_Scroll.mo new file mode 100644 index 0000000000..02d60220a4 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Poly_R407C_Unknown_Scroll.mo @@ -0,0 +1,48 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency.SpecifiedEfficiencies; +model Poly_R407C_Unknown_Scroll + "Scroll Compressor - R407C - Unknown displacement volume - Polynomial" + extends PolynomialVolumetricEfficiency( + final polyMod=Types.VolumetricPolynomialModels.Karlsson2007, + final a={0.0012,-0.088,1.1262,-0.0045,0.0039,-0.000025}, + final b={1,1,1,1,1,1}); + + annotation (Documentation(revisions=" +
+This model contains a calculation procedure for the isentropic
+efficiency presented by Karlsson (2017).
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| Karlsson2007 | +ηvol = a1*Tinl*π +
+a2*π + a3 + a4*Tinl +
+a5*n + a6*n^2 |
+R407c | +No information |
+No information |
+
+F. Karlsson (2007): + +Capacity Control of Residential Heat Pump Heating Systems. In: PhD thesis +
+")); +end Poly_R407C_Unknown_Scroll; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Poly_R410a_130_Rotary.mo b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Poly_R410a_130_Rotary.mo new file mode 100644 index 0000000000..b78cae6d00 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/Poly_R410a_130_Rotary.mo @@ -0,0 +1,46 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency.SpecifiedEfficiencies; +model Poly_R410a_130_Rotary "Rotary Compressor - R410a - 130 cm³ - Polynomial" + extends PolynomialVolumetricEfficiency( + final polyMod=Types.VolumetricPolynomialModels.Koerner2017, + final a={1.108}, + final b={-0.165}); + + annotation (Documentation(revisions=" +
+This model contains a calculation procedure for the isentropic
+efficiency presented by Körner (2017).
+
| Reference | +Formula | +Refrigerants | +Validity ncompressor |
+Validity Πpressure |
+
|---|---|---|---|---|
| Koerner2017 | +ηvol =
+a1*π^b1 |
+R410a | +50 - 120 |
+1 - 10 |
+
+D. Körner (2017): Development of dynamic compression heat pump models +to evaluate promising refrigerants considering legal regulations. +Master Thesis +
+")); +end Poly_R410a_130_Rotary; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/package.mo b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/package.mo new file mode 100644 index 0000000000..f7e00666b3 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/package.mo @@ -0,0 +1,37 @@ +within AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency; +package SpecifiedEfficiencies "Package that engine efficiencies that are specifiied" + extends Modelica.Icons.VariantsPackage; + + annotation (Documentation(revisions=" ++This package contains volumetrtic efficiencies that are already specified. +This means that the calculation approaches of the volumetrtic efficiency +presented before are adapted for a specific compressor type and +a specific refrigerant. +
++In the following, a guideline of naming efficiency models is +summarised: +
++Approach of calculating efficiency _ +Valid refrigerants _ +Displacement volume _ +Type of compressor +
++Moreover, the modeles are saved in a specific order. First, generic +models are saved and then models based on the similitude theory are +saved. Last, models of specific compressors are saved. +
+")); +end SpecifiedEfficiencies; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/package.order b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/package.order new file mode 100644 index 0000000000..a51d4aedb6 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/SpecifiedEfficiencies/package.order @@ -0,0 +1,11 @@ +Buck_R134aR450aR1234yfR1234zee_VarDisVol_Reciprocating +Buck_R134aR450aR1234yfR1234zee_VarDisVol_Rotary +Buck_R134aR450aR1234yfR1234zee_VarDisVol_Scroll +ConstantEfficiency +Generic_VarRef_VarDisVol_RotaryScroll +Poly_R134a_169_Reciprocating +Poly_R134a_170_Reciprocating +Poly_R134a_54_Scroll +Poly_R22_20_Rotary +Poly_R407C_Unknown_Scroll +Poly_R410a_130_Rotary diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/package.mo b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/package.mo new file mode 100644 index 0000000000..0254184564 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/package.mo @@ -0,0 +1,128 @@ +within AixLib.Fluid.Movers.Compressors.Utilities; +package VolumetricEfficiency "Package that contains models describing different volumetric efficiencies" + extends Modelica.Icons.Library; + + + + +annotation (Icon(coordinateSystem(preserveAspectRatio=false), + graphics={ + Ellipse( + extent={{-90,-90},{90,90}}, + lineThickness=0.25, + pattern=LinePattern.None, + lineColor={215,215,215}, + fillColor={215,215,215}, + fillPattern=FillPattern.Solid), + Line( + points={{-40,60},{-30,70},{-20,60},{-20,60}}, + color={0,0,0}, + smooth=Smooth.Bezier, + thickness=0.5), + Line( + points={{-20,60},{-20,-30},{-20,38},{-16,50}, + {-6,58},{0,60},{6,58}}, + color={0,0,0}, + smooth=Smooth.Bezier, + thickness=0.5), + Line( + points={{6,58},{16,50},{20,40},{20,-70}, + {20,-70},{20,-70},{20,-70}}, + color={0,0,0}, + smooth=Smooth.Bezier, + thickness=0.5)}), +Documentation(revisions=" +
+This package contains models describing calculations procedures of
+volumetric efficiencies that are based on a literature review. However,
+in this library the volumetric efficiency is implemented in such a way
+that it fulfills
+ηvol = V̇ide /
+V̇rea.
+For more information, please checkout
+
+AixLib.Fluid.Movers.Compressors.BaseClasses.PartialCompression.
+
+Calculation procedures presented in the litarture have some variables
+in commen and these variables are presented below:
+
| Variable | +Comment | +
|---|---|
epsRef |
+Ratio of the real and the ideal displacement volume | +
VDis |
+Displacement volume | +
piPre |
+Pressure ratio | +
rotSpe |
+Rotational speed | +
staInl |
+Thermodynamic state at compressor's inlet conditions | +
staOut |
+Thermodynamic state at compressor's out conditions | +
TAmb |
+Ambient temperature | +
+Moreover, two approaches can be identified in general: A +polynomial and a power approach. The characteristics of these +approaches are presented below. +
+
+A generic polynomial approach is presented below:
+ηvol = corFact *
+sum(a[i]*P[i]^b[i] for i in 1:nT)
+Actually, eight polynomial approaches are implemented in this
+package.
+
+A generic power approach is presented below:
+ηvol = corFact * a *
+product(P[i]^b[i] for i in 1:nT)
+Actually, one power approache is implemented in this
+package.
+
+In the following, some general references are given for information about +calculating efficiencies of compressors: +
++V. A. Cara Martin and R. Radermacher (2015): + +AHRI Project 8013: A Study of Methods to Represent Compressor Performance +Data over an Operating Envelope Based on a Finite Set of Test Data. +Publisher: Air-Conditioning, Heating, and Refrigeration Institute (AHRI) +
+")); +end VolumetricEfficiency; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/package.order b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/package.order new file mode 100644 index 0000000000..fe6c3cb59a --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/VolumetricEfficiency/package.order @@ -0,0 +1,4 @@ +PartialVolumetricEfficiency +PolynomialVolumetricEfficiency +PowerVolumetricEfficiency +SpecifiedEfficiencies diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/package.mo b/AixLib/Fluid/Movers/Compressors/Utilities/package.mo new file mode 100644 index 0000000000..6f39c6bf88 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/package.mo @@ -0,0 +1,21 @@ +within AixLib.Fluid.Movers.Compressors; +package Utilities "Package that contains further functions needed to compute the compressor models" + extends Modelica.Icons.UtilitiesPackage; + + + +annotation (Documentation(revisions=" ++This package contains utility models such as for efficiency calculation, +sensor models and further functions that are used throughout the library. +
+")); +end Utilities; diff --git a/AixLib/Fluid/Movers/Compressors/Utilities/package.order b/AixLib/Fluid/Movers/Compressors/Utilities/package.order new file mode 100644 index 0000000000..d350984d1a --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Utilities/package.order @@ -0,0 +1,5 @@ +EngineEfficiency +HeatTransfer +IsentropicEfficiency +VolumetricEfficiency +Types diff --git a/AixLib/Fluid/Movers/Compressors/Validation/EfficiencyModels.mo b/AixLib/Fluid/Movers/Compressors/Validation/EfficiencyModels.mo new file mode 100644 index 0000000000..0bba3928e2 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Validation/EfficiencyModels.mo @@ -0,0 +1,140 @@ +within AixLib.Fluid.Movers.Compressors.Validation; +model EfficiencyModels + "Validation model to check efficiencies calculated with respect to different + prescribed conditions" + extends Modelica.Icons.Example; + + // Define medium and parameters + // + package Medium = + Modelica.Media.R134a.R134a_ph + "Actual medium of the compressor"; + + parameter Modelica.SIunits.MassFlowRate m_flow_nominal = 0.1 + "Nominal mass flow rate"; + + // Definition of variables + // + Modelica.SIunits.AbsolutePressure pInl= + Medium.pressure(Medium.setBubbleState(Medium.setSat_T(preInp.y[2]-1))) + "Actual pressure at inlet conditions"; + Modelica.SIunits.AbsolutePressure pOut= + Medium.pressure(Medium.setDewState(Medium.setSat_T(preInp.y[3]-1))) + "Actual set point of the compressor's outlet pressure"; + + // Definition of models + // + Modelica.Blocks.Sources.CombiTimeTable preInp( + tableOnFile=true, + tableName="Internals", + fileName=Modelica.Utilities.Files.loadResource( + "modelica://AixLib/Resources/Fluid/Movers/Compressors/efficiencyValidation.txt"), + columns=2:5, + extrapolation=Modelica.Blocks.Types.Extrapolation.NoExtrapolation, + smoothness=Modelica.Blocks.Types.Smoothness.ContinuousDerivative) + "Prescribed inputs to check efficiencies calculated by efficiency models" + annotation (Placement(transformation(extent={{-90,70},{-70,90}}))); + Modelica.Thermal.HeatTransfer.Sources.PrescribedTemperature fixTem + "Fixed ambient temperature" + annotation (Placement(transformation(extent={{-30,-50},{-10,-30}}))); + Modelica.Blocks.Sources.RealExpression pInlDum(y=pInl) + "Dummy to succeed pedantic check" + annotation (Placement(transformation(extent={{-44,4},{-36,12}}))); + Modelica.Blocks.Sources.RealExpression pOutDum(y=pOut) + "Dummy to succeed pedantic check" + annotation (Placement(transformation(extent={{66,4},{58,12}}))); + + Sources.Boundary_pT source( + redeclare package Medium = Medium, + nPorts=1, + use_T_in=true, + use_p_in=true) "Source of constant pressure and temperature" + annotation (Placement(transformation(extent={{-30,-10},{-10,10}}))); + replaceable SimpleCompressors.RotaryCompressors.RotaryCompressor rotCom( + redeclare package Medium = Medium, + show_staEff=true, + show_qua=true, + useInpFil=false, + redeclare model EngineEfficiency = + Utilities.EngineEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare model VolumetricEfficiency = + Utilities.VolumetricEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare model IsentropicEfficiency = + AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll) + "Model of a rotary compressor" + annotation (Placement(transformation(extent={{0,-10},{20,10}}))); + Sources.Boundary_pT sink( + redeclare package Medium = Medium, + use_T_in=true, + use_p_in=true, + nPorts=1) "Sink with constant pressure and temperature" + annotation (Placement(transformation(extent={{50,-10},{30,10}}))); + + +equation + // Connection of components + // + connect(source.ports[1],rotCom. port_a) + annotation (Line(points={{-10,0},{0,0}}, color={0,127,255})); + connect(fixTem.port,rotCom. heatPort) + annotation (Line(points={{-10,-40},{10,-40},{10,-10}}, color={191,0,0})); + connect(rotCom.port_b, sink.ports[1]) + annotation (Line(points={{20,0},{30,0}}, color={0,127,255})); + connect(preInp.y[1], fixTem.T) + annotation (Line(points={{-69,80},{-50,80},{-50,-40},{-32,-40}}, + color={0,0,127})); + connect(preInp.y[2], source.T_in) + annotation (Line(points={{-69,80},{-50,80},{-50,4},{-32,4}}, + color={0,0,127})); + connect(preInp.y[3], sink.T_in) + annotation (Line(points={{-69,80},{-50,80},{-50,-60},{70,-60},{70,4},{52,4}}, + color={0,0,127})); + connect(preInp.y[4],rotCom. manVarCom) + annotation (Line(points={{-69,80},{-50, 80},{-50,60},{4,60},{4,10}}, + color={0,0,127})); + connect(pOutDum.y, sink.p_in) + annotation (Line(points={{57.6,8},{52,8}}, + color={0,0,127})); + connect(pInlDum.y, source.p_in) + annotation (Line(points={{-35.6,8},{-32,8}}, + color={0,0,127})); + + annotation (experiment(StopTime=21168), Documentation(revisions=" ++This is a validation model to test various efficiency models +presented in + +AixLib.Fluid.Movers.Compressors.Utilities.EngineEfficiency, + +AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency and + +AixLib.Fluid.Movers.Compressors.Utilities.VolumetricEfficiency. +Therefore, both the compressor's inlet and outlet conditions are +prescribed in terms of pressure and temperature; additionally, +the ambient temperature as well as the rotational speed of the +compressor are prescribed. These four variables are varied in +the following range: +
++The pressures at inlet and outlet of the compressor depend on +the temperatures at inlet and outlet of the compressor. Thus, +it is possible to check if the efficiency models provide efficiencies +that are physically correct (i.e. to check if the efficiencies are +smaller than unity). +
+")); +end EfficiencyModels; diff --git a/AixLib/Fluid/Movers/Compressors/Validation/ModularInactiveCompressors.mo b/AixLib/Fluid/Movers/Compressors/Validation/ModularInactiveCompressors.mo new file mode 100644 index 0000000000..2fe6c3fc90 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Validation/ModularInactiveCompressors.mo @@ -0,0 +1,158 @@ +within AixLib.Fluid.Movers.Compressors.Validation; +model ModularInactiveCompressors + "Validation model to test modular compressors if not all compressors are active" + extends Modelica.Icons.Example; + + // Define medium and parameters + // + package Medium = + Modelica.Media.R134a.R134a_ph + "Medium of the compressor"; + + parameter Integer nCom = 3 + "Number of compressors"; + parameter Modelica.SIunits.AbsolutePressure pInl= + Medium.pressure(Medium.setBubbleState(Medium.setSat_T(TInl+1))) + "Current pressure at inlet conditions"; + parameter Modelica.SIunits.Temperature TInl = 283.15 + "Current temperature at inlet conditions"; + parameter Modelica.SIunits.AbsolutePressure pOut= + Medium.pressure(Medium.setDewState(Medium.setSat_T(TOut-5))) + "Current set point of the compressor's outlet pressure"; + parameter Modelica.SIunits.Temperature TOut = 333.15 + "Current temperature at outlet conditions"; + + // Definition of models + // + Sources.Boundary_pT source( + redeclare package Medium = Medium, + p=pInl, + T=TOut, + nPorts=1) "Source with constant pressure and temperature" + annotation (Placement(transformation(extent={{-10,-10},{10,10}}, + rotation=-90, + origin={40,70}))); + Modelica.Thermal.HeatTransfer.Sources.FixedTemperature fixTem[nCom]( + each T=283.15) + "Fixed ambient temperature" + annotation (Placement(transformation(extent={{90,-10},{70,10}}))); + replaceable ModularCompressors.ModularCompressors modCom( + nCom=nCom, + redeclare package Medium = Medium, + redeclare model EngineEfficiency = + Utilities.EngineEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare model VolumetricEfficiency = + Utilities.VolumetricEfficiency.SpecifiedEfficiencies.Buck_R134aR450aR1234yfR1234zee_VarDisVol_Rotary, + redeclare model IsentropicEfficiency = + AixLib.Fluid.Movers.Compressors.Utilities.IsentropicEfficiency.SpecifiedEfficiencies.Buck_R134aR450aR1234yfR1234zee_VarDisVol_Rotary, + useExt=true, + show_parCom=false, + show_parCon=false, + redeclare model SimpleCompressor = + SimpleCompressors.RotaryCompressors.RotaryCompressor, + redeclare model ModularController = + Controls.HeatPump.ModularHeatPumps.ModularCompressorController) + "Model of modular compressors in parallel" + annotation (Placement(transformation(extent={{-18,-18},{18,18}}, + rotation=-90, + origin={40,0}))); + Modelica.Blocks.Sources.Sine valOpe( + offset=0.5, + amplitude=0.3, + freqHz=1) + "Prescribed valve's opening" + annotation (Placement(transformation(extent={{-88,-80},{-68,-60}}))); + Actuators.Valves.SimpleValve simVal( + redeclare package Medium = Medium, + m_flow_start=0.025, + m_flow_small=1e-6, + Kvs=1.4) "Model of a simple valve to simulate pressure losses" + annotation (Placement(transformation(extent={{-10,10},{10,-10}}, + rotation=-90, + origin={40,-40}))); + Sources.Boundary_pT sink( + redeclare package Medium = Medium, + nPorts=1, + p=pInl, + T=TInl) "Sink with constant pressure and temperature" + annotation (Placement(transformation(extent={{10,-10},{-10,10}}, + rotation=-90, + origin={40,-72}))); + + Controls.Interfaces.ModularHeatPumpControlBus dataBus( + nCom=nCom) "Connector that contains all control signals" + annotation (Placement(transformation(extent={{-20,-20},{20,20}}, + rotation=-90, + origin={0,0}))); + + Modelica.Blocks.Sources.Sine rotSpe[nCom]( + each freqHz=1, + amplitude={50,20,0}, + offset={50,20,0}) + "Input signal to prediscribe compressors' rotational speeds" + annotation (Placement(transformation(extent={{-88,20},{-68,40}}))); + Modelica.Blocks.Routing.Replicator repMea(nout=nCom) + "Replicating the current value of the controlled variables" + annotation (Placement(transformation(extent={{-50,-40},{-30,-20}}))); + Modelica.Blocks.Sources.Ramp ramMea( + duration=1, + height=60, + offset=40) + "Ramp to fake current value sof the controlled variables" + annotation (Placement(transformation(extent={{-88,-40},{-68,-20}}))); + + +equation + // Connection of main components + // + connect(source.ports[1], modCom.port_a) + annotation (Line(points={{40,60},{40,40},{40,18}}, color={0,127,255})); + connect(fixTem.port, modCom.heatPort) + annotation (Line(points={{70,0},{64,0},{58,0}}, color={191,0,0})); + connect(modCom.port_b, simVal.port_a) + annotation (Line(points={{40,-18},{40,-18},{40,-30}}, color={0,127,255})); + connect(simVal.port_b, sink.ports[1]) + annotation (Line(points={{40,-50},{40,-62}},color={0,127,255})); + + // Connection of control signals + // + connect(valOpe.y, simVal.opening) + annotation (Line(points={{-67,-70},{0,-70},{0,-40},{32,-40}}, + color={0,0,127})); + + connect(dataBus, modCom.dataBus) + annotation (Line(points={{0,0},{11,0},{22,0}},color={255,204,51}, + thickness=0.5)); + connect(ramMea.y, repMea.u) + annotation (Line(points={{-67,-30},{-60,-30},{-52,-30}}, color={0,0,127})); + connect(rotSpe.y, dataBus.comBus.extManVarCom) + annotation (Line(points={{-67,30},{-60,30},{-60,-0.1},{0.1,-0.1}}, + color={0,0,127})); + connect(rotSpe.y, dataBus.comBus.intSetPoiCom) + annotation (Line(points={{-67,30},{-60,30},{-60,-0.1},{0.1,-0.1}}, + color={0,0,127})); + connect(repMea.y, dataBus.comBus.meaConVarCom) + annotation (Line(points={{-29,-30},{-24,-30},{-20,-30},{-20,-0.1}, + {0.1,-0.1}}, color={0,0,127})); + + annotation (Documentation(revisions=" ++This is a validation model to test three compressors in parallel +if at least one compressor is shut-down. +
+"), +experiment(StopTime=1), +Diagram(graphics={Text(extent={{-88,86},{-12,74}}, + lineColor={28,108,200}, + textString="Provide dummy signals"), + Rectangle(extent={{-90,90},{-10,70}}, + lineColor={28,108,200})})); +end ModularInactiveCompressors; diff --git a/AixLib/Fluid/Movers/Compressors/Validation/SimpleHeatTransfer.mo b/AixLib/Fluid/Movers/Compressors/Validation/SimpleHeatTransfer.mo new file mode 100644 index 0000000000..c3a6b7bc99 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Validation/SimpleHeatTransfer.mo @@ -0,0 +1,77 @@ +within AixLib.Fluid.Movers.Compressors.Validation; +model SimpleHeatTransfer + "Validation model to check the implementation of the simple heat transfer" + extends Modelica.Icons.Example; + + // Define medium and parameters + // + package Medium = + Modelica.Media.R134a.R134a_ph + "Medium of the compressor"; + + parameter Modelica.SIunits.AbsolutePressure pInl= + Medium.pressure(Medium.setBubbleState(Medium.setSat_T(TInl+2))) + "Current pressure at inlet conditions"; + parameter Modelica.SIunits.Temperature TInl = 283.15 + "Current temperature at inlet conditions"; + parameter Modelica.SIunits.AbsolutePressure pOut= + Medium.pressure(Medium.setDewState(Medium.setSat_T(TOut-5))) + "Current set point of the compressor's outlet pressure"; + parameter Modelica.SIunits.Temperature TOut = 333.15 + "Current temperature at outlet conditions"; + + // Definition of submodels and connectors + // + Sources.MassFlowSource_T source( + redeclare package Medium = Medium, + nPorts=1, + m_flow=0.1, + T=TInl) "Source of constant temperature and mass flow rate" + annotation (Placement(transformation(extent={{-80,-10},{-60,10}}))); + Modelica.Thermal.HeatTransfer.Sources.FixedTemperature fixTem(T=263.15) + "Fixed ambient temperature" + annotation (Placement(transformation(extent={{-80,-40},{-60,-20}}))); + Utilities.HeatTransfer.SimpleHeatTransfer simheaTra( + redeclare package Medium = Medium) + "Model of simple one-dimensional heat transfer" + annotation (Placement(transformation(extent={{-10,-10},{10,10}}))); + MixingVolumes.MixingVolume sink( + redeclare package Medium = Medium, + nPorts=1, + V=10e-3, + m_flow_nominal=0.1, + energyDynamics=Modelica.Fluid.Types.Dynamics.DynamicFreeInitial, + massDynamics=Modelica.Fluid.Types.Dynamics.DynamicFreeInitial, + p_start=pInl, + T_start=TInl) "Sink that allows storage of mass and energy" + annotation (Placement(transformation(extent={{-10,-10},{10,10}}, + rotation=-90, + origin={70,0}))); + + +equation + // Connection of main components + // + connect(fixTem.port, simheaTra.heatPort) + annotation (Line(points={{-60,-30},{0,-30},{0,-10}}, color={191,0,0})); + connect(source.ports[1], simheaTra.port_a) + annotation (Line(points={{-60,0},{-10,0}}, color={0,127,255})); + connect(simheaTra.port_b, sink.ports[1]) + annotation (Line(points={{10,0},{34,0},{34,1.77636e-015}, + {60,1.77636e-015}}, color={0,127,255})); + + annotation (Documentation(revisions=" ++This is a simple validation model to test the one-directional +heat transfer. Therefore, an ambient temeprature is prediscribed +and an expansion vassel is located at the model's outlet. +")); +end SimpleHeatTransfer; diff --git a/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/BaseModelStaticBoundaries.mo b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/BaseModelStaticBoundaries.mo new file mode 100644 index 0000000000..0806693765 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/BaseModelStaticBoundaries.mo @@ -0,0 +1,277 @@ +within AixLib.Fluid.Movers.Compressors.Validation.StaticHeatPumpBoundaries; +model BaseModelStaticBoundaries + "Base model to test compressors using static boundaries" + + // Definition of medium + // + replaceable package Medium = + Modelica.Media.R134a.R134a_ph + constrainedby Modelica.Media.Interfaces.PartialTwoPhaseMedium + "Medium of the compressor" + annotation(Dialog(tab="General",group="General"), + choicesAllMatching=true); + + // Definition of parameters describing compressors + // + parameter Integer nCom = 1 + "Numer of compressors in parallel" + annotation(Dialog(tab="General",group="Compressors")); + + // Definition of variables describing boundary conditions + // + Modelica.Blocks.Sources.CombiTimeTable inpDat( + table=[0,50,8.1,37.5,15.6,70.8,2.18,0.096; 1,50,8,37.8,19.3,81.8,2.684,0.093; + 2,50,8.3,38.5,25.3,96.6,3.516,0.094; 3,50,12.4,55.3,18.4,77.8,2.391,0.15; + 4,50,12.2,54.1,35.6,114.8,5.011,0.137; 5,50,11.5,50.9,24.2,90,3.227,0.136; + 6,50,12,51.9,30.4,102.4,4.137,0.142; 7,50,5.1,26,10,58.8,1.449,0.06; 8,50, + 5.4,24.3,13,66.3,1.848,0.063; 9,50,5.4,26.4,16,78.6,2.26,0.061; 10,50,5.4, + 25.2,20.8,94.6,2.982,0.06; 11,50,5.3,21.6,29.8,124.5,4.406,0.055; 12,50, + 8.5,40.5,32.5,114.2,4.514,0.093; 13,50,11.9,54.4,39.1,121.7,5.424,0.135; + 14,50,15.3,64.3,24.5,90.2,2.979,0.188; 15,50,15.6,61.7,32.1,102.2,4.074, + 0.191; 16,50,15.7,62.8,38.3,114,5.02,0.188; 17,50,20.4,77,35.8,110.1,4.351, + 0.251; 18,35,12.4,52.3,40.3,123.6,4.33,0.093; 19,35,12.2,53.4,36.1,116.1, + 3.708,0.093; 20,35,12.4,52.9,29.8,101.4,2.91,0.099; 21,35,12.2,52.6,24,88.4, + 2.206,0.1; 22,35,11.8,52.6,18.6,76.2,1.6,0.099; 23,35,8.4,40.8,32.5,120.4, + 3.431,0.059; 24,35,5.6,23.1,28.2,120.3,3.019,0.039; 25,40,7.8,36,16.1,71.7, + 1.745,0.073; 26,40,8,38.7,20.5,84.9,2.212,0.073; 27,40,8.3,38.5,25.4,96.9, + 2.808,0.074; 28,40,8.3,38.7,32.5,116.3,3.764,0.07; 29,40,5,20.1,24.7,108.4, + 2.843,0.043; 30,40,13.4,58.7,19.5,79.3,1.833,0.129; 31,50,4.8,18.9,25.1, + 110.8,3.551,0.051; 32,50,8,39.3,32,115.2,4.412,0.087; 33,50,12.8,56.7,20.1, + 81.8,2.603,0.154; 34,50,12.9,54.3,25,90.2,3.28,0.154; 35,50,12.9,55.4,31.8, + 105,4.276,0.151; 36,50,11.9,52.9,36.1,115.4,4.989,0.134; 37,65,13.2,56.1, + 31.2,103.4,5.242,0.199; 38,65,12.5,53.2,35.5,112.1,6.166,0.185; 39,65,11.6, + 51.7,24.1,89.9,4.01,0.178; 40,65,12,56.4,19.1,81.6,3.139,0.184; 41,65,8.1, + 38.7,32.4,114.6,5.716,0.116; 42,65,6,26.5,29.6,116.6,5.248,0.082; 43,75, + 12,55.1,18.5,80.1,3.731,0.211; 44,75,12,52.4,24.8,91.6,4.982,0.21; 45,75, + 11.7,50.4,30.5,103.6,6.248,0.199; 46,75,8.4,38.8,24.1,94.2,5.035,0.142; + 47,75,5.4,26.3,21.5,100.2,4.692,0.087], + columns=2:8, + smoothness=Modelica.Blocks.Types.Smoothness.ConstantSegments) + "Static boundaries of compressor model" + annotation (Placement(transformation(extent={{-90,20},{-70,40}}))); + + Modelica.Blocks.Sources.RealExpression inpRotSpe(y=inpDat.y[1]) + "Expressions describing rotational speed" + annotation (Placement(transformation(extent={{-90,-60},{-70,-40}}))); + Modelica.Blocks.Sources.RealExpression inpPreSin(y=inpDat.y[4]*1e5) + "Expressions describing pressure at compressors' outlets" + annotation (Placement(transformation(extent={{-90,-20},{-70,0}}))); + Modelica.Blocks.Sources.RealExpression inpTemSin(y=inpDat.y[5] + 273.15) + "Expressions describing temperature at compressors' outlets" + annotation (Placement(transformation(extent={{-90,-34},{-70,-14}}))); + Modelica.Blocks.Sources.RealExpression inpPreSou(y=inpDat.y[2]*1e5) + "Expressions describing pressure at compressors' inlets" + annotation (Placement(transformation(extent={{-90,-86},{-70,-66}}))); + Modelica.Blocks.Sources.RealExpression inpTemSou(y=inpDat.y[3] + 273.15) + "Expressions describing temperature at compressors' inlets" + annotation (Placement(transformation(extent={{-90,-100},{-70,-80}}))); + + // Definition of further components + // + Modelica.Blocks.Interaction.Show.RealValue dfPowEle( + use_numberPort=false, + number=inpDat.y[6]*1000 - modCom.modCom[1].comPro.PEle) + "Difference between power consumptions that are measured and calculated" + annotation (Placement(transformation(extent={{20,26},{40,46}}))); + Modelica.Blocks.Interaction.Show.RealValue dMasFlo( + use_numberPort=false, + number=inpDat.y[7] - modCom.modCom[1].comPro.m_flow) + "Difference between mass flow rates that are measured and calculated" + annotation (Placement(transformation(extent={{20,12},{40,32}}))); + Modelica.Blocks.Interaction.Show.RealValue dPowEleRel( + use_numberPort=false, + number=dfPowEle.number/(inpDat.y[6]*1000)*100) + "Relative difference between power consumptions that are measured and calculated" + annotation (Placement(transformation(extent={{60,26},{80,46}}))); + Modelica.Blocks.Interaction.Show.RealValue dMasFloRel( + use_numberPort=false, + number=dMasFlo.number/inpDat.y[7]*100) + "Relative difference between mass flow rates that are measured and calculated" + annotation (Placement(transformation(extent={{60,12},{80,32}}))); + + // Definition of subcomponents + // + Modelica.Thermal.HeatTransfer.Sources.FixedTemperature ambTemp(T=278.15) + "Source that prescribes boundary ambient temperature (Dummy)" + annotation (Placement(transformation(extent={{80,-60},{60,-40}}))); + Modelica.Thermal.HeatTransfer.Components.ThermalCollector thrCol(m=nCom) + "Model to split the ambient temperature" + annotation (Placement(transformation(extent={{-10,-10},{10,10}}, + rotation=90,origin={38,-50}))); + + Modelica.Blocks.Routing.Replicator repMea(nout=nCom) + "Replicating the current value of the manipulated variables" + annotation (Placement(transformation(extent={{-60,-60},{-40,-40}}))); + Sources.Boundary_pT sou( + redeclare package Medium = Medium, + use_p_in=true, + use_T_in=true, + nPorts=1) "Source with prescribed pressure and temperature" + annotation (Placement(transformation(extent={{-40,-90},{-20,-70}}))); + ModularCompressors.ModularCompressorsSensors modCom( + nCom=nCom, + redeclare package Medium = Medium, + redeclare model SimpleCompressor = + SimpleCompressors.RotaryCompressors.RotaryCompressor, + show_staEff=true, + show_qua=true, + m_flow_start=0.05, + h_out_start=400e3, + VDis=fill(5.24444e-5,nCom), + useInpFil=fill(false, nCom)) + "Model that describes modular compressors in parallel" + annotation (Placement(transformation( extent={{-20,20},{20,-20}}, + rotation=90,origin={0,-50}))); + + Sources.Boundary_pT sin( + redeclare package Medium = Medium, + use_p_in=true, + use_T_in=true, + nPorts=1) + "Sink with prescribed pressure and temperature" + annotation (Placement(transformation(extent={{-40,-30},{-20,-10}}))); + + Controls.Interfaces.ModularHeatPumpControlBus dataBus( + nCom=nCom) "Connector that contains all control signals" + annotation (Placement(transformation( + extent={{-10,-10},{10,10}}, + rotation=-90, + origin={-30,-50}),iconTransformation( + extent={{-10,-10},{10,10}}, + rotation=-90, + origin={-98,0}))); + + // Definition of further variables + // + Real inpPEle = inpDat.y[6]*1000 + "Power consumption of the compressor"; + Real inpTime = time + "Simulation time"; + +equation + // Connection of main components + // + connect(ambTemp.port, thrCol.port_b) + annotation (Line(points={{60,-50},{48,-50}}, + color={191,0,0})); + connect(thrCol.port_a, modCom.heatPort) + annotation (Line(points={{28,-50},{28,-50},{20,-50}}, + color={191,0,0})); + connect(sou.ports[1], modCom.port_a) + annotation (Line(points={{-20,-80},{0,-80},{0,-70}}, color={0,127,255})); + connect(modCom.port_b, sin.ports[1]) + annotation (Line(points={{0,-30},{0,-30},{0,-20},{-20,-20}},color={0,127,255})); + + // Connection of signals + // + connect(modCom.dataBus, dataBus) + annotation (Line(points={{-20,-50},{-20,-50},{-30,-50}}, + color={255,204,51}, + thickness=0.5)); + connect(inpRotSpe.y, repMea.u) + annotation (Line(points={{-69,-50},{-62,-50}}, + color={0,0,127})); + connect(repMea.y, dataBus.comBus.extManVarCom) + annotation (Line(points={{-39,-50},{-29.95,-50},{-29.95,-50.05}}, + color={0,0,127})); + connect(inpPreSou.y, sou.p_in) + annotation (Line(points={{-69,-76},{-64,-76},{-60, + -76},{-60,-72},{-42,-72}}, color={0,0,127})); + connect(inpTemSou.y, sou.T_in) + annotation (Line(points={{-69,-90},{-64,-90},{-56, + -90},{-56,-76},{-42,-76}}, color={0,0,127})); + connect(inpPreSin.y, sin.p_in) + annotation (Line(points={{-69,-10},{-60,-10},{-60, + -12},{-42,-12}}, color={0,0,127})); + connect(inpTemSin.y, sin.T_in) + annotation (Line(points={{-69,-24},{-62,-24},{-56, + -24},{-56,-16},{-42,-16}}, color={0,0,127})); + + annotation (Icon(coordinateSystem(preserveAspectRatio=false), graphics={ + Ellipse( + extent={{-80,80},{80,-80}}, + lineColor={215,215,215}, + fillColor={215,215,215}, + fillPattern=FillPattern.Solid), + Ellipse( + extent={{-55,55},{55,-55}}, + lineColor={255,255,255}, + fillColor={255,255,255}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-60,14},{60,-14}}, + lineColor={215,215,215}, + fillColor={215,215,215}, + fillPattern=FillPattern.Solid, + rotation=45)}), Diagram(coordinateSystem(preserveAspectRatio=false), + graphics={ Text( + extent={{0,80},{100,60}}, + lineColor={0,0,0}, + textString="Difference | Relative Difference +-------------------------------------- +Power Consumption +Mass Flow Rate", + textStyle={TextStyle.Bold}), + Rectangle( + extent={{0,100},{100,0}}, + lineColor={0,0,0}, + lineThickness=0.5), + Rectangle( + extent={{-100,100},{0,0}}, + lineColor={0,0,0}, + lineThickness=0.5)}), + Documentation(revisions=" +
+This model prescribes static inlet and outlet conditions of the +compressor. Furhtermore, it prescribes the rotational speed. +The model is used to validate the compressor model in general +as well as to identify efficiencies that describes the compressor's +behaiviour in a suitable way. Therefore, both calculated mass +flow rate and calculated power consumption are compared with +the corresponding experimental data. +
++The User needs to define the following information in order to +complete the model: +
++To add static boundary conditions, a combi time table is included +within the model. The columns are defined as follows: +
+Hz.bar.°C.bar.°C.kW.kg/s.+C. Cuevas und J. Lebrun. (2009): + +Testing and modelling of a variable speed scroll compressor.. +In: Applied Thermal Engineering, 29(2):469–478 +
+"), + experiment(StopTime=47.9999)); +end BaseModelStaticBoundaries; diff --git a/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/BaseModelStaticHeatPump.mo b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/BaseModelStaticHeatPump.mo new file mode 100644 index 0000000000..199aa431f8 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/BaseModelStaticHeatPump.mo @@ -0,0 +1,624 @@ +within AixLib.Fluid.Movers.Compressors.Validation.StaticHeatPumpBoundaries; +model BaseModelStaticHeatPump + "Base model to test compressors using static heat pump boundaries" + + // Definition of medium + // + replaceable package Medium = + Modelica.Media.R134a.R134a_ph + constrainedby Modelica.Media.Interfaces.PartialTwoPhaseMedium + "Medium of the compressor" + annotation(Dialog(tab="General",group="General"), + choicesAllMatching=true, + Documentation(revisions=" +")); + + // Definition of parameters describing compressors + // + parameter Integer nCom = 1 + "Numer of compressors in parallel" + annotation(Dialog(tab="General",group="Compressors")); + + // Definition of parameters describing boundary conditions + // + parameter Modelica.SIunits.TemperatureDifference dTPinEva = 5 + "Pinch temperature at evaporator's outlet" + annotation (Dialog(tab="General", group="Evaporator")); + parameter Modelica.SIunits.TemperatureDifference dTSupHea = 1 + "Superheating of working fluid" + annotation (Dialog(tab="General", group="Evaporator")); + + parameter Modelica.SIunits.TemperatureDifference dTPinCon = 2.5 + "Pinch temperature at evaporator's outlet" + annotation (Dialog(tab="General", group="Condenser")); + parameter Modelica.SIunits.TemperatureDifference dTSubCool = 8 + "Supercooling of working fluid" + annotation (Dialog(tab="General", group="Condenser")); + + parameter Modelica.SIunits.Density dSec=1000 + "Constant density of secondary fluid" + annotation (Dialog(tab="General", group="Condenser")); + parameter Modelica.SIunits.SpecificHeatCapacity cpSec=4.1813e3 + "Constant specific heat capacity of secondary fluid" + annotation (Dialog(tab="General", group="Condenser")); + parameter Modelica.SIunits.VolumeFlowRate + V_flowSec=(0.776 + 0.781 + 0.44)/3/3600 + "Constant volume flow of secondary fluid" + annotation (Dialog(tab="General", group="Condenser")); + + // Definition of variables describing boundary conditions + // + Modelica.Blocks.Sources.CombiTimeTable inpDat( + extrapolation=Modelica.Blocks.Types.Extrapolation.NoExtrapolation, + columns=2:7, + timeScale=1, + smoothness=Modelica.Blocks.Types.Smoothness.ConstantSegments, + table=[0,64,285.15,5180,308.15,900,5.755555556; 1,64,283.15,4920,308.15,910, + 5.406593407; 2,63,280.15,4370,308.15,930,4.698924731; 3,64,285.15,4980,318.15, + 1140,4.368421053; 4,64,283.15,4730,318.15,1140,4.149122807; 5,55,285.15, + 4180,328.15,1240,3.370967742; 6,64,283.15,4650,328.15,1380,3.369565217; + 7,63,280.15,4160,318.15,1610,2.583850932; 8,55,275.15,2800,308.15,790,3.544303797; + 9,106,258.15,3760,308.15,1570,2.394904459; 10,115,266.15,4850,308.15,1940, + 2.5; 11,55,275.15,2640,318.15,960,2.75; 12,111,258.15,4150,318.15,2120,1.95754717; + 13,107,270.15,4780,318.15,2210,2.162895928; 14,113,266.15,4560,318.15,2290, + 1.991266376; 15,100,266.15,3880,328.15,2240,1.732142857; 16,63,275.15,3280, + 328.15,1330,2.466165414; 17,63,280.15,4080,328.15,1400,2.914285714]) + "Static boundaries of compressor model" + annotation (Placement(transformation(extent={{-90,-92},{-70,-72}}))); + + Modelica.Blocks.Sources.RealExpression inpRotSpe(y=inpDat.y[1]) + "Expressions describing rotational speed" + annotation (Placement(transformation(extent={{-90,-24},{-70,-4}}))); + Modelica.Blocks.Sources.RealExpression inpAmbTemp(y=inpDat.y[2]) + "Expressions describing ambient temperature" + annotation (Placement(transformation(extent={{-90,-38},{-70,-18}}))); + Modelica.Blocks.Sources.RealExpression inpHeaCap(y=inpDat.y[3]) + "Expressions describing heat capacity" + annotation (Placement(transformation(extent={{-90,-52},{-70,-32}}))); + Modelica.Blocks.Sources.RealExpression inpTRetFlo(y=inpDat.y[4] - 10) + "Expressions describing return flow temperature at heat capacity" + annotation (Placement(transformation(extent={{-90,-66},{-70,-46}}))); + + // Definition of subcomponents + // + Modelica.Thermal.HeatTransfer.Sources.PrescribedTemperature ambTemp + "Source that prescribes boundary ambient temperature" + annotation (Placement(transformation(extent={{80,20},{60,40}}))); + Modelica.Thermal.HeatTransfer.Components.ThermalCollector thrCol(m=nCom) + "Model to split the ambient temperature" + annotation (Placement(transformation(extent={{-10,-10},{10,10}}, + rotation=90,origin={38,30}))); + StaticEvaporator eva( + redeclare final package Medium = Medium, + final dTPin=dTPinEva, + final dTSupHea=dTSupHea) + "Model that describes a simple static evaporator" + annotation (Placement(transformation(extent={{-30,-20},{-10,0}}))); + + Modelica.Blocks.Routing.Replicator repMea(nout=nCom) + "Replicating the current value of the manipulated variables" + annotation (Placement(transformation(extent={{-60,20},{-40,40}}))); + ModularCompressors.ModularCompressorsSensors modCom( + nCom=nCom, + redeclare package Medium = Medium, + redeclare model SimpleCompressor = + SimpleCompressors.RotaryCompressors.RotaryCompressor, + show_staEff=true, + show_qua=true, + m_flow_start=0.05, + VDis=fill(13.2e-6,nCom), + useInpFil=fill(false,nCom), + h_out_start=400e3, + redeclare replaceable model EngineEfficiency = + Utilities.EngineEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare replaceable model VolumetricEfficiency = + Utilities.VolumetricEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare replaceable model IsentropicEfficiency = + Utilities.IsentropicEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll) + "Model that describes modular compressors in parallel" + annotation (Placement(transformation( extent={{-20,20},{20,-20}}, + rotation=90,origin={0,30}))); + + StaticCondenser con( + redeclare package Medium = Medium, + dSec=dSec, + cpSec=cpSec, + V_flowSec=V_flowSec, + dTSubCool=dTSubCool, + dTPin=dTPinCon) + "Model that describes a simple static condenser" + annotation (Placement(transformation(extent={{-30,60},{-10,80}}))); + + Controls.Interfaces.ModularHeatPumpControlBus dataBus( + nCom=nCom) "Connector that contains all control signals" + annotation (Placement(transformation( + extent={{-10,-10},{10,10}}, + rotation=-90, + origin={-30,30}), iconTransformation( + extent={{-10,-10},{10,10}}, + rotation=-90, + origin={-98,0}))); + + // Definition of further variables + // + Modelica.Blocks.Interaction.Show.RealValue COP( + use_numberPort=false, number=con.Q_flow/modCom.modCom[1].comPro.PEle/nCom) + "Real value describing current COP" + annotation (Placement(transformation(extent={{20,66},{40,86}}))); + Modelica.Blocks.Interaction.Show.RealValue dCOPRel(use_numberPort=false, + number=(COP.number - inpDat.y[6])/inpDat.y[6]*100) + "Realative difference of current COP" + annotation (Placement(transformation(extent={{60,66},{80,86}}))); + Modelica.Blocks.Interaction.Show.RealValue PEle( + use_numberPort=false, number=modCom.modCom[1].comPro.PEle) + "Real value describing current power consumption" + annotation (Placement(transformation(extent={{20,50},{40,70}}))); + Modelica.Blocks.Interaction.Show.RealValue dPEleRel(use_numberPort=false, + number=(PEle.number - inpDat.y[5])/inpDat.y[5]*100) + "Real difference of current power consumption" + annotation (Placement(transformation(extent={{60,50},{80,70}}))); + Real inpTime = time + "Simulation time"; + +protected + model StaticEvaporator + "Static evaporator assuming constant pinch point at evaporator's outlet" + + // Definition of medium + // + replaceable package Medium = Modelica.Media.R134a.R134a_ph + constrainedby Modelica.Media.Interfaces.PartialTwoPhaseMedium + "Medium of the compressor" + annotation(Dialog(tab="General",group="General"), + choicesAllMatching=true); + + // Definition of parameters describing evaporator + // + parameter Modelica.SIunits.TemperatureDifference dTPin = 5 + "Pinch temperature at evaporator's outlet" + annotation(Dialog(tab="General",group="Evaporator")); + parameter Modelica.SIunits.TemperatureDifference dTSupHea = 1 + "Superheating of working fluid" + annotation(Dialog(tab="General",group="Evaporator")); + + // Definition of parameters describing assumptions + // + parameter Boolean allowFlowReversal = false + "= false to simplify equations, assuming, but not enforcing, no flow reversal" + annotation(Dialog(tab="Assumptions",group="General"), Evaluate=true); + + // Definition of connecotrs + // + Modelica.Fluid.Interfaces.FluidPort_b port_b( + redeclare final package Medium = Medium, + m_flow(max=if allowFlowReversal then +Modelica.Constants.inf else 0), + h_outflow(start = Medium.h_default)) + "Fluid connector b (positive design flow direction is from port_a to port_b)" + annotation (Placement(transformation(extent={{110,-10},{90,10}}))); + Modelica.Blocks.Interfaces.RealInput inpTAmb + "Input of ambient temperature" + annotation (Placement(transformation( + extent={{-20,-20},{20,20}}, + rotation=90, + origin={0,-100}), iconTransformation( + extent={{-20,-20},{20,20}}, + rotation=90, + origin={0,-100}))); + + // Definition of submodels + // + Modelica.Blocks.Sources.RealExpression outPEva(y=pSat) + "Expressions describing saturation pressure at evaporator's outlet" + annotation (Placement(transformation(extent={{10,-4},{30,16}}))); + Modelica.Blocks.Sources.RealExpression outTEva(y=TOut) + "Expressions describing temperature at evaporator's outlet" + annotation (Placement(transformation(extent={{10,-18},{30,2}}))); + + Sources.Boundary_pT source( + redeclare package Medium = Medium, + use_p_in=true, + use_T_in=true, + nPorts=1) + "Source with constant pressure and temperature" + annotation (Placement(transformation(extent={{-10,-10},{10,10}}, + rotation=0, + origin={60,0}))); + + // Definition of variables describing evaporator + // + Medium.SaturationProperties satEva + "Saturation properties of the evaporator's working fluid" + annotation (Placement(transformation(extent={{-50,-8},{-30,12}}))); + Medium.ThermodynamicState staOut + "Thermodynamic state of the working fluid at evaporator's outlet" + annotation (Placement(transformation(extent={{-20,-8},{0,12}}))); + + Modelica.SIunits.AbsolutePressure pSat + "Absolute pressure at evaporator's outlet"; + Modelica.SIunits.Temperature TSat + "Saturation temperature"; + Modelica.SIunits.Temperature TOut + "Temperature at evaporator's outlet"; + + Modelica.SIunits.Temperature TAmb + "Temperature of ambient"; + + equation + // Connection of ports + // + connect(outPEva.y, source.p_in) + annotation (Line(points={{31,6},{36,6},{36,8},{48,8}}, color={0,0,127})); + connect(outTEva.y, source.T_in) + annotation (Line(points={{31,-8},{34,-8},{38,-8},{38,4},{48,4}},color={0,0,127})); + connect(source.ports[1], port_b) + annotation (Line(points={{70,0},{86,0},{100,0}}, color={0,127,255})); + + TAmb = inpTAmb + "Temperature of ambient"; + + // Calculation of state properties of working fluid + // + satEva = Medium.setSat_T(T=TSat) + "Saturation properties"; + staOut = Medium.setState_pT(p=pSat,T=TOut) + "Thermodynamic state of the working fluid at evaporator's outlet"; + + pSat = Medium.saturationPressure(satEva.Tsat) + "Absolute pressure at evaporator's outlet"; + TSat = TOut - dTSupHea + "Saturation temperature"; + TOut = TAmb - dTPin + "Temperature at evaporator's outlet"; + + annotation (Icon(graphics={ + Rectangle( + extent={{-100,70},{100,100}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag), + Rectangle( + extent={{-100,70},{100,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-100,-100},{100,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag), + Polygon( + points={{-100,70},{-100,-70},{-22,-70},{40,-70},{12,-68},{-22,-34},{-30, + 10},{-18,50},{18,66},{50,70},{-100,70}}, + lineColor={28,108,200}, + smooth=Smooth.Bezier, + fillColor={0,0,255}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-100,70},{-30,-70}}, + lineColor={0,0,255}, + fillColor={0,0,255}, + fillPattern=FillPattern.Solid), + Line( + points={{-38,70},{-56,52},{-32,28},{-50,4},{-26,-26},{-48,-52},{-40,-70}}, + color={0,0,0}, + thickness=0.5, + smooth=Smooth.Bezier), + Line( + points={{38,70},{20,52},{44,28},{26,4},{50,-26},{28,-52},{36,-70}}, + color={0,0,0}, + thickness=0.5, + smooth=Smooth.Bezier), + Text( + extent={{-32,-26},{36,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag, + textString="TP"), + Text( + extent={{-100,-26},{-40,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag, + textString="SC"), + Text( + extent={{44,-26},{100,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag, + textString="SH")})); + end StaticEvaporator; + + model StaticCondenser + "Static condenser assuming constant pinch point at condenser's outlet" + + // Definition of medium + // + replaceable package Medium = Modelica.Media.R134a.R134a_ph + constrainedby Modelica.Media.Interfaces.PartialTwoPhaseMedium + "Medium of the compressor" + annotation(Dialog(tab="General",group="General"), + choicesAllMatching=true); + + // Definition of parameters describing condenser + // + parameter Modelica.SIunits.TemperatureDifference dTPin = 2.5 + "Supercooling of working fluid" + annotation(Dialog(tab="General",group="Condenser")); + parameter Modelica.SIunits.TemperatureDifference dTSubCool = 8 + "Supercooling of working fluid" + annotation(Dialog(tab="General",group="Condenser")); + + parameter Modelica.SIunits.Density dSec = 1000 + "Constant density of secondary fluid" + annotation(Dialog(tab="General",group="Condenser")); + parameter Modelica.SIunits.SpecificHeatCapacity cpSec = 4.1813e3 + "Constant specific heat capacity of secondary fluid" + annotation(Dialog(tab="General",group="Condenser")); + parameter Modelica.SIunits.VolumeFlowRate V_flowSec = (0.776+0.781+0.44)/3/3600 + "Constant volume flow of secondary fluid" + annotation(Dialog(tab="General",group="Condenser")); + + // Definition of parameters describing assumptions + // + parameter Boolean allowFlowReversal = false + "= false to simplify equations, assuming, but not enforcing, no flow reversal" + annotation(Dialog(tab="Assumptions",group="General"), Evaluate=true); + + // Definition of connecotrs + // + Modelica.Fluid.Interfaces.FluidPort_a port_a( + redeclare final package Medium = Medium, + m_flow(max=if allowFlowReversal then +Modelica.Constants.inf else 0), + h_outflow(start = Medium.h_default)) + "Fluid connector b (positive design flow direction is from port_a to port_b)" + annotation (Placement(transformation(extent={{110,-10},{90,10}}))); + + Modelica.Blocks.Interfaces.RealInput inpTRetFlo + "Temperature return flow at heat capacity" + annotation (Placement( + transformation( + extent={{-10,-10},{10,10}}, + rotation=-90, + origin={-20,100}))); + + // Definition of variables describing condenser + // + Modelica.SIunits.AbsolutePressure pSat + "Absolute pressure at condenser's outlet"; + Modelica.SIunits.Temperature TSat + "Saturation temperature"; + + Modelica.SIunits.Temperature TInl + "Temperature at condenser's inlet"; + Modelica.SIunits.Temperature TOut + "Temperature at condenser's outlet"; + Modelica.SIunits.SpecificEnthalpy hInl + "Specific enthalpy at condenser's inlet"; + Modelica.SIunits.SpecificEnthalpy hOut + "Specific enthalpy at condenser's outlet"; + + Modelica.SIunits.MassFlowRate m_flow + "Mass flow rate"; + Modelica.SIunits.HeatFlowRate Q_flow + "Heat capacity"; + + Modelica.SIunits.MassFlowRate m_flowSec + "Mass flow rate of secondary fluid"; + Modelica.SIunits.Temperature TFlo + "Temperature flow at heat capacity"; + Modelica.SIunits.Temperature TRetFlo + "Temperature return flow at heat capacity"; + + equation + // Connection of ports + // + port_a.h_outflow = inStream(port_a.h_outflow) + "No flow reversal"; + port_a.p = pSat + "Pressure at inlet is equal to saturation pressure"; + + m_flow = port_a.m_flow + "Mass flow rate at condenser's inlet"; + hInl = inStream(port_a.h_outflow) + "Specific enthalpy at condenser's inlet"; + + TRetFlo =inpTRetFlo + "Temperature return flow at heat capacity"; + + // Secondary side + // + m_flowSec = dSec*V_flowSec + "Mass flow rate of secondary fluid"; + TFlo = TRetFlo + Q_flow/(m_flowSec*cpSec) + "Temperature return flow at heat capacity"; + + // Calculation of state properties of working fluid + // + TOut = TRetFlo + dTPin + "Temperature at condenser's outlet"; + TSat = TOut + dTSubCool + "Saturation temperature"; + pSat = Medium.saturationPressure(T=TSat) + "Absolute pressure at condenser's outlet"; + + hOut = Medium.specificEnthalpy_pT(p=pSat,T=TOut) + "Specific enthalpy at condenser's outlet"; + hOut = hInl - Q_flow/m_flow + "Specific enthalpy at condenser's outlet"; + + TInl = Medium.temperature_ph(p=pSat,h=hInl) + "Temperature at condenser's inlet"; + + annotation (Icon(graphics={ + Rectangle( + extent={{-100,70},{100,100}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag), + Rectangle( + extent={{-100,70},{100,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-100,-100},{100,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag), + Polygon( + points={{-100,70},{-100,-70},{-22,-70},{40,-70},{12,-68},{-22,-34},{-30, + 10},{-18,50},{18,66},{50,70},{-100,70}}, + lineColor={28,108,200}, + smooth=Smooth.Bezier, + fillColor={0,0,255}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-100,70},{-30,-70}}, + lineColor={0,0,255}, + fillColor={0,0,255}, + fillPattern=FillPattern.Solid), + Line( + points={{-38,70},{-56,52},{-32,28},{-50,4},{-26,-26},{-48,-52},{-40,-70}}, + color={0,0,0}, + thickness=0.5, + smooth=Smooth.Bezier), + Line( + points={{38,70},{20,52},{44,28},{26,4},{50,-26},{28,-52},{36,-70}}, + color={0,0,0}, + thickness=0.5, + smooth=Smooth.Bezier), + Text( + extent={{-32,-26},{36,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag, + textString="TP"), + Text( + extent={{-100,-26},{-40,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag, + textString="SC"), + Text( + extent={{44,-26},{100,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag, + textString="SH")})); + end StaticCondenser; + +equation + // Connection of main components + // + connect(eva.port_b, modCom.port_a) + annotation (Line(points={{-10,-10},{0,-10},{0,10}},color={0,127,255})); + connect(modCom.port_b, con.port_a) + annotation (Line(points={{0,50},{0,70},{-10,70}}, color={0,127,255})); + connect(ambTemp.port, thrCol.port_b) + annotation (Line(points={{60,30},{48,30}}, color={191,0,0})); + connect(thrCol.port_a, modCom.heatPort) + annotation (Line(points={{28,30},{28,30},{20,30}}, color={191,0,0})); + + // Connection of signals + // + connect(modCom.dataBus, dataBus) + annotation (Line(points={{-20,30},{-20,30},{-30,30}}, + color={255,204,51}, + thickness=0.5)); + connect(inpAmbTemp.y, ambTemp.T) + annotation (Line(points={{-69,-28},{86,-28},{86,30},{82,30}}, + color={0,0,127})); + connect(inpRotSpe.y, repMea.u) + annotation (Line(points={{-69,-14},{-66,-14},{-66,30},{-62,30}}, + color={0,0,127})); + connect(repMea.y, dataBus.comBus.extManVarCom) + annotation (Line(points={{-39,30},{-29.95,30},{-29.95,29.95}}, + color={0,0,127})); + connect(inpAmbTemp.y, eva.inpTAmb) + annotation (Line(points={{-69,-28},{-58,-28},{-20,-28},{-20,-20}}, + color={0,0,127})); + connect(inpTRetFlo.y, con.inpTRetFlo) + annotation (Line(points={{-69,-56},{-69, + -56},{94,-56},{94,94},{-22,94},{-22,80}}, color={0,0,127})); + + annotation (Icon(coordinateSystem(preserveAspectRatio=false), graphics={ + Ellipse( + extent={{-80,80},{80,-80}}, + lineColor={215,215,215}, + fillColor={215,215,215}, + fillPattern=FillPattern.Solid), + Ellipse( + extent={{-55,55},{55,-55}}, + lineColor={255,255,255}, + fillColor={255,255,255}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-60,14},{60,-14}}, + lineColor={215,215,215}, + fillColor={215,215,215}, + fillPattern=FillPattern.Solid, + rotation=45)}), Diagram(coordinateSystem(preserveAspectRatio=false)), + Documentation(revisions=" ++This model prescribes inlet and outlet conditions of a simplified +static heat pump model (i.e. boundary conditions of the secondary +sides of the evaporator and condenser). Furhtermore, it prescribes +the rotational speed of the compressor. +The model is used to validate the compressor model in general +as well as to identify effects of different static boundary +conditions (e.g. pinch temperature of the evaporator). +
++The User needs to define the following information in order to +complete the model: +
++To add static boundary conditions, a combi time table is included +within the model. The columns are defined as follows: +
+Hz.°C.W.°C.kW.+Moreover, the User needs to define further parameters describing +static condtions of the heat pump. These parameters are listed +below. +
+"), + experiment(StopTime=16.999)); +end BaseModelStaticHeatPump; diff --git a/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/BaseModelStaticHeatPumpController.mo b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/BaseModelStaticHeatPumpController.mo new file mode 100644 index 0000000000..f2a025e661 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/BaseModelStaticHeatPumpController.mo @@ -0,0 +1,643 @@ +within AixLib.Fluid.Movers.Compressors.Validation.StaticHeatPumpBoundaries; +model BaseModelStaticHeatPumpController + "Base model to test compressors using static heat pump boundaries" + + // Definition of medium + // + replaceable package Medium = + Modelica.Media.R134a.R134a_ph + constrainedby Modelica.Media.Interfaces.PartialTwoPhaseMedium + "Medium of the compressor" + annotation(Dialog(tab="General",group="General"), + choicesAllMatching=true, + Documentation(revisions=" +")); + + // Definition of parameters describing compressors + // + parameter Integer nCom = 1 + "Numer of compressors in parallel" + annotation(Dialog(tab="General",group="Compressors")); + + // Definition of parameters describing boundary conditions + // + parameter Modelica.SIunits.TemperatureDifference dTPinEva = 5 + "Pinch temperature at evaporator's outlet" + annotation (Dialog(tab="General", group="Evaporator")); + parameter Modelica.SIunits.TemperatureDifference dTSupHea = 1 + "Superheating of working fluid" + annotation (Dialog(tab="General", group="Evaporator")); + + parameter Modelica.SIunits.TemperatureDifference dTPinCon = 2.5 + "Pinch temperature at evaporator's outlet" + annotation (Dialog(tab="General", group="Condenser")); + parameter Modelica.SIunits.TemperatureDifference dTSubCool = 8 + "Supercooling of working fluid" + annotation (Dialog(tab="General", group="Condenser")); + + parameter Modelica.SIunits.Density dSec=1000 + "Constant density of secondary fluid" + annotation (Dialog(tab="General", group="Condenser")); + parameter Modelica.SIunits.SpecificHeatCapacity cpSec=4.1813e3 + "Constant specific heat capacity of secondary fluid" + annotation (Dialog(tab="General", group="Condenser")); + parameter Modelica.SIunits.VolumeFlowRate + V_flowSec=(0.776 + 0.781 + 0.44)/3/3600 + "Constant volume flow of secondary fluid" + annotation (Dialog(tab="General", group="Condenser")); + + // Definition of variables describing boundary conditions + // + Modelica.Blocks.Sources.CombiTimeTable inpDat( + extrapolation=Modelica.Blocks.Types.Extrapolation.NoExtrapolation, + columns=2:7, + timeScale=1, + smoothness=Modelica.Blocks.Types.Smoothness.ConstantSegments, + table=[0,64,285.15,5180,308.15,900,5.755555556; 1,64,283.15,4920,308.15,910, + 5.406593407; 2,63,280.15,4370,308.15,930,4.698924731; 3,64,285.15,4980,318.15, + 1140,4.368421053; 4,64,283.15,4730,318.15,1140,4.149122807; 5,55,285.15, + 4180,328.15,1240,3.370967742; 6,64,283.15,4650,328.15,1380,3.369565217; + 7,63,280.15,4160,318.15,1610,2.583850932; 8,55,275.15,2800,308.15,790,3.544303797; + 9,106,258.15,3760,308.15,1570,2.394904459; 10,115,266.15,4850,308.15,1940, + 2.5; 11,55,275.15,2640,318.15,960,2.75; 12,111,258.15,4150,318.15,2120,1.95754717; + 13,107,270.15,4780,318.15,2210,2.162895928; 14,113,266.15,4560,318.15,2290, + 1.991266376; 15,100,266.15,3880,328.15,2240,1.732142857; 16,63,275.15,3280, + 328.15,1330,2.466165414; 17,63,280.15,4080,328.15,1400,2.914285714]) + "Static boundaries of compressor model" + annotation (Placement(transformation(extent={{-90,-92},{-70,-72}}))); + + Modelica.Blocks.Sources.RealExpression inpRotSpe(y=inpDat.y[1]) + "Expressions describing rotational speed" + annotation (Placement(transformation(extent={{-90,-24},{-70,-4}}))); + Modelica.Blocks.Sources.RealExpression inpAmbTemp(y=inpDat.y[2]) + "Expressions describing ambient temperature" + annotation (Placement(transformation(extent={{-90,-38},{-70,-18}}))); + Modelica.Blocks.Sources.RealExpression inpHeaCap(y=inpDat.y[3]) + "Expressions describing heat capacity" + annotation (Placement(transformation(extent={{-90,-52},{-70,-32}}))); + Modelica.Blocks.Sources.RealExpression inpTRetFlo(y=inpDat.y[4] - 10) + "Expressions describing return flow temperature at heat capacity" + annotation (Placement(transformation(extent={{-90,-66},{-70,-46}}))); + + // Definition of subcomponents + // + Modelica.Thermal.HeatTransfer.Sources.PrescribedTemperature ambTemp + "Source that prescribes boundary ambient temperature" + annotation (Placement(transformation(extent={{80,20},{60,40}}))); + Modelica.Thermal.HeatTransfer.Components.ThermalCollector thrCol(m=nCom) + "Model to split the ambient temperature" + annotation (Placement(transformation(extent={{-10,-10},{10,10}}, + rotation=90,origin={38,30}))); + StaticEvaporator eva( + redeclare final package Medium = Medium, + final dTPin=dTPinEva, + final dTSupHea=dTSupHea) + "Model that describes a simple static evaporator" + annotation (Placement(transformation(extent={{-30,-20},{-10,0}}))); + + Modelica.Blocks.Continuous.LimPID PID( + controllerType=Modelica.Blocks.Types.SimpleController.P, + yMax=120, + yMin=30) "Controller of the compressor's rotational speeds" + annotation (Placement(transformation(extent={{-90,40},{-70,20}}))); + Modelica.Blocks.Routing.Replicator repMea(nout=nCom) + "Replicating the current value of the manipulated variables" + annotation (Placement(transformation(extent={{-60,20},{-40,40}}))); + ModularCompressors.ModularCompressorsSensors modCom( + nCom=nCom, + redeclare package Medium = Medium, + redeclare model SimpleCompressor = + SimpleCompressors.RotaryCompressors.RotaryCompressor, + show_staEff=true, + show_qua=true, + m_flow_start=0.05, + VDis=fill(13.2e-6,nCom), + useInpFil=fill(false,nCom), + h_out_start=400e3, + redeclare replaceable model EngineEfficiency = + Utilities.EngineEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare replaceable model VolumetricEfficiency = + Utilities.VolumetricEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare replaceable model IsentropicEfficiency = + Utilities.IsentropicEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll) + "Model that describes modular compressors in parallel" + annotation (Placement(transformation( extent={{-20,20},{20,-20}}, + rotation=90,origin={0,30}))); + + StaticCondenser con( + redeclare package Medium = Medium, + dSec=dSec, + cpSec=cpSec, + V_flowSec=V_flowSec, + dTSubCool=dTSubCool, + dTPin=dTPinCon) + "Model that describes a simple static condenser" + annotation (Placement(transformation(extent={{-30,60},{-10,80}}))); + + Controls.Interfaces.ModularHeatPumpControlBus dataBus( + nCom=nCom) "Connector that contains all control signals" + annotation (Placement(transformation( + extent={{-10,-10},{10,10}}, + rotation=-90, + origin={-30,30}), iconTransformation( + extent={{-10,-10},{10,10}}, + rotation=-90, + origin={-98,0}))); + + // Definition of further variables + // + Modelica.Blocks.Interaction.Show.RealValue COP( + use_numberPort=false, number=con.Q_flow/modCom.modCom[1].comPro.PEle/nCom) + "Real value describing current COP" + annotation (Placement(transformation(extent={{20,66},{40,86}}))); + Modelica.Blocks.Interaction.Show.RealValue dCOPRel(use_numberPort=false, + number=(COP.number - inpDat.y[6])/inpDat.y[6]*100) + "Realative difference of current COP" + annotation (Placement(transformation(extent={{60,66},{80,86}}))); + Modelica.Blocks.Interaction.Show.RealValue PEle( + use_numberPort=false, number=modCom.modCom[1].comPro.PEle) + "Real value describing current power consumption" + annotation (Placement(transformation(extent={{20,50},{40,70}}))); + Modelica.Blocks.Interaction.Show.RealValue dPEleRel(use_numberPort=false, + number=(PEle.number - inpDat.y[5])/inpDat.y[5]*100) + "Real difference of current power consumption" + annotation (Placement(transformation(extent={{60,50},{80,70}}))); + Real inpTime = time + "Simulation time"; + +protected + model StaticEvaporator + "Static evaporator assuming constant pinch point at evaporator's outlet" + + // Definition of medium + // + replaceable package Medium = Modelica.Media.R134a.R134a_ph + constrainedby Modelica.Media.Interfaces.PartialTwoPhaseMedium + "Medium of the compressor" + annotation(Dialog(tab="General",group="General"), + choicesAllMatching=true); + + // Definition of parameters describing evaporator + // + parameter Modelica.SIunits.TemperatureDifference dTPin = 5 + "Pinch temperature at evaporator's outlet" + annotation(Dialog(tab="General",group="Evaporator")); + parameter Modelica.SIunits.TemperatureDifference dTSupHea = 1 + "Superheating of working fluid" + annotation(Dialog(tab="General",group="Evaporator")); + + // Definition of parameters describing assumptions + // + parameter Boolean allowFlowReversal = false + "= false to simplify equations, assuming, but not enforcing, no flow reversal" + annotation(Dialog(tab="Assumptions",group="General"), Evaluate=true); + + // Definition of connecotrs + // + Modelica.Fluid.Interfaces.FluidPort_b port_b( + redeclare final package Medium = Medium, + m_flow(max=if allowFlowReversal then +Modelica.Constants.inf else 0), + h_outflow(start = Medium.h_default)) + "Fluid connector b (positive design flow direction is from port_a to port_b)" + annotation (Placement(transformation(extent={{110,-10},{90,10}}))); + Modelica.Blocks.Interfaces.RealInput inpTAmb + "Input of ambient temperature" + annotation (Placement(transformation( + extent={{-20,-20},{20,20}}, + rotation=90, + origin={0,-100}), iconTransformation( + extent={{-20,-20},{20,20}}, + rotation=90, + origin={0,-100}))); + + // Definition of submodels + // + Modelica.Blocks.Sources.RealExpression outPEva(y=pSat) + "Expressions describing saturation pressure at evaporator's outlet" + annotation (Placement(transformation(extent={{10,-4},{30,16}}))); + Modelica.Blocks.Sources.RealExpression outTEva(y=TOut) + "Expressions describing temperature at evaporator's outlet" + annotation (Placement(transformation(extent={{10,-18},{30,2}}))); + + Sources.Boundary_pT source( + redeclare package Medium = Medium, + use_p_in=true, + use_T_in=true, + nPorts=1) + "Source with constant pressure and temperature" + annotation (Placement(transformation(extent={{-10,-10},{10,10}}, + rotation=0, + origin={60,0}))); + + // Definition of variables describing evaporator + // + Medium.SaturationProperties satEva + "Saturation properties of the evaporator's working fluid" + annotation (Placement(transformation(extent={{-50,-8},{-30,12}}))); + Medium.ThermodynamicState staOut + "Thermodynamic state of the working fluid at evaporator's outlet" + annotation (Placement(transformation(extent={{-20,-8},{0,12}}))); + + Modelica.SIunits.AbsolutePressure pSat + "Absolute pressure at evaporator's outlet"; + Modelica.SIunits.Temperature TSat + "Saturation temperature"; + Modelica.SIunits.Temperature TOut + "Temperature at evaporator's outlet"; + + Modelica.SIunits.Temperature TAmb + "Temperature of ambient"; + + equation + // Connection of ports + // + connect(outPEva.y, source.p_in) + annotation (Line(points={{31,6},{36,6},{36,8},{48,8}}, color={0,0,127})); + connect(outTEva.y, source.T_in) + annotation (Line(points={{31,-8},{34,-8},{38,-8},{38,4},{48,4}},color={0,0,127})); + connect(source.ports[1], port_b) + annotation (Line(points={{70,0},{86,0},{100,0}}, color={0,127,255})); + + TAmb = inpTAmb + "Temperature of ambient"; + + // Calculation of state properties of working fluid + // + satEva = Medium.setSat_T(T=TSat) + "Saturation properties"; + staOut = Medium.setState_pT(p=pSat,T=TOut) + "Thermodynamic state of the working fluid at evaporator's outlet"; + + pSat = Medium.saturationPressure(satEva.Tsat) + "Absolute pressure at evaporator's outlet"; + TSat = TOut - dTSupHea + "Saturation temperature"; + TOut = TAmb - dTPin + "Temperature at evaporator's outlet"; + + annotation (Icon(graphics={ + Rectangle( + extent={{-100,70},{100,100}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag), + Rectangle( + extent={{-100,70},{100,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-100,-100},{100,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag), + Polygon( + points={{-100,70},{-100,-70},{-22,-70},{40,-70},{12,-68},{-22,-34},{-30, + 10},{-18,50},{18,66},{50,70},{-100,70}}, + lineColor={28,108,200}, + smooth=Smooth.Bezier, + fillColor={0,0,255}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-100,70},{-30,-70}}, + lineColor={0,0,255}, + fillColor={0,0,255}, + fillPattern=FillPattern.Solid), + Line( + points={{-38,70},{-56,52},{-32,28},{-50,4},{-26,-26},{-48,-52},{-40,-70}}, + color={0,0,0}, + thickness=0.5, + smooth=Smooth.Bezier), + Line( + points={{38,70},{20,52},{44,28},{26,4},{50,-26},{28,-52},{36,-70}}, + color={0,0,0}, + thickness=0.5, + smooth=Smooth.Bezier), + Text( + extent={{-32,-26},{36,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag, + textString="TP"), + Text( + extent={{-100,-26},{-40,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag, + textString="SC"), + Text( + extent={{44,-26},{100,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag, + textString="SH")})); + end StaticEvaporator; + + model StaticCondenser + "Static condenser assuming constant pinch point at condenser's outlet" + + // Definition of medium + // + replaceable package Medium = Modelica.Media.R134a.R134a_ph + constrainedby Modelica.Media.Interfaces.PartialTwoPhaseMedium + "Medium of the compressor" + annotation(Dialog(tab="General",group="General"), + choicesAllMatching=true); + + // Definition of parameters describing condenser + // + parameter Modelica.SIunits.TemperatureDifference dTPin = 2.5 + "Supercooling of working fluid" + annotation(Dialog(tab="General",group="Condenser")); + parameter Modelica.SIunits.TemperatureDifference dTSubCool = 8 + "Supercooling of working fluid" + annotation(Dialog(tab="General",group="Condenser")); + + parameter Modelica.SIunits.Density dSec = 1000 + "Constant density of secondary fluid" + annotation(Dialog(tab="General",group="Condenser")); + parameter Modelica.SIunits.SpecificHeatCapacity cpSec = 4.1813e3 + "Constant specific heat capacity of secondary fluid" + annotation(Dialog(tab="General",group="Condenser")); + parameter Modelica.SIunits.VolumeFlowRate V_flowSec = (0.776+0.781+0.44)/3/3600 + "Constant volume flow of secondary fluid" + annotation(Dialog(tab="General",group="Condenser")); + + // Definition of parameters describing assumptions + // + parameter Boolean allowFlowReversal = false + "= false to simplify equations, assuming, but not enforcing, no flow reversal" + annotation(Dialog(tab="Assumptions",group="General"), Evaluate=true); + + // Definition of connecotrs + // + Modelica.Fluid.Interfaces.FluidPort_a port_a( + redeclare final package Medium = Medium, + m_flow(max=if allowFlowReversal then +Modelica.Constants.inf else 0), + h_outflow(start = Medium.h_default)) + "Fluid connector b (positive design flow direction is from port_a to port_b)" + annotation (Placement(transformation(extent={{110,-10},{90,10}}))); + + Modelica.Blocks.Interfaces.RealInput inpTRetFlo + "Temperature return flow at heat capacity" + annotation (Placement( + transformation( + extent={{-10,-10},{10,10}}, + rotation=-90, + origin={-20,100}))); + Modelica.Blocks.Interfaces.RealOutput outQFlo + "Heat capacity" + annotation (Placement( + transformation( + extent={{-10,-10},{10,10}}, + rotation=-90, + origin={0,-100}))); + + // Definition of variables describing condenser + // + Modelica.SIunits.AbsolutePressure pSat + "Absolute pressure at condenser's outlet"; + Modelica.SIunits.Temperature TSat + "Saturation temperature"; + + Modelica.SIunits.Temperature TInl + "Temperature at condenser's inlet"; + Modelica.SIunits.Temperature TOut + "Temperature at condenser's outlet"; + Modelica.SIunits.SpecificEnthalpy hInl + "Specific enthalpy at condenser's inlet"; + Modelica.SIunits.SpecificEnthalpy hOut + "Specific enthalpy at condenser's outlet"; + + Modelica.SIunits.MassFlowRate m_flow + "Mass flow rate"; + Modelica.SIunits.HeatFlowRate Q_flow + "Heat capacity"; + + Modelica.SIunits.MassFlowRate m_flowSec + "Mass flow rate of secondary fluid"; + Modelica.SIunits.Temperature TFlo + "Temperature flow at heat capacity"; + Modelica.SIunits.Temperature TRetFlo + "Temperature return flow at heat capacity"; + + equation + // Connection of ports + // + port_a.h_outflow = inStream(port_a.h_outflow) + "No flow reversal"; + port_a.p = pSat + "Pressure at inlet is equal to saturation pressure"; + + m_flow = port_a.m_flow + "Mass flow rate at condenser's inlet"; + hInl = inStream(port_a.h_outflow) + "Specific enthalpy at condenser's inlet"; + + TRetFlo = inpTRetFlo + "Temperature return flow at heat capacity"; + outQFlo = Q_flow + "Heat capacity"; + + // Secondary side + // + m_flowSec = dSec*V_flowSec + "Mass flow rate of secondary fluid"; + TFlo = TRetFlo + Q_flow/(m_flowSec*cpSec) + "Temperature return flow at heat capacity"; + + // Calculation of state properties of working fluid + // + TOut = TRetFlo + dTPin + "Temperature at condenser's outlet"; + TSat = TOut + dTSubCool + "Saturation temperature"; + pSat = Medium.saturationPressure(T=TSat) + "Absolute pressure at condenser's outlet"; + + hOut = Medium.specificEnthalpy_pT(p=pSat,T=TOut) + "Specific enthalpy at condenser's outlet"; + hOut = hInl - Q_flow/m_flow + "Specific enthalpy at condenser's outlet"; + + TInl = Medium.temperature_ph(p=pSat,h=hInl) + "Temperature at condenser's inlet"; + + annotation (Icon(graphics={ + Rectangle( + extent={{-100,70},{100,100}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag), + Rectangle( + extent={{-100,70},{100,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-100,-100},{100,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag), + Polygon( + points={{-100,70},{-100,-70},{-22,-70},{40,-70},{12,-68},{-22,-34},{-30, + 10},{-18,50},{18,66},{50,70},{-100,70}}, + lineColor={28,108,200}, + smooth=Smooth.Bezier, + fillColor={0,0,255}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-100,70},{-30,-70}}, + lineColor={0,0,255}, + fillColor={0,0,255}, + fillPattern=FillPattern.Solid), + Line( + points={{-38,70},{-56,52},{-32,28},{-50,4},{-26,-26},{-48,-52},{-40,-70}}, + color={0,0,0}, + thickness=0.5, + smooth=Smooth.Bezier), + Line( + points={{38,70},{20,52},{44,28},{26,4},{50,-26},{28,-52},{36,-70}}, + color={0,0,0}, + thickness=0.5, + smooth=Smooth.Bezier), + Text( + extent={{-32,-26},{36,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag, + textString="TP"), + Text( + extent={{-100,-26},{-40,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag, + textString="SC"), + Text( + extent={{44,-26},{100,-70}}, + lineColor={0,0,0}, + lineThickness=0.5, + fillColor={175,175,175}, + fillPattern=FillPattern.CrossDiag, + textString="SH")})); + end StaticCondenser; + +equation + // Connection of main components + // + connect(eva.port_b, modCom.port_a) + annotation (Line(points={{-10,-10},{0,-10},{0,10}},color={0,127,255})); + connect(modCom.port_b, con.port_a) + annotation (Line(points={{0,50},{0,70},{-10,70}}, color={0,127,255})); + connect(ambTemp.port, thrCol.port_b) + annotation (Line(points={{60,30},{48,30}}, color={191,0,0})); + connect(thrCol.port_a, modCom.heatPort) + annotation (Line(points={{28,30},{28,30},{20,30}}, color={191,0,0})); + + // Connection of signals + // + connect(modCom.dataBus, dataBus) + annotation (Line(points={{-20,30},{-20,30},{-30,30}}, + color={255,204,51}, + thickness=0.5)); + connect(inpAmbTemp.y, ambTemp.T) + annotation (Line(points={{-69,-28},{86,-28},{86,30},{82,30}}, + color={0,0,127})); + connect(repMea.y, dataBus.comBus.extManVarCom) + annotation (Line(points={{-39,30},{-29.95,30},{-29.95,29.95}}, + color={0,0,127})); + connect(inpAmbTemp.y, eva.inpTAmb) + annotation (Line(points={{-69,-28},{-58,-28},{-20,-28},{-20,-20}}, + color={0,0,127})); + connect(inpTRetFlo.y, con.inpTRetFlo) + annotation (Line(points={{-69,-56},{-69, + -56},{94,-56},{94,94},{-22,94},{-22,80}}, color={0,0,127})); + connect(PID.y, repMea.u) + annotation (Line(points={{-69,30},{-62,30}}, color={0,0,127})); + connect(con.outQFlo, PID.u_m) + annotation (Line(points={{-20,60},{-20,50},{-80,50},{-80,42}}, + color={0,0,127})); + connect(PID.u_s, inpHeaCap.y) + annotation (Line(points={{-92,30},{-96,30},{-96,8},{-60,8},{-60,-42}, + {-69,-42}}, color={0,0,127})); + + annotation (Icon(coordinateSystem(preserveAspectRatio=false), graphics={ + Ellipse( + extent={{-80,80},{80,-80}}, + lineColor={215,215,215}, + fillColor={215,215,215}, + fillPattern=FillPattern.Solid), + Ellipse( + extent={{-55,55},{55,-55}}, + lineColor={255,255,255}, + fillColor={255,255,255}, + fillPattern=FillPattern.Solid), + Rectangle( + extent={{-60,14},{60,-14}}, + lineColor={215,215,215}, + fillColor={215,215,215}, + fillPattern=FillPattern.Solid, + rotation=45)}), Diagram(coordinateSystem(preserveAspectRatio=false)), + Documentation(revisions=" ++This model prescribes inlet and outlet conditions of a simplified +static heat pump model (i.e. boundary conditions of the secondary +sides of the evaporator and condenser). Furhtermore, it prescribes +the rotational speed of the compressor. +The model is used to validate the compressor model in general +as well as to show the possiblity of controlling the heat capacity +of the heat pump. +
++The User needs to define the following information in order to +complete the model: +
++To add static boundary conditions, a combi time table is included +within the model. The columns are defined as follows: +
+Hz.°C.W.°C.kW.+Moreover, the User needs to define further parameters describing +static condtions of the heat pump. These parameters are listed +below. +
+"), + experiment(StopTime=16.999)); +end BaseModelStaticHeatPumpController; diff --git a/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/SpecifiedModels/RefrigerantR134aScrollCompressor.mo b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/SpecifiedModels/RefrigerantR134aScrollCompressor.mo new file mode 100644 index 0000000000..8285491c7f --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/SpecifiedModels/RefrigerantR134aScrollCompressor.mo @@ -0,0 +1,86 @@ +within AixLib.Fluid.Movers.Compressors.Validation.StaticHeatPumpBoundaries.SpecifiedModels; +model RefrigerantR134aScrollCompressor + "Static boundaries of a scroll-compressor using R134a" + extends BaseModelStaticBoundaries( + replaceable package Medium = + Modelica.Media.R134a.R134a_ph, + modCom( + redeclare model EngineEfficiency = + EngineEfficiency, + redeclare model VolumetricEfficiency = + VolumetricEfficiency, + redeclare model IsentropicEfficiency = + IsentropicEfficiency)); + extends Modelica.Icons.Example; + +protected + model EngineEfficiency + "Fitted engine efficiency" + extends Utilities.EngineEfficiency.PartialEngineEfficiency( + useIseWor = false); + equation + etaEng = 0.8704+0.001295*rotSpe+0.05194*piPre-8.006e-06*rotSpe^2- + 0.0001272*rotSpe*piPre-0.01146*piPre^2+1.059e-06*rotSpe^2*piPre- + 2.265e-06*rotSpe*piPre^2+0.0008853*piPre^3; + end EngineEfficiency; + + model VolumetricEfficiency + "Fitted volumetric efficiency" + extends Utilities.VolumetricEfficiency.PartialVolumetricEfficiency; + equation + lamH = 0.5828+0.0303*rotSpe-0.1727*piPre-0.000588*rotSpe^2+ + 0.003072*rotSpe*piPre+0.01238*piPre^2+3.434e-06*rotSpe^3- + 1.496e-05*rotSpe^2*piPre -0.0001785*rotSpe*piPre^2; + end VolumetricEfficiency; + + model IsentropicEfficiency + "Fitted isentropic efficiency" + extends Utilities.IsentropicEfficiency.PartialIsentropicEfficiency; + equation + etaIse = (-3.565 + 0.2464*rotSpe + 1.227*piPre - 0.007986*rotSpe^2+ + 0.03947*rotSpe*piPre-0.9075*piPre^2+0.0001086*rotSpe^3- + 0.0006588*rotSpe^2*piPre +0.0001482*rotSpe*piPre^2 + + 0.1721*piPre^3-5.291e-07*rotSpe^4+3.353e-06*rotSpe^3*piPre+ + 1.037e-05*rotSpe^2*piPre^2 - 0.0001854*rotSpe*piPre^3-0.01102*piPre^4)*1.05; + end IsentropicEfficiency; + + annotation (experiment(StopTime=46.9999), Documentation(revisions=" +
+This model specifies the base model
+
+BaseModelStaticBoundaries. Therefore, an experimental data
+set is used presented by Cuevas and Lebrun. The authors investigate
+a scroll-compressor using R134a as refrigerant and varying the inlet
+and outlet conditions as well as the rotational speed.
+
+Moreover, fitted formulas are used for the three efficiencies of the
+compressor in order to improve the quality of the mass flow rate and
+power consumption calculated by the model.
+
+C. Cuevas und J. Lebrun. (2009): + +Testing and modelling of a variable speed scroll compressor.. +In: Applied Thermal Engineering, 29(2):469–478 +
+"), + Diagram(graphics={ + Text( + extent={{-100,80},{0,60}}, + lineColor={0,0,0}, + textStyle={TextStyle.Bold}, + textString="Experimental data by +C. Cuevas and J. Lebrun + +Compressor type: Scroll-Compressor +Refrigerant: R134a")})); +end RefrigerantR134aScrollCompressor; diff --git a/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/SpecifiedModels/RefrigerantR410aScrollCompressor.mo b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/SpecifiedModels/RefrigerantR410aScrollCompressor.mo new file mode 100644 index 0000000000..18142a1e90 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/SpecifiedModels/RefrigerantR410aScrollCompressor.mo @@ -0,0 +1,34 @@ +within AixLib.Fluid.Movers.Compressors.Validation.StaticHeatPumpBoundaries.SpecifiedModels; +model RefrigerantR410aScrollCompressor + "Static heat pump boundaries of a scroll-compressor using R410a" + extends BaseModelStaticHeatPump( + nCom = 1, + replaceable package Medium = + Modelica.Media.R134a.R134a_ph, + modCom( + redeclare model EngineEfficiency = + Utilities.EngineEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare model VolumetricEfficiency = + Utilities.VolumetricEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare model IsentropicEfficiency = + Utilities.IsentropicEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll), + inpDat(smoothness=Modelica.Blocks.Types.Smoothness.ConstantSegments)); + extends Modelica.Icons.Example; + + annotation (experiment(StopTime=16.9999), Documentation(revisions=" ++This model specifies the base model + +BaseModelStaticHeatPump. Therefore, a fictious data +set is used. +
+")); +end RefrigerantR410aScrollCompressor; diff --git a/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/SpecifiedModels/RefrigerantR410aScrollCompressorController.mo b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/SpecifiedModels/RefrigerantR410aScrollCompressorController.mo new file mode 100644 index 0000000000..62cfaa9061 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/SpecifiedModels/RefrigerantR410aScrollCompressorController.mo @@ -0,0 +1,40 @@ +within AixLib.Fluid.Movers.Compressors.Validation.StaticHeatPumpBoundaries.SpecifiedModels; +model RefrigerantR410aScrollCompressorController + "Static boundaries of a scroll-compressor using R410a" + extends BaseModelStaticHeatPumpController( + nCom = 1, + replaceable package Medium = + Modelica.Media.R134a.R134a_ph, + modCom( + redeclare model EngineEfficiency = + Utilities.EngineEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare model VolumetricEfficiency = + Utilities.VolumetricEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + redeclare model IsentropicEfficiency = + Utilities.IsentropicEfficiency.SpecifiedEfficiencies.Generic_VarRef_VarDisVol_RotaryScroll, + useInpFil={true}, + risTim={0.1}), + inpDat(smoothness=Modelica.Blocks.Types.Smoothness.ContinuousDerivative), + PID( + yMax=120, + yMin=10, + k=1)); + extends Modelica.Icons.Example; + + annotation (experiment(StopTime=16.9999), Documentation(revisions=" ++This model specifies the base model + +BaseModelStaticHeatPumpController. Therefore, a fictious data +set is used. +
+")); +end RefrigerantR410aScrollCompressorController; diff --git a/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/SpecifiedModels/package.mo b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/SpecifiedModels/package.mo new file mode 100644 index 0000000000..be54f2df81 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/SpecifiedModels/package.mo @@ -0,0 +1,20 @@ +within AixLib.Fluid.Movers.Compressors.Validation.StaticHeatPumpBoundaries; +package SpecifiedModels "Package that contains validation models of different static boundary models" + extends Modelica.Icons.ExamplesPackage; + +annotation (Documentation(revisions=" ++This package contains specified models of the base +models. Thus, models within this package are ready +to use. +
+")); +end SpecifiedModels; diff --git a/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/SpecifiedModels/package.order b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/SpecifiedModels/package.order new file mode 100644 index 0000000000..edc8e1a0a0 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/SpecifiedModels/package.order @@ -0,0 +1,3 @@ +RefrigerantR134aScrollCompressor +RefrigerantR410aScrollCompressor +RefrigerantR410aScrollCompressorController diff --git a/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/package.mo b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/package.mo new file mode 100644 index 0000000000..e53ec45236 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/package.mo @@ -0,0 +1,49 @@ +within AixLib.Fluid.Movers.Compressors.Validation; +package StaticHeatPumpBoundaries "This package contains models to validate the comprosser models using + static heat pump boundary conditions" + extends Modelica.Icons.ExamplesPackage; + + + + +annotation (Documentation(revisions=" ++This package provides models to validate compressor models using +static boundary conditions. Therefore, both base models and +specified models are defined within this package. The specified +models inherit from the base models. Currently, the following +base models are defined: +
++Additionally, detailed descriptions of the models are provided in +each model's information section. +
+")); +end StaticHeatPumpBoundaries; diff --git a/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/package.order b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/package.order new file mode 100644 index 0000000000..d1be5fbf16 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Validation/StaticHeatPumpBoundaries/package.order @@ -0,0 +1,4 @@ +BaseModelStaticBoundaries +BaseModelStaticHeatPump +BaseModelStaticHeatPumpController +SpecifiedModels diff --git a/AixLib/Fluid/Movers/Compressors/Validation/package.mo b/AixLib/Fluid/Movers/Compressors/Validation/package.mo new file mode 100644 index 0000000000..3e3130d792 --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/Validation/package.mo @@ -0,0 +1,26 @@ +within AixLib.Fluid.Movers.Compressors; +package Validation "Package that contains validations models to test compressors' functionalities" + extends Modelica.Icons.ExamplesPackage; + + + annotation (Documentation(info=" ++This package provides models to validate modelling approaches +presented in + +AixLib.Fluid.Movers.Compressors.Utilities, + +AixLib.Fluid.Movers.Compressors.SimpleCompressors and + +AixLib.Fluid.Movers.Compressors.ModularCompressors. +
+", revisions=" ++This package contains component models for simple and modular compressors. +These compressors are used for, for example, simple or modular heat pumps +that model the refrigerant circuit. +
+")); +end Compressors; diff --git a/AixLib/Fluid/Movers/Compressors/package.order b/AixLib/Fluid/Movers/Compressors/package.order new file mode 100644 index 0000000000..4b191165ed --- /dev/null +++ b/AixLib/Fluid/Movers/Compressors/package.order @@ -0,0 +1,7 @@ +UsersGuide +ModularCompressors +SimpleCompressors +Utilities +Examples +Validation +BaseClasses diff --git a/AixLib/Fluid/Movers/Data/Pumps/Wilo/Stratos25slash1to6.mo b/AixLib/Fluid/Movers/Data/Pumps/Wilo/Stratos25slash1to6.mo index e9ddf2a33b..651b755c7c 100644 --- a/AixLib/Fluid/Movers/Data/Pumps/Wilo/Stratos25slash1to6.mo +++ b/AixLib/Fluid/Movers/Data/Pumps/Wilo/Stratos25slash1to6.mo @@ -26,7 +26,7 @@ without being limited by the maximum power limitation (see dotted curve on figure below). Pump curves (H(m_flow) and P(m_flow)) from the data sheets are digitized using -web plot digitizer. +web plot digitizer.+Definition of a standard pump bus for use with the Zugabe library. +
+", revisions=" +The original variable Limiter Modelica.Blocks.Nonlinear.VariableLimiter showed problems with the pump model. The output variable y would often stay at the minimum (limit2) although u was larger than this value. The homotropy and smooth functions were not the problem as can be shown. Even removing both of them did not solve the problem that occured in special (?) hydraulic setups. See for example Zugabe.Fluid.Movers.Examples.test_nset.
+Dymola seemed to transform the equations in the wrong way. Changing the equation section into an algorithm, thus forcing the ordered calculation, brought a solution.
+", revisions=" +In the original pump model the functions for pump pressure head, speed and electrical power consumption have been integrated directly as functions with hard coded coefficients. They were computed from volume flow rate, speed or pressure head. For example:
+![\"H](\"modelica://Zugabe/Resources/Images/equations/equation-dnpNDYbm.png\")
In the process of collecting all pump specific data into a single record the functions aproach has been discontinued. This generic function can now be used to compute the polynomial using two variables a and b and a matrix of coefficients c.
+")); +end polynomial2D; diff --git a/AixLib/Fluid/Movers/PumpsPolynomialBased/BaseClasses/polynomialABC.mo b/AixLib/Fluid/Movers/PumpsPolynomialBased/BaseClasses/polynomialABC.mo new file mode 100644 index 0000000000..ada582dc36 --- /dev/null +++ b/AixLib/Fluid/Movers/PumpsPolynomialBased/BaseClasses/polynomialABC.mo @@ -0,0 +1,19 @@ +within AixLib.Fluid.Movers.PumpsPolynomialBased.BaseClasses; +function polynomialABC + "calculates polynomial function of form z = c[1]*x^2 + c[2]*xy + c[3]*y^2 " + extends Modelica.Icons.Function; + input Real[3] c "coefficient vector"; + input Real x "variable 1"; + input Real y "variable 2"; + output Real z "result"; +algorithm + z := c[1]*x*x + c[2]*x*y + c[3]*y*y; + annotation (Documentation(revisions=" +This function is used in the Zugabe.Fluid.Movers.Pump model. It depends on the correct order of the coefficients in c and the respective assignment of x and y. For the computation of H = f(Q,n), for example x must be assigned n and y = Q in m3/h. The result will be the pump pressure head in m.
+Be aware that the function will not check if the result is a positive number. Negative results have no sensible physical meaning in this case.
+")); +end polynomialABC; diff --git a/AixLib/Fluid/Movers/PumpsPolynomialBased/BaseClasses/polynomialABCinverse.mo b/AixLib/Fluid/Movers/PumpsPolynomialBased/BaseClasses/polynomialABCinverse.mo new file mode 100644 index 0000000000..9545630846 --- /dev/null +++ b/AixLib/Fluid/Movers/PumpsPolynomialBased/BaseClasses/polynomialABCinverse.mo @@ -0,0 +1,31 @@ +within AixLib.Fluid.Movers.PumpsPolynomialBased.BaseClasses; +function polynomialABCinverse + "calculates the solution of x = f(y,z) defined by polynomial function z = c[1]*x^2 + c[2]*xy + c[3]*y^2 " + extends Modelica.Icons.Function; + input Real[3] c "coefficient vector"; + input Real y "variable 2"; + input Real z "variable 3"; + output Real x "result"; + +protected + Real p2 "p/2 in the p-q-formula"; + Real q "q in the p-q-formula"; + Real r "root term sqrt(p2^2-q)"; +algorithm + p2 := (c[2]*y)/(2*c[3]); + q := (c[1]*y*y-z)/c[3]; + if p2*p2 - q >= 0 then + r := sqrt(p2*p2 - q); + x := max(-p2 + r, -p2 - r); + else + x := -p2; + end if; + annotation (Documentation(revisions=" +This function is used in the Zugabe.Fluid.Movers.Pump model. It depends on the correct order of the coefficients in c and the respective assignment of y and z. For the computation of n = f(Q,H), for example z must be assigned H and y = Q in m3/h. The result will be the pump speed in revolutions/min.
+Be aware that the function will not check if the result is a positive number. Negative results have no sensible physical meaning in this case. There are two solutions of quadratic polynomial that can be calculated with the so-called p-q-formula. The function will take the larger value of the two soutions as a result.
+")); +end polynomialABCinverse; diff --git a/AixLib/Fluid/Movers/PumpsPolynomialBased/BaseClasses/powerInt.mo b/AixLib/Fluid/Movers/PumpsPolynomialBased/BaseClasses/powerInt.mo new file mode 100644 index 0000000000..e84a2815e7 --- /dev/null +++ b/AixLib/Fluid/Movers/PumpsPolynomialBased/BaseClasses/powerInt.mo @@ -0,0 +1,41 @@ +within AixLib.Fluid.Movers.PumpsPolynomialBased.BaseClasses; +function powerInt "Computes the power x^n for the real x and the integer n." + extends Modelica.Icons.Function; + input Real x "base"; + input Integer n "exponent"; + output Real y "result"; + +protected + Integer t; + Integer e "dummy for n to allow for assignment"; + Real z "dummy for x to allow for assignment"; + +algorithm + e := n; + z := x; + y := 1; + while e <> 0 loop + t := mod(e, 2); +// Modelica.Utilities.Streams.print("n: " + String(e) + " t: " + String(t) + " x: " +// + String(z) + " y: " + String(y)); + e := integer(e*0.5) + "rounds real towards -inf and produces integer (in contrast to floor function)"; + + if t == 1 then + y := y*z; + end if; + + if e <> 0 then + z := z*z; + end if; + end while; + annotation (Documentation(info=" +"A simple implementation of Algorithm A from section 4.6.3 of TAOCP" as taken from:
+http://alvaro-videla.com/2014/03/the-power-algorithm.html
+"There’s a very well known algorithm for calculation powers, that is x to the power of n or simply: x^n. Donald Knuth presents the algorithm in section 4.6.3 Evaluation of Powers of TAOCP."
Partial pump controller with states. Currently the states only provide on and off mode. This can as well be replaced by the bolean onOff signal from the pumpControllerBus.
+", + revisions=" +This controller implements the conventional variable dp control strategy. The pump's operating points fall on an ascending line with the point p0(Q0, H0) and p1(Qnom, Hnom) where Q0 and H0 are volume flow rate and pump head at zero mass flow. Hence p0 = (0, H0). p1 is the pump's design point. Normally, H0 = 0.5 * Hnom.
+", revisions=" +This controller implements the conventional variable dp control strategy. The pump's operating points fall on an ascending line with the point p0(Q0, H0) and p1(Qnom, Hnom) where Q0 and H0 are volume flow rate and pump head at zero mass flow. Hence p0 = (0, H0). p1 is the pump's design point. Normally, H0 = 0.5 * Hnom.
+", revisions=" +Simple Controller that passes the pump speed signal on the pumpControllerBus (rpm_input) to the pumpBus. This way the pump speed, computed somewhere else, can be applied directly to the PumpPhysics model.
+"), Icon(graphics={ + Rectangle( + extent={{-80,50},{76,-8}}, + lineColor={0,0,0}, + fillColor={254,178,76}, + fillPattern=FillPattern.Solid, + lineThickness=1), + Text( + extent={{-70,38},{64,8}}, + lineColor={240,59,32}, + fillColor={0,216,108}, + fillPattern=FillPattern.Solid, + textString="n_set")})); +end CtrlPassThroughN; diff --git a/AixLib/Fluid/Movers/PumpsPolynomialBased/Controls/package.mo b/AixLib/Fluid/Movers/PumpsPolynomialBased/Controls/package.mo new file mode 100644 index 0000000000..70b5ef876e --- /dev/null +++ b/AixLib/Fluid/Movers/PumpsPolynomialBased/Controls/package.mo @@ -0,0 +1,8 @@ +within AixLib.Fluid.Movers.PumpsPolynomialBased; +package Controls "Pump Controller" + extends Modelica.Icons.VariantsPackage; + + + + +end Controls; diff --git a/AixLib/Fluid/Movers/PumpsPolynomialBased/Controls/package.order b/AixLib/Fluid/Movers/PumpsPolynomialBased/Controls/package.order new file mode 100644 index 0000000000..9f683fef38 --- /dev/null +++ b/AixLib/Fluid/Movers/PumpsPolynomialBased/Controls/package.order @@ -0,0 +1,4 @@ +CtrlDpVarH +CtrlDpVarN +CtrlPassThroughN +BaseClasses diff --git a/AixLib/Fluid/Movers/PumpsPolynomialBased/Examples/PumpHdpVarControlTest.mo b/AixLib/Fluid/Movers/PumpsPolynomialBased/Examples/PumpHdpVarControlTest.mo new file mode 100644 index 0000000000..4c09bf362e --- /dev/null +++ b/AixLib/Fluid/Movers/PumpsPolynomialBased/Examples/PumpHdpVarControlTest.mo @@ -0,0 +1,104 @@ +within AixLib.Fluid.Movers.PumpsPolynomialBased.Examples; +model PumpHdpVarControlTest + "testing the pump dp-var algorithm with the new \"one record\" pump model." + extends Modelica.Icons.Example; + inner Modelica.Fluid.System system(m_flow_start=1, + allowFlowReversal=false, + p_ambient=300000, + T_ambient=293.15, + T_start=293.15, + m_flow_small=pump.Qnom*995/3600*1e-2) + annotation (Placement(transformation(extent={{-90,-90},{-70,-70}}))); + + replaceable package Medium = Modelica.Media.Water.ConstantPropertyLiquidWater; + + PumpHeadControlled pump( + calculatePower=true, + calculateEfficiency=true, + redeclare package Medium = Medium, + pumpParam=DataBase.Pumps.PumpPolynomialBased.Pump_DN25_H1_6_V4(), + Qnom=1.45) annotation (Placement(transformation(extent={{-10,0},{10,20}}))); + + Modelica.Blocks.Sources.BooleanPulse PumpOn( + width=500/600*100, + period=600, + startTime=0) + annotation (Placement(transformation(extent={{-80,40},{-60,60}}))); + AixLib.Fluid.Actuators.Valves.SimpleValve simpleValve( + redeclare package Medium = Medium, + Kvs=6.3, + m_flow_start=system.m_flow_start, + m_flow_small=system.m_flow_small) + annotation (Placement(transformation(extent={{-20,-20},{-40,-40}}))); + + Modelica.Blocks.Sources.Ramp rampValvePosition( + offset=0.5, + height=-0.48, + duration(displayUnit="s") = 120, + startTime(displayUnit="min") = 120) + annotation (Placement(transformation(extent={{0,-70},{-20,-50}}))); + AixLib.Fluid.Sources.Boundary_pT vessle( + redeclare package Medium = Medium, + p=system.p_start, + T=system.T_start, + nPorts=2) annotation (Placement(transformation( + extent={{-10,-10},{10,10}}, + rotation=-90, + origin={-36,20}))); + Controls.CtrlDpVarH ctrlDpVarH(pumpParam= + DataBase.Pumps.PumpPolynomialBased.Pump_DN25_H1_6_V4()) + annotation (Placement(transformation(extent={{-10,26},{10,46}}))); + BaseClasses.PumpBus pumpControllerBus1 + annotation (Placement(transformation(extent={{-10,50},{10,70}}), + iconTransformation(extent={{-34,38},{-14,58}}))); +equation + connect(rampValvePosition.y, simpleValve.opening) + annotation (Line(points={{-21,-60},{-30,-60},{-30,-38}}, color={0,0,127})); + connect(simpleValve.port_b, vessle.ports[1]) annotation (Line(points={{-40, + -30},{-52,-30},{-52,10},{-34,10}}, color={0,127,255})); + connect(vessle.ports[2], pump.port_a) + annotation (Line(points={{-38,10},{-10,10}}, color={0,127,255})); + connect(pump.port_b, simpleValve.port_a) annotation (Line(points={{10,10},{48, + 10},{48,-30},{-20,-30}}, color={0,127,255})); + connect(pump.pumpBus, ctrlDpVarH.pumpBus) annotation (Line( + points={{0,20},{0,26}}, + color={255,204,51}, + thickness=0.5)); + connect(ctrlDpVarH.pumpControllerBus, pumpControllerBus1) annotation (Line( + points={{0,46},{0,60}}, + color={255,204,51}, + thickness=0.5), Text( + string="%second", + index=1, + extent={{-6,3},{-6,3}}, + horizontalAlignment=TextAlignment.Right)); + connect(PumpOn.y, pumpControllerBus1.onSet) annotation (Line(points={{-59,50}, + {-38,50},{-38,60.05},{0.05,60.05}}, color={255,0,255}), Text( + string="%second", + index=1, + extent={{6,3},{6,3}}, + horizontalAlignment=TextAlignment.Left)); + annotation ( + experiment(StopTime=600), + Documentation(revisions=" +Always make sure that the pump data (coefficient matrices, table of maxMin pump speed, etc.) suite your pump. You can use the test cases in Zugabe.Zugabe_DB.Pump.Examples to check that. Especially if you decide to use the simpler ABC coefficients c[2,0], c[1,1] and c[0,2] make sure that they yield similar results as the complete set of coefficients. Otherwise the result of pump head calculation will be (too) wrong and consequently, pump speed might be bound to its limits only.
+"), + __Dymola_Commands(file(ensureSimulated=true)= + "Resources/Scripts/Dymola/Fluid/Movers/PumpsPolynomialBased/Examples/PumpNdpVarControlTest.mos" + "Simulate and plot"), + Diagram(graphics={Text( + extent={{-82,94},{80,66}}, + lineColor={100,100,100}, + horizontalAlignment=TextAlignment.Left, + textString="* Tests PumpN model (speed controlled pump with controller block) +* Tests dp-var control (PumpN version, \"dynamic\" calculation) +* Tests system pressure drop change (ramp) +* Tests pump off-switch")})); +end PumpNdpVarControlTest; diff --git a/AixLib/Fluid/Movers/PumpsPolynomialBased/Examples/PumpSpeedControlledLimiterTest.mo b/AixLib/Fluid/Movers/PumpsPolynomialBased/Examples/PumpSpeedControlledLimiterTest.mo new file mode 100644 index 0000000000..e03603c968 --- /dev/null +++ b/AixLib/Fluid/Movers/PumpsPolynomialBased/Examples/PumpSpeedControlledLimiterTest.mo @@ -0,0 +1,107 @@ +within AixLib.Fluid.Movers.PumpsPolynomialBased.Examples; +model PumpSpeedControlledLimiterTest + "Testing the pump speed algorithm with the new \"one record\" pump model that bounds speed instead of pump head." + extends Modelica.Icons.Example; + inner Modelica.Fluid.System system( + p_ambient=300000, + T_ambient=293.15, + m_flow_start=pump.m_flow_start, + T_start=293.15, + m_flow_small=pump.m_flow_start*1e-2) + annotation (Placement(transformation(extent={{-90,-90},{-70,-70}}))); + + replaceable package Medium = Modelica.Media.Water.ConstantPropertyLiquidWater; + + PumpSpeedControlled pump( + calculatePower=true, + calculateEfficiency=true, + redeclare function efficiencyCharacteristic = + AixLib.Fluid.Movers.PumpsPolynomialBased.BaseClasses.efficiencyCharacteristic.Wilo_Formula_efficiency, + redeclare package Medium = Medium, + pumpParam=DataBase.Pumps.PumpPolynomialBased.Pump_DN25_H1_6_V4()) + annotation (Placement(transformation(extent={{-10,0},{10,20}}))); + + AixLib.Fluid.Movers.PumpsPolynomialBased.BaseClasses.PumpBus pumpBus + annotation (Placement(transformation(extent={{-10,30},{10,50}}))); + Modelica.Blocks.Sources.BooleanConstant PumpOn + annotation (Placement(transformation(extent={{-70,30},{-50,50}}))); + Modelica.Blocks.Sources.CombiTimeTable tablePumpSpeed( + startTime(displayUnit="s"), + extrapolation=Modelica.Blocks.Types.Extrapolation.Periodic, + table=[0.0,pump.pumpParam.nMin*0.75; 30,pump.pumpParam.nMin*0.75; 60,pump.pumpParam.nMax + *1.25; 90,pump.pumpParam.nMax*1.25; 120,pump.pumpParam.nMin*0.75; 150, + pump.pumpParam.nMin*0.75]) + annotation (Placement(transformation(extent={{46,30},{26,50}}))); + AixLib.Fluid.Actuators.Valves.SimpleValve simpleValve( + redeclare package Medium = Medium, + Kvs=system.m_flow_nominal*3600/995/sqrt(system.g*pump.Hnom/1e5*1000), + m_flow_start=system.m_flow_start, + m_flow_small=system.m_flow_small, + dp_start=pump.p_b_start - pump.p_a_start) + annotation (Placement(transformation(extent={{-20,-20},{-40,-40}}))); + + Modelica.Blocks.Sources.CombiTimeTable tableValvePosition( + extrapolation=Modelica.Blocks.Types.Extrapolation.Periodic, + startTime(displayUnit="s"), + table=[0,0.75; 10,0.75; 20,0.02; 30,0.02; 40,0.75; 50,0.75]) + annotation (Placement(transformation(extent={{0,-72},{-20,-52}}))); + AixLib.Fluid.Sources.Boundary_pT vessle( + redeclare package Medium = Medium, + p=system.p_start, + T=system.T_start, + nPorts=2) annotation (Placement(transformation( + extent={{-10,-10},{10,10}}, + rotation=-90, + origin={-36,20}))); +equation + connect(pumpBus, pump.pumpBus) annotation (Line( + points={{0,40},{0,20}}, + color={255,204,51}, + thickness=0.5), Text( + string="%first", + index=-1, + extent={{-6,3},{-6,3}})); + connect(PumpOn.y, pumpBus.onSet) annotation (Line(points={{-49,40},{-28,40},{ + -28,40},{-14,40},{-14,40.05},{0.05,40.05}}, color={255,0,255}), Text( + string="%second", + index=2, + extent={{6,3},{6,3}})); + connect(simpleValve.port_b, vessle.ports[1]) annotation (Line(points={{-40,-30}, + {-52,-30},{-52,10},{-34,10}}, color={0,127,255})); + connect(vessle.ports[2], pump.port_a) + annotation (Line(points={{-38,10},{-10,10}}, color={0,127,255})); + connect(pump.port_b, simpleValve.port_a) annotation (Line(points={{10,10},{48, + 10},{48,-30},{-20,-30}}, color={0,127,255})); + connect(tableValvePosition.y[1], simpleValve.opening) + annotation (Line(points={{-21,-62},{-30,-62},{-30,-38}}, color={0,0,127})); + connect(tablePumpSpeed.y[1], pumpBus.rpmSet) annotation (Line(points={{25,40}, + {12,40},{12,40.05},{0.05,40.05}}, color={0,0,127}), Text( + string="%second", + index=2, + extent={{6,3},{6,3}})); + annotation ( + experiment(StopTime=200), + Documentation(revisions=" +Tests the pump model with single parameter record that also uses the limitiation of the pump speed (pumpParam.maxMinSpeedCurves) instead of the pump head limitation (maxMinHead).
+"), + __Dymola_Commands(file(ensureSimulated=true)= + "Resources/Scripts/Dymola/Fluid/Movers/PumpsPolynomialBased/Examples/PumpSpeedControlledLimiterTest.mos" + "Simulate and plot"), + Diagram(graphics={Text( + extent={{-82,94},{80,66}}, + lineColor={100,100,100}, + horizontalAlignment=TextAlignment.Left, + textString="* Tests PumpPhysicsN model (speed control) +* Tests pump speed change (table) +* Tests speed bounding function (n > nMax, n < nMin) +* Tests system pressure drop change (table)")})); +end PumpSpeedControlledLimiterTest; diff --git a/AixLib/Fluid/Movers/PumpsPolynomialBased/Examples/PumpSpeedControlledTest.mo b/AixLib/Fluid/Movers/PumpsPolynomialBased/Examples/PumpSpeedControlledTest.mo new file mode 100644 index 0000000000..e1df9a8606 --- /dev/null +++ b/AixLib/Fluid/Movers/PumpsPolynomialBased/Examples/PumpSpeedControlledTest.mo @@ -0,0 +1,108 @@ +within AixLib.Fluid.Movers.PumpsPolynomialBased.Examples; +model PumpSpeedControlledTest + "Testing the pump speed algorithm with the new \"one record\" pump model." + extends Modelica.Icons.Example; + inner Modelica.Fluid.System system( + m_flow_small=pump.Qnom*995/3600*1e-2, + m_flow_start=pump.m_flow_start, + p_ambient=300000, + T_ambient=293.15, + allowFlowReversal=true, + T_start=293.15) + annotation (Placement(transformation(extent={{-90,-90},{-70,-70}}))); + + replaceable package Medium = Modelica.Media.Water.ConstantPropertyLiquidWater; + + PumpSpeedControlled pump( + pumpParam=DataBase.Pumps.PumpPolynomialBased.Pump_DN25_H1_6_V4(), + calculatePower=true, + calculateEfficiency=true, + redeclare function efficiencyCharacteristic = + AixLib.Fluid.Movers.PumpsPolynomialBased.BaseClasses.efficiencyCharacteristic.Wilo_Formula_efficiency, + redeclare package Medium = Medium, + T_start=system.T_start) + annotation (Placement(transformation(extent={{-10,0},{10,20}}))); + + AixLib.Fluid.Movers.PumpsPolynomialBased.BaseClasses.PumpBus pumpBus + annotation (Placement(transformation(extent={{-10,30},{10,50}}))); + Modelica.Blocks.Sources.BooleanPulse PumpOn(period=600, width=500/600*100) + annotation (Placement(transformation(extent={{-70,30},{-50,50}}))); + Modelica.Blocks.Sources.Ramp rampPumpSpeed( + height=pump.pumpParam.nMax - pump.pumpParam.nMin, + offset=pump.pumpParam.nMin, + duration(displayUnit="s") = 100, + startTime(displayUnit="s") = 100) + annotation (Placement(transformation(extent={{46,30},{26,50}}))); + AixLib.Fluid.Actuators.Valves.SimpleValve simpleValve( + redeclare package Medium = Medium, + Kvs=system.m_flow_nominal*3600/995/sqrt(system.g*pump.Hnom/1e5*1000), + m_flow_start=system.m_flow_start, + m_flow_small=system.m_flow_small, + dp_start=pump.p_b_start - pump.p_a_start) + annotation (Placement(transformation(extent={{-20,-20},{-40,-40}}))); + + Modelica.Blocks.Sources.Ramp rampValvePosition( + offset=0.5, + height=-0.48, + duration(displayUnit="s") = 100, + startTime(displayUnit="s") = 300) + annotation (Placement(transformation(extent={{0,-70},{-20,-50}}))); + AixLib.Fluid.Sources.Boundary_pT vessle( + redeclare package Medium = Medium, + p=system.p_start, + T=system.T_start, + nPorts=2) annotation (Placement(transformation( + extent={{-10,-10},{10,10}}, + rotation=-90, + origin={-36,20}))); +equation + connect(pumpBus, pump.pumpBus) annotation (Line( + points={{0,40},{0,20}}, + color={255,204,51}, + thickness=0.5), Text( + string="%first", + index=-1, + extent={{-6,3},{-6,3}})); + connect(PumpOn.y, pumpBus.onSet) annotation (Line(points={{-49,40},{-28,40},{ + -28,40},{-14,40},{-14,40.05},{0.05,40.05}}, color={255,0,255}), Text( + string="%second", + index=2, + extent={{6,3},{6,3}})); + connect(rampPumpSpeed.y, pumpBus.rpmSet) annotation (Line(points={{25,40},{ + 0.05,40},{0.05,40.05}}, color={0,0,127}), Text( + string="%second", + index=2, + extent={{6,3},{6,3}})); + connect(rampValvePosition.y, simpleValve.opening) + annotation (Line(points={{-21,-60},{-30,-60},{-30,-38}}, color={0,0,127})); + connect(simpleValve.port_b, vessle.ports[1]) annotation (Line(points={{-40,-30}, + {-52,-30},{-52,10},{-34,10}}, color={0,127,255})); + connect(vessle.ports[2], pump.port_a) + annotation (Line(points={{-38,10},{-10,10}}, color={0,127,255})); + connect(pump.port_b, simpleValve.port_a) annotation (Line(points={{10,10},{48, + 10},{48,-30},{-20,-30}}, color={0,127,255})); + annotation ( + experiment(StopTime=600), + Documentation(revisions=" +Simple model for a pump that sets pump speed (headUnbound) and can compute pump power and efficiency from polynomial functions. Pump speed (n) will be calculated from volume flow rate and pump head n=f(Q,H). Pump head (pressure difference in meter water column) is limited by pumpParam.maxMinHeight. This is used in 2Dtable maxMinTable. Those curves are normally derived from an electronic power limitation of a pump.
+The pump can be switched on/off by a boolean input (pumpBus.onOff_Input, TRUE = On). The switch between on and off is not filtered.
+The pump must be controlled by setting the pump head (pumpBus.dp_Input). dp_Input must be given in meter water column. This is an idealized pump that can maintain the given pump pressure difference at all times. The hydraulic network's pressure difference will then determine the resulting volume flow. The idealized calculation in this model maybe advantegous in terms of speed in comparison to the red pump that will compute pressure head from volume flow rate and pump speed via polynomial functions. To make the two pumps exchangeable also the controllers must be exchangeable.
+The power and the efficiency of the pump can be calculated, with the help of polynomial aproximations. Only use them if you have correct / complete data about the pump. The efficiency calculation depends on pump power. Pump power depends on correct pump speed. Therefore, in this model, the pump speed (n) will be approximated from volume flow rate (v_dot_m3_h) and pump head (head) using the inverse of the ABC formula. Only for this simple case of a quadratic polynomial the equation H=f(Q,N) can be inverted to the form N=f(Q,H). If you use more coefficients in the polynomial (cHQN) the inversion makes no sense and the calculated pump speed will probably be wrong leading to a useless power usage assumption. Therefore, an assertion will check if parameter 'calculatePower' was set true but the corresponding coefficients in pumpParam.cHQN ([3,1], [2,2] and [1,3]) are all zero OR if there are more than those 3 coefficients defined in cHQN.
+See the examples under package "Examples".
+Qnom, the nominal or design volume flow rate of the pump, is given in m³/h and should be selected by the engineer. A good default value would be 67 % of Qmax .The default value, however, is set to 0.5*max(pumpParam.maxMinSpeedCurves[:, 1]). max(pumpParam.maxMinSpeedCurves[:, 1]) is the maximum value found in column 1 of table maxMinSpeedCurves. This however, is more than the real maximum volume flow rate of the pump as the the table is extended by additional rows for proper extrapolation of table values. In order to compensate for this excess value Qnom is by default only at 50 % of the maxMinSpeedCurves value. Please refer to the referenceDataQHPN matrix to find the real Qmax value. A simple alternative for the given assumption could be to introduce a parameter Qmax in the pump record that contains the exact value.
+The start speed of the pump will be determined from interpolation in the maxMinSpeedCurves table, providing the maximum speed possible at a given volume flow rate:
+Nstart = Modelica.Math.Vectors.interpolate(x=pumpParam.maxMinSpeedCurves[:,1], y=pumpParam.maxMinSpeedCurves[:,2], xi=Qstart)
+Note assumptions such as a specific definition ranges for the model, possible medium models, allowed combinations with other models etc. There might be limitations of the model such as reduced accuracy under specific circumstances. Please note all those limitations you know of so a potential user won't make too serious mistakes
+Describe which states and dynamics are present in the model and which parameters may be used to influence them. This need not be added in partial classes.
+Describe whether the validation was done using analytical validation, comparative model validation or empirical validation.
+", revisions=" +Simple model for a pump that uses polynomial functions to calculate pump head (headUnbound), power, efficiency. Pump speed (n) will be given by the pumpBus.rpm_Input variable. The variableLimiter will limit n to the maximum and minimum value of speed (which depends upon current volume flow rate). Pump speed is limited by pumpParam.nMin, pumpParam.nMax as well as a maximum (and minimum) pump speed curve (pumpParam.maxMinSpeedCurves). Those curves are normally derived from an electronic power limitation of a pump.
+The pump can be switched on/off by a boolean input (pumpBus.onOff_Input, TRUE = On). The switch between on and off is not filtered.
+The pump must be controlled by setting the pump speed (pumpBus.rpm_Input).
+The power and the efficiency of the pump can be calculated, with the help of polynomial aproximations. Only use them if you have correct / complete data about the pump.
+
See the examples under package "Examples".
Qnom, the nominal or design volume flow rate of the pump, is given in m³/h and should be selected by the engineer. A good default value would be 67 % of Qmax .The default value, however, is set to 0.5*max(pumpParam.maxMinSpeedCurves[:, 1]). max(pumpParam.maxMinSpeedCurves[:, 1]) is the maximum value found in column 1 of table maxMinSpeedCurves. This however, is more than the real maximum volume flow rate of the pump as the the table is extended by additional rows for proper extrapolation of table values. In order to compensate for this excess value Qnom is by default only at 50 5 of the maxMinSpeedCurves value. Please refer to the referenceDataQHPN matrix to find the real Qmax value. A simple alternative for the given assumption could be to introduce a parameter Qmax in the pump record that contains the exact value.
+The start speed of the pump will be determined from interpolation in the maxMinSpeedCurves table, providing the maximum speed possible at a given volume flow rate:
+Nstart = Modelica.Math.Vectors.interpolate(x=pumpParam.maxMinSpeedCurves[:,1], y=pumpParam.maxMinSpeedCurves[:,2], xi=Qstart)
+Note assumptions such as a specific definition ranges for the model, possible medium models, allowed combinations with other models etc. There might be limitations of the model such as reduced accuracy under specific circumstances. Please note all those limitations you know of so a potential user won't make too serious mistakes
+Describe which states and dynamics are present in the model and which parameters may be used to influence them. This need not be added in partial classes.
+Describe whether the validation was done using analytical validation, comparative model validation or empirical validation.
+", +revisions=" +This packages contains pump models with a different, not so sophisitcated, mathematical approach than the original IBPSA models in Fluid.Movers.
+The models PumpSpeedControlled and PumpHeadControlled were developed in the Zugabe project at the E.ON Energy Research Center. The main advantage to users might be
+Using measurement or catalogue data of volume flow rate (m³/h), pump head (m), rotational speed set (rpm) and rotational speed act (rpm) a python script will generate a record with all necessary parameters for the model. Documentation with a visualization of the respective pump curves is included in the record.
+In order to limit the pump's power consumption manufacturer normally will reduce the allowed pump speed for large volume flow rates, hence deforming the pump curves. This model takes the limitation into account based on the available catalogue or measurement data. Note that a design engineer normally only has catalogue data at his command.
+This package is currently work in progress.
+port(redeclare package Medium=Medium, m_flow(min=0, max=0))
diff --git a/AixLib/Fluid/Sensors/Conversions/Examples/To_VolumeFraction.mo b/AixLib/Fluid/Sensors/Conversions/Examples/To_VolumeFraction.mo
index 4755135832..371f89e456 100644
--- a/AixLib/Fluid/Sensors/Conversions/Examples/To_VolumeFraction.mo
+++ b/AixLib/Fluid/Sensors/Conversions/Examples/To_VolumeFraction.mo
@@ -42,20 +42,13 @@ model To_VolumeFraction "Example problem for conversion model"
C={300E-6}*44.009544/28.9651159,
nPorts=1) "Source of fresh air with 300 PPM CO2"
annotation (Placement(transformation(extent={{-20,-20},{0,0}})));
- AixLib.Fluid.Sources.FixedBoundary sin(
- redeclare package Medium = Medium,
- p=100000,
- C={300E-6}*44.009544/28.9651159,
- nPorts=1) "Sink for exhaust air" annotation (
- Placement(transformation(
- extent={{10,-10},{-10,10}},
- origin={170,40})));
Modelica.Blocks.Math.Gain gai(k=50/3600) "Gain for mass flow rate"
annotation (Placement(transformation(extent={{-60,-20},{-40,0}})));
Modelica.Blocks.Sources.Constant nPeo(k=1) "Number of people"
annotation (Placement(transformation(extent={{-100,60},{-80,80}})));
- AixLib.Fluid.Sensors.VolumeFlowRate senVolFlo(redeclare package Medium =
- Medium, m_flow_nominal=0.1)
+ AixLib.Fluid.Sensors.VolumeFlowRate senVolFlo(
+ redeclare package Medium = Medium,
+ m_flow_nominal=0.1)
annotation (Placement(transformation(extent={{20,-20},{40,0}})));
Modelica.Blocks.Math.Gain norSet(k=1/1000E-6)
"Normalization for set point (to scale control input)"
@@ -67,26 +60,31 @@ model To_VolumeFraction "Example problem for conversion model"
"Conversion from m3/s to m3/h"
annotation (Placement(transformation(extent={{40,20},{60,40}})));
AixLib.Fluid.Sensors.TraceSubstancesTwoPort senTraSubPeo(m_flow_nominal=0.1,
- redeclare package Medium = Medium,
+ redeclare package Medium = Medium,
C_start=0,
initType=Modelica.Blocks.Types.Init.InitialState)
"CO2 concentration in absorptance from people"
annotation (Placement(transformation(extent={{40,60},{60,80}})));
AixLib.Fluid.Sensors.TraceSubstancesTwoPort senTraSubFre(m_flow_nominal=0.1,
- redeclare package Medium = Medium,
+ redeclare package Medium = Medium,
C_start=0,
initType=Modelica.Blocks.Types.Init.InitialState)
"CO2 concentration in fresh air supply"
annotation (Placement(transformation(extent={{60,-20},{80,0}})));
-
AixLib.Fluid.FixedResistances.PressureDrop res(
redeclare package Medium = Medium,
dp_nominal=10,
m_flow_nominal=50/3600)
"Pressure drop to decouple the state of the volume from the state of the boundary condition"
annotation (Placement(transformation(extent={{122,30},{142,50}})));
-equation
+ AixLib.Fluid.Sources.Boundary_pT sin(
+ redeclare package Medium = Medium,
+ C={300E-6}*44.009544/28.9651159,
+ p=100000,
+ nPorts=1) "Sink for exhaust air"
+ annotation (Placement(transformation(extent={{180,30},{160,50}})));
+equation
connect(souCO2.m_flow_in, CO2Per.y) annotation (Line(
points={{-22.1,70},{-39,70}},
color={0,0,127}));
@@ -138,9 +136,8 @@ equation
connect(vol.ports[4], res.port_a) annotation (Line(
points={{103,60},{102,60},{102,38},{122,38},{122,40}},
color={0,127,255}));
- connect(res.port_b, sin.ports[1]) annotation (Line(
- points={{142,40},{160,40}},
- color={0,127,255}));
+ connect(sin.ports[1], res.port_b)
+ annotation (Line(points={{160,40},{142,40}}, color={0,127,255}));
annotation (
experiment(Tolerance=1e-8, StopTime=36000),
__Dymola_Commands(file="modelica://AixLib/Resources/Scripts/Dymola/Fluid/Sensors/Conversions/Examples/To_VolumeFraction.mos"
@@ -157,6 +154,11 @@ the setpoint, which does not comply with ASHRAE regulations.
", revisions="
+This is a model of modular sensors that is used, for example, for components
+of modular heat pumps like modular expansion valves or modular compressors.
+It consists of four types of sensors that are introduced as vectors and that
+are mainly used in heat pumps:
+
Pressure
to PressureDifference.
diff --git a/AixLib/Fluid/Sensors/RelativeTemperature.mo b/AixLib/Fluid/Sensors/RelativeTemperature.mo
index dfec67356a..8554f904c3 100644
--- a/AixLib/Fluid/Sensors/RelativeTemperature.mo
+++ b/AixLib/Fluid/Sensors/RelativeTemperature.mo
@@ -2,8 +2,15 @@ within AixLib.Fluid.Sensors;
model RelativeTemperature "Ideal relative temperature sensor"
extends Modelica.Icons.TranslationalSensor;
replaceable package Medium =
- Modelica.Media.Interfaces.PartialMedium "Medium in the sensor" annotation (
- choicesAllMatching = true);
+ Modelica.Media.Interfaces.PartialMedium "Medium in the sensor"
+ annotation (choices(
+ choice(redeclare package Medium = AixLib.Media.Air "Moist air"),
+ choice(redeclare package Medium = AixLib.Media.Water "Water"),
+ choice(redeclare package Medium =
+ AixLib.Media.Antifreeze.PropyleneGlycolWater (
+ property_T=293.15,
+ X_a=0.40)
+ "Propylene glycol water, 40% mass fraction")));
Modelica.Fluid.Interfaces.FluidPort_a port_a(m_flow(min=0),
p(start=Medium.p_default),
redeclare package Medium = Medium)
@@ -79,6 +86,11 @@ AixLib.Fluid.Sensors.UsersGuide for an explanation.
revisions="
Modelica.Fluid.
X_in_internal = zeros() to be X_in_internal = ones().
This is for
diff --git a/AixLib/Fluid/Sources/BaseClasses/PartialSource.mo b/AixLib/Fluid/Sources/BaseClasses/PartialSource.mo
index 1c02074106..8170cd404b 100644
--- a/AixLib/Fluid/Sources/BaseClasses/PartialSource.mo
+++ b/AixLib/Fluid/Sources/BaseClasses/PartialSource.mo
@@ -3,14 +3,20 @@ partial model PartialSource
"Partial component source with one fluid connector"
replaceable package Medium =
- Modelica.Media.Interfaces.PartialMedium
- "Medium model within the source"
- annotation (choicesAllMatching=true);
+ Modelica.Media.Interfaces.PartialMedium "Medium in the component"
+ annotation (choices(
+ choice(redeclare package Medium = AixLib.Media.Air "Moist air"),
+ choice(redeclare package Medium = AixLib.Media.Water "Water"),
+ choice(redeclare package Medium =
+ AixLib.Media.Antifreeze.PropyleneGlycolWater (
+ property_T=293.15,
+ X_a=0.40)
+ "Propylene glycol water, 40% mass fraction")));
parameter Integer nPorts=0 "Number of ports" annotation(Dialog(connectorSizing=true));
parameter Boolean verifyInputs = false
"Set to true to stop the simulation with an error if the medium temperature is outside its allowable range"
- annotation(Dialog(tab="Advanced"));
+ annotation(Evaluate=true, Dialog(tab="Advanced"));
Modelica.Fluid.Interfaces.FluidPorts_b ports[nPorts](
redeclare each package Medium = Medium,
@@ -73,6 +79,11 @@ If the temperature is outside these bounds, the simulation will stop with an err
", revisions="
-Partial model that defines
-ports.h_outflow using an optional input for
-the temperature.
-Otherwise the parameter value is used.
-
Xi_in.
This is for
diff --git a/AixLib/Fluid/Sources/BaseClasses/PartialSource_h.mo b/AixLib/Fluid/Sources/BaseClasses/PartialSource_h.mo
deleted file mode 100644
index bb85654df7..0000000000
--- a/AixLib/Fluid/Sources/BaseClasses/PartialSource_h.mo
+++ /dev/null
@@ -1,54 +0,0 @@
-within AixLib.Fluid.Sources.BaseClasses;
-model PartialSource_h "Boundary with prescribed enthalpy"
- extends AixLib.Fluid.Sources.BaseClasses.PartialSource;
- parameter Boolean use_h_in= false
- "Get the specific enthalpy from the input connector"
- annotation(Evaluate=true, HideResult=true, Dialog(group="Conditional inputs"));
- parameter Medium.SpecificEnthalpy h = Medium.h_default
- "Fixed value of specific enthalpy"
- annotation (Dialog(enable = not use_h_in, group="Fixed inputs"));
- Modelica.Blocks.Interfaces.RealInput h_in(final unit="J/kg") if use_h_in
- "Prescribed boundary specific enthalpy"
- annotation (Placement(transformation(extent={{-140,20},{-100,60}})));
-protected
- Modelica.Blocks.Interfaces.RealInput h_in_internal(final unit="J/kg")
- "Needed to connect to conditional connector";
-
-equation
- connect(h_in, h_in_internal);
- if not use_h_in then
- h_in_internal = h;
- end if;
- for i in 1:nPorts loop
- ports[i].h_outflow = h_in_internal;
- end for;
- connect(medium.h, h_in_internal);
- annotation (
- Documentation(info="
-
-Partial model that defines
-ports.h_outflow using an optional input for
-the specific enthalpy.
-Otherwise the parameter value is used.
-
-Partial model that defines the sum of
-ports.m_flow using an optional input for
-the total mass flow rate.
-All port pressures are assumed equal.
-Otherwise the parameter value is used.
-
-Partial model that defines
-ports.p using an optional input for
-the pressure.
-Otherwise the parameter value is used.
-
@@ -54,6 +130,21 @@ with exception of boundary pressure, do not have an effect. revisions="
p and p_in.medium conditional and refactored inputs.
See #882.
@@ -79,5 +170,28 @@ First implementation.
Implementation is based on Modelica.Fluid.
@@ -54,6 +125,21 @@ with exception of boundary pressure, do not have an effect. revisions="
p and p_in.medium conditional and refactored inputs.
See #882.
@@ -79,5 +165,28 @@ First implementation.
Implementation is based on Modelica.Fluid.
@@ -53,6 +105,11 @@ with exception of boundary flow rate, do not have an effect. revisions="
medium conditional and refactored inputs.
See #882.
@@ -73,5 +130,50 @@ September 29, 2009, by Michael Wetter:Models an ideal flow source, with prescribed values of flow rate and trace @@ -179,6 +187,18 @@ with exception of boundary flow rate, do not have an effect. revisions="
@@ -78,5 +126,50 @@ First implementation.
Implemenation is based on Modelica.Fluid.
The wind pressure coefficient is computed based on the @@ -124,7 +129,7 @@ Cape Canaveral, Florida.
C_in_internal to avoid an initial algorithm section.unit and quantity attributes.
+System model used to test the boundary conditions for different media. +This model has been introduced to get access to the medium mass fraction, +which is a protected variable in + +AixLib.Fluid.Sources.Boundary_pT. +Therefore, this model has been created so that the boundary model has a port which +is used to access the mass fraction. +
+", revisions=" +
+System model used to test the boundary conditions for different media
+with prescribed mass fraction X.
+
+System model used to test the boundary conditions for different media
+with independent prescribed mass fraction Xi.
+
+This package contains base classes that are used to construct the models in + +AixLib.Fluid.Sources.Validation. +
+")); +end BaseClasses; diff --git a/AixLib/Fluid/Sources/Validation/BaseClasses/package.order b/AixLib/Fluid/Sources/Validation/BaseClasses/package.order new file mode 100644 index 0000000000..7084eb6024 --- /dev/null +++ b/AixLib/Fluid/Sources/Validation/BaseClasses/package.order @@ -0,0 +1,3 @@ +BoundarySystem +BoundarySystemWithX_in +BoundarySystemWithXi_in diff --git a/AixLib/Fluid/Sources/Validation/Boundary.mo b/AixLib/Fluid/Sources/Validation/Boundary.mo new file mode 100644 index 0000000000..c6e07f384c --- /dev/null +++ b/AixLib/Fluid/Sources/Validation/Boundary.mo @@ -0,0 +1,62 @@ +within AixLib.Fluid.Sources.Validation; +model Boundary "Validation model for boundary with different media" + extends Modelica.Icons.Example; + + AixLib.Fluid.Sources.Validation.BaseClasses.BoundarySystem bouWat( + redeclare package Medium = AixLib.Media.Water) + "Boundary with water" + annotation (Placement(transformation(extent={{-60,60},{-40,80}}))); + AixLib.Fluid.Sources.Validation.BaseClasses.BoundarySystem bouProGly( + redeclare package Medium = Media.Antifreeze.PropyleneGlycolWater(property_T=293.15, X_a=0.40)) + "Boundary with propylene glycol" + annotation (Placement(transformation(extent={{-60,30},{-40,50}}))); + + AixLib.Fluid.Sources.Validation.BaseClasses.BoundarySystem bouMoiAir( + redeclare package Medium = AixLib.Media.Air) + "Boundary with moist air" + annotation (Placement(transformation(extent={{20,60},{40,80}}))); + AixLib.Fluid.Sources.Validation.BaseClasses.BoundarySystem bouMoiAirCO2( + redeclare package Medium = AixLib.Media.Air(extraPropertiesNames={"CO2"})) + "Boundary with moist air" + annotation (Placement(transformation(extent={{20,30},{40,50}}))); + AixLib.Fluid.Sources.Validation.BaseClasses.BoundarySystem bouProFluGas( + redeclare package Medium = + Modelica.Media.IdealGases.MixtureGases.FlueGasSixComponents) + "Boundary with flue gas" + annotation (Placement(transformation(extent={{20,0},{40,20}}))); + + AixLib.Fluid.Sources.Validation.BaseClasses.BoundarySystem bouNatGas( + redeclare package Medium = + Modelica.Media.IdealGases.MixtureGases.SimpleNaturalGas) + "Boundary with natural gas" + annotation (Placement(transformation(extent={{20,-30},{40,-10}}))); + + AixLib.Fluid.Sources.Validation.BaseClasses.BoundarySystem bouNatGasFix( + redeclare package Medium = + Modelica.Media.IdealGases.MixtureGases.SimpleNaturalGasFixedComposition) + "Boundary with natural gas" + annotation (Placement(transformation(extent={{20,-60},{40,-40}}))); + + annotation (Documentation(info=" ++Validation model for +AixLib.Fluid.Sources.Boundary_pT +for different media. +
+", revisions=" +
+Validation model for
+AixLib.Fluid.Sources.Boundary_pT
+for different media and with mass fraction X prescribed by an input.
+
+Validation model for
+AixLib.Fluid.Sources.Boundary_pT
+for different media and with independent mass fraction Xi prescribed by an input.
+
+This package contains validation models for the classes in + +AixLib.Fluid.Sources. +
++Note that most validation models contain simple input data +which may not be realistic, but for which the correct +output can be obtained through an analytic solution. +The examples plot various outputs, which have been verified against these +solutions. These model outputs are stored as reference data and +used for continuous validation whenever models in the library change. +
+")); +end Validation; diff --git a/AixLib/Fluid/Sources/Validation/package.order b/AixLib/Fluid/Sources/Validation/package.order new file mode 100644 index 0000000000..e3f1a62e5e --- /dev/null +++ b/AixLib/Fluid/Sources/Validation/package.order @@ -0,0 +1,4 @@ +Boundary +BoundaryWithX_in +BoundaryWithXi_in +BaseClasses diff --git a/AixLib/Fluid/Sources/package.order b/AixLib/Fluid/Sources/package.order index 141c28efd1..5754ab5bd1 100644 --- a/AixLib/Fluid/Sources/package.order +++ b/AixLib/Fluid/Sources/package.order @@ -1,6 +1,5 @@ Boundary_pT Boundary_ph -FixedBoundary MassFlowSource_T MassFlowSource_WeatherData MassFlowSource_h @@ -10,4 +9,5 @@ PropertySource_T PropertySource_h TraceSubstancesFlowSource Examples +Validation BaseClasses diff --git a/AixLib/Fluid/Storage/BaseClasses/HeatingCoil.mo b/AixLib/Fluid/Storage/BaseClasses/HeatingCoil.mo index 7a2db24bf7..8dfd1c7f9b 100644 --- a/AixLib/Fluid/Storage/BaseClasses/HeatingCoil.mo +++ b/AixLib/Fluid/Storage/BaseClasses/HeatingCoil.mo @@ -6,8 +6,7 @@ model HeatingCoil "Heating coil for heat storage model" parameter Modelica.SIunits.Length lengthHC = 3 "Length of Pipe for HC"; - parameter Modelica.SIunits.CoefficientOfHeatTransfer alphaHC=20 - "Model assumptions Coefficient of Heat Transfer HC <-> Heating Water"; + parameter Modelica.SIunits.CoefficientOfHeatTransfer hConHC=20 "Model assumptions heat transfer coefficient HC <-> Heating Water"; parameter Modelica.SIunits.Temperature TStart=298.15 "Start Temperature of fluid" annotation(Dialog(group = "Initialization")); @@ -27,13 +26,12 @@ model HeatingCoil "Heating coil for heat storage model" extent={{-6,-6},{6,6}}, rotation=0, origin={-4,26}))); - AixLib.Utilities.HeatTransfer.HeatConv convHC1Outside[disHC](each alpha= - alphaHC, A=fill(pipeHC.d_o*Modelica.Constants.pi*lengthHC/disHC, - disHC)) - "Outer heat convection" annotation (Placement(transformation( - extent={{-6,-6},{6,6}}, - rotation=270, - origin={-4,52}))); + AixLib.Utilities.HeatTransfer.HeatConv convHC1Outside[disHC](each hCon=hConHC, A=fill(pipeHC.d_o*Modelica.Constants.pi*lengthHC/disHC, + disHC)) "Outer heat convection" + annotation (Placement(transformation( + extent={{-6,-6},{6,6}}, + rotation=270, + origin={-4,52}))); Modelica.Thermal.HeatTransfer.Interfaces.HeatPort_a Therm1[disHC] "Vectorized heat port" annotation (Placement(transformation(extent={{-14,94},{6,114}}))); diff --git a/AixLib/Fluid/Storage/BaseClasses/PartialStratified.mo b/AixLib/Fluid/Storage/BaseClasses/PartialStratified.mo index 9228d6e2d9..d526260fd6 100644 --- a/AixLib/Fluid/Storage/BaseClasses/PartialStratified.mo +++ b/AixLib/Fluid/Storage/BaseClasses/PartialStratified.mo @@ -28,6 +28,9 @@ model PartialStratified parameter Medium.Temperature T_start=Medium.T_default "Start value of temperature" annotation(Dialog(tab = "Initialization")); + parameter Modelica.SIunits.Temperature TFlu_start[nSeg]=T_start*ones(nSeg) + "Initial temperature of the tank segments, with TFlu_start[1] being the top segment" + annotation(Dialog(tab = "Initialization")); parameter Medium.MassFraction X_start[Medium.nX] = Medium.X_default "Start value of mass fractions m_i/m" annotation (Dialog(tab="Initialization", enable=Medium.nXi > 0)); @@ -67,7 +70,7 @@ model PartialStratified each energyDynamics=energyDynamics, each massDynamics=massDynamics, each p_start=p_start, - each T_start=T_start, + T_start=TFlu_start, each X_start=X_start, each C_start=C_start, each V=VTan/nSeg, @@ -205,6 +208,14 @@ AixLib.Fluid.Storage.BaseClasses.ThirdOrderStratifier. ", revisions="TFlu_start and changed the initial tank segments
+temperature to TFlu_start so each segment could have different
+temperature.
+This is for
+#1246.
+Note that alternatively, the model - -AixLib.Fluid.Sources.FixedBoundary may be used to set + +AixLib.Fluid.Sources.Boundary_pT may be used to set a reference pressure. The main difference between these two models is that in this model, there is an energy and mass balance for the volume. In contrast, for - -AixLib.Fluid.Sources.FixedBoundary, + +AixLib.Fluid.Sources.Boundary_pT, any mass flow rate that flows out of the model will be at a user-specified temperature. -Therefore, -AixLib.Fluid.Sources.FixedBoundary leads to smaller systems +Therefore, +AixLib.Fluid.Sources.Boundary_pT leads to smaller systems of equations, which may result in faster simulation.
", revisions=" diff --git a/AixLib/Fluid/Storage/Storage.mo b/AixLib/Fluid/Storage/Storage.mo index aff7d8340b..e7c5dc35dd 100644 --- a/AixLib/Fluid/Storage/Storage.mo +++ b/AixLib/Fluid/Storage/Storage.mo @@ -11,10 +11,8 @@ model Storage parameter Modelica.SIunits.ThermalConductivity lambda_ins "thermal conductivity of insulation" annotation(Dialog(group = "Heat losses")); parameter Modelica.SIunits.Length s_ins "thickness of insulation" annotation(Dialog(group = "Heat losses")); - parameter Modelica.SIunits.CoefficientOfHeatTransfer alpha_in - "internal heat transfer coefficient" annotation(Dialog(group = "Heat losses")); - parameter Modelica.SIunits.CoefficientOfHeatTransfer alpha_out - "external heat transfer coefficient" annotation(Dialog(group = "Heat losses")); + parameter Modelica.SIunits.CoefficientOfHeatTransfer hConIn "Iinternal heat transfer coefficient" annotation(Dialog(group="Heat losses")); + parameter Modelica.SIunits.CoefficientOfHeatTransfer hConOut "External heat transfer coefficient" annotation(Dialog(group="Heat losses")); parameter Modelica.SIunits.Volume V_HE "heat exchanger volume" annotation(Dialog(group = "Heat exchanger")); parameter Modelica.SIunits.CoefficientOfHeatTransfer k_HE "heat exchanger heat transfer coefficient" annotation(Dialog(group = "Heat exchanger")); @@ -69,7 +67,8 @@ protected parameter Modelica.SIunits.Volume V = A * h; parameter Modelica.SIunits.Area A = Modelica.Constants.pi * d ^ 2 / 4; parameter Modelica.SIunits.Length dx = V / A / n; - parameter Modelica.SIunits.ThermalConductance G_middle = 2 * Modelica.Constants.pi * h / n / (1 / (alpha_in * d / 2) + 1 / lambda_ins * log((d / 2 + s_ins) / (d / 2)) + 1 / (alpha_out * (d / 2 + s_ins))); + parameter Modelica.SIunits.ThermalConductance G_middle=2*Modelica.Constants.pi*h/n/(1/(hConIn*d/2) + 1/lambda_ins*log((d/2 + s_ins)/(d/2)) + + 1/(hConOut*(d/2 + s_ins))); parameter Modelica.SIunits.ThermalConductance G_top_bottom = G_middle + lambda_ins / s_ins * A; equation //Connect layers to the upper and lower ports diff --git a/AixLib/Fluid/Storage/Validation/StratifiedNonUniformInitial.mo b/AixLib/Fluid/Storage/Validation/StratifiedNonUniformInitial.mo new file mode 100644 index 0000000000..ce14c7c47c --- /dev/null +++ b/AixLib/Fluid/Storage/Validation/StratifiedNonUniformInitial.mo @@ -0,0 +1,148 @@ +within AixLib.Fluid.Storage.Validation; +model StratifiedNonUniformInitial + "Test model for stratified tank with non-uniform initial temperature" + extends Modelica.Icons.Example; + + package Medium = AixLib.Media.Water "Medium model"; + constant Integer nSeg = 7 "Number of segments in tank"; + + parameter Modelica.SIunits.MassFlowRate m_flow_nominal= 1*1000/3600/4; + + AixLib.Fluid.Sources.Boundary_pT sou_1( + p=300000 + 5000, + T=273.15 + 40, + redeclare package Medium = Medium, + use_T_in=false, + nPorts=2) + annotation (Placement(transformation(extent={{-100,-20},{-80,0}}))); + AixLib.Fluid.Sources.MassFlowSource_T sin_1( + redeclare package Medium = Medium, + T=273.15 + 20, + m_flow=-m_flow_nominal, + nPorts=1) + "Mass flow source" annotation (Placement(transformation(extent={{80,10},{60,30}}))); + AixLib.Fluid.Storage.Stratified heaTan( + redeclare package Medium = Medium, + hTan=3, + dIns=0.3, + VTan=0.1, + nSeg=nSeg, + show_T=true, + m_flow_nominal=m_flow_nominal, + TFlu_start={313.15,312.15,311.15,310.15,309.15,308.15,307.15}) + "Tank that will be heated up" + annotation (Placement(transformation(extent={{-30,10},{-10,30}}))); + AixLib.Fluid.Sources.MassFlowSource_T sin_2( + redeclare package Medium = Medium, + T=273.15 + 20, + m_flow=m_flow_nominal, + nPorts=1) + "Mass flow source" annotation (Placement(transformation(extent={{80,-60},{60,-40}}))); + AixLib.Fluid.Storage.Stratified cooTan( + redeclare package Medium = Medium, + hTan=3, + dIns=0.3, + VTan=0.1, + nSeg=nSeg, + show_T=true, + m_flow_nominal=m_flow_nominal, + TFlu_start={313.15,312.15,311.15,310.15,309.15,308.15,307.15}) + "Tank that will be cooled down" + annotation (Placement(transformation(extent={{-30,-60},{-10,-40}}))); + + AixLib.Fluid.Sensors.EnthalpyFlowRate HIn_flow( + redeclare package Medium = Medium, + m_flow_nominal=m_flow_nominal) "Enthalpy flow rate" + annotation (Placement(transformation(extent={{-58,-58},{-42,-42}}))); + AixLib.Fluid.Sensors.EnthalpyFlowRate HOut_flow( + redeclare package Medium = Medium, + m_flow_nominal=m_flow_nominal) "Enthalpy flow rate" + annotation (Placement(transformation(extent={{2,-58},{18,-42}}))); + AixLib.Fluid.Sensors.EnthalpyFlowRate HInEnh_flow( + redeclare package Medium = Medium, + m_flow_nominal=m_flow_nominal) "Enthalpy flow rate" + annotation (Placement(transformation(extent={{-60,12},{-44,28}}))); + AixLib.Fluid.Sensors.EnthalpyFlowRate HOutEnh_flow( + redeclare package Medium = Medium, + m_flow_nominal=m_flow_nominal) "Enthalpy flow rate" + annotation (Placement(transformation(extent={{2,12},{18,28}}))); + Modelica.Blocks.Math.Add add(k2=-1) "Adder for enthalpy difference" + annotation (Placement(transformation(extent={{20,40},{40,60}}))); + Modelica.Blocks.Continuous.Integrator dHTanEnh + "Difference in enthalpy (should be zero at steady-state)" + annotation (Placement(transformation(extent={{60,40},{80,60}}))); + Modelica.Blocks.Math.Add add1(k2=-1) "Adder for enthalpy difference" + annotation (Placement(transformation(extent={{20,-30},{40,-10}}))); + Modelica.Blocks.Continuous.Integrator dHTan + "Difference in enthalpy (should be zero at steady-state)" + annotation (Placement(transformation(extent={{60,-30},{80,-10}}))); + +equation + connect(HIn_flow.port_b, cooTan.port_a) annotation (Line( + points={{-42,-50},{-30,-50}}, + color={0,127,255}, + smooth=Smooth.None)); + connect(cooTan.port_b, HOut_flow.port_a) annotation (Line( + points={{-10,-50},{2,-50}}, + color={0,127,255}, + smooth=Smooth.None)); + connect(HOut_flow.port_b, sin_2.ports[1]) annotation (Line( + points={{18,-50},{60,-50}}, + color={0,127,255}, + smooth=Smooth.None)); + connect(HOutEnh_flow.port_b, sin_1.ports[1]) annotation (Line( + points={{18,20},{60,20}}, + color={0,127,255}, + smooth=Smooth.None)); + connect(HInEnh_flow.H_flow, add.u1) annotation (Line( + points={{-52,28.8},{-52,56},{18,56}}, + color={0,0,127}, + smooth=Smooth.None)); + connect(HOutEnh_flow.H_flow, add.u2) annotation (Line( + points={{10,28.8},{10,44},{18,44}}, + color={0,0,127}, + smooth=Smooth.None)); + connect(add.y, dHTanEnh.u) annotation (Line( + points={{41,50},{58,50}}, + color={0,0,127}, + smooth=Smooth.None)); + connect(HIn_flow.H_flow, add1.u1) annotation (Line( + points={{-50,-41.2},{-50,-14},{18,-14}}, + color={0,0,127}, + smooth=Smooth.None)); + connect(HOut_flow.H_flow, add1.u2) annotation (Line( + points={{10,-41.2},{10,-26},{18,-26}}, + color={0,0,127}, + smooth=Smooth.None)); + connect(add1.y, dHTan.u) annotation (Line( + points={{41,-20},{58,-20}}, + color={0,0,127}, + smooth=Smooth.None)); + connect(HInEnh_flow.port_b, heaTan.port_a) + annotation (Line(points={{-44,20},{-30,20}}, color={0,127,255})); + connect(heaTan.port_b, HOutEnh_flow.port_a) + annotation (Line(points={{-10,20},{2,20}}, color={0,127,255})); + connect(sou_1.ports[1], HInEnh_flow.port_a) annotation (Line(points={{-80,-8}, + {-70,-8},{-70,20},{-60,20}}, color={0,127,255})); + connect(sou_1.ports[2], HIn_flow.port_a) annotation (Line(points={{-80,-12},{-70, + -12},{-70,-50},{-58,-50}}, color={0,127,255})); + +annotation (experiment(Tolerance=1e-6, StopTime=3600), + __Dymola_Commands(file="modelica://AixLib/Resources/Scripts/Dymola/Fluid/Storage/Validation/StratifiedNonUniformInitial.mos" + "Simulate and plot"), +Documentation(info=" +This test model validates + +AixLib.Fluid.Storage.Stratified by specifying a non-uniform initial +temperature. +", revisions=" +This data record contains the coefficients for perfect gases. @@ -962,6 +969,19 @@ if T=0 °C and no water vapor is present. ", revisions="
X_int in setState_psX.dT.start in base properties.+ This function returns the dynamic viscosity. +
++ The function is based on the 5th order polynomial of Modelica.Media.Air.MoistAir.dynamicViscosity. + However, for the typical range of temperatures encountered in + building applications, a linear function sufficies. This + implementation is therefore the above 5th order polynomial, + linearized around 20°C. The relative error of this + linearization is 0.4% at -20°C, and less then + 0.2% between -5°C and +50°C. +
+", +revisions="+ This function returns the isobaric expansion coefficient at constant + pressure, which is zero for this medium. The isobaric expansion + coefficient at constant pressure is +
++ βp = - 1 ⁄ v (∂ v ⁄ ∂ T)p = 0, +
++ where v is the specific volume, T is the temperature + and p is the pressure. +
+", +revisions="+ This function returns the isothermal compressibility coefficient. The + isothermal compressibility is +
++ κT = -1 ⁄ v (∂ v ⁄ ∂ p)T = -1 ⁄ p, +
++ where v is the specific volume, T is the temperature + and p is the pressure. +
+", +revisions="+ This function computes the specific entropy. +
++ The specific entropy of the mixture is obtained from +
++ s = ss + sm, +
++ where ss is the entropy change due to the state + change (relative to the reference temperature) and + sm is the entropy change due to mixing of the dry + air and water vapor. +
++ The entropy change due to change in state is obtained from +
+
+ ss = cv ln(T/T0) + R
+ ln(v/v0)
+ = cv ln(T/T0) + R ln(ρ0/ρ)
+
+ If we assume ρ = p0/(R T), and because + cp = cv + R, we can write +
+
+ ss = cv ln(T/T0) + R
+ ln(T/T0)
+ =cp ln(T/T0).
+
+ Next, the entropy of mixing is obtained from a reversible isothermal + expansion process. Hence, +
++ sm = -R ∑i( Xi ⁄ Mi + ln(Yi p/p0)), +
++ where R is the gas constant, X is the mass fraction, + M is the molar mass, and Y is the mole fraction. +
++ To obtain the state for a given pressure, entropy and mass fraction, + use AixLib.Media.Air.setState_psX. +
++ This function is only valid for a relative humidity below 100%. +
+", revisions=" ++ This function returns the partial derivative of density with respect + to pressure at constant temperature. +
+", +revisions="+ This function computes the derivative of density with respect to + temperature at constant pressure. +
/html +", revisions= +"+ This function returns the partial derivative of density with respect + to mass fraction. This value is zero because in this medium, density + is proportional to pressure, but independent of the species + concentration. +
+", +revisions="
+ The
+ thermodynamic state record is computed from density
+ d, temperature T and composition
+ X.
+
+ This function returns the thermodynamic state based on pressure, + specific entropy and mass fraction. +
++ The state is computed by symbolically solving AixLib.Media.Air.specificEntropy + for temperature. +
+", revisions=" +Inline=true for issue 227.
+
+ This function computes the specific enthalpy for an isentropic state
+ change from the temperature that corresponds to the state
+ refState to reference_T.
+
+ This function returns the molar mass. +
+", +revisions="Inline=true for issue 227.
+ + This data record contains the coefficients for perfect gases. +
+", revisions=" +preferredView and
+ the revisions annotation.
+ + This medium package models moist air using a gas law in which + pressure and temperature are independent, which often leads to + significantly faster and more robust computations. Additionally, the + density is constant to improve the simulation stability and speed. +
++ This medium uses the gas law +
++ ρ = ρstp, +
++ where pstd is a constant reference density. +
+
+
+ The medium model can be used for air duct simulations, where the
+ pressures and temperatures are close to the reference values.
+
+
+ Note that models in this package implement the equation for the
+ internal energy as
+
+ u = h - pstp ⁄ ρstp, +
++ where u is the internal energy per unit mass, h is the + enthalpy per unit mass, pstp is the static pressure + and ρstp is the mass density at standard pressure + and temperature. The reason for this implementation is that in + general, +
++ h = u + p v, +
++ from which follows that +
++ u = h - p v = h - p ⁄ ρ = h - pstp ⁄ + ρstd, +
++ because p ⁄ ρ = pstp ⁄ ρstp in this + medium model. +
++ The enthalpy is computed using the convention that h=0 if + T=0 °C and no water vapor is present. +
+", revisions=" +-Record that is used by media packages in - -AixLib.Media.Antifreeze to implement the thermophysical properties -based on Melinder (2010). -
--Melinder, Åke. 2010. Properties of Secondary Working Fluids (Secondary -Refrigerants or Coolants, Heat Transfer Fluids) for Indirect Systems. Paris: -IIR/IIF. -
-", revisions=" -+Record that is used by media packages in + +AixLib.Media.Antifreeze to implement the thermophysical properties +based on Melinder (2010). +
++Melinder, Åke. 2010. Properties of Secondary Working Fluids (Secondary +Refrigerants or Coolants, Heat Transfer Fluids) for Indirect Systems. Paris: +IIR/IIF. +
+", revisions=" +Function that makes - -AixLib.Media.Antifreeze.density_TX_a + +AixLib.Media.Antifreeze.PropyleneGlycolWater.density_TX_a publicly accessible as needed for the validation model AixLib.Media.Antifreeze.Validation.BaseClasses.FluidProperties. @@ -43,8 +43,8 @@ First implementation. annotation (Documentation(info="
Function that makes - -AixLib.Media.Antifreeze.dynamicViscosity_TX_a + +AixLib.Media.Antifreeze.PropyleneGlycolWater.dynamicViscosity_TX_a publicly accessible as needed for the validation model AixLib.Media.Antifreeze.Validation.BaseClasses.FluidProperties. @@ -71,8 +71,8 @@ First implementation. annotation (Documentation(info="
Function that makes - -AixLib.Media.Antifreeze.fusionTemperature_TX_a + +AixLib.Media.Antifreeze.PropyleneGlycolWater.fusionTemperature_TX_a publicly accessible as needed for the validation model AixLib.Media.Antifreeze.Validation.BaseClasses.FluidProperties. @@ -99,8 +99,8 @@ First implementation. annotation (Documentation(info="
Function that makes - -AixLib.Media.Antifreeze.specificHeatCapacityCp_TX_a + +AixLib.Media.Antifreeze.PropyleneGlycolWater.specificHeatCapacityCp_TX_a publicly accessible as needed for the validation model AixLib.Media.Antifreeze.Validation.BaseClasses.FluidProperties. @@ -127,8 +127,8 @@ First implementation. annotation (Documentation(info="
Function that makes - -AixLib.Media.Antifreeze.thermalConductivity_TX_a + +AixLib.Media.Antifreeze.PropyleneGlycolWater.thermalConductivity_TX_a publicly accessible as needed for the validation model AixLib.Media.Antifreeze.Validation.BaseClasses.FluidProperties. diff --git a/AixLib/Media/Examples/AirTestImplementation.mo b/AixLib/Media/Examples/AirTestImplementation.mo deleted file mode 100644 index 8f9370dcb1..0000000000 --- a/AixLib/Media/Examples/AirTestImplementation.mo +++ /dev/null @@ -1,22 +0,0 @@ -within AixLib.Media.Examples; -model AirTestImplementation "Model that tests the medium implementation" - extends Modelica.Icons.Example; - extends Modelica.Media.Examples.Tests.Components.PartialTestModel( - redeclare package Medium = AixLib.Media.Air); - - annotation (experiment(Tolerance=1e-6, StopTime=1.0), -__Dymola_Commands(file="modelica://AixLib/Resources/Scripts/Dymola/Media/Examples/AirTestImplementation.mos" - "Simulate and plot"), - Documentation(info=" -This is a simple test for the medium model. It uses the test model described in - -Modelica.Media.UsersGuide.MediumDefinition.TestOfMedium. -", revisions=" -
-This is a simple test for the medium model. It uses the test model described in - -Modelica.Media.UsersGuide.MediumDefinition.TestOfMedium. -
-", revisions=" -This data record contains the coefficients for perfect gases. @@ -636,6 +637,13 @@ space dimension. CRC Press. 1998. ", revisions="
spliceFunction with regStep.
This is for
diff --git a/AixLib/Media/Specialized/Water/Examples/TemperatureDependentDensityTestImplementation.mo b/AixLib/Media/Specialized/Water/Examples/TemperatureDependentDensityTestImplementation.mo
deleted file mode 100644
index ff041eb8b6..0000000000
--- a/AixLib/Media/Specialized/Water/Examples/TemperatureDependentDensityTestImplementation.mo
+++ /dev/null
@@ -1,26 +0,0 @@
-within AixLib.Media.Specialized.Water.Examples;
-model TemperatureDependentDensityTestImplementation
- "Model that tests the medium implementation"
- extends Modelica.Icons.Example;
- extends Modelica.Media.Examples.Tests.Components.PartialTestModel(
- redeclare package Medium =
- AixLib.Media.Specialized.Water.TemperatureDependentDensity);
-
- annotation (experiment(Tolerance=1e-6, StopTime=1.0),
-__Dymola_Commands(file="modelica://AixLib/Resources/Scripts/Dymola/Media/Specialized/Water/Examples/TemperatureDependentDensityTestImplementation.mos"
- "Simulate and plot"),
- Documentation(info="
--This is a simple test for the medium model. It uses the test model described in - -Modelica.Media.UsersGuide.MediumDefinition.TestOfMedium. -
-", revisions=" -This medium package models liquid water. @@ -135,6 +137,13 @@ There are no phase changes. ", revisions="
AbsolutePressure(start=p_default) to avoid
a translation error if
diff --git a/AixLib/Media/package.order b/AixLib/Media/package.order
index c2aeffd640..6bac831d53 100644
--- a/AixLib/Media/package.order
+++ b/AixLib/Media/package.order
@@ -1,4 +1,5 @@
Air
+AirIncompressible
Water
Antifreeze
Refrigerants
diff --git a/AixLib/Obsolete/BaseClasses/ObsoleteModel.mo b/AixLib/Obsolete/BaseClasses/ObsoleteModel.mo
new file mode 100644
index 0000000000..d019d8b65f
--- /dev/null
+++ b/AixLib/Obsolete/BaseClasses/ObsoleteModel.mo
@@ -0,0 +1,17 @@
+within AixLib.Obsolete.BaseClasses;
+partial class ObsoleteModel
+ "Icon for classes that are obsolete and will be removed in later versions"
+
+ annotation (Icon(coordinateSystem(preserveAspectRatio=false, extent={{-100,
+ -100},{100,100}}), graphics={Rectangle(
+ extent={{-102,102},{102,-102}},
+ lineColor={255,0,0},
+ pattern=LinePattern.Dash,
+ lineThickness=0.5)}), Documentation(info="
++This partial class is intended to provide a default icon +for an obsolete model that will be removed from the +corresponding library in a future release. +
+")); +end ObsoleteModel; diff --git a/AixLib/Obsolete/BaseClasses/package.mo b/AixLib/Obsolete/BaseClasses/package.mo new file mode 100644 index 0000000000..3b89ac4b96 --- /dev/null +++ b/AixLib/Obsolete/BaseClasses/package.mo @@ -0,0 +1,12 @@ +within AixLib.Obsolete; +package BaseClasses "Package with base classes for IBPSA.Obsolete" + extends Modelica.Icons.BasesPackage; + + +annotation (preferredView="info", Documentation(info=" ++This package contains base classes that are used to construct the models in +IBPSA.Obsolete. +
+")); +end BaseClasses; diff --git a/AixLib/Obsolete/BaseClasses/package.order b/AixLib/Obsolete/BaseClasses/package.order new file mode 100644 index 0000000000..516e9f80e9 --- /dev/null +++ b/AixLib/Obsolete/BaseClasses/package.order @@ -0,0 +1 @@ +ObsoleteModel diff --git a/AixLib/Fluid/HeatPumps/Examples/HeatPumpDetailed.mo b/AixLib/Obsolete/Year2019/Fluid/HeatPumps/Examples/HeatPumpDetailed.mo similarity index 79% rename from AixLib/Fluid/HeatPumps/Examples/HeatPumpDetailed.mo rename to AixLib/Obsolete/Year2019/Fluid/HeatPumps/Examples/HeatPumpDetailed.mo index f40af3cc41..239506d4b0 100644 --- a/AixLib/Fluid/HeatPumps/Examples/HeatPumpDetailed.mo +++ b/AixLib/Obsolete/Year2019/Fluid/HeatPumps/Examples/HeatPumpDetailed.mo @@ -1,175 +1,174 @@ -within AixLib.Fluid.HeatPumps.Examples; -model HeatPumpDetailed - "Example for the detailed heat pump model in order to compare to simple one." - - extends Modelica.Icons.Example; - replaceable package Medium_sin = AixLib.Media.Water - constrainedby Modelica.Media.Interfaces.PartialMedium annotation (choicesAllMatching=true); - replaceable package Medium_sou = AixLib.Media.Air - constrainedby Modelica.Media.Interfaces.PartialMedium annotation (choicesAllMatching=true); - .AixLib.Fluid.HeatPumps.HeatPumpDetailed heatPump( - P_eleOutput=true, - capCalcType=2, - CorrFlowCo=false, - CorrFlowEv=false, - dataTable=DataBase.HeatPump.EN255.Vitocal350BWH113(), - PT1_cycle=true, - timeConstantCycle=1, - mFlow_conNominal=1, - mFlow_evaNominal=1, - T_evaIn(transferHeat=true, TAmb=291.15), - T_evaOut(transferHeat=true, TAmb=291.15), - T_conIn(transferHeat=true, TAmb=273.15), - T_conOut(transferHeat=true, TAmb=273.15), - redeclare package Medium_con = Medium_sin, - redeclare package Medium_eva = Medium_sou) - "Detailed heat pump mainly based on manufacturing data" - annotation (Placement(transformation(extent={{-16,14},{14,-6}}))); - Sources.MassFlowSource_T sourceSideMassFlowSource( - use_T_in=true, - m_flow=1, - redeclare package Medium = Medium_sou, - nPorts=1, - T=275.15) "Ideal mass flow source at the inlet of the source side" - annotation (Placement(transformation(extent={{-54,-80},{-34,-60}}))); - - Sources.FixedBoundary sourceSideFixedBoundary(redeclare - package Medium = Medium_sou, nPorts= - 1) "Fixed boundary at the outlet of the source side" - annotation (Placement(transformation(extent={{-10,10},{10,-10}}, - rotation=0, - origin={-80,36}))); - Modelica.Blocks.Sources.Ramp TsuSourceRamp( - duration=1000, - startTime=1000, - height=25, - offset=278) - "Ramp signal for the temperature input of the source side's ideal mass flow source" - annotation (Placement(transformation(extent={{-94,-84},{-74,-64}}))); - Sensors.TemperatureTwoPort senTAct( - final transferHeat=true, - final m_flow_nominal=heatPump.mFlow_conNominal, - final tau=1, - final initType=Modelica.Blocks.Types.Init.InitialState, - final tauHeaTra=1200, - redeclare final package Medium = - Medium_sin, - final T_start=303.15, - final TAmb=291.15) "Temperature at sink inlet" - annotation (Placement(transformation(extent={{-10,-10},{10,10}}, - rotation=0, - origin={54,-64}))); - Modelica.Blocks.Logical.Hysteresis hys( - pre_y_start=true, - uLow=273.15 + 30, - uHigh=273.15 + 40) - annotation (Placement(transformation(extent={{64,50},{44,70}}))); - Modelica.Blocks.Sources.Sine sine( - freqHz=1/3600, - amplitude=3000, - offset=3000) - annotation (Placement(transformation(extent={{76,26},{84,34}}))); - Movers.SpeedControlled_Nrpm pumSou( - redeclare final package Medium = - Medium_sin, - redeclare final Movers.Data.Pumps.Wilo.Stratos25slash1to8 per, - final allowFlowReversal=true, - final addPowerToMedium=false) - "Fan or pump at source side of HP" annotation (Placement(transformation( - extent={{10,-10},{-10,10}}, - rotation=0, - origin={50,12}))); - MixingVolumes.MixingVolume Room( - nPorts=2, - final use_C_flow=false, - final m_flow_nominal=heatPump.mFlow_conNominal, - final V=5, - redeclare package Medium = Medium_sin, - final allowFlowReversal=true) "Volume of Condenser" annotation (Placement( - transformation( - extent={{-10,-10},{10,10}}, - rotation=270, - origin={86,-20}))); - - Modelica.Blocks.Sources.Constant nIn(k=100) annotation (Placement( - transformation( - extent={{4,-4},{-4,4}}, - rotation=90, - origin={50,34}))); - Modelica.Thermal.HeatTransfer.Sources.PrescribedHeatFlow heatFlowRateCon - "Heat flow rate of the condenser" annotation (Placement(transformation( - extent={{-6,6},{6,-6}}, - rotation=270, - origin={94,6}))); - Modelica.Blocks.Math.Gain gain(k=-1) annotation (Placement(transformation( - extent={{-4,-4},{4,4}}, - rotation=270, - origin={96,22}))); - Modelica.Blocks.Logical.Not not2 "Negate output of hysteresis" - annotation (Placement(transformation(extent={{-4,-4},{4,4}}, - origin={32,62}, - rotation=180))); - Sources.FixedBoundary sinkSideFixedBoundary(redeclare package - Medium = Medium_sin, nPorts=1) - "Fixed boundary at the outlet of the sink side" annotation (Placement( - transformation( - extent={{10,-10},{-10,10}}, - rotation=0, - origin={88,-64}))); -equation - - connect(TsuSourceRamp.y,sourceSideMassFlowSource. T_in) annotation (Line( - points={{-73,-74},{-68,-74},{-68,-66},{-56,-66}}, - color={0,0,127}, - smooth=Smooth.None)); - connect(nIn.y,pumSou. Nrpm) - annotation (Line(points={{50,29.6},{50,24}}, color={0,0,127})); - connect(Room.heatPort,heatFlowRateCon. port) - annotation (Line(points={{86,-10},{86,0},{94,0}}, color={191,0,0})); - connect(sine.y,gain. u) annotation (Line(points={{84.4,30},{92,30},{92,26.8}, - {96,26.8}}, color={0,0,127})); - connect(heatFlowRateCon.Q_flow,gain. y) annotation (Line(points={{94,12},{98, - 12},{98,17.6},{96,17.6}}, color={0,0,127})); - connect(Room.ports[1],pumSou. port_a) annotation (Line(points={{76,-18},{76,4}, - {60,4},{60,12}}, color={0,127,255})); - connect(senTAct.T,hys. u) annotation (Line(points={{54,-53},{58,-53},{58,-8}, - {68,-8},{68,48},{74,48},{74,60},{66,60}}, color={0,0,127})); - connect(hys.y,not2. u) annotation (Line(points={{43,60},{44,60},{44,62},{36.8, - 62}}, color={255,0,255})); - connect(senTAct.port_b,sinkSideFixedBoundary. ports[1]) annotation (Line( - points={{64,-64},{72,-64},{72,-64},{78,-64}}, color={0,127,255})); - connect(senTAct.port_b,Room. ports[2]) annotation (Line(points={{64,-64},{66, - -64},{66,-22},{76,-22}}, color={0,127,255})); - connect(not2.y, heatPump.onOff_in) annotation (Line(points={{27.6,62},{-18,62}, - {-18,-12},{-6,-12},{-6,-5}}, color={255,0,255})); - connect(pumSou.port_b, heatPump.port_conIn) annotation (Line(points={{40,12}, - {26,12},{26,11},{12,11}}, color={0,127,255})); - connect(heatPump.port_conOut, senTAct.port_a) annotation (Line(points={{12,-3}, - {28,-3},{28,-64},{44,-64}}, color={0,127,255})); - connect(sourceSideMassFlowSource.ports[1], heatPump.port_evaIn) annotation ( - Line(points={{-34,-70},{-24,-70},{-24,-3},{-14,-3}}, color={0,127,255})); - connect(heatPump.port_evaOut, sourceSideFixedBoundary.ports[1]) annotation ( - Line(points={{-14,11},{-43,11},{-43,36},{-70,36}}, color={0,127,255})); - annotation (Diagram(coordinateSystem(preserveAspectRatio=false, extent={{-100, - -100},{100,100}})), - experiment(StopTime=3600), - __Dymola_experimentSetupOutput, - Documentation(info=" -Simple test set-up for the HeatPumpDetailed model. The heat pump is turned on and off while the source temperature increases linearly. Outputs are the electric power consumption of the heat pump and the supply temperature.
-Besides using the default simple table data, the user should also test tabulated data from AixLib.DataBase.HeatPump or polynomial functions.
-", - revisions=" -Simple test set-up for the HeatPumpDetailed model. The heat pump is turned on and off while the source temperature increases linearly. Outputs are the electric power consumption of the heat pump and the supply temperature.
+Besides using the default simple table data, the user should also test tabulated data from AixLib.DataBase.HeatPump or polynomial functions.
+", + revisions=" +Simple test set-up for the HeatPumpSimple model. The heat pump is turned on and off while the source temperature increases linearly. Outputs are the electric power consumption of the heat pump and the supply temperature.
-", - revisions=" -Simple test set-up for the HeatPumpSimple model. The heat pump is turned on and off while the source temperature increases linearly. Outputs are the electric power consumption of the heat pump and the supply temperature.
+", + revisions=" ++This package contains examples for the use of models that can be found in + +AixLib.Fluid.HeatPumps. +
+")); +end Examples; diff --git a/AixLib/Obsolete/Year2019/Fluid/HeatPumps/Examples/package.order b/AixLib/Obsolete/Year2019/Fluid/HeatPumps/Examples/package.order new file mode 100644 index 0000000000..1127a3b030 --- /dev/null +++ b/AixLib/Obsolete/Year2019/Fluid/HeatPumps/Examples/package.order @@ -0,0 +1,2 @@ +HeatPumpDetailed +HeatPumpSimple diff --git a/AixLib/Fluid/HeatPumps/HeatPumpDetailed.mo b/AixLib/Obsolete/Year2019/Fluid/HeatPumps/HeatPumpDetailed.mo similarity index 91% rename from AixLib/Fluid/HeatPumps/HeatPumpDetailed.mo rename to AixLib/Obsolete/Year2019/Fluid/HeatPumps/HeatPumpDetailed.mo index a77711ab87..5b31f904ab 100644 --- a/AixLib/Fluid/HeatPumps/HeatPumpDetailed.mo +++ b/AixLib/Obsolete/Year2019/Fluid/HeatPumps/HeatPumpDetailed.mo @@ -1,533 +1,534 @@ -within AixLib.Fluid.HeatPumps; -model HeatPumpDetailed - "Heat pump model with good level of detail. Mainly fed with manufacturing data." - import SI = Modelica.SIunits; - parameter Boolean HPctrlType=true "Capacity control type" annotation (Dialog( - group="Heat Pump cycle", - compact=true, - descriptionLabel=true), choices( - choice=true "On/off heat pump", - choice=false "Speed controlled heat pump", - radioButtons=true)); - parameter Integer capCalcType=1 "Type of capacity calculation" annotation ( - Dialog( - group="Heat Pump cycle", - compact=true, - descriptionLabel=true, - enable=HPctrlType), choices( - choice=1 "Polynomial", - choice=2 "Table (only on/off heat pump)", - radioButtons=true)); - replaceable package Medium_con = Modelica.Media.Interfaces.PartialMedium - "Medium outside the refrigerant cycle (Condenser)" annotation ( - Evaluate=true, - Dialog(tab="Evaporator, Condenser", group="Condenser"), - choicesAllMatching=true); - parameter SI.PressureDifference dp_conNominal=0 - "Pressure loss at nominal mass flow in condenser" - annotation (Dialog(tab="Evaporator, Condenser", group="Condenser")); - - replaceable package Medium_eva = Modelica.Media.Interfaces.PartialMedium - "Medium outside the refrigerant cycle (Evaporator)" annotation ( - Evaluate=true, - Dialog(tab="Evaporator, Condenser", group="Evaporator"), - choicesAllMatching=true); - - parameter SI.PressureDifference dp_evaNominal=0 - "Pressure loss at nominal mass flow in evaporator" - annotation (Dialog(tab="Evaporator, Condenser", group="Evaporator")); - - parameter SI.Volume volume_eva=0.004 - "External medium volume in heat exchanger" - annotation (Dialog(tab="Evaporator, Condenser", group="Evaporator")); - parameter SI.Volume volume_con=0.004 - "External medium volume in heat exchanger" - annotation (Dialog(tab="Evaporator, Condenser", group="Condenser")); - parameter AixLib.DataBase.HeatPump.HeatPumpBaseDataDefinition dataTable= - AixLib.DataBase.HeatPump.EN255.Vitocal350BWH113() - "Look-up table data for on/off heat pump according to EN255 or EN14511" - annotation (choicesAllMatching=true, Dialog(enable=HPctrlType and ( - capCalcType == 2), group="Capacity data")); - - replaceable function data_poly = - AixLib.Fluid.HeatPumps.BaseClasses.Functions.Characteristics.ConstantQualityGrade - constrainedby - AixLib.Fluid.HeatPumps.BaseClasses.Functions.Characteristics.PartialBaseFct - "Polynomial heat pump characteristics for inverter heat pump" annotation ( - choicesAllMatching=true, Dialog(enable=(capCalcType == 1), group="Capacity data")); - - parameter SI.Temperature T_startEva=273.15 "Initial evaporator temperature" - annotation (Evaluate=true, Dialog( - tab="Evaporator, Condenser", - group="Initialization", - enable=initEvaporatorVol)); - parameter SI.Temperature T_startCon=308.15 "Initial condenser temperature" - annotation (Evaluate=true, Dialog( - tab="Evaporator, Condenser", - group="Initialization", - enable=initCondenserVol)); - replaceable function Corr_icing = - AixLib.Fluid.HeatPumps.BaseClasses.Functions.DefrostCorrection.NoModel - constrainedby - AixLib.Fluid.HeatPumps.BaseClasses.Functions.DefrostCorrection.PartialBaseFct - "Frost/Defrost model (only air-to-water heat pumps)" annotation ( - choicesAllMatching=true, Dialog( - enable=(capCalcType == 1), - group="Defrosting/Icing correction", - tab="Advanced")); - - parameter Real N_max=4200 - "Maximum speed of compressor in 1/min (only used if used in polynom)" - annotation (Dialog(enable=not (HPctrlType), group="Capacity data")); - parameter Real N_min=1500 - "Minimum speed of compressor in 1/min (only used if used in polynom)" - annotation (Dialog(enable=not (HPctrlType), group="Capacity data")); - parameter Real N_nom=3600 - "Nominal speed of compressor in 1/min (only used if used in polynom)" - annotation (Dialog(enable=HPctrlType and (capCalcType == 1), group="Capacity data")); - parameter Boolean P_eleOutput=false "Electric power consumption" annotation ( - Dialog( - group="Optional outputs", - tab="Advanced", - descriptionLabel=true), choices(checkBox=true)); - parameter Boolean CoP_output=false "CoP" annotation (Dialog( - group="Optional outputs", - tab="Advanced", - descriptionLabel=true), choices(checkBox=true)); - parameter Boolean PT1_cycle=false "First Order model for capacity" - annotation (Dialog(group="Start/stop behavior", tab="Advanced"), choices( - checkBox=true)); - parameter SI.Time timeConstantCycle=1 "Time constant for first order model" - annotation (Dialog( - group="Start/stop behavior", - tab="Advanced", - enable=PT1_cycle)); - - parameter Real eta_ele=1 - "Assumption of P_tech/P_el (for calculation of Evaporator load)" - annotation (Dialog(group="Assumptions", tab="Advanced")); - parameter Real factorScale=1 - "Scaling factor (Attention: not physically correct)" - annotation (Dialog(group="Assumptions", tab="Advanced")); - parameter SI.Power P_eleAdd=0 - "Additional electric power when heat pump is on (not influenced through - scaling factor)" - annotation (Dialog(group="Assumptions", tab="Advanced")); - - parameter Boolean CorrFlowCo=false - "Correction of mass flow different from nominal flow in condenser - (polynomials: make sure mass flow rate is not corrected in polynomials)" - annotation (Dialog(group="Mass flow correction", tab="Advanced"), choices( - checkBox=true)); - parameter SI.MassFlowRate mFlow_conNominal=0.5 - "Nominal mass flow rate in condenser (only with polynomials, as already - given in data tables)" - annotation (Dialog( - group="Mass flow correction", - tab="Advanced", - enable=(CorrFlowCo and capCalcType == 1))); - - parameter Boolean CorrFlowEv=false - "Correction of mass flow different from nominal flow in evaporator - (polynomials: make sure mass flow rate is not corrected in polynomials)" - annotation (Dialog(group="Mass flow correction", tab="Advanced"), choices( - checkBox=true)); - parameter SI.MassFlowRate mFlow_evaNominal=0.5 - "Nominal mass flow rate in evaporator (only for polynomials, as already - given in data tables)" - annotation (Dialog( - group="Mass flow correction", - tab="Advanced", - enable=(CorrFlowEv and capCalcType == 1))); - - Modelica.Fluid.Interfaces.FluidPort_b port_evaOut(redeclare package Medium = - Medium_eva) "Evaporator fluid output port" annotation (Placement( - transformation(extent={{-140,-80},{-120,-60}}, rotation=0))); - Modelica.Fluid.Interfaces.FluidPort_a port_evaIn(redeclare package Medium = - Medium_eva) "Evaporator fluid input port" annotation (Placement( - transformation(extent={{-140,60},{-120,80}}, rotation=0))); - Sensors.TemperatureTwoPort T_evaIn( - redeclare package Medium = Medium_eva, - m_flow_nominal=mFlow_evaNominal, - T_start=T_startEva) "Temperature sensor at inlet of the evaporator" - annotation (Placement(transformation( - origin={-130,26}, - extent={{-10,-10},{10,10}}, - rotation=270))); - Sensors.TemperatureTwoPort T_conIn( - redeclare package Medium = Medium_con, - m_flow_nominal=mFlow_conNominal, - T_start=T_startCon) "Temperature sensor at inlet of the condenser" - annotation (Placement(transformation( - origin={130,-26}, - extent={{-10,-10},{10,10}}, - rotation=90))); - Modelica.Fluid.Interfaces.FluidPort_a port_conIn(redeclare package Medium = - Medium_con) "Condenser fluid input port" annotation (Placement( - transformation(extent={{120,-80},{140,-60}}, rotation=0))); - Modelica.Fluid.Interfaces.FluidPort_b port_conOut(redeclare package Medium = - Medium_con) "Condenser fluid ouput port" annotation (Placement( - transformation(extent={{120,60},{140,80}}, rotation=0))); - Sensors.TemperatureTwoPort T_conOut( - redeclare package Medium = Medium_con, - m_flow_nominal=mFlow_conNominal, - T_start=T_startCon) "Temperature sensor at outlet of the condenser" - annotation (Placement(transformation( - origin={130,48}, - extent={{-10,-10},{10,10}}, - rotation=90))); - Sensors.TemperatureTwoPort T_evaOut( - redeclare package Medium = Medium_eva, - m_flow_nominal=mFlow_evaNominal, - T_start=T_startEva) "Temperature sensor at outlet of the evaporator" - annotation (Placement(transformation( - origin={-130,-46}, - extent={{-10,-10},{10,10}}, - rotation=270))); - Sensors.MassFlowRate mFlow_con(redeclare package Medium = Medium_con) - "Mass flow sensor at the condenser" annotation (Placement(transformation( - origin={130,-50}, - extent={{-10,-10},{10,10}}, - rotation=90))); - Modelica.Blocks.Interfaces.RealOutput P_eleOut(unit="W") if - P_eleOutput - "Electical power consumption" annotation (Placement(transformation( - extent={{-10,-10},{10,10}}, - rotation=270, - origin={-50,-90}))); - Modelica.Blocks.Interfaces.RealOutput CoP_out if CoP_output - "Coefficient of Performance" annotation (Placement(transformation( - extent={{-10,-10},{10,10}}, - rotation=270, - origin={-10,-90}))); - - Modelica.Thermal.HeatTransfer.Sources.PrescribedHeatFlow heatFlowRate_con - "Heat flow rate of the condenser" annotation (Placement(transformation( - origin={95,1}, - extent={{9,-9},{-9,9}}, - rotation=180))); - -public - Modelica.Thermal.HeatTransfer.Sources.PrescribedHeatFlow heatFlowRate_eva - "Heat flow rate of the evaporator" annotation (Placement(transformation( - extent={{-10,-10},{10,10}}, - rotation=180, - origin={-96,2}))); - - parameter Modelica.Blocks.Types.Smoothness smoothness=Modelica.Blocks.Types.Smoothness.LinearSegments - "Smoothness of table interpolation" annotation (Dialog( - group="Assumptions", - tab="Advanced", - enable=not (capCalcType == 1))); - - Sensors.MassFlowRate mFlow_eva(redeclare package Medium = Medium_eva) - "Mass flow sensor at the evaporator" annotation (Placement(transformation( - origin={-130,52}, - extent={{-10,-10},{10,10}}, - rotation=270))); - HeatPumps.BaseClasses.CycleHP cycle( - HPctrlType=HPctrlType, - capCalcType=capCalcType, - dataTable=dataTable, - redeclare function data_poly = data_poly, - N_max=N_max, - N_min=N_min, - N_nom=N_nom, - Corr_icing=Corr_icing, - eta_ele=eta_ele, - factorScale=factorScale, - P_eleAdd=P_eleAdd, - CorrFlowCo=CorrFlowCo, - CorrFlowEv=CorrFlowEv, - timeConstantCycle=timeConstantCycle, - smoothness=smoothness, - PT1_cycle=PT1_cycle, - mFlow_conNominal=mFlow_conNominal, - mFlow_evaNominal=mFlow_evaNominal, - T_conMax=T_conMax) "Heat pump refrigerant circuit black box model" - annotation (Placement(transformation(extent={{-50,-20},{40,40}}))); - Modelica.Blocks.Interfaces.BooleanInput onOff_in - "Enable or disable heat pump" annotation (Placement(transformation( - extent={{-10,-10},{10,10}}, - rotation=270, - origin={-50,90}))); - Modelica.Blocks.Interfaces.RealInput N_in if not HPctrlType - "Rotational speed of compressor" annotation (Placement(transformation( - extent={{-10,-10},{10,10}}, - rotation=270, - origin={-10,90}))); - - parameter Boolean heatLosses_con=false - "Consider heat losses of condenser to ambient" annotation (Dialog(group="Heat losses of condenser", - tab="Advanced"), choices(checkBox=true)); - parameter SI.ThermalConductance R_loss=1 - "Thermal conductance of heat loss to ambient" annotation (Dialog( - group="Heat losses of condenser", - tab="Advanced", - enable=heatLosses_con)); -protected - Modelica.Blocks.Interfaces.RealInput N_inInternal - "Needed to connect to conditional connector"; - Modelica.Blocks.Interfaces.RealInput T_ambInternal - "Needed to connect to conditional connector"; -public - Modelica.Blocks.Sources.RealExpression dummyZero(y=0) - "Dummy value used for rotational speed" - annotation (Placement(transformation(extent={{0,60},{20,80}}, rotation=0))); - Modelica.Thermal.HeatTransfer.Components.ThermalConductor heatConv(G=R_loss) - "Heat flow through condenser casing with a given conductance" - annotation (Placement(transformation(extent={{80,52},{100,72}}))); - Modelica.Blocks.Interfaces.RealInput T_amb if - heatLosses_con - "Ambient temperatur input signal" annotation (Placement(transformation( - extent={{-10,-10},{10,10}}, - rotation=270, - origin={50,90}))); - Modelica.Thermal.HeatTransfer.Sources.PrescribedTemperature varTemp - "Foreces heat losses according to ambient temperature" - annotation (Placement(transformation(extent={{80,76},{100,96}}))); - parameter SI.Temperature T_conMax=338.15 - "Maximum condenser outlet temperature" - annotation (Dialog(group="Capacity data")); - Modelica.Blocks.Math.Gain gainMinusOne(k=-1) - "Calculated heat flow in evaporator has to be withdrawn" annotation ( - Placement(transformation( - extent={{-5,-5},{5,5}}, - rotation=180, - origin={-73,5}))); - MixingVolumes.MixingVolume evaporator( - nPorts=2, - T_start(displayUnit="K") = T_startEva, - m_flow_nominal=mFlow_evaNominal, - redeclare package Medium = Medium_eva, - V=volume_eva) "Volume of evaporator" annotation (Placement(transformation( - extent={{-7,-6.75},{7,6.75}}, - rotation=-90, - origin={-120.75,1}))); - FixedResistances.PressureDrop hydRes_eva( - redeclare package Medium = Medium_eva, - m_flow_nominal=mFlow_evaNominal, - m_flow(start=mFlow_evaNominal), - dp_nominal=dp_evaNominal) - "The pressure drop caused by flow resistance in the evaporator" annotation ( - Placement(transformation( - extent={{8,-8},{-8,8}}, - rotation=90, - origin={-130,-22}))); - MixingVolumes.MixingVolume condenser( - nPorts=2, - redeclare package Medium = Medium_con, - T_start(displayUnit="K") = T_startCon, - m_flow_nominal=mFlow_conNominal, - V=volume_con) "Volume of condenser" annotation (Placement(transformation( - extent={{7,6.75},{-7,-6.75}}, - rotation=-90, - origin={121.25,-1}))); - FixedResistances.PressureDrop hydRes_con( - redeclare package Medium = Medium_con, - m_flow_nominal=mFlow_conNominal, - m_flow(start=mFlow_conNominal), - dp_nominal=dp_conNominal) - "The pressure drop caused by flow resistance in the condenser" annotation ( - Placement(transformation( - extent={{-8,-8},{8,8}}, - rotation=90, - origin={130,22}))); -equation - - if HPctrlType then - connect(N_inInternal, dummyZero.y); - else - connect(N_in, N_inInternal); - end if; - connect(N_inInternal, cycle.N_in); - - if heatLosses_con then - connect(T_ambInternal, T_amb); - connect(heatConv.port_b, condenser.heatPort); - else - connect(T_ambInternal, dummyZero.y); - end if; - connect(varTemp.T, T_ambInternal); - connect(varTemp.port, heatConv.port_a) annotation (Line(points={{100,86},{104, - 86},{104,74},{74,74},{74,62},{80,62}}, color={191,0,0})); - - //fluid connections evaporator - connect(T_evaOut.port_b, port_evaOut) annotation (Line( - points={{-130,-56},{-130,-70}}, - color={0,127,255}, - smooth=Smooth.None)); - connect(port_evaIn, mFlow_eva.port_a) annotation (Line( - points={{-130,70},{-130,62}}, - color={0,127,255}, - smooth=Smooth.None)); - connect(mFlow_eva.port_b, T_evaIn.port_a) annotation (Line( - points={{-130,42},{-130,36}}, - color={0,127,255}, - smooth=Smooth.None)); - - //fluid connections condenser - connect(mFlow_con.port_a, port_conIn) annotation (Line( - points={{130,-60},{130,-70}}, - color={0,127,255}, - smooth=Smooth.None)); - connect(mFlow_con.port_b, T_conIn.port_a) annotation (Line( - points={{130,-40},{130,-36}}, - color={0,127,255}, - smooth=Smooth.None)); - connect(T_conOut.port_b, port_conOut) annotation (Line( - points={{130,58},{130,70}}, - color={0,127,255}, - smooth=Smooth.None)); - // other connections - - connect(cycle.CoP_out, CoP_out) annotation (Line( - points={{-8,-17},{-8,-64},{-10,-64},{-10,-90}}, - color={0,0,127}, - smooth=Smooth.None)); - - connect(heatFlowRate_eva.Q_flow, gainMinusOne.y) annotation (Line( - points={{-86,2},{-80,2},{-80,5},{-78.5,5}}, - color={0,0,127}, - smooth=Smooth.None)); - connect(T_conOut.T, cycle.T_conOut) annotation (Line( - points={{119,48},{60,48},{60,25},{34,25}}, - color={0,0,127}, - smooth=Smooth.None)); - connect(cycle.Qdot_conOut, heatFlowRate_con.Q_flow) annotation (Line( - points={{34,13},{70,13},{70,1},{86,1}}, - color={0,0,127}, - smooth=Smooth.None)); - connect(cycle.T_conIn, T_conIn.T) annotation (Line( - points={{34,1},{62,1},{62,-26},{119,-26}}, - color={0,0,127}, - smooth=Smooth.None)); - connect(cycle.mFlow_con, mFlow_con.m_flow) annotation (Line( - points={{34,7},{54,7},{54,-50},{119,-50}}, - color={0,0,127}, - smooth=Smooth.None)); - connect(cycle.T_evaOut, T_evaOut.T) annotation (Line( - points={{-44,25},{-48,25},{-48,24},{-58,24},{-58,-46},{-119,-46}}, - color={0,0,127}, - smooth=Smooth.None)); - connect(cycle.mFlow_eva, mFlow_eva.m_flow) annotation (Line( - points={{-44,19},{-72,19},{-72,52},{-119,52}}, - color={0,0,127}, - smooth=Smooth.None)); - connect(gainMinusOne.u, cycle.Qdot_evaOut) annotation (Line( - points={{-67,5},{-62,5},{-62,13},{-44,13}}, - color={0,0,127}, - smooth=Smooth.None)); - connect(T_evaIn.T, cycle.T_evaIn) annotation (Line( - points={{-119,26},{-82,26},{-82,-8},{-50,-8},{-50,1},{-44,1}}, - color={0,0,127}, - smooth=Smooth.None)); - connect(cycle.P_eleOut, P_eleOut) annotation (Line( - points={{-20,-17},{-18,-17},{-18,-56},{-50,-56},{-50,-90}}, - color={0,0,127}, - smooth=Smooth.None)); - connect(cycle.onOff_in, onOff_in) annotation (Line( - points={{-20,37},{-22,37},{-22,60},{-50,60},{-50,90}}, - color={255,0,255}, - smooth=Smooth.None)); - connect(T_evaIn.port_b, evaporator.ports[1]) annotation (Line(points={{-130,16}, - {-130,2.4},{-127.5,2.4}}, color={0,127,255})); - connect(heatFlowRate_eva.port, evaporator.heatPort) annotation (Line(points={{ - -106,2},{-110,2},{-110,12},{-120.75,12},{-120.75,8}}, color={191,0,0})); - connect(heatFlowRate_con.port, condenser.heatPort) annotation (Line(points={{104, - 1},{110,1},{110,-10},{116,-10},{110,-10},{121.25,-10},{121.25,-8}}, - color={191,0,0})); - connect(T_conIn.port_b, condenser.ports[1]) annotation (Line(points={{130,-16}, - {130,-2.4},{128,-2.4}}, color={0,127,255})); - connect(condenser.ports[2], hydRes_con.port_a) annotation (Line(points={{128,0.4}, - {130,0.4},{130,14}}, color={0,127,255})); - connect(hydRes_con.port_b, T_conOut.port_a) - annotation (Line(points={{130,30},{130,34},{130,38}}, color={0,127,255})); - connect(hydRes_eva.port_a, evaporator.ports[2]) annotation (Line(points={{-130, - -14},{-130,-14},{-130,-0.4},{-127.5,-0.4}}, color={0,127,255})); - connect(hydRes_eva.port_b, T_evaOut.port_a) annotation (Line(points={{-130,-30}, - {-130,-33},{-130,-36}}, color={0,127,255})); - annotation ( - Diagram(coordinateSystem(preserveAspectRatio=false, extent={{-150,-100},{150, - 100}})), - Icon(coordinateSystem(preserveAspectRatio=true, extent={{-150,-100},{150,100}}), - graphics={ - Rectangle( - extent={{-130,90},{130,-90}}, - fillColor={230,230,230}, - fillPattern=FillPattern.Solid, - lineColor={0,0,0}), - Rectangle( - extent={{-120,80},{-80,-80}}, - fillColor={170,213,255}, - fillPattern=FillPattern.Solid, - lineColor={0,0,0}), - Rectangle( - extent={{80,80},{120,-80}}, - fillColor={255,0,128}, - fillPattern=FillPattern.Solid, - lineColor={0,0,0}), - Text( - extent={{-80,2},{80,-40}}, - lineColor={0,0,0}, - fillColor={215,215,215}, - fillPattern=FillPattern.Solid, - textString="%name -"), Ellipse(extent={{-80,80},{80,-80}}, lineColor={0,0,0}), - Line( - points={{-88,40},{-112,40},{-94,-2},{-112,-40},{-88,-40}}, - color={0,0,0}, - smooth=Smooth.None), - Line( - points={{88,40},{112,40},{94,-2},{112,-40},{88,-40}}, - color={0,0,0}, - smooth=Smooth.None)}), - Documentation(info=" -Heat pump black box model with two simple heat exchangers, no controllers included.
-Works as on/off-controlled heat pump or heat pump with capacity control. The type of capacity and electrical power calculation can be chosen:
-Correction models of the calculation can be activated that effect the efficiency or the start-up and shut-off behavior of the heat pump.
-The heat pump speed is helt between the boundaries N_min and N_max even if the input speed is higher or lower. But no further controlling is implemented. The control logic is conciously not integrated into this model.
-The calculation of the capacity and electric power does not represent any dynamic behavior of the refrigerant cycle as it occurs in real heat pumps. Therefor two possibilities exist, to add dynamic behavior:
-Sources:
-See AixLib.Fluid.HeatPumps.Examples.HeatPumpDetailed
-", revisions=" -Heat pump black box model with two simple heat exchangers, no controllers included.
+Works as on/off-controlled heat pump or heat pump with capacity control. The type of capacity and electrical power calculation can be chosen:
+Correction models of the calculation can be activated that effect the efficiency or the start-up and shut-off behavior of the heat pump.
+The heat pump speed is helt between the boundaries N_min and N_max even if the input speed is higher or lower. But no further controlling is implemented. The control logic is conciously not integrated into this model.
+The calculation of the capacity and electric power does not represent any dynamic behavior of the refrigerant cycle as it occurs in real heat pumps. Therefor two possibilities exist, to add dynamic behavior:
+Sources:
+See AixLib.Fluid.HeatPumps.Examples.HeatPumpDetailed
+", revisions=" +Simple model of an on/off-controlled heat pump. The refrigerant circuit is a black-box model represented by tables which calculate the electric power and heat flows of the condenser depending on the source and sink temperature.
-- AixLib.Fluid.HeatPumps.Examples.HeatPumpSimple
- ", revisions=" -Simple model of an on/off-controlled heat pump. The refrigerant circuit is a black-box model represented by tables which calculate the electric power and heat flows of the condenser depending on the source and sink temperature.
++ AixLib.Fluid.HeatPumps.Examples.HeatPumpSimple
+ ", revisions=" ++This package contains component models for heat pumps. +
+")); +end HeatPumps; diff --git a/AixLib/Obsolete/Year2019/Fluid/HeatPumps/package.order b/AixLib/Obsolete/Year2019/Fluid/HeatPumps/package.order new file mode 100644 index 0000000000..fd16039d86 --- /dev/null +++ b/AixLib/Obsolete/Year2019/Fluid/HeatPumps/package.order @@ -0,0 +1,3 @@ +HeatPumpDetailed +HeatPumpSimple +Examples diff --git a/AixLib/Fluid/Sources/FixedBoundary.mo b/AixLib/Obsolete/Year2019/Fluid/Sources/FixedBoundary.mo similarity index 58% rename from AixLib/Fluid/Sources/FixedBoundary.mo rename to AixLib/Obsolete/Year2019/Fluid/Sources/FixedBoundary.mo index 16e1f4cee4..099db05c70 100644 --- a/AixLib/Fluid/Sources/FixedBoundary.mo +++ b/AixLib/Obsolete/Year2019/Fluid/Sources/FixedBoundary.mo @@ -1,105 +1,152 @@ -within AixLib.Fluid.Sources; -model FixedBoundary "Boundary source component" - extends Modelica.Fluid.Sources.BaseClasses.PartialSource; - parameter Boolean use_p=true "select p or d" - annotation (Evaluate = true, - Dialog(group = "Boundary pressure or Boundary density")); - parameter Medium.AbsolutePressure p=Medium.p_default "Boundary pressure" - annotation (Dialog(group = "Boundary pressure or Boundary density", - enable = use_p)); - parameter Medium.Density d=Medium.density_pTX( - p = Medium.p_default, - T = Medium.T_default, - X = Medium.X_default) "Boundary density" - annotation (Dialog(group = "Boundary pressure or Boundary density", - enable=not use_p)); - parameter Boolean use_T=true "select T or h" - annotation (Evaluate = true, - Dialog(group = "Boundary temperature or Boundary specific enthalpy")); - parameter Medium.Temperature T=Medium.T_default "Boundary temperature" - annotation (Dialog(group = "Boundary temperature or Boundary specific enthalpy", - enable = use_T)); - parameter Medium.SpecificEnthalpy h=Medium.h_default - "Boundary specific enthalpy" - annotation (Dialog(group="Boundary temperature or Boundary specific enthalpy", - enable = not use_T)); - parameter Medium.MassFraction X[Medium.nX]( - final quantity=Medium.substanceNames) = Medium.X_default - "Boundary mass fractions m_i/m" - annotation (Dialog(group = "Only for multi-substance flow", enable=Medium.nXi > 0)); - - parameter Medium.ExtraProperty C[Medium.nC]( - final quantity=Medium.extraPropertiesNames)=fill(0, Medium.nC) - "Boundary trace substances" - annotation (Dialog(group = "Only for trace-substance flow", enable=Medium.nC > 0)); - -initial equation - Modelica.Fluid.Utilities.checkBoundary(Medium.mediumName, Medium.substanceNames, - Medium.singleState, use_p, X, - "FixedBoundary"); - -equation - if use_p or Medium.singleState then - medium.p = p; - else - medium.d = d; - end if; - if use_T then - medium.T = T; - else - medium.h = h; - end if; - - medium.Xi = X[1:Medium.nXi]; - - ports.C_outflow = fill(C, nPorts); - annotation (defaultComponentName="bou", - Icon(coordinateSystem( - preserveAspectRatio=false, - extent={{-100,-100},{100,100}}, - grid={2,2}), graphics={Ellipse( - extent={{-100,100},{100,-100}}, - lineColor={0,0,0}, - fillPattern=FillPattern.Sphere, - fillColor={0,127,255}), Text( - extent={{-150,110},{150,150}}, - textString="%name", - lineColor={0,0,255})}), - Documentation(info=" --This model defines constant values for boundary conditions: -
--Note, that boundary temperature, density, specific enthalpy, -mass fractions and trace substances have only an effect if the mass flow -is from the Boundary into the port. If mass is flowing from -the port into the boundary, the boundary definitions, -with exception of boundary pressure, do not have an effect. -
-", -revisions=" -checkBoundary implementation
-such that it is run as an initial equation
-since it depends on parameters only.
-See #728.
-unit and quantity attributes.
-Modelica.Fluid.
-+This model defines constant values for boundary conditions: +
++Note, that boundary temperature, density, specific enthalpy, +mass fractions and trace substances have only an effect if the mass flow +is from the Boundary into the port. If mass is flowing from +the port into the boundary, the boundary definitions, +with exception of boundary pressure, do not have an effect. +
+", +revisions=" +checkBoundary implementation
+such that it is run as an initial equation
+since it depends on parameters only.
+See #728.
+unit and quantity attributes.
+Modelica.Fluid.
++Package Sources contains generic sources for fluid connectors +to define fixed or prescribed ambient conditions. +
+")); +end Sources; diff --git a/AixLib/Obsolete/Year2019/Fluid/Sources/package.order b/AixLib/Obsolete/Year2019/Fluid/Sources/package.order new file mode 100644 index 0000000000..24a4996f87 --- /dev/null +++ b/AixLib/Obsolete/Year2019/Fluid/Sources/package.order @@ -0,0 +1 @@ +FixedBoundary diff --git a/AixLib/Obsolete/Year2019/Fluid/package.mo b/AixLib/Obsolete/Year2019/Fluid/package.mo new file mode 100644 index 0000000000..c6816230fb --- /dev/null +++ b/AixLib/Obsolete/Year2019/Fluid/package.mo @@ -0,0 +1,18 @@ +within AixLib.Obsolete.Year2019; +package Fluid "Package with models for fluid flow systems" + extends Modelica.Icons.Package; + +annotation ( +preferredView="info", Documentation(info=" +This package contains obsolete models for fluid flow systems. +"), +Icon(graphics={ + Polygon(points={{-70,26},{68,-44},{68,26},{2,-10},{-70,-42},{-70,26}}, + lineColor={0,0,0}), + Line(points={{2,42},{2,-10}}), + Rectangle( + extent={{-18,50},{22,42}}, + lineColor={0,0,0}, + fillColor={0,0,0}, + fillPattern=FillPattern.Solid)})); +end Fluid; diff --git a/AixLib/Obsolete/Year2019/Fluid/package.order b/AixLib/Obsolete/Year2019/Fluid/package.order new file mode 100644 index 0000000000..0ddae5b6c4 --- /dev/null +++ b/AixLib/Obsolete/Year2019/Fluid/package.order @@ -0,0 +1,2 @@ +HeatPumps +Sources diff --git a/AixLib/Obsolete/Year2019/Utilities/HeatTransfer/HeatToStar.mo b/AixLib/Obsolete/Year2019/Utilities/HeatTransfer/HeatToStar.mo new file mode 100644 index 0000000000..36cfdf172a --- /dev/null +++ b/AixLib/Obsolete/Year2019/Utilities/HeatTransfer/HeatToStar.mo @@ -0,0 +1,34 @@ +within AixLib.Obsolete.Year2019.Utilities.HeatTransfer; +model HeatToStar "Adaptor for approximative longwave radiation exchange" + extends AixLib.Obsolete.BaseClasses.ObsoleteModel; + Modelica.Thermal.HeatTransfer.Interfaces.HeatPort_a Therm annotation(Placement(transformation(extent = {{-102, -10}, {-82, 10}}))); + AixLib.Utilities.Interfaces.RadPort Star annotation (Placement(transformation(extent={{81,-10},{101,10}}))); + parameter Modelica.SIunits.Area A(min=0) "Area of radiation exchange"; + parameter Modelica.SIunits.Emissivity eps = 0.95 "Emissivity"; +equation + Therm.Q_flow + Star.Q_flow = 0; + + // To prevent negative solutions for T, the max() expression is used. + // Negative solutions also occur when using max(T,0), therefore, 1 K is used. + Therm.Q_flow = Modelica.Constants.sigma * eps * A * ( + max(Therm.T,1) * max(Therm.T,1) * max(Therm.T,1) * max(Therm.T,1) - + max(Star.T,1) * max(Star.T,1) * max(Star.T,1) * max(Star.T,1)); + annotation(obsolete = "Obsolete model - use AixLib.Utilities.HeatTransfer.HeatToStar_Avar", Diagram(coordinateSystem(preserveAspectRatio = false, extent = {{-100, -100}, {100, 100}}), graphics={ Rectangle(extent = {{-80, 80}, {80, -80}}, lineColor = {0, 0, 255}, pattern = LinePattern.None, fillColor = {135, 150, 177}, + fillPattern = FillPattern.Solid), Text(extent = {{-80, 80}, {80, -80}}, lineColor = {0, 0, 0}, pattern = LinePattern.None, fillColor = {135, 150, 177}, + fillPattern = FillPattern.Solid, textString = "2*")}), Icon(coordinateSystem(preserveAspectRatio = false, extent = {{-100, -100}, {100, 100}}), graphics={ Rectangle(extent = {{-80, 80}, {80, -80}}, lineColor = {0, 0, 255}, pattern = LinePattern.None, fillColor = {135, 150, 177}, + fillPattern = FillPattern.Solid), Text(extent = {{-80, 80}, {80, -80}}, lineColor = {0, 0, 0}, pattern = LinePattern.None, fillColor = {135, 150, 177}, + fillPattern = FillPattern.Solid, textString = "2*")}), Documentation(info=" +The TwoStar_RadEx model cobines the HeatPort and the Star connector. To model longwave radiation exchange of a surfaces, just connect the HeatPort to the outmost layer of the surface and connect the Star connector to the Star connectors of an unlimited number of corresponding surfaces.
+Since exact calculation of longwave radiation exchange inside a room demands for the computation of view factors, it may be very complex to achieve for non-rectangular room layouts. Therefore, an approximated calculation of radiation exchange basing on the proportions of the affected surfaces is an alternative. The underlying concept of this approach is known as the "two star" room model.
+ ", revisions = " ++This package contains utility models such as for thermal comfort calculation, input/output, co-simulation, psychrometric calculations and various functions that are used throughout the library. +
+"), +Icon(coordinateSystem(extent={{-100.0,-100.0},{100.0,100.0}}), graphics={ + Polygon( + origin={1.3835,-4.1418}, + rotation=45.0, + fillColor={64,64,64}, + pattern=LinePattern.None, + fillPattern=FillPattern.Solid, + points={{-15.0,93.333},{-15.0,68.333},{0.0,58.333},{15.0,68.333},{15.0,93.333},{20.0,93.333},{25.0,83.333},{25.0,58.333},{10.0,43.333},{10.0,-41.667},{25.0,-56.667},{25.0,-76.667},{10.0,-91.667},{0.0,-91.667},{0.0,-81.667},{5.0,-81.667},{15.0,-71.667},{15.0,-61.667},{5.0,-51.667},{-5.0,-51.667},{-15.0,-61.667},{-15.0,-71.667},{-5.0,-81.667},{0.0,-81.667},{0.0,-91.667},{-10.0,-91.667},{-25.0,-76.667},{-25.0,-56.667},{-10.0,-41.667},{-10.0,43.333},{-25.0,58.333},{-25.0,83.333},{-20.0,93.333}}), + Polygon( + origin={10.1018,5.218}, + rotation=-45.0, + fillColor={255,255,255}, + fillPattern=FillPattern.Solid, + points={{-15.0,87.273},{15.0,87.273},{20.0,82.273},{20.0,27.273},{10.0,17.273},{10.0,7.273},{20.0,2.273},{20.0,-2.727},{5.0,-2.727},{5.0,-77.727},{10.0,-87.727},{5.0,-112.727},{-5.0,-112.727},{-10.0,-87.727},{-5.0,-77.727},{-5.0,-2.727},{-20.0,-2.727},{-20.0,2.273},{-10.0,7.273},{-10.0,17.273},{-20.0,27.273},{-20.0,82.273}})})); +end Utilities; diff --git a/AixLib/Obsolete/Year2019/Utilities/package.order b/AixLib/Obsolete/Year2019/Utilities/package.order new file mode 100644 index 0000000000..f4a4700da5 --- /dev/null +++ b/AixLib/Obsolete/Year2019/Utilities/package.order @@ -0,0 +1 @@ +HeatTransfer diff --git a/AixLib/Obsolete/Year2019/package.mo b/AixLib/Obsolete/Year2019/package.mo new file mode 100644 index 0000000000..4880018195 --- /dev/null +++ b/AixLib/Obsolete/Year2019/package.mo @@ -0,0 +1,3 @@ +within AixLib.Obsolete; +package Year2019 +end Year2019; diff --git a/AixLib/Utilities/Communication/SocketCommunication/Functions/package.order b/AixLib/Obsolete/Year2019/package.order similarity index 55% rename from AixLib/Utilities/Communication/SocketCommunication/Functions/package.order rename to AixLib/Obsolete/Year2019/package.order index 270f7f1384..a92ce43d70 100644 --- a/AixLib/Utilities/Communication/SocketCommunication/Functions/package.order +++ b/AixLib/Obsolete/Year2019/package.order @@ -1,2 +1,2 @@ -TCP -Utilities +Fluid +Utilities diff --git a/AixLib/Obsolete/package.mo b/AixLib/Obsolete/package.mo new file mode 100644 index 0000000000..7d93fd815c --- /dev/null +++ b/AixLib/Obsolete/package.mo @@ -0,0 +1,11 @@ +within AixLib; +package Obsolete "Classes that are obsolete and will be removed in later versions" + extends Modelica.Icons.Package; + +annotation (Documentation(info=" ++This package contains classes that are obsolete and will be removed from the +corresponding library in a future release. +
+")); +end Obsolete; diff --git a/AixLib/Obsolete/package.order b/AixLib/Obsolete/package.order new file mode 100644 index 0000000000..d6630dd7b2 --- /dev/null +++ b/AixLib/Obsolete/package.order @@ -0,0 +1,2 @@ +Year2019 +BaseClasses diff --git a/AixLib/Resources/C-Sources/cryptographicsHash.c b/AixLib/Resources/C-Sources/cryptographicsHash.c index a0280cdf80..144a691c61 100644 --- a/AixLib/Resources/C-Sources/cryptographicsHash.c +++ b/AixLib/Resources/C-Sources/cryptographicsHash.c @@ -296,15 +296,19 @@ void SHA1( const char* cryptographicsHash(const char* str) { - char result[21]; - char* hexresult = malloc(41*sizeof(char)); - size_t offset; + char result[21]; + size_t offset; + char* hexresult = malloc(41*sizeof(char)); - SHA1( result, str, strlen(str) ); + if (!hexresult){ + ModelicaError("Failed to allocate memory in cryptographicHash."); + } - for( offset = 0; offset < 20; offset++) { - sprintf( ( hexresult + (2*offset)), "%02x", result[offset]&0xff); - } + SHA1( result, str, strlen(str) ); + + for(offset = 0; offset < 20; offset++) { + sprintf( ( hexresult + (2*offset)), "%02x", result[offset]&0xff); + } - return hexresult; + return hexresult; } diff --git a/AixLib/Resources/C-Sources/fileWriterFree.c b/AixLib/Resources/C-Sources/fileWriterFree.c index d8b5fef692..01e21a2932 100644 --- a/AixLib/Resources/C-Sources/fileWriterFree.c +++ b/AixLib/Resources/C-Sources/fileWriterFree.c @@ -7,17 +7,20 @@ #include