SingleDuct Module

  1. HVACSingleDuctSystem.f90
  2. SingleDuct
module~~singleduct~~UsesGraph module~singleduct SingleDuct module~dataglobals DataGlobals module~dataglobals->module~singleduct module~schedulemanager ScheduleManager module~dataglobals->module~schedulemanager module~dataenvironment DataEnvironment module~dataglobals->module~dataenvironment module~datahvacglobals DataHVACGlobals module~dataglobals->module~datahvacglobals module~steamcoils SteamCoils module~dataglobals->module~steamcoils module~datasizing DataSizing module~dataglobals->module~datasizing module~dataloopnode DataLoopNode module~dataglobals->module~dataloopnode module~psychrometrics Psychrometrics module~dataglobals->module~psychrometrics module~branchnodeconnections BranchNodeConnections module~dataglobals->module~branchnodeconnections module~fluidproperties FluidProperties module~dataglobals->module~fluidproperties module~dataplant DataPlant module~dataglobals->module~dataplant module~databranchnodeconnections DataBranchNodeConnections module~dataglobals->module~databranchnodeconnections module~schedulemanager->module~singleduct module~schedulemanager->module~steamcoils module~dataenvironment->module~singleduct module~dataenvironment->module~schedulemanager module~dataenvironment->module~steamcoils module~dataenvironment->module~psychrometrics module~datahvacglobals->module~singleduct module~datahvacglobals->module~steamcoils module~steamcoils->module~singleduct module~dataheatbalfansys DataHeatBalFanSys module~dataheatbalfansys->module~singleduct module~datainterfaces DataInterfaces module~datainterfaces->module~singleduct module~datainterfaces->module~schedulemanager module~datainterfaces->module~steamcoils module~datainterfaces->module~psychrometrics module~datainterfaces->module~branchnodeconnections module~datainterfaces->module~fluidproperties module~datasizing->module~singleduct module~dataloopnode->module~singleduct module~dataloopnode->module~steamcoils module~dataloopnode->module~branchnodeconnections module~dataloopnode->module~dataplant module~psychrometrics->module~singleduct module~psychrometrics->module~steamcoils module~branchnodeconnections->module~singleduct module~dataprecisionglobals DataPrecisionGlobals module~dataprecisionglobals->module~singleduct module~dataprecisionglobals->module~dataglobals module~dataprecisionglobals->module~schedulemanager module~dataprecisionglobals->module~dataenvironment module~dataprecisionglobals->module~datahvacglobals module~dataprecisionglobals->module~steamcoils module~dataprecisionglobals->module~dataheatbalfansys module~dataprecisionglobals->module~datainterfaces module~dataprecisionglobals->module~datasizing module~dataprecisionglobals->module~dataloopnode module~dataprecisionglobals->module~psychrometrics module~dataprecisionglobals->module~fluidproperties module~dataprecisionglobals->module~dataplant module~general General module~dataprecisionglobals->module~general module~fluidproperties->module~singleduct module~fluidproperties->module~steamcoils module~dataplant->module~steamcoils module~general->module~psychrometrics module~general->module~fluidproperties module~databranchnodeconnections->module~branchnodeconnections
Help

Used By

module~~singleduct~~UsedByGraph module~singleduct SingleDuct proc~getfancoilunits GetFanCoilUnits module~singleduct->proc~getfancoilunits proc~calc4pipefancoil Calc4PipeFanCoil module~singleduct->proc~calc4pipefancoil proc~getzoneairloopequipment GetZoneAirLoopEquipment module~singleduct->proc~getzoneairloopequipment proc~validatedistributionsystem ValidateDistributionSystem module~singleduct->proc~validatedistributionsystem proc~simzoneairloopequipment SimZoneAirLoopEquipment module~singleduct->proc~simzoneairloopequipment
Help

Variables

Derived Types

Functions

Subroutines


Variables

