EvaporativeCoolers Module

  1. HVACEvapComponent.f90
  2. EvaporativeCoolers
module~~evaporativecoolers~~UsesGraph module~evaporativecoolers EvaporativeCoolers module~datazoneequipment DataZoneEquipment module~datazoneequipment->module~evaporativecoolers module~dataglobals DataGlobals module~dataglobals->module~evaporativecoolers module~dataglobals->module~datazoneequipment module~schedulemanager ScheduleManager module~dataglobals->module~schedulemanager module~dataenvironment DataEnvironment module~dataglobals->module~dataenvironment module~psychrometrics Psychrometrics module~dataglobals->module~psychrometrics module~dataloopnode DataLoopNode module~dataglobals->module~dataloopnode module~schedulemanager->module~evaporativecoolers module~dataenvironment->module~evaporativecoolers module~dataenvironment->module~schedulemanager module~dataenvironment->module~psychrometrics module~dataglobalconstants DataGlobalConstants module~dataglobalconstants->module~evaporativecoolers module~psychrometrics->module~evaporativecoolers module~dataloopnode->module~evaporativecoolers module~datainterfaces DataInterfaces module~datainterfaces->module~evaporativecoolers module~datainterfaces->module~schedulemanager module~datainterfaces->module~psychrometrics module~dataprecisionglobals DataPrecisionGlobals module~dataprecisionglobals->module~evaporativecoolers module~dataprecisionglobals->module~datazoneequipment module~dataprecisionglobals->module~dataglobals module~dataprecisionglobals->module~schedulemanager module~dataprecisionglobals->module~dataenvironment module~dataprecisionglobals->module~psychrometrics module~dataprecisionglobals->module~dataloopnode module~dataprecisionglobals->module~datainterfaces module~general General module~dataprecisionglobals->module~general module~general->module~psychrometrics
Help

Used By

module~~evaporativecoolers~~UsedByGraph module~evaporativecoolers EvaporativeCoolers proc~simzoneequipment SimZoneEquipment module~evaporativecoolers->proc~simzoneequipment proc~simoacomponent SimOAComponent module~evaporativecoolers->proc~simoacomponent proc~simairloopcomponent SimAirLoopComponent module~evaporativecoolers->proc~simairloopcomponent
Help

Variables

Derived Types

Functions

Subroutines


Variables

TypeVisibility AttributesNameInitial
integer, private, parameter:: WaterSupplyFromMains =101
integer, private, parameter:: WaterSupplyFromTank =102
integer, private, parameter:: BlowThruFan =50
integer, private, parameter:: DrawThruFan =51
integer, private, parameter:: ZoneTemperatureDeadbandOnOffCycling =20
integer, private, parameter:: ZoneCoolingLoadOnOffCycling =21
integer, private, parameter:: ZoneCoolingLoadVariableSpeedFan =22
logical, private, SAVE:: GetInputEvapComponentsFlag =.TRUE.
integer, private :: NumEvapCool =0
type(EvapConditions), private, ALLOCATABLE, DIMENSION(:):: EvapCond
logical, private, ALLOCATABLE, DIMENSION(:):: MySizeFlag
logical, private, ALLOCATABLE, DIMENSION(:):: CheckEquipName
integer, private :: NumZoneEvapUnits =0
logical, private, ALLOCATABLE, DIMENSION(:):: CheckZoneEvapUnitName
type(ZoneEvapCoolerUnitStruct), private, Allocatable, Dimension(:):: ZoneEvapUnit
logical, private :: GetInputZoneEvapUnit =.TRUE.

Derived Types

type, private :: EvapConditions

Components

TypeVisibility AttributesNameInitial
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, private :: ZoneEvapCoolerUnitStruct

Components

