Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
character(len=MaxNameLength), | public | :: | Name | = | ' ' | ||
character(len=MaxNameLength), | public | :: | SchedName | = | ' ' | ||
integer, | public | :: | SchedPtr | = | 0 | ||
character(len=MaxNameLength), | public | :: | ZoneName | = | ' ' | ||
integer, | public | :: | ZonePtr | = | 0 | ||
character(len=MaxNameLength), | public, | ALLOCATABLE, DIMENSION(:) | :: | ZName | |||
integer, | public, | ALLOCATABLE, DIMENSION(:) | :: | ZPtr | |||
character(len=MaxNameLength), | public | :: | SurfListName | = | ' ' | ||
integer, | public | :: | NumOfSurfaces | = | 0 | ||
integer, | public, | ALLOCATABLE, DIMENSION(:) | :: | SurfacePtr | |||
character(len=MaxNameLength), | public, | ALLOCATABLE, DIMENSION(:) | :: | SurfaceName | |||
real(kind=r64), | public, | ALLOCATABLE, DIMENSION(:) | :: | SurfaceFlowFrac | |||
real(kind=r64), | public, | ALLOCATABLE, DIMENSION(:) | :: | CDiameter | |||
real(kind=r64), | public, | ALLOCATABLE, DIMENSION(:) | :: | CLength | |||
real(kind=r64), | public, | ALLOCATABLE, DIMENSION(:) | :: | CNumbers | |||
character(len=MaxNameLength), | public, | ALLOCATABLE, DIMENSION(:) | :: | SlabIn | |||
character(len=MaxNameLength), | public, | ALLOCATABLE, DIMENSION(:) | :: | SlabOut | |||
real(kind=r64), | public | :: | TotalSurfaceArea | = | 0.0d0 | ||
real(kind=r64), | public | :: | CoreDiameter | = | 0.0d0 | ||
real(kind=r64), | public | :: | CoreLength | = | 0.0d0 | ||
real(kind=r64), | public | :: | CoreNumbers | = | 0.0d0 | ||
integer, | public | :: | ControlType | = | 0 | ||
integer, | public | :: | ReturnAirNode | = | 0 | ||
integer, | public | :: | RadInNode | = | 0 | ||
integer, | public | :: | ZoneAirInNode | = | 0 | ||
integer, | public | :: | FanOutletNode | = | 0 | ||
integer, | public | :: | MSlabInNode | = | 0 | ||
integer, | public | :: | MSlabOutNode | = | 0 | ||
character(len=MaxNameLength), | public | :: | FanName | = | ' ' | ||
integer, | public | :: | Fan_Index | = | 0 | ||
integer, | public | :: | ControlCompTypeNum | = | 0 | ||
integer, | public | :: | CompErrIndex | = | 0 | ||
real(kind=r64), | public | :: | MaxAirVolFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | MaxAirMassFlow | = | 0.0d0 | ||
integer, | public | :: | OAControlType | = | 0 | ||
character(len=MaxNameLength), | public | :: | MinOASchedName | = | ' ' | ||
integer, | public | :: | MinOASchedPtr | = | 0 | ||
character(len=MaxNameLength), | public | :: | MaxOASchedName | = | ' ' | ||
integer, | public | :: | MaxOASchedPtr | = | 0 | ||
character(len=MaxNameLength), | public | :: | TempSchedName | = | ' ' | ||
integer, | public | :: | TempSchedPtr | = | 0 | ||
integer, | public | :: | OutsideAirNode | = | 0 | ||
integer, | public | :: | AirReliefNode | = | 0 | ||
integer, | public | :: | OAMixerOutNode | = | 0 | ||
real(kind=r64), | public | :: | OutAirVolFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | OutAirMassFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | MinOutAirVolFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | MinOutAirMassFlow | = | 0.0d0 | ||
integer, | public | :: | SysConfg | = | 0 | ||
integer, | public | :: | CoilOption | = | 0 | ||
logical, | public | :: | HCoilPresent | = | .false. | ||
integer, | public | :: | HCoilType | = | 0 | ||
character(len=MaxNameLength), | public | :: | HCoilName | = | ' ' | ||
character(len=MaxNameLength), | public | :: | HCoilTypeCh | = | ' ' | ||
integer, | public | :: | HCoil_Index | = | 0 | ||
integer, | public | :: | HCoil_PlantTypeNum | = | 0 | ||
integer, | public | :: | HCoil_FluidIndex | = | 0 | ||
character(len=MaxNameLength), | public | :: | HCoilSchedName | = | ' ' | ||
integer, | public | :: | HCoilSchedPtr | = | 0 | ||
real(kind=r64), | public | :: | HCoilSchedValue | = | 0.0d0 | ||
real(kind=r64), | public | :: | MaxVolHotWaterFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | MaxVolHotSteamFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | MaxHotWaterFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | MaxHotSteamFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | MinHotSteamFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | MinVolHotWaterFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | MinVolHotSteamFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | MinHotWaterFlow | = | 0.0d0 | ||
integer, | public | :: | HotControlNode | = | 0 | ||
integer, | public | :: | HotCoilOutNodeNum | = | 0 | ||
real(kind=r64), | public | :: | HotControlOffset | = | 0.0d0 | ||
integer, | public | :: | HWLoopNum | = | 0 | ||
integer, | public | :: | HWLoopSide | = | 0 | ||
integer, | public | :: | HWBranchNum | = | 0 | ||
integer, | public | :: | HWCompNum | = | 0 | ||
character(len=MaxNameLength), | public | :: | HotAirHiTempSched | = | ' ' | ||
integer, | public | :: | HotAirHiTempSchedPtr | = | 0 | ||
character(len=MaxNameLength), | public | :: | HotAirLoTempSched | = | ' ' | ||
integer, | public | :: | HotAirLoTempSchedPtr | = | 0 | ||
character(len=MaxNameLength), | public | :: | HotCtrlHiTempSched | = | ' ' | ||
integer, | public | :: | HotCtrlHiTempSchedPtr | = | 0 | ||
character(len=MaxNameLength), | public | :: | HotCtrlLoTempSched | = | ' ' | ||
integer, | public | :: | HotCtrlLoTempSchedPtr | = | 0 | ||
logical, | public | :: | CCoilPresent | = | .false. | ||
character(len=MaxNameLength), | public | :: | CCoilName | = | ' ' | ||
character(len=MaxNameLength), | public | :: | CCoilTypeCh | = | ' ' | ||
integer, | public | :: | CCoil_Index | = | 0 | ||
character(len=MaxNameLength), | public | :: | CCoilPlantName | = | ' ' | ||
character(len=MaxNameLength), | public | :: | CCoilPlantType | = | ' ' | ||
integer, | public | :: | CCoil_PlantTypeNum | = | 0 | ||
integer, | public | :: | CCoilType | = | 0 | ||
character(len=MaxNameLength), | public | :: | CCoilSchedName | = | ' ' | ||
integer, | public | :: | CCoilSchedPtr | = | 0 | ||
real(kind=r64), | public | :: | CCoilSchedValue | = | 0.0d0 | ||
real(kind=r64), | public | :: | MaxVolColdWaterFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | MaxColdWaterFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | MinVolColdWaterFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | MinColdWaterFlow | = | 0.0d0 | ||
integer, | public | :: | ColdControlNode | = | 0 | ||
integer, | public | :: | ColdCoilOutNodeNum | = | 0 | ||
real(kind=r64), | public | :: | ColdControlOffset | = | 0.0d0 | ||
integer, | public | :: | CWLoopNum | = | 0 | ||
integer, | public | :: | CWLoopSide | = | 0 | ||
integer, | public | :: | CWBranchNum | = | 0 | ||
integer, | public | :: | CWCompNum | = | 0 | ||
character(len=MaxNameLength), | public | :: | ColdAirHiTempSched | = | ' ' | ||
integer, | public | :: | ColdAirHiTempSchedPtr | = | 0 | ||
character(len=MaxNameLength), | public | :: | ColdAirLoTempSched | = | ' ' | ||
integer, | public | :: | ColdAirLoTempSchedPtr | = | 0 | ||
character(len=MaxNameLength), | public | :: | ColdCtrlHiTempSched | = | ' ' | ||
integer, | public | :: | ColdCtrlHiTempSchedPtr | = | 0 | ||
character(len=MaxNameLength), | public | :: | ColdCtrlLoTempSched | = | ' ' | ||
integer, | public | :: | ColdCtrlLoTempSchedPtr | = | 0 | ||
integer, | public | :: | CondErrIndex | = | 0 | ||
integer, | public | :: | EnrgyImbalErrIndex | = | 0 | ||
integer, | public | :: | RadSurfNum | = | 0 | ||
integer, | public | :: | MSlabIn | = | 0 | ||
integer, | public | :: | MSlabOut | = | 0 | ||
character(len=MaxNameLength), | public | :: | DSSlabInNodeName | = | ' ' | ||
character(len=MaxNameLength), | public | :: | DSSlabOutNodeName | = | ' ' | ||
real(kind=r64), | public | :: | DirectHeatLossPower | = | 0.0d0 | ||
real(kind=r64), | public | :: | DirectHeatLossEnergy | = | 0.0d0 | ||
real(kind=r64), | public | :: | DirectHeatGainPower | = | 0.0d0 | ||
real(kind=r64), | public | :: | DirectHeatGainEnergy | = | 0.0d0 | ||
real(kind=r64), | public | :: | TotalVentSlabRadPower | = | 0.0d0 | ||
real(kind=r64), | public | :: | RadHeatingPower | = | 0.0d0 | ||
real(kind=r64), | public | :: | RadHeatingEnergy | = | 0.0d0 | ||
real(kind=r64), | public | :: | RadCoolingPower | = | 0.0d0 | ||
real(kind=r64), | public | :: | RadCoolingEnergy | = | 0.0d0 | ||
real(kind=r64), | public | :: | HeatCoilPower | = | 0.0d0 | ||
real(kind=r64), | public | :: | HeatCoilEnergy | = | 0.0d0 | ||
real(kind=r64), | public | :: | TotCoolCoilPower | = | 0.0d0 | ||
real(kind=r64), | public | :: | TotCoolCoilEnergy | = | 0.0d0 | ||
real(kind=r64), | public | :: | SensCoolCoilPower | = | 0.0d0 | ||
real(kind=r64), | public | :: | SensCoolCoilEnergy | = | 0.0d0 | ||
real(kind=r64), | public | :: | LateCoolCoilPower | = | 0.0d0 | ||
real(kind=r64), | public | :: | LateCoolCoilEnergy | = | 0.0d0 | ||
real(kind=r64), | public | :: | ElecFanPower | = | 0.0d0 | ||
real(kind=r64), | public | :: | ElecFanEnergy | = | 0.0d0 | ||
real(kind=r64), | public | :: | AirMassFlowRate | = | 0.0d0 | ||
real(kind=r64), | public | :: | AirVolFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | SlabInTemp | = | 0.0d0 | ||
real(kind=r64), | public | :: | SlabOutTemp | = | 0.0d0 | ||
real(kind=r64), | public | :: | ReturnAirTemp | = | 0.0d0 | ||
real(kind=r64), | public | :: | FanOutletTemp | = | 0.0d0 | ||
real(kind=r64), | public | :: | ZoneInletTemp | = | 0.0d0 | ||
character(len=MaxNameLength), | public | :: | AvailManagerListName | = | ' ' | ||
integer, | public | :: | AvailStatus | = | 0 |
TYPE, PUBLIC :: VentilatedSlabData
! Input data
CHARACTER(len=MaxNameLength) :: Name =' ' ! name of system
CHARACTER(len=MaxNameLength) :: SchedName =' ' ! availability schedule
INTEGER :: SchedPtr =0 ! index to schedule
CHARACTER(len=MaxNameLength) :: ZoneName = ' ' ! Name of zone the system is serving
INTEGER :: ZonePtr = 0 ! Point to this zone in the Zone derived type
! Variables for Delivery Config.
CHARACTER(len=MaxNameLength), &
ALLOCATABLE, DIMENSION(:) :: ZName ! Name of zone the system is serving
INTEGER, ALLOCATABLE, &
DIMENSION(:) :: ZPtr ! Point to this zone in the Zone derived type
CHARACTER(len=MaxNameLength) :: SurfListName = ' ' ! Name of surface/surface list that is the radiant system
INTEGER :: NumOfSurfaces = 0 ! Number of surfaces included in this system (coordinated control)
INTEGER, ALLOCATABLE, &
DIMENSION(:) :: SurfacePtr ! Pointer to the slabs in the Surface derived type
CHARACTER(len=MaxNameLength), &
ALLOCATABLE, DIMENSION(:) :: SurfaceName ! Name of surfaces that are the radiant system (can be one or more)
REAL(r64), ALLOCATABLE, &
DIMENSION(:) :: SurfaceFlowFrac ! Fraction of flow/pipe length for a particular surface
REAL(r64), ALLOCATABLE, &
DIMENSION(:) :: CDiameter ! Number of core diameter
REAL(r64), ALLOCATABLE, &
DIMENSION(:) :: CLength ! Number of core length
REAL(r64), ALLOCATABLE, &
DIMENSION(:) :: CNumbers ! Number of core numbers
CHARACTER(len=MaxNameLength), &
ALLOCATABLE, DIMENSION(:) :: SlabIn ! Name of node that is slab inlet node
CHARACTER(len=MaxNameLength), &
ALLOCATABLE, DIMENSION(:) :: SlabOut ! Name of node that is slab outlet node
REAL(r64) :: TotalSurfaceArea = 0.0d0 ! Total surface area for all surfaces that are part of this system
REAL(r64) :: CoreDiameter = 0.0d0 ! tube diameter for embedded tubing
REAL(r64) :: CoreLength = 0.0d0 ! tube length embedded in radiant surface
REAL(r64) :: CoreNumbers = 0.0d0 ! tube length embedded in radiant surface
INTEGER :: ControlType = 0 ! Control type for the system
! (MAT, MRT, Op temp, ODB, OWB, DPTZ, Surf Temp.)
INTEGER :: ReturnAirNode =0 ! inlet air node number
INTEGER :: RadInNode =0 ! outlet air node number
INTEGER :: ZoneAirInNode =0 ! outlet air node number
INTEGER :: FanOutletNode =0 ! outlet node number for fan exit
! (assumes fan is upstream of heating coil)
INTEGER :: MSlabInNode =0 !
INTEGER :: MSlabOutNode =0 !
CHARACTER(len=MaxNameLength) :: FanName =' ' ! name of fan
INTEGER :: Fan_Index =0
INTEGER :: ControlCompTypeNum =0
INTEGER :: CompErrIndex =0
REAL(r64) :: MaxAirVolFlow =0.0d0 ! m3/s
REAL(r64) :: MaxAirMassFlow =0.0d0 ! kg/s
INTEGER :: OAControlType =0 ! type of control; options are VARIABLE PERCENT and FIXED TEMPERATURE
CHARACTER(len=MaxNameLength) :: MinOASchedName =' ' ! schedule of fraction for minimum outside air (all controls)
INTEGER :: MinOASchedPtr =0 ! index to schedule
CHARACTER(len=MaxNameLength) :: MaxOASchedName =' ' ! schedule of percentages for maximum outside air fraction (variable %)
INTEGER :: MaxOASchedPtr =0 ! index to schedule
CHARACTER(len=MaxNameLength) :: TempSchedName =' ' ! schedule of temperatures for desired "mixed air"
! temperature (fixed temp.)
INTEGER :: TempSchedPtr =0 ! index to schedule
INTEGER :: OutsideAirNode =0 ! outside air node number
INTEGER :: AirReliefNode =0 ! relief air node number
INTEGER :: OAMixerOutNode =0 ! outlet node after the outside air mixer (inlet to coils if present)
REAL(r64) :: OutAirVolFlow =0.0d0 ! m3/s
REAL(r64) :: OutAirMassFlow =0.0d0 ! kg/s
REAL(r64) :: MinOutAirVolFlow =0.0d0 ! m3/s
REAL(r64) :: MinOutAirMassFlow =0.0d0 ! kg/s
INTEGER :: SysConfg =0 ! type of coil option; options are BOTH, HEATING, COOLING, AND NONE
INTEGER :: CoilOption =0 ! type of coil option; options are BOTH, HEATING, COOLING, AND NONE
LOGICAL :: HCoilPresent =.false. ! .TRUE. if ventilated slab has a heating coil
INTEGER :: HCoilType =0 ! type of heating coil (water, gas, electric, etc.)
CHARACTER(len=MaxNameLength) :: HCoilName =' ' ! name of heating coil
CHARACTER(len=MaxNameLength) :: HCoilTypeCh =' ' ! type of heating coil (character string)
INTEGER :: HCoil_Index =0
INTEGER :: HCoil_PlantTypeNum =0 !
INTEGER :: HCoil_FluidIndex =0
CHARACTER(len=MaxNameLength) :: HCoilSchedName =' ' ! availability schedule for the heating coil
INTEGER :: HCoilSchedPtr =0 ! index to schedule
REAL(r64) :: HCoilSchedValue =0.0d0
REAL(r64) :: MaxVolHotWaterFlow =0.0d0 ! m3/s
REAL(r64) :: MaxVolHotSteamFlow =0.0d0 ! m3/s
REAL(r64) :: MaxHotWaterFlow =0.0d0 ! kg/s
REAL(r64) :: MaxHotSteamFlow=0.0d0
REAl(r64) :: MinHotSteamFlow =0.0d0
REAL(r64) :: MinVolHotWaterFlow =0.0d0 ! m3/s
REAL(r64) :: MinVolHotSteamFlow =0.0d0 ! m3/s
REAL(r64) :: MinHotWaterFlow =0.0d0 ! kg/s
INTEGER :: HotControlNode =0 ! hot water control node
INTEGER :: HotCoilOutNodeNum =0 ! outlet of coil
REAL(r64) :: HotControlOffset =0.0d0 ! control tolerance
INTEGER :: HWLoopNum =0 ! index for plant loop with hot water coil
INTEGER :: HWLoopSide =0 ! index for plant loop side for hot water coil
INTEGER :: HWBranchNum =0 ! index for plant branch for hot water coil
INTEGER :: HWCompNum =0 ! index for plant component for hot water coil
CHARACTER(len=MaxNameLength) :: HotAirHiTempSched = ' ' ! Schedule name for the highest Air temperature
INTEGER :: HotAirHiTempSchedPtr = 0 ! Schedule index for the highest Air temperature
CHARACTER(len=MaxNameLength) :: HotAirLoTempSched = ' ' ! Schedule name for the lowest Air temperature
INTEGER :: HotAirLoTempSchedPtr = 0 ! Schedule index for the lowest Air temperature
CHARACTER(len=MaxNameLength) :: HotCtrlHiTempSched = ' ' ! Schedule name for the highest control temperature
! (where the lowest Air temperature is requested)
INTEGER :: HotCtrlHiTempSchedPtr = 0 ! Schedule index for the highest control temperature
! (where the lowest Air temperature is requested)
CHARACTER(len=MaxNameLength) :: HotCtrlLoTempSched = ' ' ! Schedule name for the lowest control temperature
! (where the highest Air temperature is requested)
INTEGER :: HotCtrlLoTempSchedPtr = 0 ! Schedule index for the lowest control temperature
! (where the highest Air temperature is requested)
LOGICAL :: CCoilPresent =.false. ! .TRUE. if ventilated slab has a cooling coil
CHARACTER(len=MaxNameLength) :: CCoilName =' ' ! name of cooling coil
CHARACTER(len=MaxNameLength) :: CCoilTypeCh =' ' ! type of cooling coil (character string)
INTEGER :: CCoil_Index =0
CHARACTER(len=MaxNameLength) :: CCoilPlantName =' ' ! name of cooling coil (child<=CoilSystem:Cooling:Water:HeatExchangerAssisted)
CHARACTER(len=MaxNameLength) :: CCoilPlantType =' ' ! type of cooling coil (child<=CoilSystem:Cooling:Water:HeatExchangerAssisted)
INTEGER :: CCoil_PlantTypeNum =0 !
INTEGER :: CCoilType =0 ! type of cooling coil:
! 'Coil:Cooling:Water:DetailedGeometry' or
! 'CoilSystem:Cooling:Water:HeatExchangerAssisted'
CHARACTER(len=MaxNameLength) :: CCoilSchedName =' ' ! availability schedule for the cooling coil
INTEGER :: CCoilSchedPtr =0 ! index to schedule
REAL(r64) :: CCoilSchedValue =0.0d0
REAL(r64) :: MaxVolColdWaterFlow =0.0d0 ! m3/s
REAL(r64) :: MaxColdWaterFlow =0.0d0 ! kg/s
REAL(r64) :: MinVolColdWaterFlow =0.0d0 ! m3/s
REAL(r64) :: MinColdWaterFlow =0.0d0 ! kg/s
INTEGER :: ColdControlNode =0 ! chilled water control node
INTEGER :: ColdCoilOutNodeNum =0 ! chilled water coil out nod
REAL(r64) :: ColdControlOffset =0.0d0 ! control tolerance
INTEGER :: CWLoopNum =0 ! index for plant loop with chilled water coil
INTEGER :: CWLoopSide =0 ! index for plant loop side for chilled water coil
INTEGER :: CWBranchNum =0 ! index for plant branch for chilled water coil
INTEGER :: CWCompNum =0 ! index for plant component for chilled water coil
CHARACTER(len=MaxNameLength) :: ColdAirHiTempSched = ' ' ! Schedule name for the highest air temperature
INTEGER :: ColdAirHiTempSchedPtr = 0 ! Schedule index for the highest Air temperature
CHARACTER(len=MaxNameLength) :: ColdAirLoTempSched = ' ' ! Schedule name for the lowest Air temperature
INTEGER :: ColdAirLoTempSchedPtr = 0 ! Schedule index for the lowest Air temperature
CHARACTER(len=MaxNameLength) :: ColdCtrlHiTempSched = ' ' ! Schedule name for the highest control temperature
! (where the lowest Air temperature is requested)
INTEGER :: ColdCtrlHiTempSchedPtr = 0 ! Schedule index for the highest control temperature
! (where the lowest Air temperature is requested)
CHARACTER(len=MaxNameLength) :: ColdCtrlLoTempSched = ' ' ! Schedule name for the lowest control temperature
! (where the highest Air temperature is requested)
INTEGER :: ColdCtrlLoTempSchedPtr = 0 ! Schedule index for the lowest control temperature
! (where the highest Air temperature is requested)
INTEGER :: CondErrIndex = 0 ! Error index for recurring warning messages
INTEGER :: EnrgyImbalErrIndex = 0 ! Error index for recurring warning messages
INTEGER :: RadSurfNum = 0 ! Radiant Surface Number
INTEGER :: MSlabIn = 0 ! Internal Slab Inlet Node Number
INTEGER :: MSlabOut = 0 ! INternal Slab Outlet Node Number
CHARACTER(len=MaxNameLength) :: DSSlabInNodeName =' '
CHARACTER(len=MaxNameLength) :: DSSlabOutNodeName =' '
! Report data
REAL(r64) :: DirectHeatLossPower =0.0d0 ! system direct heat loss in W
REAL(r64) :: DirectHeatLossEnergy =0.0d0 ! system direct heat loss in J
REAL(r64) :: DirectHeatGainPower =0.0d0 ! system direct heat gain in W
REAL(r64) :: DirectHeatGainEnergy =0.0d0 ! system direct heat gain in J
REAL(r64) :: TotalVentSlabRadPower =0.0d0
REAL(r64) :: RadHeatingPower =0.0d0 ! radiant heating output in watts
REAL(r64) :: RadHeatingEnergy =0.0d0 ! radiant heating output in J
REAL(r64) :: RadCoolingPower =0.0d0 ! radiant cooling output in watts
REAL(r64) :: RadCoolingEnergy =0.0d0 ! radiant cooling output in J
REAL(r64) :: HeatCoilPower =0.0d0
REAL(r64) :: HeatCoilEnergy =0.0d0
REAL(r64) :: TotCoolCoilPower =0.0d0
REAL(r64) :: TotCoolCoilEnergy =0.0d0
REAL(r64) :: SensCoolCoilPower =0.0d0
REAL(r64) :: SensCoolCoilEnergy =0.0d0
REAL(r64) :: LateCoolCoilPower =0.0d0
REAL(r64) :: LateCoolCoilEnergy =0.0d0
REAL(r64) :: ElecFanPower =0.0d0
REAL(r64) :: ElecFanEnergy =0.0d0
REAL(r64) :: AirMassFlowRate =0.0d0 ! Circulated air mass flow rate in kg/s
REAL(r64) :: AirVolFlow =0.0d0 ! Circulated air volumetric flow rate in m3/s
REAL(r64) :: SlabInTemp =0.0d0 ! Slab inlet temp in degree C
REAL(r64) :: SlabOutTemp =0.0d0 ! Slab outlet temp in degree C
REAL(r64) :: ReturnAirTemp =0.0d0 !
REAL(r64) :: FanOutletTemp =0.0d0 ! FanOutlet temp in degree C
REAL(r64) :: ZoneInletTemp =0.0d0 ! supply air temp
CHARACTER(len=MaxNameLength) :: AvailManagerListName = ' ' ! Name of an availability manager list object
INTEGER :: AvailStatus = 0
END TYPE VentilatedSlabData