| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| character(len=MaxNameLength), | public | :: | Name | = | ' ' | ||
| character(len=MaxNameLength), | public | :: | ZoneName | = | ' ' | ||
| integer, | public | :: | ActualZoneNum | = | 0 | ||
| character(len=MaxNameLength), | public | :: | ControlTypeSchedName | = | ' ' | ||
| integer, | public | :: | ComfortSchedIndex | = | 0 | ||
| integer, | public | :: | NumControlTypes | = | 0 | ||
| character(len=MaxNameLength), | public, | DIMENSION(:), ALLOCATABLE | :: | ControlType | |||
| character(len=MaxNameLength), | public, | DIMENSION(:), ALLOCATABLE | :: | ControlTypeName | |||
| integer, | public, | DIMENSION(:), ALLOCATABLE | :: | ControlTypeSchIndx | |||
| integer, | public | :: | SchIndx_SglHeatSetPointFanger | = | 0 | ||
| integer, | public | :: | SchIndx_SglCoolSetPointFanger | = | 0 | ||
| integer, | public | :: | SchIndx_SglHCSetPointFanger | = | 0 | ||
| integer, | public | :: | SchIndx_DualSetPointFanger | = | 0 | ||
| integer, | public | :: | SchIndx_SglHeatSetPointPierce | = | 0 | ||
| integer, | public | :: | SchIndx_SglCoolSetPointPierce | = | 0 | ||
| integer, | public | :: | SchIndx_SglHCSetPointPierce | = | 0 | ||
| integer, | public | :: | SchIndx_DualSetPointPierce | = | 0 | ||
| integer, | public | :: | SchIndx_SglHeatSetPointKSU | = | 0 | ||
| integer, | public | :: | SchIndx_SglCoolSetPointKSU | = | 0 | ||
| integer, | public | :: | SchIndx_SglHCSetPointKSU | = | 0 | ||
| integer, | public | :: | SchIndx_DualSetPointKSU | = | 0 | ||
| logical, | public | :: | ManageDemand | = | .FALSE. | ||
| real(kind=r64), | public | :: | HeatingResetLimit | = | 0.0d0 | ||
| real(kind=r64), | public | :: | CoolingResetLimit | = | 0.0d0 | ||
| logical, | public | :: | EMSOverrideHeatingSetpointOn | = | .FALSE. | ||
| real(kind=r64), | public | :: | EMSOverrideHeatingSetpointValue | = | 0.0D0 | ||
| logical, | public | :: | EMSOverrideCoolingSetpointOn | = | .FALSE. | ||
| real(kind=r64), | public | :: | EMSOverrideCoolingSetpointValue | = | 0.0D0 | ||
| real(kind=r64), | public | :: | TdbMaxSetPoint | = | 50.0d0 | ||
| real(kind=r64), | public | :: | TdbMinSetPoint | = | 0.0d0 | ||
| character(len=MaxNameLength), | public | :: | AverageMethodName | = | 'PEOPLE AVERGAE' | ||
| character(len=MaxNameLength), | public | :: | AverageObjectName | = | ' ' | ||
| integer, | public | :: | AverageMethodNum | = | 0 | ||
| integer, | public | :: | SpecificObjectNum | = | 0 | ||
| integer, | public | :: | PeopleAverageErrIndex | = | 0 | ||
| integer, | public | :: | TdbMaxErrIndex | = | 0 | ||
| integer, | public | :: | TdbMinErrIndex | = | 0 | ||
| integer, | public | :: | TdbHCErrIndex | = | 0 | ||
| integer, | public | :: | TdbDualMaxErrIndex | = | 0 | ||
| integer, | public | :: | TdbDualMinErrIndex | = | 0 |
TYPE :: ZoneComfortControls
CHARACTER(len=MaxNameLength) :: Name =' ' ! Name of the thermostat
CHARACTER(len=MaxNameLength) :: ZoneName =' ' ! Name of the zone
INTEGER :: ActualZoneNum =0 ! Index number of zone
CHARACTER(len=MaxNameLength) :: ControlTypeSchedName =' ' ! Name of the schedule which determines the zone temp setpoint
INTEGER :: ComfortSchedIndex =0 ! Index for this schedule
INTEGER :: NumControlTypes =0 ! Number of control types in ZoneControl:ThermalComfort object
CHARACTER(len=MaxNameLength), DIMENSION(:), ALLOCATABLE :: ControlType ! Type of control
CHARACTER(len=MaxNameLength), DIMENSION(:), ALLOCATABLE :: ControlTypeName ! Name of control type
INTEGER, DIMENSION(:), ALLOCATABLE :: ControlTypeSchIndx ! Index to control type schedule
INTEGER :: SchIndx_SglHeatSetPointFanger =0 ! Index to fanger single heating setpoint schedule
INTEGER :: SchIndx_SglCoolSetPointFanger =0 ! Index to fanger single cooling setpoint schedule
INTEGER :: SchIndx_SglHCSetPointFanger =0 ! Index to fanger single heating/cooling setpoint schedule
INTEGER :: SchIndx_DualSetPointFanger =0 ! Index to fanger dual setpoint schedule
INTEGER :: SchIndx_SglHeatSetPointPierce =0 ! Index to pierce single heating setpoint schedule
INTEGER :: SchIndx_SglCoolSetPointPierce =0 ! Index to pierce single cooling setpoint schedule
INTEGER :: SchIndx_SglHCSetPointPierce =0 ! Index to pierce single heating/cooling setpoint schedule
INTEGER :: SchIndx_DualSetPointPierce =0 ! Index to pierce dual setpoint schedule
INTEGER :: SchIndx_SglHeatSetPointKSU =0 ! Index to KSU single heating setpoint schedule
INTEGER :: SchIndx_SglCoolSetPointKSU =0 ! Index to KSU single cooling setpoint schedule
INTEGER :: SchIndx_SglHCSetPointKSU =0 ! Index to KSU single heating/cooling setpoint schedule
INTEGER :: SchIndx_DualSetPointKSU =0 ! Index to KSU dual setpoint schedule
LOGICAL :: ManageDemand =.FALSE. ! Flag to indicate whether to use demand limiting
REAL(r64) :: HeatingResetLimit =0.0d0 ! Lowest heating setpoint that can be set by demand manager [C]
REAL(r64) :: CoolingResetLimit =0.0d0 ! Highest cooling setpoint that can be set by demand manager [C]
LOGICAL :: EMSOverrideHeatingSetpointOn = .FALSE. ! EMS is calling to override heating setpoint
REAL(r64) :: EMSOverrideHeatingSetpointValue = 0.0D0 ! value EMS is directing to use for heating setpoint
LOGICAL :: EMSOverrideCoolingSetpointOn = .FALSE. ! EMS is calling to override cooling setpoint
REAL(r64) :: EMSOverrideCoolingSetpointValue = 0.0D0 ! value EMS is directing to use for cooling setpoint
REAL(r64) :: TdbMaxSetPoint =50.0d0 ! Maximum dry-bulb temperature setpoint [C]
REAL(r64) :: TdbMinSetPoint = 0.0d0 ! Minimum dry-bulb temperature setpoint [C]
CHARACTER(len=MaxNameLength) :: AverageMethodName ='PEOPLE AVERGAE' ! Averaging Method for Zones with Multiple People Objects
CHARACTER(len=MaxNameLength) :: AverageObjectName =' ' ! Object Name for Specific Object Average
INTEGER :: AverageMethodNum =0 ! Numerical value for averaging method
INTEGER :: SpecificObjectNum =0 ! People Object number used for Specific people object choice
INTEGER :: PeopleAverageErrIndex =0 ! People average error index
INTEGER :: TdbMaxErrIndex =0 ! Single cooling setpoint error index
INTEGER :: TdbMinErrIndex =0 ! Single heating setpoint error index
INTEGER :: TdbHCErrIndex =0 ! Single heating cooling setpoint error index
INTEGER :: TdbDualMaxErrIndex =0 ! Dual cooling setpoint error index
INTEGER :: TdbDualMinErrIndex =0 ! Dual heating setpoint error index
END TYPE ZoneComfortControls