| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| character(len=MaxNameLength), | public | :: | EvapCoolerName | = | ' ' | ||
| integer, | public | :: | EquipIndex | = | 0 | ||
| integer, | public | :: | EvapCoolerType | = | 0 | ||
| character(len=MaxNameLength), | public | :: | EvapControlType | = | ' ' | ||
| character(len=MaxNameLength), | public | :: | Schedule | = | ' ' | ||
| integer, | public | :: | SchedPtr | = | 0 | ||
| real(kind=r64), | public | :: | VolFlowRate | = | 0.0D0 | ||
| real(kind=r64), | public | :: | OutletTemp | = | 0.0D0 | ||
| real(kind=r64), | public | :: | OuletWetBulbTemp | = | 0.0D0 | ||
| real(kind=r64), | public | :: | OutletHumRat | = | 0.0D0 | ||
| real(kind=r64), | public | :: | OutletEnthalpy | = | 0.0D0 | ||
| real(kind=r64), | public | :: | OutletPressure | = | 0.0D0 | ||
| real(kind=r64), | public | :: | OutletMassFlowRate | = | 0.0D0 | ||
| real(kind=r64), | public | :: | OutletMassFlowRateMaxAvail | = | 0.0D0 | ||
| real(kind=r64), | public | :: | OutletMassFlowRateMinAvail | = | 0.0D0 | ||
| logical, | public | :: | InitFlag | = | .FALSE. | ||
| integer, | public | :: | InletNode | = | 0 | ||
| integer, | public | :: | OutletNode | = | 0 | ||
| integer, | public | :: | SecondaryInletNode | = | 0 | ||
| integer, | public | :: | TertiaryInletNode | = | 0 | ||
| real(kind=r64), | public | :: | InletMassFlowRate | = | 0.0D0 | ||
| real(kind=r64), | public | :: | InletMassFlowRateMaxAvail | = | 0.0D0 | ||
| real(kind=r64), | public | :: | InletMassFlowRateMinAvail | = | 0.0D0 | ||
| real(kind=r64), | public | :: | InletTemp | = | 0.0D0 | ||
| real(kind=r64), | public | :: | InletWetBulbTemp | = | 0.0D0 | ||
| real(kind=r64), | public | :: | InletHumRat | = | 0.0D0 | ||
| real(kind=r64), | public | :: | InletEnthalpy | = | 0.0D0 | ||
| real(kind=r64), | public | :: | InletPressure | = | 0.0D0 | ||
| real(kind=r64), | public | :: | SecInletMassFlowRate | = | 0.0D0 | ||
| real(kind=r64), | public | :: | SecInletMassFlowRateMaxAvail | = | 0.0D0 | ||
| real(kind=r64), | public | :: | SecInletMassFlowRateMinAvail | = | 0.0D0 | ||
| real(kind=r64), | public | :: | SecInletTemp | = | 0.0D0 | ||
| real(kind=r64), | public | :: | SecInletWetBulbTemp | = | 0.0D0 | ||
| real(kind=r64), | public | :: | SecInletHumRat | = | 0.0D0 | ||
| real(kind=r64), | public | :: | SecInletEnthalpy | = | 0.0D0 | ||
| real(kind=r64), | public | :: | SecInletPressure | = | 0.0D0 | ||
| real(kind=r64), | public | :: | PadDepth | = | 0.0D0 | ||
| real(kind=r64), | public | :: | PadArea | = | 0.0D0 | ||
| real(kind=r64), | public | :: | RecircPumpPower | = | 0.0D0 | ||
| real(kind=r64), | public | :: | IndirectRecircPumpPower | = | 0.0D0 | ||
| real(kind=r64), | public | :: | IndirectPadDepth | = | 0.0D0 | ||
| real(kind=r64), | public | :: | IndirectPadArea | = | 0.0D0 | ||
| real(kind=r64), | public | :: | IndirectVolFlowRate | = | 0.0D0 | ||
| real(kind=r64), | public | :: | IndirectFanEff | = | 0.0D0 | ||
| real(kind=r64), | public | :: | IndirectFanDeltaPress | = | 0.0D0 | ||
| real(kind=r64), | public | :: | IndirectHXEffectiveness | = | 0.0D0 | ||
| real(kind=r64), | public | :: | DirectEffectiveness | = | 0.0D0 | ||
| real(kind=r64), | public | :: | WetCoilMaxEfficiency | = | 0.0D0 | ||
| real(kind=r64), | public | :: | WetCoilFlowRatio | = | 0.0D0 | ||
| real(kind=r64), | public | :: | EvapCoolerEnergy | = | 0.0D0 | ||
| real(kind=r64), | public | :: | EvapCoolerPower | = | 0.0D0 | ||
| integer, | public | :: | EvapWaterSupplyMode | = | WaterSupplyFromMains | ||
| character(len=MaxNameLength), | public | :: | EvapWaterSupplyName | = | ' ' | ||
| integer, | public | :: | EvapWaterSupTankID | = | 0 | ||
| integer, | public | :: | EvapWaterTankDemandARRID | = | 0 | ||
| real(kind=r64), | public | :: | DriftFraction | = | 0.0D0 | ||
| real(kind=r64), | public | :: | BlowDownRatio | = | 0.0D0 | ||
| real(kind=r64), | public | :: | EvapWaterConsumpRate | = | 0.0D0 | ||
| real(kind=r64), | public | :: | EvapWaterConsump | = | 0.0D0 | ||
| real(kind=r64), | public | :: | EvapWaterStarvMakupRate | = | 0.0D0 | ||
| real(kind=r64), | public | :: | EvapWaterStarvMakup | = | 0.0D0 | ||
| real(kind=r64), | public | :: | SatEff | = | 0.0D0 | ||
| real(kind=r64), | public | :: | StageEff | = | 0.0D0 | ||
| real(kind=r64), | public | :: | DPBoundFactor | = | 0.0D0 | ||
| integer, | public | :: | EvapControlNodeNum | = | 0 | ||
| real(kind=r64), | public | :: | DesiredOutletTemp | = | 0.0D0 | ||
| real(kind=r64), | public | :: | PartLoadFract | = | 0.0D0 | ||
| integer, | public | :: | DewPointBoundFlag | = | 0 |
TYPE EvapConditions
CHARACTER(len=MaxNameLength) :: EvapCoolerName = ' ' ! Name of the EvapCooler
INTEGER :: EquipIndex = 0
INTEGER :: EvapCoolerType = 0 ! Type of the EvapCooler (parameters in DataGlobalConstants.f90
CHARACTER(len=MaxNameLength) :: EvapControlType = ' ' ! Type of Control for the EvapCooler
CHARACTER(len=MaxNameLength) :: Schedule = ' ' ! HeatingCoil Operation Schedule
Integer :: SchedPtr = 0 ! Pointer to the correct schedule
REAL(r64) :: VolFlowRate = 0.0D0 !Volume Flow Rate in Evap Cooler needed for calculating SatEff
REAL(r64) :: OutletTemp = 0.0D0 !
REAL(r64) :: OuletWetBulbTemp = 0.0D0 !
REAL(r64) :: OutletHumRat = 0.0D0 !
REAL(r64) :: OutletEnthalpy = 0.0D0 !
REAL(r64) :: OutletPressure = 0.0D0 !
REAL(r64) :: OutletMassFlowRate = 0.0D0 !MassFlow through the EvapCooler being Simulated [kg/Sec]
REAL(r64) :: OutletMassFlowRateMaxAvail = 0.0D0 ! [kg/Sec]
REAL(r64) :: OutletMassFlowRateMinAvail = 0.0D0 ! [kg/Sec]
LOGICAL :: InitFlag = .FALSE. !
INTEGER :: InletNode = 0 !
INTEGER :: OutletNode = 0 !
INTEGER :: SecondaryInletNode = 0 ! This is usually OA node feeding into the purge/secondary side
INTEGER :: TertiaryInletNode = 0 ! This node is used to run building exhaust into purge side.
REAL(r64) :: InletMassFlowRate = 0.0D0 ! Inlet is primary process air node at inlet to cooler
REAL(r64) :: InletMassFlowRateMaxAvail = 0.0D0 !
REAL(r64) :: InletMassFlowRateMinAvail = 0.0D0 !
REAL(r64) :: InletTemp = 0.0D0 !
REAL(r64) :: InletWetBulbTemp = 0.0D0 !
REAL(r64) :: InletHumRat = 0.0D0 !
REAL(r64) :: InletEnthalpy = 0.0D0 !
REAL(r64) :: InletPressure = 0.0D0 !
REAL(r64) :: SecInletMassFlowRate = 0.0D0 ! Secondary inlet is for indirect coolers
REAL(r64) :: SecInletMassFlowRateMaxAvail = 0.0D0 !
REAL(r64) :: SecInletMassFlowRateMinAvail = 0.0D0 !
REAL(r64) :: SecInletTemp = 0.0D0 !
REAL(r64) :: SecInletWetBulbTemp = 0.0D0 !
REAL(r64) :: SecInletHumRat = 0.0D0 !
REAL(r64) :: SecInletEnthalpy = 0.0D0 !
REAL(r64) :: SecInletPressure = 0.0D0 !
REAL(r64) :: PadDepth = 0.0D0 !
REAL(r64) :: PadArea = 0.0D0 !
REAL(r64) :: RecircPumpPower = 0.0D0 !
REAL(r64) :: IndirectRecircPumpPower = 0.0D0 !
REAL(r64) :: IndirectPadDepth = 0.0D0 !
REAL(r64) :: IndirectPadArea = 0.0D0 !
REAL(r64) :: IndirectVolFlowRate = 0.0D0 !
REAL(r64) :: IndirectFanEff = 0.0D0 !
REAL(r64) :: IndirectFanDeltaPress = 0.0D0 !
REAL(r64) :: IndirectHXEffectiveness = 0.0D0 !
REAL(r64) :: DirectEffectiveness = 0.0D0 ! input saturation effectiveness for constant effectiveness model
REAL(r64) :: WetCoilMaxEfficiency = 0.0D0 !
REAL(r64) :: WetCoilFlowRatio = 0.0D0 !
REAL(r64) :: EvapCoolerEnergy = 0.0D0 !
REAL(r64) :: EvapCoolerPower = 0.0D0 !
INTEGER :: EvapWaterSupplyMode = WaterSupplyFromMains ! where does water come from
CHARACTER(len=MaxNameLength) :: EvapWaterSupplyName = ' ' ! name of water source e.g. water storage tank
INTEGER :: EvapWaterSupTankID = 0 !
INTEGER :: EvapWaterTankDemandARRID = 0 !
REAL(r64) :: DriftFraction = 0.0D0 ! excess water from drift as fraction of Evap Water Consumption rate
REAL(r64) :: BlowDownRatio = 0.0D0 ! excess water use for blowdown as solids ratio to be maintained
REAL(r64) :: EvapWaterConsumpRate = 0.0D0 ! Evap Water Consumption rate in m3/sec
REAL(r64) :: EvapWaterConsump = 0.0D0 ! Evap Water Consumption in m3
REAL(r64) :: EvapWaterStarvMakupRate = 0.0D0 ! Evap water consumed but not really available from tank m3/s
REAL(r64) :: EvapWaterStarvMakup = 0.0D0 ! Evap water consumed but not really available from tank m3
REAL(r64) :: SatEff = 0.0D0 !Reporting for Direct Stage and Ind Dry Saturation Efficiency
REAL(r64) :: StageEff = 0.0D0 !Reporting for Indirect Total Stage Efficiency
REAL(r64) :: DPBoundFactor = 0.0D0 ! in RDDSpecial efficency w.r.t. dewpoint
Integer :: EvapControlNodeNum = 0 ! need to control to avoid over cooling
REAL(r64) :: DesiredOutletTemp = 0.0D0 ! setpoint manager should set this
REAL(r64) :: PartLoadFract = 0.0D0 ! reduces cooling performance and associated fan power
Integer :: DewPointBoundFlag = 0 ! report when indirect research special cooler is bound by dewpoint
! rather than wetbulb-depression approach
END TYPE EvapConditions