Issue 78 new top down parameters for a partial retrofitted bes

BESMod/Examples/BAUSimStudy/Case1Standard.mo

@@ -1,8 +1,9 @@
 within BESMod.Examples.BAUSimStudy;
 model Case1Standard
-  extends PartialCase(building(redeclare Buildings.Case_1_standard oneZoneParam(
-          heaLoadFacGrd=0, heaLoadFacOut=0)),
-  systemParameters(QBui_flow_nominal={16308.1}, TOda_nominal=263.15, THydSup_nominal={328.15}));
+  extends PartialCase(building(redeclare
+        BESMod.Systems.Demand.Building.RecordsCollection.ACoolHeadAndBEStPar.NoRetrofit1918_SingleDwelling
+        oneZoneParam),
+  systemParameters(TOda_nominal=263.15, THydSup_nominal={328.15}));
   extends Modelica.Icons.Example;
 
   annotation (experiment(StopTime=172800,

BESMod/Examples/BAUSimStudy/PartialCase.mo

@@ -3,10 +3,9 @@ partial model PartialCase
   extends Systems.BaseClasses.PartialBuildingEnergySystem(
     redeclare BESMod.Systems.Electrical.DirectGridConnectionSystem electrical,
     redeclare Systems.Demand.Building.TEASERThermalZone building(
-      redeclare BESMod.Systems.Demand.Building.RecordsCollection.RefAachen
-        oneZoneParam(heaLoadFacGrd=0, heaLoadFacOut=0),
       hBui=sum(building.zoneParam.VAir)^(1/3),
       ABui=sum(building.zoneParam.VAir)^(2/3),
+      ARoo=sum(building.zoneParam.ARoof),
       energyDynamics=Modelica.Fluid.Types.Dynamics.FixedInitial),
     redeclare BESMod.Systems.Control.NoControl control,
     redeclare BESMod.Systems.Hydraulical.HydraulicSystem hydraulic(
@@ -88,7 +87,7 @@ partial model PartialCase
       redeclare BESMod.Systems.Demand.DHW.TappingProfiles.calcmFlowEquStatic
         calcmFlow),
     redeclare Systems.UserProfiles.TEASERProfiles userProfiles,
-    redeclare BESParameters systemParameters,
+    redeclare BESParameters systemParameters(QBui_flow_nominal=building.QRec_flow_nominal),
     redeclare BESMod.Systems.RecordsCollection.ParameterStudy.NoStudy
       parameterStudy,
     redeclare final package MediumDHW = AixLib.Media.Water,

BESMod/Examples/BAUSimStudy/package.order

@@ -1,4 +1,3 @@
 Case1Standard
 PartialCase
 BESParameters
-Buildings

BESMod/Examples/DesignOptimization/BES.mo

@@ -7,7 +7,7 @@ model BES
       hBui=sum(building.zoneParam.VAir)^(1/3),
       ARoo=sum(building.zoneParam.ARoof),
       redeclare BESMod.Systems.Demand.Building.RecordsCollection.RefAachen
-        oneZoneParam(heaLoadFacGrd=0, heaLoadFacOut=0),
+        oneZoneParam,
       energyDynamics=Modelica.Fluid.Types.Dynamics.FixedInitial),
     redeclare BESMod.Systems.Control.NoControl control,
     redeclare BESMod.Systems.Hydraulical.HydraulicSystem hydraulic(

BESMod/Examples/DesignOptimization/BESNoDHW.mo

@@ -7,7 +7,7 @@ model BESNoDHW "Example to demonstrate usage without DHW"
       hBui=sum(building.zoneParam.VAir)^(1/3),
       ARoo=sum(building.zoneParam.ARoof),
       redeclare BESMod.Systems.Demand.Building.RecordsCollection.RefAachen
-        oneZoneParam(heaLoadFacGrd=0, heaLoadFacOut=0),
+        oneZoneParam,
       energyDynamics=Modelica.Fluid.Types.Dynamics.FixedInitial),
     redeclare BESMod.Systems.Control.NoControl control,
     redeclare BESMod.Systems.Hydraulical.HydraulicSystem hydraulic(

BESMod/Examples/GasBoilerBuildingOnly.mo

@@ -5,8 +5,9 @@ model GasBoilerBuildingOnly
     redeclare BESMod.Systems.Demand.Building.TEASERThermalZone building(
       hBui=sum(building.zoneParam.VAir)^(1/3),
       ABui=sum(building.zoneParam.VAir)^(2/3),
+      ARoo=sum(building.zoneParam.ARoof),
       redeclare BESMod.Systems.Demand.Building.RecordsCollection.RefAachen
-        oneZoneParam(heaLoadFacGrd=0, heaLoadFacOut=0)),
+        oneZoneParam),
     redeclare BESMod.Systems.Control.NoControl control,
     redeclare BESMod.Systems.Ventilation.NoVentilation ventilation,
     redeclare BESMod.Systems.Hydraulical.HydraulicSystem hydraulic(
@@ -48,7 +49,7 @@ model GasBoilerBuildingOnly
       parameterStudy,
     redeclare BESMod.Systems.RecordsCollection.ExampleSystemParameters
       systemParameters(
-      QBui_flow_nominal={12820},
+      QBui_flow_nominal=building.QRec_flow_nominal,
       THydSup_nominal={338.15},
       use_ventilation=false,
       use_dhw=false,

BESMod/Examples/HeatPumpAndBoiler/BaseClasses.mo

@@ -7,8 +7,9 @@ package BaseClasses "Contains partial example case"
       redeclare Systems.Demand.Building.TEASERThermalZone building(
         ABui=sum(building.zoneParam.VAir)^(2/3),
         hBui=sum(building.zoneParam.VAir)^(1/3),
+        ARoo=sum(building.zoneParam.ARoof),
         redeclare BESMod.Systems.Demand.Building.RecordsCollection.RefAachen
-          oneZoneParam(heaLoadFacGrd=0, heaLoadFacOut=0),
+          oneZoneParam,
         energyDynamics=Modelica.Fluid.Types.Dynamics.FixedInitial),
       redeclare BESMod.Systems.Control.NoControl control,
       redeclare BESMod.Systems.Hydraulical.HydraulicSystem hydraulic(

BESMod/Examples/ModelicaConferencePaper/TEASERBuilding.mo

@@ -6,10 +6,9 @@ model TEASERBuilding
       hZone={483.48248/185.9548},
       ABui=sum(building.zoneParam.VAir)^(2/3),
       hBui=sum(building.zoneParam.VAir)^(1/3),
-      ARoo=building.oneZoneParam.ARoof,                                                                 redeclare
+      ARoo=building.oneZoneParam.ARoof, redeclare
         BESMod.Systems.Demand.Building.RecordsCollection.RefAachen
-        oneZoneParam(heaLoadFacGrd=0, heaLoadFacOut=0),
-                      use_verboseEnergyBalance=false,
+        oneZoneParam, use_verboseEnergyBalance=false,
       energyDynamics=Modelica.Fluid.Types.Dynamics.FixedInitial),
     redeclare BESMod.Systems.UserProfiles.TEASERProfiles
       userProfiles,

BESMod/Examples/Retrofit/BESParameters.mo

@@ -0,0 +1,16 @@
+within BESMod.Examples.Retrofit;
+record BESParameters
+  extends Systems.RecordsCollection.SystemParametersBaseDataDefinition(
+    filNamWea=Modelica.Utilities.Files.loadResource(
+        "modelica://BESMod/Resources/WeatherData/TRY2015_522361130393_Jahr_City_Potsdam.mos"),
+    use_elecHeating=false,
+    final TAmbVen=min(TSetZone_nominal),
+    final TAmbHyd=min(TSetZone_nominal),
+    final TDHWWaterCold=283.15,
+    final TSetDHW=328.15,
+    final TVenSup_nominal=TSetZone_nominal,
+    final TSetZone_nominal=fill(293.15, nZones),
+    final nZones=1,
+    final use_ventilation=false);
+
+end BESParameters;

BESMod/Examples/Retrofit/Case1NoRetrofit.mo

@@ -0,0 +1,19 @@
+within BESMod.Examples.Retrofit;
+model Case1NoRetrofit "Example with no retrofit at all"
+  extends PartialCase(building(redeclare
+        BESMod.Systems.Demand.Building.RecordsCollection.ACoolHeadAndBEStPar.NoRetrofit1918_SingleDwelling
+        oneZoneParam), systemParameters(TOda_nominal=263.15, THydSup_nominal={338.15}));
+  extends Modelica.Icons.Example;
+
+  annotation (experiment(
+      StopTime=86400,
+      Interval=600,
+      Tolerance=1e-06),
+       __Dymola_Commands(file="modelica://BESMod/Resources/Scripts/Dymola/Examples/Retrofit/Case1NoRetrofit.mos"
+        "Simulate and plot"), Documentation(info="<html>
+<p>
+  This example demonstrates the usage of no retrofit, 
+  where <code>QOld_flow_design</code> equals <code>Q_flow_nominal</code>. 
+</p>
+</html>"));
+end Case1NoRetrofit;

BESMod/Examples/Retrofit/Case1PartialRetrofit.mo

@@ -0,0 +1,38 @@
+within BESMod.Examples.Retrofit;
+model Case1PartialRetrofit
+  "Example with retrofit only of building envelope and single components"
+  extends PartialCase(
+    NoRetrofitHydGen=true,
+    NoRetrofitHydDis=false,
+    NoRetrofitHydTra=false,
+    building(redeclare
+        BESMod.Systems.Demand.Building.RecordsCollection.ACoolHeadAndBEStPar.Retrofit1918_SingleDwelling
+        oneZoneParam),
+    systemParameters(
+      QBui_flow_nominal={5267.49},
+      TOda_nominal=263.15,
+      THydSup_nominal={318.15},
+      QBuiOld_flow_design={17442.7},
+      THydSupOld_design={338.15}));
+  extends Modelica.Icons.Example;
+
+  annotation (experiment(
+      StopTime=86400,
+      Interval=600,
+      Tolerance=1e-06),
+       __Dymola_Commands(file="modelica://BESMod/Resources/Scripts/Dymola/Examples/Retrofit/Case1PartialRetrofit.mos"
+        "Simulate and plot"), Documentation(info="<html>
+<p>
+  This example demonstrates the usage of partial retrofit, 
+  where <code>QOld_flow_design</code> and <code>Q_flow_nominal</code> differ. 
+  The values used in the <code>systemParameters</code> records are extracted 
+  from the other examples 
+  <a href=\"BESMod.Examples.Retrofit.Case1TotalRetrofit\">BESMod.Examples.Retrofit.Case1TotalRetrofit</a> 
+  and <a href=\"BESMod.Examples.Retrofit.Case1NoRetrofit\">BESMod.Examples.Retrofit.Case1NoRetrofit</a>. 
+  Using TEASER and ebcpy, you can calculate these values in Python and 
+  automate the setting if you do not have the old and new values at hand. 
+  Alternativly, you can just simulate the other examples and extract the 
+  values from the results.
+</p>
+</html>"));
+end Case1PartialRetrofit;

BESMod/Examples/Retrofit/Case1TotalRetrofit.mo

@@ -0,0 +1,19 @@
+within BESMod.Examples.Retrofit;
+model Case1TotalRetrofit
+  extends PartialCase(building(redeclare
+        BESMod.Systems.Demand.Building.RecordsCollection.ACoolHeadAndBEStPar.Retrofit1918_SingleDwelling
+        oneZoneParam), systemParameters(TOda_nominal=263.15, THydSup_nominal={318.15}));
+  extends Modelica.Icons.Example;
+
+  annotation (experiment(
+      StopTime=86400,
+      Interval=600,
+      Tolerance=1e-06),
+       __Dymola_Commands(file="modelica://BESMod/Resources/Scripts/Dymola/Examples/Retrofit/Case1TotalRetrofit.mos"
+        "Simulate and plot"), Documentation(info="<html>
+<p>
+  This example demonstrates the usage of a total retrofit, 
+  where <code>QOld_flow_design</code> equals <code>Q_flow_nominal</code>. 
+</p>
+</html>"));
+end Case1TotalRetrofit;

BESMod/Examples/Retrofit/PartialCase.mo

@@ -0,0 +1,116 @@
+within BESMod.Examples.Retrofit;
+partial model PartialCase
+  extends Systems.BaseClasses.PartialBuildingEnergySystem(
+    redeclare BESMod.Systems.Electrical.DirectGridConnectionSystem electrical,
+    redeclare Systems.Demand.Building.TEASERThermalZone building(
+      hBui=sum(building.zoneParam.VAir)^(1/3),
+      ABui=sum(building.zoneParam.VAir)^(2/3),
+      ARoo=sum(building.zoneParam.ARoof),
+      energyDynamics=Modelica.Fluid.Types.Dynamics.FixedInitial),
+    redeclare BESMod.Systems.Control.NoControl control,
+    redeclare BESMod.Systems.Hydraulical.HydraulicSystem hydraulic(
+      energyDynamics=Modelica.Fluid.Types.Dynamics.FixedInitial,
+      redeclare Systems.Hydraulical.Generation.HeatPumpAndElectricHeater
+        generation(
+        use_old_design={NoRetrofitHydGen},
+        redeclare BESMod.Systems.RecordsCollection.Movers.DefaultMover parPum,
+        redeclare package Medium_eva = AixLib.Media.Air,
+        redeclare
+          BESMod.Systems.Hydraulical.Generation.RecordsCollection.DefaultHP
+          parHeaPum(
+          genDesTyp=BESMod.Systems.Hydraulical.Generation.Types.GenerationDesign.BivalentPartParallel,
+          TBiv=TBiv,
+          scalingFactor=hydraulic.generation.parHeaPum.QPri_flow_nominal/5000,
+          dpCon_nominal=0,
+          dpEva_nominal=0,
+          use_refIne=false,
+          refIneFre_constant=0),
+        redeclare
+          BESMod.Systems.Hydraulical.Generation.RecordsCollection.DefaultElectricHeater
+          parEleHea,
+        redeclare model PerDataMainHP =
+            AixLib.DataBase.HeatPump.PerformanceData.VCLibMap (
+            QCon_flow_nominal=hydraulic.generation.parHeaPum.QPri_flow_nominal,
+            refrigerant="Propane",
+            flowsheet="VIPhaseSeparatorFlowsheet"),
+        redeclare
+          BESMod.Systems.RecordsCollection.TemperatureSensors.DefaultSensor
+          parTemSen),
+      redeclare Systems.Hydraulical.Control.MonoenergeticHeatPumpSystem
+        control(
+        redeclare
+          BESMod.Systems.Hydraulical.Control.Components.ThermostaticValveController.ThermostaticValvePIControlled
+          valCtrl,
+        dTHysBui=10,
+        dTHysDHW=10,
+        redeclare model DHWHysteresis =
+            BESMod.Systems.Hydraulical.Control.Components.BivalentOnOffControllers.TimeBasedElectricHeater,
+        redeclare model BuildingHysteresis =
+            BESMod.Systems.Hydraulical.Control.Components.BivalentOnOffControllers.TimeBasedElectricHeater,
+        redeclare
+          BESMod.Systems.Hydraulical.Control.RecordsCollection.BasicHeatPumpPI
+          parPIDHeaPum,
+        redeclare
+          BESMod.Systems.Hydraulical.Control.RecordsCollection.DefaultSafetyControl
+          safetyControl),
+      redeclare
+        BESMod.Systems.Hydraulical.Distribution.TwoStoDetailedDirectLoading
+        distribution(
+        use_old_design={NoRetrofitHydDis},
+        QHeaAftBuf_flow_nominal=0,
+        redeclare
+          BESMod.Systems.RecordsCollection.TemperatureSensors.DefaultSensor
+          parTemSen,
+        redeclare
+          BESMod.Systems.RecordsCollection.Valves.DefaultThreeWayValve
+          parThrWayVal,
+        redeclare
+          BESMod.Systems.Hydraulical.Distribution.RecordsCollection.BufferStorage.DefaultDetailedStorage
+          parStoBuf(use_QLos=true, T_m=338.15),
+        redeclare
+          BESMod.Systems.Hydraulical.Distribution.RecordsCollection.BufferStorage.DefaultDetailedStorage
+          parStoDHW(
+          dTLoadingHC1=10,
+          use_QLos=true,
+          T_m=65 + 273.15),
+        redeclare
+          BESMod.Systems.Hydraulical.Generation.RecordsCollection.DefaultElectricHeater
+          parEleHeaAftBuf),
+      redeclare BESMod.Systems.Hydraulical.Transfer.RadiatorPressureBased
+        transfer(
+        use_oldRad_design={NoRetrofitHydTra},
+        redeclare
+          BESMod.Systems.Hydraulical.Transfer.RecordsCollection.RadiatorTransferData
+          parRad,
+        redeclare
+          BESMod.Systems.Hydraulical.Transfer.RecordsCollection.SteelRadiatorStandardPressureLossData
+          parTra,
+        redeclare BESMod.Systems.RecordsCollection.Movers.DefaultMover parPum)),
+    redeclare Systems.Demand.DHW.StandardProfiles DHW(
+      energyDynamics=Modelica.Fluid.Types.Dynamics.FixedInitial,
+      redeclare BESMod.Systems.Demand.DHW.RecordsCollection.ProfileM DHWProfile,
+      redeclare BESMod.Systems.RecordsCollection.Movers.DefaultMover parPum,
+      redeclare BESMod.Systems.Demand.DHW.TappingProfiles.calcmFlowEquStatic
+        calcmFlow),
+    redeclare Systems.UserProfiles.TEASERProfiles userProfiles,
+    redeclare BESParameters systemParameters(QBui_flow_nominal=building.QRec_flow_nominal),
+    redeclare BESMod.Systems.RecordsCollection.ParameterStudy.NoStudy
+      parameterStudy,
+    redeclare final package MediumDHW = AixLib.Media.Water,
+    redeclare final package MediumZone = AixLib.Media.Air,
+    redeclare final package MediumHyd = AixLib.Media.Water,
+    redeclare BESMod.Systems.Ventilation.NoVentilation ventilation);
+
+  parameter Modelica.Units.SI.Temperature TBiv=271.15
+    "Nominal bivalence temperature. = TOda_nominal for monovalent systems.";
+  parameter Boolean NoRetrofitHydTra = false
+    "If true, hydraulic transfersystem uses QBuiNoRetrofit.";
+  parameter Boolean NoRetrofitHydDis = false
+    "If true, hydraulic distribution system uses QBuiNoRetrofit.";
+  parameter Boolean NoRetrofitHydGen = false
+    "If true, hydraulic generation system uses QBuiNoRetrofit.";
+  annotation (experiment(
+      StopTime=31536000,
+      Interval=600,
+      __Dymola_Algorithm="Dassl"));
+end PartialCase;

BESMod/Examples/Retrofit/package.mo

@@ -0,0 +1,5 @@
+within BESMod.Examples;
+package Retrofit "This package contains examples to show the effect of partial retrofit on the model"
+extends Modelica.Icons.ExamplesPackage;
+
+end Retrofit;

BESMod/Examples/Retrofit/package.order

@@ -0,0 +1,5 @@
+Case1NoRetrofit
+Case1TotalRetrofit
+Case1PartialRetrofit
+PartialCase
+BESParameters

BESMod/Examples/SolarThermalSystem/PartialSolarThermalHPS.mo

@@ -6,8 +6,9 @@ partial model PartialSolarThermalHPS
     redeclare Systems.Demand.Building.TEASERThermalZone building(
       hBui=sum(building.zoneParam.VAir)^(1/3),
       ABui=sum(building.zoneParam.VAir)^(2/3),
+      ARoo=sum(building.zoneParam.ARoof),
       redeclare BESMod.Systems.Demand.Building.RecordsCollection.RefAachen
-        oneZoneParam(heaLoadFacGrd=0, heaLoadFacOut=0),
+        oneZoneParam,
       energyDynamics=Modelica.Fluid.Types.Dynamics.FixedInitial),
     redeclare BESMod.Systems.Control.NoControl control,
     redeclare BESMod.Systems.Hydraulical.HydraulicSystem hydraulic(

BESMod/Examples/TEASERHeatLoadCalculation/Example.mo

@@ -1,8 +1,8 @@
 within BESMod.Examples.TEASERHeatLoadCalculation;
 model Example "Simple example"
   extends PartialCalculation(building(redeclare
-        BESMod.Examples.BAUSimStudy.Buildings.Case_2_retrofit oneZoneParam(
-          heaLoadFacOut=200, heaLoadFacGrd=100), energyDynamics=Modelica.Fluid.Types.Dynamics.FixedInitial),
+        BESMod.Systems.Demand.Building.RecordsCollection.ACoolHeadAndBEStPar.Retrofit1983_SingleDwelling
+        oneZoneParam, energyDynamics=Modelica.Fluid.Types.Dynamics.FixedInitial),
                                                   userProfiles(dTSetBack=3));
   extends Modelica.Icons.Example;
 

BESMod/Examples/package.order

@@ -6,3 +6,4 @@ HighOrderModel
 ModelicaConferencePaper
 SolarThermalSystem
 TEASERHeatLoadCalculation
+Retrofit