TYPE ZoneSizingData
CHARACTER &
(len=MaxNameLength) :: ZoneName = ' ' ! name of a zone
CHARACTER &
(len=MaxNameLength) :: CoolDesDay = ' ' ! name of a cooling design day
CHARACTER &
(len=MaxNameLength) :: HeatDesDay = ' ' ! name of a heating design day
INTEGER :: ZnCoolDgnSAMethod = 0 ! choice of how to get zone cooling design air temperature;
! 1 = specify supply air temperature,
! 2 = calculate from the temperature difference
INTEGER :: ZnHeatDgnSAMethod = 0 ! choice of how to get zone heating design air temperature;
! 1 = specify supply air temperature,
! 2 = calculate from the temperature difference
REAL(r64) :: CoolDesTemp = 0.0d0 ! zone design cooling supply air temperature [C]
REAL(r64) :: HeatDesTemp = 0.0d0 ! zone design heating supply air temperature [C]
REAL(r64) :: CoolDesTempDiff = 0.0d0 ! zone design cooling supply air temperature difference [deltaC]
REAL(r64) :: HeatDesTempDiff = 0.0d0 ! zone design heating supply air temperature difference [deltaC]
REAL(r64) :: CoolDesHumRat = 0.0d0 ! zone design cooling supply air humidity ratio [kg-H2O/kg-air]
REAL(r64) :: HeatDesHumRat = 0.0d0 ! zone design heating supply air humidity ratio [kg-H2O/kg-air]
INTEGER :: ZoneDesignSpecOAIndex = 0 ! index to DesignSpecification:OutdoorAir object
INTEGER :: OADesMethod = 0 ! choice of how to calculate minimum outside air;
! 1 = m3/s per person; 2 = m3/s per zone; 3 = m3/s per zone area;
! 4 = sum of flow from 3 OA input fields;
! 5 = max of flow from 3 OA input fields
REAL(r64) :: DesOAFlowPPer = 0.0d0 ! design outside air flow per person in zone [m3/s]
REAL(r64) :: DesOAFlowPerArea = 0.0d0 ! design outside air flow per zone area [m3/s / m2]
REAL(r64) :: DesOAFlow = 0.0d0 ! design outside air flow for the zone [m3/s]
INTEGER :: CoolAirDesMethod = 0 ! choice of how to get zone cooling design air flow rates;
! 1 = calc from des day simulation; 2 = m3/s per zone, user input
! 3 = apply limits to air flow rate from DD calc
REAL(r64) :: InpDesCoolAirFlow = 0.0d0 ! design zone supply air flow rate [m3/s]
REAL(r64) :: DesCoolMinAirFlowPerArea = 0.0d0 ! design cooling minimum air flow rate per zone area [m3/s / m2]
REAL(r64) :: DesCoolMinAirFlow = 0.0d0 ! design cooling minimum air flow rate [m3/s]
REAL(r64) :: DesCoolMinAirFlowFrac = 0.0d0 ! design cooling minimum air flow rate fraction
! (of the cooling design air flow rate)
INTEGER :: HeatAirDesMethod = 0 ! choice of how to get zone heating design air flow rates;
! 1 = calc from des day simulation; 2 = m3/s per zone, user input
! 3 = apply limits to air flow rate from DD calc
REAL(r64) :: InpDesHeatAirFlow = 0.0d0 ! design zone heating supply air flow rate [m3/s]
REAL(r64) :: DesHeatMaxAirFlowPerArea = 0.0d0 ! design heating maximum air flow rate per zone area [m3/s / m2]
REAL(r64) :: DesHeatMaxAirFlow = 0.0d0 ! design heating maximum air flow rate [m3/s]
REAL(r64) :: DesHeatMaxAirFlowFrac = 0.0d0 ! design heating maximum air flow rate fraction
! (of the cooling design air flow rate)
REAL(r64) :: HeatSizingFactor = 0.0d0 ! the zone heating sizing ratio
REAL(r64) :: CoolSizingFactor = 0.0d0 ! the zone cooling sizing ratio
INTEGER :: ActualZoneNum = 0 ! index into the Zone data array (in DataHeatBalance)
INTEGER :: SupplyAirNode = 0 ! node number of supply air node
REAL(r64) :: DesHeatMassFlow = 0.0d0 ! zone design heating air mass flow rate [kg/s]
LOGICAL :: EMSOverrideDesHeatMassOn = .FALSE. ! true if EMS is acting on this structure
REAL(r64) :: EMSValueDesHeatMassFlow = 0.0D0 ! Value EMS directing to use for Design Heating air mass flow [kg/s]
REAL(r64) :: DesCoolMassFlow = 0.0d0 ! zone design cooling air mass flow rate [kg/s]
LOGICAL :: EMSOverrideDesCoolMassOn = .FALSE. ! true if EMS is acting on this structure
REAL(r64) :: EMSValueDesCoolMassFlow = 0.0D0 ! Value EMS directing to use for Design Cooling air mass flow [kg/s]
REAL(r64) :: DesHeatLoad = 0.0d0 ! zone design heating load [W]
LOGICAL :: EMSOverrideDesHeatLoadOn = .FALSE. ! true if EMS is acting on this structure
REAL(r64) :: EMSValueDesHeatLoad = 0.0D0 ! Value EMS directing to use for zone design heating load [W]
REAL(r64) :: DesCoolLoad = 0.0d0 ! zone design cooling load [W]
LOGICAL :: EMSOverrideDesCoolLoadOn = .FALSE. ! true if EMS is acting on this structure
REAL(r64) :: EMSValueDesCoolLoad = 0.0D0 ! Value EMS directing to use for zone design cooling load [W]
REAL(r64) :: DesHeatDens = 0.0d0 ! zone design heating air density [kg/m3]
REAL(r64) :: DesCoolDens = 0.0d0 ! zone design cooling air density [kg/m3]
REAL(r64) :: DesHeatVolFlow = 0.0d0 ! zone design heating air volume flow rate [m3/s]
LOGICAL :: EMSOverrideDesHeatVolOn = .FALSE. ! true if EMS is acting on this structure
REAL(r64) :: EMSValueDesHeatVolFlow = 0.0D0 ! Value EMS directing to use for Design Heating air volume flow [m3/s]
REAL(r64) :: DesCoolVolFlow = 0.0d0 ! zone design cooling air volume flow rate [m3/s]
LOGICAL :: EMSOverrideDesCoolVolOn = .FALSE. ! true if EMS is acting on this structure
REAL(r64) :: EMSValueDesCoolVolFlow = 0.0D0 ! Value EMS directing to use for Design cooling air volume flow [m3/s]
REAL(r64) :: DesHeatVolFlowMax = 0.0d0 ! zone design heating maximum air volume flow rate [m3/s]
REAL(r64) :: DesCoolVolFlowMin = 0.0d0 ! zone design cooling minimum air volume flow rate [m3/s]
REAL(r64) :: DesHeatCoilInTemp = 0.0d0 ! zone heating coil design air inlet temperature [C]
REAL(r64) :: DesCoolCoilInTemp = 0.0d0 ! zone cooling coil design air inlet temperature [C]
REAL(r64) :: DesHeatCoilInHumRat = 0.0d0 ! zone heating coil design air inlet humidity ratio [kg/kg]
REAL(r64) :: DesCoolCoilInHumRat = 0.0d0 ! zone cooling coil design air inlet humidity ratio [kg/kg]
REAL(r64) :: DesHeatCoilInTempTU = 0.0d0 ! zone heating coil design air inlet temperature (supply air)([C]
REAL(r64) :: DesCoolCoilInTempTU = 0.0d0 ! zone cooling coil design air inlet temperature (supply air)[C]
REAL(r64) :: DesHeatCoilInHumRatTU = 0.0d0 ! zone heating coil design air inlet humidity ratio
! (supply air) [kg/kg]
REAL(r64) :: DesCoolCoilInHumRatTU = 0.0d0 ! zone cooling coil design air inlet humidity ratio
! (supply air) [kg/kg]
REAL(r64) :: HeatMassFlow = 0.0d0 ! current zone heating air mass flow rate (HVAC time step)
REAL(r64) :: CoolMassFlow = 0.0d0 ! current zone cooling air mass flow rate (HVAC time step)
REAL(r64) :: HeatLoad = 0.0d0 ! current zone heating load (HVAC time step)
REAL(r64) :: CoolLoad = 0.0d0 ! current zone heating load (HVAC time step)
REAL(r64) :: HeatZoneTemp = 0.0d0 ! current zone temperature (heating, time step)
REAL(r64) :: HeatOutTemp = 0.0d0 ! current outdoor temperature (heating, time step)
REAL(r64) :: HeatZoneRetTemp = 0.0d0 ! current zone return temperature (heating, time step)
REAL(r64) :: HeatTstatTemp = 0.0d0 ! current zone thermostat temperature (heating, time step)
REAL(r64) :: CoolZoneTemp = 0.0d0 ! current zone temperature (cooling, time step)
REAL(r64) :: CoolOutTemp = 0.0d0 ! current Outdoor temperature (cooling, time step)
REAL(r64) :: CoolZoneRetTemp = 0.0d0 ! current zone return temperature (cooling, time step)
REAL(r64) :: CoolTstatTemp = 0.0d0 ! current zone thermostat temperature (cooling, time step)
REAL(r64) :: HeatZoneHumRat = 0.0d0 ! current zone humidity ratio (heating, time step)
REAL(r64) :: CoolZoneHumRat = 0.0d0 ! current zone humidity ratio (cooling, time step)
REAL(r64) :: HeatOutHumRat = 0.0d0 ! current outdoor humidity ratio (heating, time step)
REAL(r64) :: CoolOutHumRat = 0.0d0 ! current outdoor humidity ratio (cooling, time step)
REAL(r64) :: ZoneTempAtHeatPeak = 0.0d0 ! zone temp at max heating [C]
REAL(r64) :: ZoneRetTempAtHeatPeak = 0.0d0 ! zone return temp at max heating [C]
REAL(r64) :: OutTempAtHeatPeak = 0.0d0 ! outdoor temperature at max heating [C]
REAL(r64) :: ZoneTempAtCoolPeak = 0.0d0 ! zone temp at max cooling [C]
REAL(r64) :: ZoneRetTempAtCoolPeak = 0.0d0 ! zone return temp at max cooling [C]
REAL(r64) :: OutTempAtCoolPeak = 0.0d0 ! outdoor temperature at max cooling [C]
REAL(r64) :: ZoneHumRatAtHeatPeak = 0.0d0 ! zone humidity ratio at max heating [kg/kg]
REAL(r64) :: ZoneHumRatAtCoolPeak = 0.0d0 ! zone humidity ratio at max cooling [kg/kg]
REAL(r64) :: OutHumRatAtHeatPeak = 0.0d0 ! outdoor humidity at max heating [kg/kg]
REAL(r64) :: OutHumRatAtCoolPeak = 0.0d0 ! outdoor humidity at max cooling [kg/kg]
INTEGER :: TimeStepNumAtHeatMax = 0 ! time step number (in day) at Heating peak
INTEGER :: TimeStepNumAtCoolMax = 0 ! time step number (in day) at cooling peak
INTEGER :: HeatDDNum = 0 ! design day index of design day causing heating peak
INTEGER :: CoolDDNum = 0 ! design day index of design day causing heating peak
CHARACTER(len=8) :: cHeatDDDate = ' ' ! date of design day causing heating peak
CHARACTER(len=8) :: cCoolDDDate = ' ' ! date of design day causing cooling peak
REAL(r64) :: MinOA = 0.0d0 ! design minimum outside air in m3/s
REAL(r64) :: DesCoolMinAirFlow2 = 0.0d0 ! design cooling minimum air flow rate [m3/s] derived from
! DesCoolMinAirFlowPerArea
REAL(r64) :: DesHeatMaxAirFlow2 = 0.0d0 ! design heating maximum air flow rate [m3/s] derived from
! DesHeatMaxAirFlowPerArea
REAL(r64), ALLOCATABLE, DIMENSION(:) :: HeatFlowSeq ! daily sequence of zone heating air mass flow rate
! (zone time step)
REAL(r64), ALLOCATABLE, DIMENSION(:) :: CoolFlowSeq ! daily sequence of zone cooling air mass flow rate
! (zone time step)
REAL(r64), ALLOCATABLE, DIMENSION(:) :: HeatLoadSeq ! daily sequence of zone heating load zone time step)
REAL(r64), ALLOCATABLE, DIMENSION(:) :: CoolLoadSeq ! daily sequence of zone cooling load zone time step)
REAL(r64), ALLOCATABLE, DIMENSION(:) :: HeatZoneTempSeq ! daily sequence of zone temperatures (heating, zone time step)
REAL(r64), ALLOCATABLE, DIMENSION(:) :: HeatOutTempSeq ! daily sequence of outdoor temperatures (heating, zone time step)
REAL(r64), ALLOCATABLE, DIMENSION(:) :: HeatZoneRetTempSeq ! daily sequence of zone return temperatures (heating,
! zone time step)
REAL(r64), ALLOCATABLE, DIMENSION(:) :: HeatTstatTempSeq ! daily sequence of zone thermostat temperatures (heating,
! zone time step)
REAL(r64), ALLOCATABLE, DIMENSION(:) :: DesHeatSetPtSeq ! daily sequence of indoor set point temperatures (zone time step)
REAL(r64), ALLOCATABLE, DIMENSION(:) :: CoolZoneTempSeq ! daily sequence of zone temperatures (cooling, zone time step)
REAL(r64), ALLOCATABLE, DIMENSION(:) :: CoolOutTempSeq ! daily sequence of outdoor temperatures (cooling, zone time step)
REAL(r64), ALLOCATABLE, DIMENSION(:) :: CoolZoneRetTempSeq ! daily sequence of zone return temperatures (cooling,
! zone time step)
REAL(r64), ALLOCATABLE, DIMENSION(:) :: CoolTstatTempSeq ! daily sequence of zone thermostat temperatures (cooling,
! zone time step)
REAL(r64), ALLOCATABLE, DIMENSION(:) :: DesCoolSetPtSeq ! daily sequence of indoor set point temperatures (zone time step)
REAL(r64), ALLOCATABLE, DIMENSION(:) :: HeatZoneHumRatSeq ! daily sequence of zone humidity ratios (heating, zone time step)
REAL(r64), ALLOCATABLE, DIMENSION(:) :: CoolZoneHumRatSeq ! daily sequence of zone humidity ratios (cooling, zone time step)
REAL(r64), ALLOCATABLE, DIMENSION(:) :: HeatOutHumRatSeq ! daily sequence of outdoor humidity ratios (heating, zone time step)
REAL(r64), ALLOCATABLE, DIMENSION(:) :: CoolOutHumRatSeq ! daily sequence of outdoor humidity ratios (cooling, zone time step)
REAL(r64) :: ZoneADEffCooling = 1.0d0 ! the zone air distribution effectiveness in cooling mode
REAL(r64) :: ZoneADEffHeating = 1.0d0 ! the zone air distribution effectiveness in heating mode
REAL(r64) :: ZoneSecondaryRecirculation = 0.0d0 ! the zone secondary air recirculation fraction
REAL(r64) :: ZonePrimaryAirFraction = 0.0d0 ! the zone primary air fraction for cooling based calculations
REAL(r64) :: ZonePrimaryAirFractionHtg = 0.0d0 ! the zone primary air fraction for heating based calculations
REAL(r64) :: ZoneOAFracCooling = 0.0d0 ! OA fraction in cooling mode
REAL(r64) :: ZoneOAFracHeating = 0.0d0 ! OA fraction in heating mode
REAL(r64) :: TotalOAFromPeople = 0.0d0 ! Zone OA required due to people
REAL(r64) :: TotalOAFromArea = 0.0d0 ! Zone OA required based on floor area
REAL(r64) :: TotPeopleInZone = 0.0d0 ! total number of people in the zone
REAL(r64) :: TotalZoneFloorArea = 0.0d0 ! total zone floor area
REAL(r64) :: ZonePeakOccupancy = 0.0d0 ! zone peak occupancy based on max schedule value
REAL(r64) :: SupplyAirAdjustFactor = 1.0d0 ! supply air adjustment factor for next time step if OA is capped
REAL(r64) :: ZpzClgByZone = 0.0d0 ! OA Std 62.1 required fraction in cooling mode
REAL(r64) :: ZpzHtgByZone = 0.0d0 ! OA Std 62.1 required fraction in heating mode
REAL(r64) :: VozClgByZone = 0.0d0 ! value of required cooling vent to zone, used in 62.1 tabular report
REAL(r64) :: VozHtgByZone = 0.0d0 ! value of required heating vent to zone, used in 62.1 tabular report
END TYPE ZoneSizingData