TypeVisibility AttributesNameInitial
integer, private, parameter:: Normal =1
integer, private, parameter:: ReverseAction =2
integer, private, parameter:: SingleDuctVAVReheat =3
integer, private, parameter:: SingleDuctConstVolReheat =4
integer, private, parameter:: SingleDuctVAVNoReheat =5
integer, private, parameter:: SingleDuctVAVReheatVSFan =6
integer, private, parameter:: SingleDuctCBVAVReheat =10
integer, private, parameter:: SingleDuctCBVAVNoReheat =11
integer, private, parameter:: HCoilType_None =0
integer, private, parameter:: HCoilType_Gas =1
integer, private, parameter:: HCoilType_Electric =2
integer, private, parameter:: HCoilType_SimpleHeating =3
integer, private, parameter:: HCoilType_SteamAirHeating =4
integer, private, parameter:: FanType_None =0
integer, private, parameter:: FanType_VS =1
integer, private, parameter:: ConstantMinFrac =1
integer, private, parameter:: ScheduledMinFrac =2
integer, private, parameter:: FixedMin =3
integer, private :: NumATMixers =0
type(SysDesignParams), private, ALLOCATABLE, DIMENSION(:):: Sys
type(SysFlowConditions), private, ALLOCATABLE, DIMENSION(:):: SysInlet
type(SysFlowConditions), private, ALLOCATABLE, DIMENSION(:):: SysOutlet
type(AirTerminalMixerData), private, ALLOCATABLE, DIMENSION(:):: SysATMixer
real(kind=r64), private, ALLOCATABLE, DIMENSION(:):: MassFlow1
real(kind=r64), private, ALLOCATABLE, DIMENSION(:):: MassFlow2
real(kind=r64), private, ALLOCATABLE, DIMENSION(:):: MassFlow3
real(kind=r64), private, ALLOCATABLE, DIMENSION(:):: MassFlowDiff
logical, private :: GetInputFlag =.True.
logical, private :: GetATMixerFlag =.True.
integer, private :: NumConstVolSys =0
logical, private, ALLOCATABLE, DIMENSION(:):: CheckEquipName
integer, private :: NumSys =0

Derived Types

type, private :: SysDesignParams

Components

TypeVisibility AttributesNameInitial
character(len=MaxNameLength), public :: SysName =' '
character(len=MaxNameLength), public :: SysType =' '
integer, public :: SysType_Num =0
character(len=MaxNameLength), public :: Schedule =' '
integer, public :: SchedPtr =0
character(len=MaxNameLength), public :: ReheatComp =' '
integer, public :: ReheatComp_Num =0
integer, public :: ReheatComp_Index =0
character(len=MaxNameLength), public :: ReheatName =' '
integer, public :: ReheatComp_PlantType =0
character(len=MaxNameLength), public :: FanType =' '
integer, public :: Fan_Num =0
integer, public :: Fan_Index =0
integer, public :: ControlCompTypeNum =0
integer, public :: CompErrIndex =0
character(len=MaxNameLength), public :: FanName =' '
real(kind=r64), public :: MaxAirVolFlowRate =0.0D0
real(kind=r64), public :: AirMassFlowRateMax =0.0D0
real(kind=r64), public :: MaxHeatAirVolFlowRate =0.0D0
real(kind=r64), public :: HeatAirMassFlowRateMax =0.0D0
integer, public :: ZoneMinAirFracMethod =ConstantMinFrac
real(kind=r64), public :: ZoneMinAirFrac =0.0D0
real(kind=r64), public :: ZoneFixedMinAir =0.0D0
integer, public :: ZoneMinAirFracSchPtr =0
logical, public :: ConstantMinAirFracSetByUser =.FALSE.
logical, public :: FixedMinAirSetByUser =.FALSE.
real(kind=r64), public :: DesignMinAirFrac =0.0D0
real(kind=r64), public :: DesignFixedMinAir =0.0D0
integer, public :: InletNodeNum =0
integer, public :: OutletNodeNum =0
integer, public :: ReheatControlNode =0
integer, public :: ReheatCoilOutletNode =0
real(kind=r64), public :: ReheatCoilMaxCapacity =0.0D0
integer, public :: ReheatAirOutletNode =0
real(kind=r64), public :: MaxReheatWaterVolFlow =0.0D0
real(kind=r64), public :: MaxReheatSteamVolFlow =0.0D0
real(kind=r64), public :: MaxReheatWaterFlow =0.0D0
real(kind=r64), public :: MaxReheatSteamFlow =0.0D0
real(kind=r64), public :: MinReheatWaterVolFlow =0.0D0
real(kind=r64), public :: MinReheatSteamVolFlow =0.0D0
real(kind=r64), public :: MinReheatWaterFlow =0.0D0
real(kind=r64), public :: MinReheatSteamFlow =0.0D0
real(kind=r64), public :: ControllerOffset =0.0D0
real(kind=r64), public :: MaxReheatTemp =0.0D0
logical, public :: MaxReheatTempSetByUser =.FALSE.
integer, public :: DamperHeatingAction =0

