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 | |||
|---|---|---|---|---|---|---|---|
| logical, | public | :: | IsUsed | = | .FALSE. | ||
| character(len=MaxNameLength), | public | :: | Name | = | ' ' | ||
| character(len=MaxNameLength), | public | :: | ZoneName | = | ' ' | ||
| integer, | public | :: | ZoneID | = | 0 | ||
| character(len=MaxNameLength), | public | :: | AvailSched | = | ' ' | ||
| integer, | public | :: | AvailSchedID | = | 0 | ||
| character(len=MaxNameLength), | public | :: | PatternCntrlSched | = | ' ' | ||
| integer, | public | :: | PatternSchedID | = | 0 | ||
| real(kind=r64), | public | :: | ZoneHeight | = | 0.0d0 | ||
| integer, | public | :: | ReturnAirNodeID | = | 0 | ||
| integer, | public | :: | ZoneNodeID | = | 0 | ||
| integer, | public, | ALLOCATABLE, DIMENSION(:) | :: | ExhaustAirNodeID | |||
| real(kind=r64), | public | :: | TairMean | = | 23.0d0 | ||
| real(kind=r64), | public | :: | Tstat | = | 23.0d0 | ||
| real(kind=r64), | public | :: | Tleaving | = | 23.0d0 | ||
| real(kind=r64), | public | :: | Texhaust | = | 23.0d0 | ||
| type(SurfaceAssocNestedStruct), | public, | ALLOCATABLE, DIMENSION(:) | :: | Surf | |||
| integer, | public | :: | totNumSurfs | = | 0 | ||
| integer, | public | :: | firstSurfID | = | 0 | ||
| real(kind=R64), | public | :: | Gradient | = | 0.0D0 |
TYPE AirPatternInfobyZoneStruct ! becomes AirPatternZoneInfo
! user variables
Logical :: IsUsed = .FALSE. !.true. if user-defined patterns used in zone
CHARACTER(len=MaxNameLength) :: Name = ' ' ! Name
CHARACTER(len=MaxNameLength) :: ZoneName = ' ' ! Zone name in building
INTEGER :: ZoneID = 0 ! Index of Zone in Heat Balance
CHARACTER(len=MaxNameLength) :: AvailSched = ' ' ! Name of availability schedule
INTEGER :: AvailSchedID = 0 ! index of availability schedule
CHARACTER(len=MaxNameLength) :: PatternCntrlSched = ' ' !name of schedule that selects pattern
INTEGER :: PatternSchedID = 0 ! index of pattern selecting schedule
!calculated and from elsewhere
REAL(r64) :: ZoneHeight = 0.0d0 ! in meters, from Zone%CeilingHeight
INTEGER :: ReturnAirNodeID = 0 ! index in Node array
INTEGER :: ZoneNodeID = 0 ! index in Node array for this zone
INTEGER, ALLOCATABLE, DIMENSION(:) :: ExhaustAirNodeID ! indexes in Node array
REAL(r64) :: TairMean = 23.0d0 ! comes from MAT
REAL(r64) :: Tstat = 23.0d0 ! temperature for thermostat
REAL(r64) :: Tleaving = 23.0d0 ! temperature for return air node
REAL(r64) :: Texhaust = 23.0d0 ! temperature for exhaust air node
TYPE(SurfaceAssocNestedStruct) , ALLOCATABLE, DIMENSION(:) :: Surf ! nested struct w/ surface info
INTEGER :: totNumSurfs = 0 ! total surfs for this zone
INTEGER :: firstSurfID = 0 ! Index of first surface
!report
REAL(R64) :: Gradient = 0.0D0 ! result for modeled gradient if using two-gradient interpolation
END TYPE AirPatternInfobyZoneStruct