| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| character(len=MaxNameLength), | public | :: | TypeOf | = | ' ' | ||
| integer, | public | :: | TypeOf_Num | = | 0 | ||
| integer, | public | :: | GeneralEquipType | = | 0 | ||
| character(len=MaxNameLength), | public | :: | Name | = | ' ' | ||
| integer, | public | :: | CompNum | = | 0 | ||
| integer, | public | :: | FlowCtrl | = | 0 | ||
| integer, | public | :: | FlowPriority | = | LoopFlowStatus_Unknown | ||
| logical, | public | :: | ON | = | .FALSE. | ||
| logical, | public | :: | Available | = | .FALSE. | ||
| character(len=MaxNameLength), | public | :: | NodeNameIn | = | ' ' | ||
| character(len=MaxNameLength), | public | :: | NodeNameOut | = | ' ' | ||
| integer, | public | :: | NodeNumIn | = | 0 | ||
| integer, | public | :: | NodeNumOut | = | 0 | ||
| real(kind=r64), | public | :: | MyLoad | = | 0.0d0 | ||
| real(kind=r64), | public | :: | MaxLoad | = | 0.0d0 | ||
| real(kind=r64), | public | :: | MinLoad | = | 0.0d0 | ||
| real(kind=r64), | public | :: | OptLoad | = | 0.0d0 | ||
| real(kind=r64), | public | :: | SizFac | = | 0.0d0 | ||
| integer, | public | :: | CurOpSchemeType | = | UnknownStatusOpSchemeType | ||
| integer, | public | :: | NumOpSchemes | = | 0 | ||
| integer, | public | :: | CurCompLevelOpNum | = | 0 | ||
| type(OpSchemePtrData), | public, | ALLOCATABLE, DIMENSION(:) | :: | OpScheme | |||
| real(kind=r64), | public | :: | EquipDemand | = | 0.0d0 | ||
| logical, | public | :: | EMSLoadOverrideOn | = | .FALSE. | ||
| real(kind=r64), | public | :: | EMSLoadOverrideValue | = | 0.0d0 | ||
| integer, | public | :: | HowLoadServed | = | HowMet_Unknown | ||
| real(kind=r64), | public | :: | MinOutletTemp | = | 0.0d0 | ||
| real(kind=r64), | public | :: | MaxOutletTemp | = | 0.0d0 | ||
| logical, | public | :: | FreeCoolCntrlShutDown | = | .FALSE. | ||
| real(kind=r64), | public | :: | FreeCoolCntrlMinCntrlTemp | = | 0.D0 | ||
| integer, | public | :: | FreeCoolCntrlMode | = | 0 | ||
| integer, | public | :: | FreeCoolCntrlNodeNum | = | 0 | ||
| integer, | public | :: | IndexInLoopSidePumps | = | 0 | ||
| real(kind=r64), | public | :: | TempDesCondIn | = | 0.0d0 | ||
| real(kind=r64), | public | :: | TempDesEvapOut | = | 0.0d0 |
TYPE CompData
CHARACTER(len=MaxNameLength) :: TypeOf = ' ' ! The 'keyWord' identifying component type
INTEGER :: TypeOf_Num = 0 ! Reference the "TypeOf" parameters in DataPlant
INTEGER :: GeneralEquipType = 0 ! General Equipment Type (e.g. Chillers, Pumps, etc)
CHARACTER(len=MaxNameLength) :: Name = ' ' ! Component name
INTEGER :: CompNum = 0 ! Component ID number
INTEGER :: FlowCtrl = 0 ! flow control for splitter/mixer (ACTIVE/PASSIVE/BYPASS)
INTEGER :: FlowPriority = LoopFlowStatus_Unknown ! status for overall loop flow determination
LOGICAL :: ON = .FALSE. ! TRUE = designated component or operation scheme available
LOGICAL :: Available = .FALSE. ! TRUE = designated component or operation scheme available
CHARACTER(len=MaxNameLength) :: NodeNameIn = ' ' ! Component inlet node name
CHARACTER(len=MaxNameLength) :: NodeNameOut = ' ' ! Component outlet node name
INTEGER :: NodeNumIn = 0 ! Component inlet node number
INTEGER :: NodeNumOut = 0 ! Component outlet node number
REAL(r64) :: MyLoad = 0.0d0 ! Distributed Load
REAL(r64) :: MaxLoad = 0.0d0 ! Maximum load
REAL(r64) :: MinLoad = 0.0d0 ! Minimum Load
REAL(r64) :: OptLoad = 0.0d0 ! Optimal Load
REAL(r64) :: SizFac = 0.0d0 ! Sizing Fraction
INTEGER :: CurOpSchemeType = UnknownStatusOpSchemeType !updated pointer to
! Plant()%OpScheme(CurOpSchemeType)...
INTEGER :: NumOpSchemes = 0 ! number of schemes held in the pointer array
INTEGER :: CurCompLevelOpNum = 0 ! pointer to the OpScheme array defined next
! Plantloop()%loopside()%branch()%comp()%Opscheme(curopschemeptr)
TYPE(OpSchemePtrData), &
ALLOCATABLE, DIMENSION(:) :: OpScheme ! Pointers to component on lists
REAL(r64) :: EquipDemand = 0.0d0 ! Component load request based on inlet temp and outlet SP
LOGICAL :: EMSLoadOverrideOn = .FALSE. ! EMS is calling to override load dispatched to component
REAL(r64) :: EMSLoadOverrideValue = 0.0d0 ! EMS value to use for load when overridden [W] always positive.
INTEGER :: HowLoadServed = HowMet_Unknown ! nature of component in terms of how it can meet load
REAL(r64) :: MinOutletTemp = 0.0d0 ! Component exit lower limit temperature
REAL(r64) :: MaxOutletTemp = 0.0d0 ! Component exit upper limit temperature
LOGICAL :: FreeCoolCntrlShutDown = .FALSE. ! true if component was shut down because of free cooling
REAL(r64) :: FreeCoolCntrlMinCntrlTemp = 0.D0 ! current control temp value for free cooling controls
INTEGER :: FreeCoolCntrlMode = 0 ! type of sensor used for free cooling controls
INTEGER :: FreeCoolCntrlNodeNum = 0 ! chiller condenser inlet node number for free cooling controls
INTEGER :: IndexInLoopSidePumps = 0 ! If I'm a pump, this tells my index in PL(:)%LS(:)%Pumps
REAL(r64) :: TempDesCondIn = 0.0d0
REAL(r64) :: TempDesEvapOut = 0.0d0
END TYPE CompData