Nodes of different colours represent the following:
Solid arrows point from one derived type to another which extends (inherits from) it. Dashed arrows point from a derived type to another type containing it as a components, with a label listing the name(s) of said component(s). Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.
Nodes of different colours represent the following:
Solid arrows point from one derived type to another which extends (inherits from) it. Dashed arrows point from a derived type to another type containing it as a components, with a label listing the name(s) of said component(s). Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| character(len=MaxNameLength), | public | :: | Name | = | ' ' | ||
| character(len=MaxNameLength), | public | :: | TypeOf | = | ' ' | ||
| integer, | public | :: | OpSchemeType | = | 0 | ||
| character(len=MaxNameLength), | public | :: | Sched | = | ' ' | ||
| integer, | public | :: | SchedPtr | = | 0 | ||
| logical, | public | :: | Available | = | .FALSE. | ||
| integer, | public | :: | NumEquipLists | = | 0 | ||
| integer, | public | :: | CurListPtr | = | 0 | ||
| type(EquipOpList), | public, | ALLOCATABLE, DIMENSION(:) | :: | EquipList | |||
| integer, | public | :: | EquipListNumForLastStage | = | 0 | ||
| character(len=MaxNameLength), | public | :: | ReferenceNodeName | = | ' ' | ||
| integer, | public | :: | ReferenceNodeNumber | ||||
| integer, | public | :: | ErlSimProgramMngr | = | 0 | ||
| integer, | public | :: | ErlInitProgramMngr | = | 0 | ||
| real(kind=r64), | public | :: | EMSIntVarLoopDemandRate | = | 0.d0 | ||
| logical, | public | :: | MyEnvrnFlag | = | .TRUE. |
TYPE OperationData ! DSU
CHARACTER(len=MaxNameLength) :: Name = ' ' ! The name of each item in the list
CHARACTER(len=MaxNameLength) :: TypeOf = ' ' ! The 'keyWord' identifying each item in the list
INTEGER :: OpSchemeType = 0 ! Op scheme type (from keyword)
CHARACTER(len=MaxNameLength) :: Sched = ' ' ! The name of the schedule associated with the list
INTEGER :: SchedPtr = 0 ! ALLOCATABLE to the schedule (for valid schedules)
LOGICAL :: Available = .FALSE. ! TRUE = designated component or operation scheme available
INTEGER :: NumEquipLists = 0 ! number of equipment lists
INTEGER :: CurListPtr = 0 ! points to the current equipment list
TYPE(EquipOpList), &
ALLOCATABLE, DIMENSION(:) :: EquipList ! Component type list
INTEGER :: EquipListNumForLastStage = 0 ! points to the equipment list with the highest upper limit
CHARACTER(len=MaxNameLength) :: ReferenceNodeName = ' ' ! DELTA CTRL ONLY--for calculation of delta Temp
INTEGER :: ReferenceNodeNumber ! DELTA CTRL ONLY--for calculation of delta Temp
INTEGER :: ErlSimProgramMngr = 0 ! EMS:ProgramManager to always run when this model is called
INTEGER :: ErlInitProgramMngr= 0 ! EMS:ProgramManager to run when this model is initialized and setup
REAL(r64) :: EMSIntVarLoopDemandRate = 0.d0 ! EMS internal variable for loop-level demand rate, neg cooling [W]
LOGICAL :: MyEnvrnFlag = .TRUE.
END TYPE OperationData ! DSU