Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
character(len=MaxNameLength), | public | :: | Name | = | ' ' | ||
integer, | public | :: | ZonePtr | = | 0 | ||
integer, | public | :: | SchedPtr | = | 0 | ||
integer, | public | :: | ModelType | = | 0 | ||
real(kind=r64), | public | :: | DesignLevel | = | 0.0D0 | ||
real(kind=r64), | public | :: | ConstantTermCoef | = | 0.0D0 | ||
real(kind=r64), | public | :: | TemperatureTermCoef | = | 0.0D0 | ||
real(kind=r64), | public | :: | VelocityTermCoef | = | 0.0D0 | ||
real(kind=r64), | public | :: | VelocitySQTermCoef | = | 0.0D0 | ||
real(kind=r64), | public | :: | LeakageArea | = | 0.0D0 | ||
real(kind=r64), | public | :: | BasicStackCoefficient | = | 0.0D0 | ||
real(kind=r64), | public | :: | BasicWindCoefficient | = | 0.0D0 | ||
real(kind=r64), | public | :: | FlowCoefficient | = | 0.0D0 | ||
real(kind=r64), | public | :: | AIM2StackCoefficient | = | 0.0D0 | ||
real(kind=r64), | public | :: | AIM2WindCoefficient | = | 0.0D0 | ||
real(kind=r64), | public | :: | PressureExponent | = | 0.0D0 | ||
real(kind=r64), | public | :: | ShelterFactor | = | 0.0D0 | ||
logical, | public | :: | EMSOverrideOn | = | .FALSE. | ||
real(kind=r64), | public | :: | EMSAirFlowRateValue | = | 0.0D0 | ||
logical, | public | :: | QuadratureSum | = | .FALSE. | ||
integer, | public | :: | OABalancePtr | = | 0 |
TYPE InfiltrationData
CHARACTER(len=MaxNameLength) :: Name =' '
INTEGER :: ZonePtr = 0 ! Which zone infiltration is in
INTEGER :: SchedPtr = 0 ! Schedule for infiltration
INTEGER :: ModelType = 0 ! which model is used for infiltration
! Design Flow Rate model terms
REAL(r64) :: DesignLevel =0.0D0
REAL(r64) :: ConstantTermCoef =0.0D0
REAL(r64) :: TemperatureTermCoef =0.0D0
REAL(r64) :: VelocityTermCoef =0.0D0
REAL(r64) :: VelocitySQTermCoef =0.0D0
! Effective Leakage Area, Sherman Grimsrud terms
REAL(r64) :: LeakageArea =0.0D0 ! "AL" effective air leakage area
REAL(r64) :: BasicStackCoefficient =0.0D0 ! "Cs" Stack coefficient
REAL(r64) :: BasicWindCoefficient =0.0D0 ! "Cw" wind coefficient
! Flow Coefficient, AIM-2, Walker and Wilson terms
REAL(r64) :: FlowCoefficient =0.0D0 ! "c" Flow coefficient
REAL(r64) :: AIM2StackCoefficient =0.0D0 ! "Cs" stack coefficient
REAL(r64) :: AIM2WindCoefficient =0.0D0 ! "Cw" wind coefficient
REAL(r64) :: PressureExponent =0.0D0 ! "n" pressure power law exponent
REAL(r64) :: ShelterFactor =0.0D0 ! "s" shelter factor
LOGICAL :: EMSOverrideOn = .FALSE. ! if true then EMS is requesting to override
REAL(r64) :: EMSAirFlowRateValue = 0.0D0 ! value EMS is setting for air flow rate
LOGICAL :: QuadratureSum = .FALSE. ! If quadrature sum of zone air balance method is used
INTEGER :: OABalancePtr =0 ! A pointer to ZoneAirBalance If quadrature is true
END TYPE InfiltrationData