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 | = | ' ' | ||
| integer, | public | :: | NumOfEquipTypes | = | 0 | ||
| character(len=MaxNameLength), | public, | DIMENSION(:), ALLOCATABLE | :: | EquipType | |||
| integer, | public, | DIMENSION(:), ALLOCATABLE | :: | EquipType_Num | |||
| character(len=MaxNameLength), | public, | DIMENSION(:), ALLOCATABLE | :: | EquipName | |||
| integer, | public, | DIMENSION(:), ALLOCATABLE | :: | EquipIndex | |||
| integer, | public, | DIMENSION(:), ALLOCATABLE | :: | CoolingPriority | |||
| integer, | public, | DIMENSION(:), ALLOCATABLE | :: | HeatingPriority | |||
| type(EquipmentData), | public, | ALLOCATABLE, DIMENSION(:) | :: | EquipData |
TYPE EquipList
CHARACTER(len=MaxNameLength) :: Name = ' ' ! Name of the equipment list
INTEGER :: NumOfEquipTypes = 0 ! Number of items on this list
CHARACTER(len=MaxNameLength), DIMENSION(:), ALLOCATABLE :: EquipType
INTEGER, DIMENSION(:), ALLOCATABLE :: EquipType_Num
CHARACTER(len=MaxNameLength), DIMENSION(:), ALLOCATABLE :: EquipName
INTEGER, DIMENSION(:), ALLOCATABLE :: EquipIndex
INTEGER, DIMENSION(:), ALLOCATABLE :: CoolingPriority
INTEGER, DIMENSION(:), ALLOCATABLE :: HeatingPriority
TYPE(EquipmentData),ALLOCATABLE, DIMENSION(:) :: EquipData !Index of energy output report data
END TYPE EquipList