| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| character(len=MaxNameLength), | public | :: | SysName | = | ' ' | ||
| character(len=MaxNameLength), | public | :: | SysType | = | ' ' | ||
| integer, | public | :: | SysType_Num | = | 0 | ||
| character(len=MaxNameLength), | public | :: | Schedule | = | ' ' | ||
| integer, | public | :: | SchedPtr | = | 0 | ||
| character(len=MaxNameLength), | public | :: | ReheatComp | = | ' ' | ||
| integer, | public | :: | ReheatComp_Num | = | 0 | ||
| integer, | public | :: | ReheatComp_Index | = | 0 | ||
| character(len=MaxNameLength), | public | :: | ReheatName | = | ' ' | ||
| integer, | public | :: | ReheatComp_PlantType | = | 0 | ||
| character(len=MaxNameLength), | public | :: | FanType | = | ' ' | ||
| integer, | public | :: | Fan_Num | = | 0 | ||
| integer, | public | :: | Fan_Index | = | 0 | ||
| integer, | public | :: | ControlCompTypeNum | = | 0 | ||
| integer, | public | :: | CompErrIndex | = | 0 | ||
| character(len=MaxNameLength), | public | :: | FanName | = | ' ' | ||
| real(kind=r64), | public | :: | MaxAirVolFlowRate | = | 0.0D0 | ||
| real(kind=r64), | public | :: | AirMassFlowRateMax | = | 0.0D0 | ||
| real(kind=r64), | public | :: | MaxHeatAirVolFlowRate | = | 0.0D0 | ||
| real(kind=r64), | public | :: | HeatAirMassFlowRateMax | = | 0.0D0 | ||
| integer, | public | :: | ZoneMinAirFracMethod | = | ConstantMinFrac | ||
| real(kind=r64), | public | :: | ZoneMinAirFrac | = | 0.0D0 | ||
| real(kind=r64), | public | :: | ZoneFixedMinAir | = | 0.0D0 | ||
| integer, | public | :: | ZoneMinAirFracSchPtr | = | 0 | ||
| logical, | public | :: | ConstantMinAirFracSetByUser | = | .FALSE. | ||
| logical, | public | :: | FixedMinAirSetByUser | = | .FALSE. | ||
| real(kind=r64), | public | :: | DesignMinAirFrac | = | 0.0D0 | ||
| real(kind=r64), | public | :: | DesignFixedMinAir | = | 0.0D0 | ||
| integer, | public | :: | InletNodeNum | = | 0 | ||
| integer, | public | :: | OutletNodeNum | = | 0 | ||
| integer, | public | :: | ReheatControlNode | = | 0 | ||
| integer, | public | :: | ReheatCoilOutletNode | = | 0 | ||
| real(kind=r64), | public | :: | ReheatCoilMaxCapacity | = | 0.0D0 | ||
| integer, | public | :: | ReheatAirOutletNode | = | 0 | ||
| real(kind=r64), | public | :: | MaxReheatWaterVolFlow | = | 0.0D0 | ||
| real(kind=r64), | public | :: | MaxReheatSteamVolFlow | = | 0.0D0 | ||
| real(kind=r64), | public | :: | MaxReheatWaterFlow | = | 0.0D0 | ||
| real(kind=r64), | public | :: | MaxReheatSteamFlow | = | 0.0D0 | ||
| real(kind=r64), | public | :: | MinReheatWaterVolFlow | = | 0.0D0 | ||
| real(kind=r64), | public | :: | MinReheatSteamVolFlow | = | 0.0D0 | ||
| real(kind=r64), | public | :: | MinReheatWaterFlow | = | 0.0D0 | ||
| real(kind=r64), | public | :: | MinReheatSteamFlow | = | 0.0D0 | ||
| real(kind=r64), | public | :: | ControllerOffset | = | 0.0D0 | ||
| real(kind=r64), | public | :: | MaxReheatTemp | = | 0.0D0 | ||
| logical, | public | :: | MaxReheatTempSetByUser | = | .FALSE. | ||
| integer, | public | :: | DamperHeatingAction | = | 0 | 1=NORMAL; 2=REVERSE ACTION |
|
| real(kind=r64), | public | :: | DamperPosition | = | 0.0D0 | ||
| integer, | public | :: | ADUNum | = | 0 | ||
| integer, | public | :: | FluidIndex | = | 0 | ||
| integer, | public | :: | ErrCount1 | = | 0 | ||
| integer, | public | :: | ErrCount1c | = | 0 | ||
| integer, | public | :: | ErrCount2 | = | 0 | ||
| real(kind=r64), | public | :: | ZoneFloorArea | = | 0.0D0 | ||
| integer, | public | :: | CtrlZoneNum | = | 0 | ||
| integer, | public | :: | ActualZoneNum | = | 0 | ||
| real(kind=r64), | public | :: | MaxAirVolFlowRateDuringReheat | = | 0.0D0 | ||
| real(kind=r64), | public | :: | MaxAirVolFractionDuringReheat | = | 0.0D0 | ||
| real(kind=r64), | public | :: | AirMassFlowDuringReheatMax | = | 0.0D0 | ||
| integer, | public | :: | ZoneOutdoorAirMethod | = | 0 | ||
| real(kind=r64), | public | :: | OutdoorAirFlowRate | = | 0.0D0 | ||
| logical, | public | :: | NoOAFlowInputFromUser | = | .TRUE. | ||
| integer, | public | :: | OARequirementsPtr | = | 0 | ||
| integer, | public | :: | AirLoopNum | = | 0 | ||
| integer, | public | :: | HWLoopNum | = | 0 | ||
| integer, | public | :: | HWLoopSide | = | 0 | ||
| integer, | public | :: | HWBranchIndex | = | 0 | ||
| integer, | public | :: | HWCompIndex | = | 0 | ||
| character(len=MaxNameLength), | public | :: | ZoneHVACUnitType | = | ' ' | ||
| character(len=MaxNameLength), | public | :: | ZoneHVACUnitName | = | ' ' | ||
| integer, | public | :: | SecInNode | = | 0 | ||
| integer, | public | :: | IterationLimit | = | 0 | ||
| integer, | public | :: | IterationFailed | = | 0 |
TYPE SysDesignParams
CHARACTER(len=MaxNameLength) :: SysName = ' ' ! Name of the Sys
CHARACTER(len=MaxNameLength) :: SysType = ' ' ! Type of Sys ie. VAV, Mixing, Inducing, etc.
INTEGER :: SysType_Num = 0 ! Numeric Equivalent for System type
CHARACTER(len=MaxNameLength) :: Schedule = ' ' ! Sys Operation Schedule
INTEGER :: SchedPtr = 0 ! Pointer to the correct schedule
CHARACTER(len=MaxNameLength) :: ReheatComp = ' ' ! Type of the Reheat Coil Object
INTEGER :: ReheatComp_Num = 0 ! Numeric Equivalent in this module for Coil type
INTEGER :: ReheatComp_Index = 0 ! Returned Index number from other routines
CHARACTER(len=MaxNameLength) :: ReheatName = ' ' ! name of reheat coil
INTEGER :: ReheatComp_PlantType = 0 ! typeOf_ number for plant type of heating coil
CHARACTER(len=MaxNameLength) :: FanType = ' ' ! Type of the Fan Object
INTEGER :: Fan_Num = 0 ! Numeric Equivalent in this module for fan type
INTEGER :: Fan_Index = 0 ! Returned Index number from other routines
INTEGER :: ControlCompTypeNum = 0
INTEGER :: CompErrIndex = 0
CHARACTER(len=MaxNameLength) :: FanName = ' ' ! name of fan
REAL(r64) :: MaxAirVolFlowRate = 0.0D0 ! Max Specified Volume Flow Rate of Sys (cooling max) [m3/sec]
REAL(r64) :: AirMassFlowRateMax = 0.0D0 ! Max Specified Mass Flow Rate of Sys (cooling max) [kg/sec]
REAL(r64) :: MaxHeatAirVolFlowRate = 0.0D0 ! Max specified volume flow rate of unit at max heating [m3/s]
REAL(r64) :: HeatAirMassFlowRateMax = 0.0D0 ! Max Specified Mass Flow Rate of unit at max heating [kg/sec]
INTEGER :: ZoneMinAirFracMethod = ConstantMinFrac ! parameter for what method is used for min flow fraction
REAL(r64) :: ZoneMinAirFrac = 0.0D0 ! Fraction of supply air used as minimum flow
REAL(r64) :: ZoneFixedMinAir = 0.0D0 ! Absolute minimum supply air flow
INTEGER :: ZoneMinAirFracSchPtr = 0 ! pointer to the schedule for min flow fraction
LOGICAL :: ConstantMinAirFracSetByUser = .FALSE. ! record if user left field blank for constant min fraction.
LOGICAL :: FixedMinAirSetByUser = .FALSE. ! record if user left field blank for constant min fraction.
REAL(r64) :: DesignMinAirFrac = 0.0D0 ! store user entered constant min flow fract for design
REAL(r64) :: DesignFixedMinAir = 0.0D0 ! store user entered constant min flow for design
INTEGER :: InletNodeNum = 0 ! terminal unit inlet node number; damper inlet node number
INTEGER :: OutletNodeNum = 0 ! damper outlet node number for VAV; unused by CV; coil air inlet node for VAV
! fan outlet node, coil inlet node for VAV VS Fan
INTEGER :: ReheatControlNode = 0 ! hot water inlet node for heating coil
INTEGER :: ReheatCoilOutletNode = 0 ! outlet node for heating coil
REAL(r64) :: ReheatCoilMaxCapacity = 0.0D0 ! heating coil capacity, W
INTEGER :: ReheatAirOutletNode = 0 ! terminal unit outlet node; heating coil air outlet node
REAL(r64) :: MaxReheatWaterVolFlow = 0.0D0 ! m3/s
REAL(r64) :: MaxReheatSteamVolFlow = 0.0D0 ! m3/s
REAL(r64) :: MaxReheatWaterFlow = 0.0D0 ! kg/s
REAL(r64) :: MaxReheatSteamFlow = 0.0D0 ! kg/s
REAL(r64) :: MinReheatWaterVolFlow = 0.0D0 ! m3/s
REAL(r64) :: MinReheatSteamVolFlow = 0.0D0 ! m3/s
REAL(r64) :: MinReheatWaterFlow = 0.0D0 ! kg/s
REAL(r64) :: MinReheatSteamFlow = 0.0D0 ! kg/s
REAL(r64) :: ControllerOffset = 0.0D0 !
REAL(r64) :: MaxReheatTemp = 0.0D0 ! C
LOGICAL :: MaxReheatTempSetByUser = .FALSE.
INTEGER :: DamperHeatingAction = 0 !! 1=NORMAL; 2=REVERSE ACTION
REAL(r64) :: DamperPosition = 0.0D0 !
INTEGER :: ADUNum = 0 ! index of corresponding air distribution unit
INTEGER :: FluidIndex = 0 ! Refrigerant index
INTEGER :: ErrCount1 = 0 ! iteration limit exceeded in Hot Water Flow Calc
INTEGER :: ErrCount1c = 0 ! iteration limit exceeded in Hot Water Flow Calc - continue
INTEGER :: ErrCount2 = 0 ! bad iterations limits in hot water flow calc
REAL(r64) :: ZoneFloorArea = 0.0D0 ! Zone floor area
INTEGER :: CtrlZoneNum = 0 ! Pointer to CtrlZone data structure
INTEGER :: ActualZoneNum = 0 ! Pointer to Zone data Structure
REAL(r64) :: MaxAirVolFlowRateDuringReheat = 0.0D0 ! Maximum vol flow during reheat
REAL(r64) :: MaxAirVolFractionDuringReheat = 0.0D0 ! Maximum vol flow fraction during reheat
REAL(r64) :: AirMassFlowDuringReheatMax = 0.0D0 ! Maximum mass flow during reheat
INTEGER :: ZoneOutdoorAirMethod = 0 ! Outdoor air method
REAL(r64) :: OutdoorAirFlowRate = 0.0D0 ! report variable for TU outdoor air flow rate
LOGICAL :: NoOAFlowInputFromUser = .TRUE. ! avoids OA calculation if no input specified by user
INTEGER :: OARequirementsPtr = 0 !- Index to DesignSpecification:OutdoorAir object
INTEGER :: AirLoopNum = 0
INTEGER :: HWLoopNum = 0 !plant topology, loop number
INTEGER :: HWLoopSide = 0 !plant topology, loop side number
INTEGER :: HWBranchIndex = 0 !plant topology, Branch number
INTEGER :: HWCompIndex = 0 !plant topology, Component number
CHARACTER(len=MaxNameLength) :: ZoneHVACUnitType =' ' ! type of Zone HVAC unit for air terminal mixer units
CHARACTER(len=MaxNameLength) :: ZoneHVACUnitName =' ' ! name of Zone HVAC unit for air terminal mixer units
INTEGER :: SecInNode =0 ! zone or zone unit air node number
! warning variables
INTEGER :: IterationLimit = 0 ! Used for RegulaFalsi error -1
INTEGER :: IterationFailed = 0 ! Used for RegulaFalsi error -2
END TYPE SysDesignParams