Nodes of different colours represent the following:
Solid arrows point from one derived type to another which extends (inherits from) it. Dashed arrows point from a derived type to another type containing it as a components, with a label listing the name(s) of said component(s). Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(BaseChillerSpecs), | public | :: | Base | ||||
character(len=MaxNameLength), | public | :: | FuelType | = | ' ' | ||
real(kind=r64), | public | :: | MinPartLoadRat | = | 0.0d0 | ||
real(kind=r64), | public | :: | MaxPartLoadRat | = | 0.0d0 | ||
real(kind=r64), | public | :: | OptPartLoadRat | = | 0.0d0 | ||
real(kind=r64), | public | :: | TempDesCondIn | = | 0.0d0 | ||
real(kind=r64), | public | :: | TempRiseCoef | = | 0.0d0 | ||
real(kind=r64), | public | :: | TempDesEvapOut | = | 0.0d0 | ||
real(kind=r64), | public, | DIMENSION(3) | :: | CapRatCoef | = | 0.0d0 | |
real(kind=r64), | public, | DIMENSION(3) | :: | PowerRatCoef | = | 0.0d0 | |
real(kind=r64), | public, | DIMENSION(3) | :: | FullLoadCoef | = | 0.0d0 | |
real(kind=r64), | public | :: | TempLowLimitEvapOut | = | 0.0d0 | ||
integer, | public | :: | ClngLoadtoFuelCurve | = | 0 | ||
integer, | public | :: | RecJacHeattoFuelCurve | = | 0 | ||
integer, | public | :: | RecLubeHeattoFuelCurve | = | 0 | ||
integer, | public | :: | TotExhausttoFuelCurve | = | 0 | ||
real(kind=r64), | public | :: | ExhaustTemp | = | 0.0d0 | ||
integer, | public | :: | ExhaustTempCurve | = | 0 | ||
real(kind=r64), | public | :: | UA | = | 0.0d0 | ||
real(kind=r64), | public, | DIMENSION(2) | :: | UACoef | = | 0.0d0 | |
real(kind=r64), | public | :: | MaxExhaustperPowerOutput | = | 0.0d0 | ||
real(kind=r64), | public | :: | DesignMinExitGasTemp | = | 0.0d0 | ||
real(kind=r64), | public | :: | FuelHeatingValue | = | 0.0d0 | ||
real(kind=r64), | public | :: | DesignHeatRecVolFlowRate | = | 0.0d0 | ||
real(kind=r64), | public | :: | DesignHeatRecMassFlowRate | = | 0.0d0 | ||
logical, | public | :: | HeatRecActive | = | .false. | ||
integer, | public | :: | HeatRecInletNodeNum | = | 0 | ||
integer, | public | :: | HeatRecOutletNodeNum | = | 0 | ||
real(kind=r64), | public | :: | HeatRecMaxTemp | = | 0.0d0 | ||
integer, | public | :: | HRLoopNum | = | 0 | ||
integer, | public | :: | HRLoopSideNum | = | 0 | ||
integer, | public | :: | HRBranchNum | = | 0 | ||
integer, | public | :: | HRCompNum | = | 0 |
TYPE EngineDrivenChillerSpecs
TYPE(BaseChillerSpecs) :: Base
CHARACTER(len=MaxNameLength) :: FuelType =' ' ! Type of Fuel - DIESEL, GASOLINE, GAS
REAL(r64) :: MinPartLoadRat =0.0d0 ! (EngineDriven MIN) min allowed operating frac full load
REAL(r64) :: MaxPartLoadRat =0.0d0 ! (EngineDriven MAX) max allowed operating frac full load
REAL(r64) :: OptPartLoadRat =0.0d0 ! (EngineDriven BEST) optimal operating frac full load
REAL(r64) :: TempDesCondIn =0.0d0 ! C - (EngineDriven ADJTC(1)The design secondary loop fluid
! temperature at the chiller condenser side inlet
REAL(r64) :: TempRiseCoef =0.0d0 ! (EngineDriven ADJTC(2)) correction factor for off ChillDesign oper.
REAL(r64) :: TempDesEvapOut =0.0d0 ! C - (EngineDriven ADJTC(3)The design primary loop fluid
! temperature at the chiller evaporator side outlet
REAL(r64),DIMENSION(3) :: CapRatCoef =0.0d0 ! (EngineDriven RCAVC() ) coeff of cap ratio poly fit
REAL(r64),DIMENSION(3) :: PowerRatCoef =0.0d0 ! (EngineDriven ADJEC() ) coeff of power rat poly fit
REAL(r64),DIMENSION(3) :: FullLoadCoef =0.0d0 ! (EngineDriven RPWRC() ) coeff of full load poly. fit
REAL(r64) :: TempLowLimitEvapOut =0.0d0 ! C - low temperature shut off
INTEGER :: ClngLoadtoFuelCurve =0 !Coeff of Shaft Power to Fuel Energy Input Coeff Poly Fit
INTEGER :: RecJacHeattoFuelCurve =0 !Curve Index for Ratio of Recoverable Jacket Heat to
INTEGER :: RecLubeHeattoFuelCurve=0 !Curve Index for Ratio of Recoverable Lube Oil Heat to
INTEGER :: TotExhausttoFuelCurve =0 !Curve Index for Total Exhaust heat Input to Fuel Energy Input Coeffs Poly Fit
REAL(r64) :: ExhaustTemp =0.0d0 !(TEXDC) Exhaust Gas Temp to Fuel Energy Input
INTEGER :: ExhaustTempCurve =0 !Curve Index for Exhaust Gas Temp to Fuel Energy Input Coeffs Poly Fit
REAL(r64) :: UA =0.0d0 !(UACDC) exhaust gas Heat Exchanger UA to Capacity
REAL(r64),DIMENSION(2) :: UACoef =0.0d0 !Heat Exchanger UA Coeffs Poly Fit
REAL(r64) :: MaxExhaustperPowerOutput =0.0d0 !MAX EXHAUST FLOW PER W DSL POWER OUTPUT COEFF
REAL(r64) :: DesignMinExitGasTemp =0.0d0 !Steam Saturation Temperature
REAL(r64) :: FuelHeatingValue =0.0d0 ! Heating Value of Fuel in kJ/kg
REAL(r64) :: DesignHeatRecVolFlowRate =0.0d0 ! m3/s, Design Water mass flow rate through heat recovery loop
REAL(r64) :: DesignHeatRecMassFlowRate=0.0d0 ! kg/s, Design Water mass flow rate through heat recovery loop
LOGICAL :: HeatRecActive =.false. ! True entered Heat Rec Vol Flow Rate >0
INTEGER :: HeatRecInletNodeNum =0 ! Node number on the heat recovery inlet side of the condenser
INTEGER :: HeatRecOutletNodeNum =0 ! Node number on the heat recovery outlet side of the condenser
REAL(r64) :: HeatRecMaxTemp =0.0d0 !Max Temp that can be produced in heat recovery
INTEGER :: HRLoopNum = 0 ! heat recovery water plant loop side index
INTEGER :: HRLoopSideNum = 0 ! heat recovery water plant loop side index
INTEGER :: HRBranchNum = 0 ! heat recovery water plant loop branch index
INTEGER :: HRCompNum = 0 ! heat recovery water plant loop component index
END TYPE EngineDrivenChillerSpecs