Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(ThermalChimneyData), | public, | ALLOCATABLE, DIMENSION(:) | :: | ThermalChimneySys | |||
type(ThermChimZnReportVars), | public, | ALLOCATABLE, DIMENSION(:) | :: | ZnRptThermChim | |||
type(ThermChimReportVars), | public, | ALLOCATABLE, DIMENSION(:) | :: | ThermalChimneyReport | |||
integer, | public | :: | TotThermalChimney | = | 0 |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
character(len=MaxNameLength), | public | :: | Name | = | ' ' | ||
integer, | public | :: | RealZonePtr | = | 0 | ||
character(len=MaxNameLength), | public | :: | RealZoneName | = | ' ' | ||
integer, | public | :: | SchedPtr | = | 0 | ||
character(len=MaxNameLength), | public | :: | SchedName | = | ' ' | ||
real(kind=r64), | public | :: | AbsorberWallWidth | = | 0.0d0 | ||
real(kind=r64), | public | :: | AirOutletCrossArea | = | 0.0d0 | ||
real(kind=r64), | public | :: | DischargeCoeff | = | 0.0d0 | ||
integer, | public | :: | TotZoneToDistrib | = | 0 | ||
integer, | public, | ALLOCATABLE, DIMENSION(:) | :: | ZonePtr | |||
character(len=MaxNameLength), | public, | ALLOCATABLE, DIMENSION(:) | :: | ZoneName | |||
real(kind=r64), | public, | ALLOCATABLE, DIMENSION(:) | :: | DistanceThermChimInlet | |||
real(kind=r64), | public, | ALLOCATABLE, DIMENSION(:) | :: | RatioThermChimAirFlow | |||
real(kind=r64), | public, | ALLOCATABLE, DIMENSION(:) | :: | EachAirInletCrossArea |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=r64), | public | :: | ThermalChimneyHeatLoss | = | 0.0d0 | ||
real(kind=r64), | public | :: | ThermalChimneyHeatGain | = | 0.0d0 | ||
real(kind=r64), | public | :: | ThermalChimneyVolume | = | 0.0d0 | ||
real(kind=r64), | public | :: | ThermalChimneyMass | = | 0.0d0 |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=r64), | public | :: | OverallTCVolumeFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | OverallTCMassFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | OutletAirTempThermalChim | = | 0.0d0 |
! Error trap for zones that do not exist or zones not in the zone the thermal chimney is in LKL-more renaming effort and code review might be possible here
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
logical, | intent(inout) | :: | ErrorsFound |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=r64), | intent(inout), | DIMENSION(NTC, NTC) | :: | EquaCoef | ||
real(kind=r64), | intent(inout), | DIMENSION(NTC) | :: | EquaConst | ||
real(kind=r64), | intent(out), | DIMENSION(NTC) | :: | ThermChimSubTemp | ||
integer, | intent(in) | :: | NTC |