model OperationModes "Test model for operation modes" extends Modelica.Icons.Example; Buildings.Examples.VAVReheat.BaseClasses.Controls.ModeSelector operationModes; Modelica.Thermal.HeatTransfer.Sources.PrescribedHeatFlow preHeaFlo; Modelica.Thermal.HeatTransfer.Sources.FixedTemperature fixTem(T=273.15); Modelica.Thermal.HeatTransfer.Components.HeatCapacitor cap(C=20000, T(fixed= true)); Modelica.Thermal.HeatTransfer.Components.ThermalConductor con(G=1); Modelica.Blocks.Logical.Switch switch1; Modelica.Blocks.Sources.Constant on(k=200); Modelica.Blocks.Sources.Constant off(k=0); Modelica.Thermal.HeatTransfer.Sensors.TemperatureSensor temperatureSensor; Modelica.Blocks.Sources.RealExpression TRooSetHea( y=if mode.y == Integer(Buildings.Examples.VAVReheat.BaseClasses.Controls.OperationModes.occupied) then 293.15 else 287.15); Modelica.Blocks.Sources.Constant TCoiHea(k=283.15) "Temperature after heating coil"; Buildings.Examples.VAVReheat.BaseClasses.Controls.ControlBus controlBus; Modelica.Blocks.Routing.IntegerPassThrough mode "Outputs the control mode"; Modelica.Blocks.Sources.BooleanExpression modSel( y=mode.y == Integer(Buildings.Examples.VAVReheat.BaseClasses.Controls.OperationModes.unoccupiedNightSetBack) or mode.y == Integer(Buildings.Examples.VAVReheat.BaseClasses.Controls.OperationModes.unoccupiedWarmUp)); Modelica.Blocks.Sources.Constant TOut(k=283.15) "Outside temperature"; Modelica.Thermal.HeatTransfer.Sensors.TemperatureSensor temperatureSensor1; Modelica.Blocks.Sources.BooleanExpression modSel1( y=mode.y == Integer(Buildings.Examples.VAVReheat.BaseClasses.Controls.OperationModes.occupied)); Modelica.Thermal.HeatTransfer.Sources.PrescribedHeatFlow preHeaFlo1; Buildings.Controls.Continuous.LimPID PID(initType=Modelica.Blocks.Types.Init.InitialState); Modelica.Blocks.Logical.Switch switch2; Modelica.Blocks.Math.Gain gain(k=200); Buildings.Controls.SetPoints.OccupancySchedule occSch "Occupancy schedule"; equation connect(fixTem.port, con.port_a); connect(preHeaFlo.port, cap.port); connect(con.port_b, cap.port); connect(switch1.y, preHeaFlo.Q_flow); connect(on.y, switch1.u1); connect(off.y, switch1.u3); connect(cap.port, temperatureSensor.port); connect(controlBus, operationModes.cb); connect(temperatureSensor.T, controlBus.TRooMin); connect(TCoiHea.y, controlBus.TCoiHeaOut); connect(controlBus.controlMode, mode.u); connect(modSel.y, switch1.u2); connect(TOut.y, controlBus.TOut); connect(cap.port, temperatureSensor1.port); connect(temperatureSensor1.T, controlBus.TRooAve); connect(TRooSetHea.y, PID.u_s); connect(temperatureSensor.T, PID.u_m); connect(modSel1.y, switch2.u2); connect(off.y, switch2.u3); connect(preHeaFlo1.port, cap.port); connect(PID.y, switch2.u1); connect(gain.y, preHeaFlo1.Q_flow); connect(switch2.y, gain.u); connect(occSch.tNexOcc, controlBus.dTNexOcc); connect(TRooSetHea.y, controlBus.TRooSetHea); connect(occSch.occupied, controlBus.occupied); end OperationModes;