TypeVisibility AttributesNameInitial
character(len=MaxNameLength), public :: Name =' '
integer, public :: ZoneEquipType =ZoneEvaporativeCoolerUnit_Num
integer, public :: ZoneNodeNum =0
integer, public :: AvailSchedIndex =0
character(len=MaxNameLength), public :: AvailManagerListName =' '
logical, public :: UnitIsAvailable =.FALSE.
integer, public :: FanAvailStatus =0
integer, public :: OAInletNodeNum =0
integer, public :: UnitOutletNodeNum =0
integer, public :: UnitReliefNodeNum =0
character(len=MaxNameLength), public :: FanObjectClassName =' '
integer, public :: FanType_Num =0
character(len=MaxNameLength), public :: FanName =' '
integer, public :: FanIndex =0
real(kind=r64), public :: ActualFanVolFlowRate =0.0d0
integer, public :: FanAvailSchedPtr =0
integer, public :: FanInletNodeNum =0
integer, public :: FanOutletNodeNum =0
real(kind=r64), public :: DesignAirVolumeFlowRate =0.0d0
real(kind=r64), public :: DesignAirMassFlowRate =0.0d0
real(kind=r64), public :: DesignFanSpeedRatio =0.0d0
real(kind=r64), public :: FanSpeedRatio =0.0d0
integer, public :: FanLocation =0
integer, public :: ControlSchemeType =0
real(kind=r64), public :: TimeElapsed =0.0d0
real(kind=r64), public :: ThrottlingRange =0.0d0
logical, public :: IsOnThisTimestep =.FALSE.
logical, public :: WasOnLastTimestep =.FALSE.
real(kind=r64), public :: ThresholdCoolingLoad =0.0d0
character(len=MaxNameLength), public :: EvapCooler_1_ObjectClassName =' '
character(len=MaxNameLength), public :: EvapCooler_1_Name =' '
integer, public :: EvapCooler_1_Type_Num =0
integer, public :: EvapCooler_1_Index =0
logical, public :: EvapCooler_1_AvailStatus =.FALSE.
character(len=MaxNameLength), public :: EvapCooler_2_ObjectClassName =' '
character(len=MaxNameLength), public :: EvapCooler_2_Name =' '
integer, public :: EvapCooler_2_Type_Num =0
integer, public :: EvapCooler_2_Index =0
logical, public :: EvapCooler_2_AvailStatus =.FALSE.
real(kind=r64), public :: OAInletRho =0.d0
real(kind=r64), public :: OAInletCp =0.d0
real(kind=r64), public :: OAInletTemp =0.d0
real(kind=r64), public :: OAInletHumRat =0.d0
real(kind=r64), public :: OAInletMassFlowRate =0.d0
real(kind=r64), public :: UnitOutletTemp =0.d0
real(kind=r64), public :: UnitOutletHumRat =0.d0
real(kind=r64), public :: UnitOutletMassFlowRate =0.d0
real(kind=r64), public :: UnitReliefTemp =0.d0
real(kind=r64), public :: UnitReliefHumRat =0.d0
real(kind=r64), public :: UnitReliefMassFlowRate =0.d0
real(kind=r64), public :: UnitTotalCoolingRate =0.0d0
real(kind=r64), public :: UnitTotalCoolingEnergy =0.0d0
real(kind=r64), public :: UnitSensibleCoolingRate =0.0d0
real(kind=r64), public :: UnitSensibleCoolingEnergy =0.0d0
real(kind=r64), public :: UnitLatentHeatingRate =0.0d0
real(kind=r64), public :: UnitLatentHeatingEnergy =0.0d0
real(kind=r64), public :: UnitLatentCoolingRate =0.0d0
real(kind=r64), public :: UnitLatentCoolingEnergy =0.0d0
real(kind=r64), public :: UnitFanSpeedRatio =0.d0
integer, public :: UnitVSControlMaxIterErrorIndex =0
integer, public :: UnitVSControlLimitsErrorIndex =0

Functions

private function VSEvapUnitLoadResidual(FanSpeedRatio, Par) result(Residual)

Arguments

Type IntentOptional AttributesName
real(kind=r64), intent(in) :: FanSpeedRatio
real(kind=r64), intent(in), optional DIMENSION(:):: Par

Return Value real(kind=r64)


Subroutines

public subroutine SimEvapCooler(CompName, CompIndex)

Arguments

Type IntentOptional AttributesName
character(len=*), intent(in) :: CompName
integer, intent(inout) :: CompIndex

private subroutine GetEvapInput()

Arguments

None

private subroutine InitEvapCooler(EvapCoolNum)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: EvapCoolNum