1=NORMAL; 2=REVERSE ACTION
real(kind=r64), public :: DamperPosition =0.0D0
integer, public :: ADUNum =0
integer, public :: FluidIndex =0
integer, public :: ErrCount1 =0
integer, public :: ErrCount1c =0
integer, public :: ErrCount2 =0
real(kind=r64), public :: ZoneFloorArea =0.0D0
integer, public :: CtrlZoneNum =0
integer, public :: ActualZoneNum =0
real(kind=r64), public :: MaxAirVolFlowRateDuringReheat =0.0D0
real(kind=r64), public :: MaxAirVolFractionDuringReheat =0.0D0
real(kind=r64), public :: AirMassFlowDuringReheatMax =0.0D0
integer, public :: ZoneOutdoorAirMethod =0
real(kind=r64), public :: OutdoorAirFlowRate =0.0D0
logical, public :: NoOAFlowInputFromUser =.TRUE.
integer, public :: OARequirementsPtr =0
integer, public :: AirLoopNum =0
integer, public :: HWLoopNum =0
integer, public :: HWLoopSide =0
integer, public :: HWBranchIndex =0
integer, public :: HWCompIndex =0
character(len=MaxNameLength), public :: ZoneHVACUnitType =' '
character(len=MaxNameLength), public :: ZoneHVACUnitName =' '
integer, public :: SecInNode =0
integer, public :: IterationLimit =0
integer, public :: IterationFailed =0

type, private :: AirTerminalMixerData

Components

TypeVisibility AttributesNameInitial
character(len=MaxNameLength), public :: Name =' '
integer, public :: MixerType =0
integer, public :: ZoneHVACUnitType =0
character(len=MaxNameLength), public :: ZoneHVACUnitName =' '
integer, public :: SecInNode =0
integer, public :: PriInNode =0
integer, public :: MixedAirOutNode =0
real(kind=r64), public :: ZoneAirTemp =0.0D0
real(kind=r64), public :: ZoneAirHumRat =0.0D0
real(kind=r64), public :: ZoneAirEnthalpy =0.0D0
real(kind=r64), public :: ZoneAirPressure =0.0D0
real(kind=r64), public :: ZoneAirMassFlowRate =0.0D0
real(kind=r64), public :: DOASTemp =0.0D0
real(kind=r64), public :: DOASHumRat =0.0D0
real(kind=r64), public :: DOASEnthalpy =0.0D0
real(kind=r64), public :: DOASPressure =0.0D0
real(kind=r64), public :: DOASMassFlowRate =0.0D0
real(kind=r64), public :: MixedAirTemp =0.0D0
real(kind=r64), public :: MixedAirHumRat =0.0D0
real(kind=r64), public :: MixedAirEnthalpy =0.0D0
real(kind=r64), public :: MixedAirPressure =0.0D0
real(kind=r64), public :: MixedAirMassFlowRate =0.0D0
real(kind=r64), public :: MaxAirMassFlowRate =0.0D0

type, private :: SysFlowConditions

Components

TypeVisibility AttributesNameInitial
real(kind=r64), public :: AirMassFlowRate =0.0D0
real(kind=r64), public :: AirMassFlowRateMaxAvail =0.0D0
real(kind=r64), public :: AirMassFlowRateMinAvail =0.0D0
real(kind=r64), public :: AirTemp =0.0D0
real(kind=r64), public :: AirHumRat =0.0D0
real(kind=r64), public :: AirEnthalpy =0.0D0
real(kind=r64), public :: AirPressure =0.0

Functions

private function VAVVSCoolingResidual(SupplyAirMassFlow, Par) result(Residuum)

Arguments

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

Return Value real(kind=r64)

private function VAVVSHWNoFanResidual(HWMassFlow, Par) result(Residuum)

Arguments

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

Return Value real(kind=r64)

private function VAVVSHWFanOnResidual(SupplyAirMassFlow, Par) result(Residuum)

Arguments

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

Return Value real(kind=r64)

private function VAVVSHCFanOnResidual(HeatingFrac, Par) result(Residuum)

Arguments

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

Return Value real(kind=r64)


Subroutines

public subroutine SimulateSingleDuct(CompName, FirstHVACIteration, ZoneNum, ZoneNodeNum, CompIndex)

Arguments

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

private subroutine GetSysInput()

Arguments

None

private subroutine InitSys(SysNum, FirstHVACIteration)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: SysNum
logical, intent(in) :: FirstHVACIteration

private subroutine SizeSys(SysNum)

Arguments

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

private subroutine SimVAV(SysNum, FirstHVACIteration, ZoneNum, ZoneNodeNum)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: SysNum
logical, intent(in) :: FirstHVACIteration
integer, intent(in) :: ZoneNum
integer, intent(in) :: ZoneNodeNum