model RoomVAV "Test model for the room VAV controller" extends Modelica.Icons.Example; Buildings.Examples.VAVReheat.BaseClasses.Controls.RoomVAV boxWitExpDam( have_preIndDam=false, ratVFloMin=0.15, ratVFloHea=0.3, V_flow_nominal=1.5) "VAV terminal unit single maximum controller, for units with the exponential damper"; Buildings.Controls.OBC.CDL.Reals.Sources.Constant heaSet(k=273.15 + 21) "Heating setpoint"; Buildings.Controls.OBC.CDL.Reals.Sources.Constant cooSet(k=273.15 + 22) "Cooling setpoint"; Buildings.Controls.OBC.CDL.Reals.Sources.Ramp ram( height=4, duration=3600, offset=-4) "Ramp source"; Buildings.Controls.OBC.CDL.Reals.Sources.Sin sin( amplitude=1, freqHz=1/3600, offset=273.15 + 23.5) "Sine source"; Buildings.Controls.OBC.CDL.Reals.Add rooTem "Room temperature"; Buildings.Controls.OBC.CDL.Reals.Sources.Sin disFlo( amplitude=0.1, freqHz=1/3600, offset=0.2) "Discharge airflow rate"; Buildings.Examples.VAVReheat.BaseClasses.Controls.RoomVAV boxWitPreIndDam( have_preIndDam=true, ratVFloMin=0.15, ratVFloHea=0.3, V_flow_nominal=1.5) "VAV terminal unit single maximum controller, for units with the pressure independent damper"; equation connect(rooTem.y, boxWitExpDam.TRoo); connect(cooSet.y, boxWitExpDam.TRooCooSet); connect(heaSet.y, boxWitExpDam.TRooHeaSet); connect(sin.y, rooTem.u2); connect(ram.y, rooTem.u1); connect(disFlo.y, boxWitExpDam.VDis_flow); connect(heaSet.y, boxWitPreIndDam.TRooHeaSet); connect(cooSet.y, boxWitPreIndDam.TRooCooSet); connect(rooTem.y, boxWitPreIndDam.TRoo); end RoomVAV;

model SupplyAirTemperature "Validation of the supply air temperature control" extends Modelica.Icons.Example; Buildings.Examples.VAVReheat.BaseClasses.Controls.SupplyAirTemperature conTSup(k=0.1, Ti= 60) "Controller"; Buildings.Controls.OBC.CDL.Logical.Sources.Pulse uEna(period=2800) "Enable signal"; Buildings.Controls.OBC.CDL.Reals.Sources.Constant TSupSet( y(final unit="K", displayUnit="degC"), k=13 + 273.15) "Set point"; Buildings.Controls.OBC.CDL.Reals.Sources.Sin TSup( phase=3.1415926535898, y(final unit="K", displayUnit="degC"), amplitude=5, freqHz=2/3600, offset=13 + 273.15) "Measurement"; equation connect(TSupSet.y, conTSup.TSupSet); connect(uEna.y, conTSup.uEna); connect(TSup.y, conTSup.TSup); end SupplyAirTemperature;

model SystemHysteresis "Test model for the system hysteresis" extends Modelica.Icons.Example; Buildings.Examples.VAVReheat.BaseClasses.Controls.SystemHysteresis sysHys; Buildings.Examples.VAVReheat.BaseClasses.Controls.SystemHysteresis sysHys1; Buildings.Controls.OBC.CDL.Reals.Sources.Pulse pul(width=1/60, period=3600) "Pulse source"; Buildings.Controls.OBC.CDL.Reals.Sources.Pulse pul1(width=1/10, period( displayUnit="min") = 60) "Pulse source"; protected Buildings.Controls.OBC.CDL.Logical.Sources.Pulse booPul( final width=0.5, final period(displayUnit="h") = 10800, final shift=0) "Boolean pulse"; equation connect(pul.y, sysHys.u); connect(pul1.y, sysHys1.u); connect(booPul.y, sysHys.sysOn); connect(booPul.y, sysHys1.sysOn); end SystemHysteresis;