private subroutine SizeEvapCooler(EvapCoolNum)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: EvapCoolNum

private subroutine CalcDirectEvapCooler(EvapCoolNum)

Arguments

Type IntentOptional AttributesName
integer :: EvapCoolNum

private subroutine CalcDryIndirectEvapCooler(EvapCoolNum)

Arguments

Type IntentOptional AttributesName
integer :: EvapCoolNum

private subroutine CalcWetIndirectEvapCooler(EvapCoolNum)

Arguments

Type IntentOptional AttributesName
integer :: EvapCoolNum

private subroutine CalcResearchSpecialPartLoad(EvapCoolNum)

Arguments

Type IntentOptional AttributesName
integer :: EvapCoolNum

private subroutine CalcIndirectResearchSpecialEvapCooler(EvapCoolNum)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: EvapCoolNum

private subroutine CalcDirectResearchSpecialEvapCooler(EvapCoolNum)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: EvapCoolNum

private subroutine UpdateEvapCooler(EvapCoolNum)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: EvapCoolNum

private subroutine ReportEvapCooler(EvapCoolNum)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: EvapCoolNum

public subroutine SimZoneEvaporativeCoolerUnit(CompName, ZoneNum, SensibleOutputProvided, LatentOutputProvided, CompIndex)

Arguments

Type IntentOptional AttributesName
character(len=*), intent(in) :: CompName
integer, intent(in) :: ZoneNum
real(kind=r64), intent(out) :: SensibleOutputProvided
real(kind=r64), intent(out) :: LatentOutputProvided
integer, intent(inout) :: CompIndex

private subroutine GetInputZoneEvaporativeCoolerUnit()

Arguments

None

private subroutine InitZoneEvaporativeCoolerUnit(UnitNum, ZoneNum)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: UnitNum
integer, intent(in) :: ZoneNum

private subroutine SizeZoneEvaporativeCoolerUnit(UnitNum)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: UnitNum

private subroutine CalcZoneEvaporativeCoolerUnit(UnitNum, ZoneNum, SensibleOutputProvided, LatentOutputProvided)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: UnitNum
integer, intent(in) :: ZoneNum
real(kind=r64), intent(out) :: SensibleOutputProvided
real(kind=r64), intent(out) :: LatentOutputProvided

private subroutine ControlVSEvapUnitToMeetLoad(UnitNum, ZoneNum, ZoneCoolingLoad)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: UnitNum
integer, intent(in) :: ZoneNum
real(kind=r64), intent(in) :: ZoneCoolingLoad

private subroutine ReportZoneEvaporativeCoolerUnit(UnitNum)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: UnitNum

All Modules