private subroutine CalcOAMassFlow(SysNum, SAMassFlow, AirLoopOAFrac)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: SysNum
real(kind=r64), intent(inout) :: SAMassFlow
real(kind=r64), intent(inout) :: AirLoopOAFrac

private subroutine SimCBVAV(SysNum, FirstHVACIteration, ZoneNum, ZoneNodeNum)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: SysNum
logical, intent(in) :: FirstHVACIteration
integer, intent(in) :: ZoneNum
integer, intent(in) :: ZoneNodeNum

private subroutine SimVAVVS(SysNum, FirstHVACIteration, ZoneNum, ZoneNodeNum)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: SysNum
logical, intent(in) :: FirstHVACIteration
integer, intent(in) :: ZoneNum
integer, intent(in) :: ZoneNodeNum

private subroutine SimConstVol(SysNum, FirstHVACIteration, ZoneNum, ZoneNodeNum)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: SysNum
logical, intent(in) :: FirstHVACIteration
integer, intent(in) :: ZoneNum
integer, intent(in) :: ZoneNodeNum

private subroutine CalcVAVVS(SysNum, FirstHVACIteration, ZoneNode, HCoilType, HWFlow, HCoilReq, FanType, AirFlow, FanOn, LoadMet)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: SysNum
logical, intent(in) :: FirstHVACIteration
integer, intent(in) :: ZoneNode
integer, intent(in) :: HCoilType
real(kind=r64), intent(in) :: HWFlow
real(kind=r64), intent(in) :: HCoilReq
integer, intent(in) :: FanType
real(kind=r64), intent(in) :: AirFlow
integer, intent(in) :: FanOn
real(kind=r64), intent(out) :: LoadMet

private subroutine UpdateSys(SysNum)

Arguments

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

private subroutine ReportSys(SysNum)

Arguments

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

public subroutine GetHVACSingleDuctSysIndex(SDSName, SDSIndex, ErrorsFound, ThisObjectType, DamperInletNode, DamperOutletNode)

Arguments

Type IntentOptional AttributesName
character(len=*), intent(in) :: SDSName
integer, intent(inout) :: SDSIndex
logical, intent(inout) :: ErrorsFound
character(len=*), intent(in), optional :: ThisObjectType
integer, intent(out), optional :: DamperInletNode
integer, intent(out), optional :: DamperOutletNode

public subroutine SimATMixer(SysName, FirstHVACIteration, SysIndex)

Arguments

Type IntentOptional AttributesName
character(len=*), intent(in) :: SysName
logical, intent(in) :: FirstHVACIteration
integer, intent(inout) :: SysIndex

private subroutine GetATMixers()

Arguments

None

private subroutine InitATMixer(ATMixerNum, FirstHVACIteration)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: ATMixerNum
logical, intent(in) :: FirstHVACIteration

private subroutine CalcATMixer(SysNum)

Arguments

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

private subroutine UpdateATMixer(SysNum)

Arguments

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

public subroutine GetATMixerPriNode(ZoneEquipName, ATMixerPriNode)

Arguments

Type IntentOptional AttributesName
character(len=*), intent(in) :: ZoneEquipName
integer, intent(inout) :: ATMixerPriNode

public subroutine GetATMixerSecNode(ZoneEquipName, ATMixerSecNode)

Arguments

Type IntentOptional AttributesName
character(len=*), intent(in) :: ZoneEquipName
integer, intent(inout) :: ATMixerSecNode

public subroutine GetATMixerOutNode(ZoneEquipName, ATMixerOutNode)

Arguments

Type IntentOptional AttributesName
character(len=*), intent(in) :: ZoneEquipName
integer, intent(inout) :: ATMixerOutNode

public subroutine GetATMixer(ZoneEquipName, ATMixerName, ATMixerNum, ATMixerType, ATMixerPriNode, ATMixerSecNode, ATMixerOutNode)

Arguments

Type IntentOptional AttributesName
character(len=*), intent(in) :: ZoneEquipName
character(len=*), intent(out) :: ATMixerName
integer, intent(out) :: ATMixerNum
integer, intent(out) :: ATMixerType
integer, intent(out) :: ATMixerPriNode
integer, intent(out) :: ATMixerSecNode
integer, intent(out) :: ATMixerOutNode

private subroutine SetATMixerPriFlow(ATMixerNum, PriAirMassFlowRate)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: ATMixerNum
real(kind=r64), intent(in), optional :: PriAirMassFlowRate

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