| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| character(len=MaxNameLength), | public | :: | Name | = | ' ' | ||
| character(len=MaxNameLength), | public | :: | FluidCoolerType | = | ' ' | ||
| integer, | public | :: | FluidCoolerType_Num | = | 0 | ||
| integer, | public | :: | PerformanceInputMethod_Num | = | 0 | ||
| logical, | public | :: | Available | = | .TRUE. | ||
| logical, | public | :: | ON | = | .TRUE. | ||
| real(kind=r64), | public | :: | DesignWaterFlowRate | = | 0.0d0 | ||
| real(kind=r64), | public | :: | DesWaterMassFlowRate | = | 0.0d0 | ||
| real(kind=r64), | public | :: | HighSpeedAirFlowRate | = | 0.0d0 | ||
| real(kind=r64), | public | :: | HighSpeedFanPower | = | 0.0d0 | ||
| real(kind=r64), | public | :: | HighSpeedFluidCoolerUA | = | 0.0d0 | ||
| real(kind=r64), | public | :: | LowSpeedAirFlowRate | = | 0.0d0 | ||
| real(kind=r64), | public | :: | LowSpeedAirFlowRateSizingFactor | = | 0.0d0 | ||
| real(kind=r64), | public | :: | LowSpeedFanPower | = | 0.0d0 | ||
| real(kind=r64), | public | :: | LowSpeedFanPowerSizingFactor | = | 0.0d0 | ||
| real(kind=r64), | public | :: | LowSpeedFluidCoolerUA | = | 0.0d0 | ||
| real(kind=r64), | public | :: | LowSpeedFluidCoolerUASizingFactor | = | 0.0d0 | ||
| real(kind=r64), | public | :: | DesignEnteringWaterTemp | = | 0.0d0 | ||
| real(kind=r64), | public | :: | DesignLeavingWaterTemp | = | 0.0d0 | ||
| real(kind=r64), | public | :: | DesignEnteringAirTemp | = | 0.0d0 | ||
| real(kind=r64), | public | :: | DesignEnteringAirWetbulbTemp | = | 0.0d0 | ||
| real(kind=r64), | public | :: | FluidCoolerMassFlowRateMultiplier | = | 0.0d0 | ||
| real(kind=r64), | public | :: | FluidCoolerNominalCapacity | = | 0.0d0 | ||
| real(kind=r64), | public | :: | FluidCoolerLowSpeedNomCap | = | 0.0d0 | ||
| real(kind=r64), | public | :: | FluidCoolerLowSpeedNomCapSizingFactor | = | 0.0d0 | ||
| integer, | public | :: | WaterInletNodeNum | = | 0 | ||
| integer, | public | :: | WaterOutletNodeNum | = | 0 | ||
| integer, | public | :: | OutdoorAirInletNodeNum | = | 0 | ||
| integer, | public | :: | HighMassFlowErrorCount | = | 0 | ||
| integer, | public | :: | HighMassFlowErrorIndex | = | 0 | ||
| integer, | public | :: | OutletWaterTempErrorCount | = | 0 | ||
| integer, | public | :: | OutletWaterTempErrorIndex | = | 0 | ||
| integer, | public | :: | SmallWaterMassFlowErrorCount | = | 0 | ||
| integer, | public | :: | SmallWaterMassFlowErrorIndex | = | 0 | ||
| integer, | public | :: | WMFRLessThanMinAvailErrCount | = | 0 | ||
| integer, | public | :: | WMFRLessThanMinAvailErrIndex | = | 0 | ||
| integer, | public | :: | WMFRGreaterThanMaxAvailErrCount | = | 0 | ||
| integer, | public | :: | WMFRGreaterThanMaxAvailErrIndex | = | 0 | ||
| integer, | public | :: | LoopNum | = | 0 | ||
| integer, | public | :: | LoopSideNum | = | 0 | ||
| integer, | public | :: | BranchNum | = | 0 | ||
| integer, | public | :: | CompNum | = | 0 |
TYPE FluidCoolerspecs
CHARACTER(len=MaxNameLength) :: Name = ' ' ! User identifier
CHARACTER(len=MaxNameLength) :: FluidCoolerType = ' ' ! Type of fluid cooler
INTEGER :: FluidCoolerType_Num = 0
INTEGER :: PerformanceInputMethod_Num = 0
LOGICAL :: Available = .TRUE. ! need an array of logicals--load identifiers of available equipment
LOGICAL :: ON = .TRUE. ! Simulate the machine at it's operating part load ratio
REAL(r64) :: DesignWaterFlowRate = 0.0d0 ! Design water flow rate through the fluid cooler [m3/s]
REAL(r64) :: DesWaterMassFlowRate = 0.0d0 ! Design water flow rate through the fluid cooler [kg/s]
REAL(r64) :: HighSpeedAirFlowRate = 0.0d0 ! Air flow rate through the fluid cooler at high speed [m3/s]
REAL(r64) :: HighSpeedFanPower = 0.0d0 ! Fan power at high fan speed [W]
REAL(r64) :: HighSpeedFluidCoolerUA = 0.0d0 ! UA of fluid cooler at high fan speed [W/C]
REAL(r64) :: LowSpeedAirFlowRate = 0.0d0 ! Air flow rate through fluid cooler at low speed [m3/s]
REAL(r64) :: LowSpeedAirFlowRateSizingFactor = 0.0d0 ! sizing factor for low speed air flow rate []
REAL(r64) :: LowSpeedFanPower = 0.0d0 ! Fan power at low fan speed [W]
REAL(r64) :: LowSpeedFanPowerSizingFactor = 0.0d0 ! sizing factor for low speed fan power []
REAL(r64) :: LowSpeedFluidCoolerUA = 0.0d0 ! UA of fluid cooler at low fan speed [W/C]
REAL(r64) :: LowSpeedFluidCoolerUASizingFactor = 0.0d0 ! sizing factor for low speed UA []
REAL(r64) :: DesignEnteringWaterTemp = 0.0d0 ! Entering water temperature at design conditions
REAL(r64) :: DesignLeavingWaterTemp = 0.0d0 ! Entering water temperature at design conditions
REAL(r64) :: DesignEnteringAirTemp = 0.0d0 ! Entering water temperature at design conditions
REAL(r64) :: DesignEnteringAirWetbulbTemp = 0.0d0 ! Entering water temperature at design condition
REAL(r64) :: FluidCoolerMassFlowRateMultiplier = 0.0d0 ! Maximum fluid cooler flow rate is this multiplier * design flow rate
REAL(r64) :: FluidCoolerNominalCapacity = 0.0d0 ! Nominal capacity of the fluid cooler [W] at high speed
REAL(r64) :: FluidCoolerLowSpeedNomCap = 0.0d0 ! Nominal capacity of the fluid cooler [W] at low speed
REAL(r64) :: FluidCoolerLowSpeedNomCapSizingFactor = 0.0d0 !sizing factor for low speed capacity []
INTEGER :: WaterInletNodeNum = 0 ! Node number on the water inlet side of the fluid cooler
INTEGER :: WaterOutletNodeNum = 0 ! Node number on the water outlet side of the fluid cooler
INTEGER :: OutdoorAirInletNodeNum = 0 ! Node number of outdoor air inlet for the fluid cooler
INTEGER :: HighMassFlowErrorCount = 0 ! Counter when mass flow rate is > Design*FluidCoolerMassFlowRateMultiplier
INTEGER :: HighMassFlowErrorIndex = 0 ! Index for high mass flow recurring error message
INTEGER :: OutletWaterTempErrorCount = 0 ! Counter when outlet water temperature is < minimum allowed temperature
INTEGER :: OutletWaterTempErrorIndex = 0 ! Index for outlet water temperature recurring error message
INTEGER :: SmallWaterMassFlowErrorCount = 0 ! Counter when water mass flow rate is very small
INTEGER :: SmallWaterMassFlowErrorIndex = 0 ! Index for very small water mass flow rate recurring error message
INTEGER :: WMFRLessThanMinAvailErrCount = 0 ! Counter when water mass flow rate is less than minimum available
INTEGER :: WMFRLessThanMinAvailErrIndex = 0 ! Index for water mass flow rate less than minavail recurring message
INTEGER :: WMFRGreaterThanMaxAvailErrCount = 0 ! Counter when water mass flow rate is greater than minimum available
INTEGER :: WMFRGreaterThanMaxAvailErrIndex = 0 ! Index for water mass flow rate > minavail recurring message
!loop topology variables
INTEGER :: LoopNum = 0
INTEGER :: LoopSideNum = 0
INTEGER :: BranchNum = 0
INTEGER :: CompNum = 0
END TYPE FluidCoolerspecs