AirflowNetworkBalanceManager AirflowNetworkSolver BaseboardElectric BaseboardRadiator Boilers BoilerSteam BranchInputManager BranchNodeConnections ChillerAbsorption ChillerElectricEIR ChillerExhaustAbsorption ChillerGasAbsorption ChillerIndirectAbsorption ChillerReformulatedEIR CondenserLoopTowers ConductionTransferFunctionCalc ConvectionCoefficients CoolTower CostEstimateManager CrossVentMgr CTElectricGenerator CurveManager DataAirflowNetwork DataAirLoop DataAirSystems DataBranchAirLoopPlant DataBranchNodeConnections DataBSDFWindow DataComplexFenestration DataContaminantBalance DataConvergParams DataConversions DataCostEstimate DataDaylighting DataDaylightingDevices DataDefineEquip DataDElight DataEnvironment DataErrorTracking DataGenerators DataGlobalConstants DataGlobals DataHeatBalance DataHeatBalFanSys DataHeatBalSurface DataHVACControllers DataHVACGlobals DataInterfaces DataIPShortCuts DataLoopNode DataMoistureBalance DataMoistureBalanceEMPD DataOutputs DataPhotovoltaics DataPlant DataPlantPipingSystems DataPrecisionGlobals DataReportingFlags DataRoomAirModel DataRootFinder DataRuntimeLanguage DataShadowingCombinations DataSizing DataStringGlobals DataSurfaceColors DataSurfaceLists DataSurfaces DataSystemVariables DataTimings DataUCSDSharedData DataVectorTypes DataViewFactorInformation DataWater DataWindowEquivalentLayer DataZoneControls DataZoneEnergyDemands DataZoneEquipment DaylightingDevices DaylightingManager DELIGHTMANAGERF DELIGHTMANAGERF DemandManager DesiccantDehumidifiers DirectAirManager DisplacementVentMgr DualDuct DXCoils DXFEarClipping EarthTube EconomicLifeCycleCost EconomicTariff EcoRoofManager ElectricBaseboardRadiator EMSManager EvaporativeCoolers EvaporativeFluidCoolers ExteriorEnergyUse ExternalInterface FanCoilUnits Fans FaultsManager FluidCoolers FluidProperties FuelCellElectricGenerator Furnaces General GeneratorDynamicsManager GeneratorFuelSupply GlobalNames GroundHeatExchangers HeatBalanceAirManager HeatBalanceHAMTManager HeatBalanceIntRadExchange HeatBalanceManager HeatBalanceMovableInsulation HeatBalanceSurfaceManager HeatBalFiniteDiffManager HeatingCoils HeatPumpWaterToWaterCOOLING HeatPumpWaterToWaterHEATING HeatPumpWaterToWaterSimple HeatRecovery HighTempRadiantSystem Humidifiers HVACControllers HVACCooledBeam HVACDuct HVACDXHeatPumpSystem HVACDXSystem HVACHXAssistedCoolingCoil HVACInterfaceManager HVACManager HVACMultiSpeedHeatPump HVACSingleDuctInduc HVACStandAloneERV HVACUnitaryBypassVAV HVACUnitarySystem HVACVariableRefrigerantFlow HWBaseboardRadiator ICEngineElectricGenerator IceThermalStorage InputProcessor InternalHeatGains ISO_C_FUNCTION_BINDING ISO_C_FUNCTION_BINDING LowTempRadiantSystem ManageElectricPower MatrixDataManager MicroCHPElectricGenerator MicroturbineElectricGenerator MixedAir MixerComponent MoistureBalanceEMPDManager MundtSimMgr NodeInputManager NonZoneEquipmentManager OutAirNodeManager OutdoorAirUnit OutputProcessor OutputReportPredefined OutputReportTabular OutsideEnergySources PackagedTerminalHeatPump PackagedThermalStorageCoil Photovoltaics PhotovoltaicThermalCollectors PipeHeatTransfer Pipes PlantCentralGSHP PlantChillers PlantComponentTemperatureSources PlantCondLoopOperation PlantHeatExchangerFluidToFluid PlantLoadProfile PlantLoopEquip PlantLoopSolver PlantManager PlantPipingSystemsManager PlantPressureSystem PlantUtilities PlantValves PollutionModule PondGroundHeatExchanger PoweredInductionUnits Psychrometrics Pumps PurchasedAirManager RefrigeratedCase ReportSizingManager ReturnAirPathManager RoomAirModelManager RoomAirModelUserTempPattern RootFinder RuntimeLanguageProcessor ScheduleManager SetPointManager SimAirServingZones SimulationManager SingleDuct SizingManager SolarCollectors SolarReflectionManager SolarShading SortAndStringUtilities SplitterComponent SQLiteProcedures SQLiteProcedures StandardRatings SteamBaseboardRadiator SteamCoils SurfaceGeometry SurfaceGroundHeatExchanger SystemAvailabilityManager SystemReports TARCOGArgs TARCOGCommon TARCOGDeflection TARCOGGasses90 TARCOGGassesParams TARCOGMain TARCOGOutput TARCOGParams TarcogShading ThermalChimney ThermalComfort ThermalEN673Calc ThermalISO15099Calc TranspiredCollector UFADManager UnitHeater UnitVentilator UserDefinedComponents VariableSpeedCoils vectors VentilatedSlab WaterCoils WaterManager WaterThermalTanks WatertoAirHeatPump WatertoAirHeatPumpSimple WaterUse WeatherManager WindowAC WindowComplexManager WindowEquivalentLayer WindowManager WindTurbine ZoneAirLoopEquipmentManager ZoneContaminantPredictorCorrector ZoneDehumidifier ZoneEquipmentManager ZonePlenum ZoneTempPredictorCorrector