SurfaceGroundHeatExchanger Module

  1. PlantSurfaceGroundHeatExchanger.f90
  2. SurfaceGroundHeatExchanger
module~~surfacegroundheatexchanger~~UsesGraph module~surfacegroundheatexchanger SurfaceGroundHeatExchanger module~dataglobals DataGlobals module~dataglobals->module~surfacegroundheatexchanger module~dataheatbalance DataHeatBalance module~dataglobals->module~dataheatbalance module~dataloopnode DataLoopNode module~dataglobals->module~dataloopnode module~datawindowequivalentlayer DataWindowEquivalentLayer module~dataglobals->module~datawindowequivalentlayer module~databsdfwindow DataBSDFWindow module~dataglobals->module~databsdfwindow module~datacomplexfenestration DataComplexFenestration module~dataglobals->module~datacomplexfenestration module~datasurfaces DataSurfaces module~dataglobals->module~datasurfaces module~dataheatbalance->module~surfacegroundheatexchanger module~dataloopnode->module~surfacegroundheatexchanger module~datainterfaces DataInterfaces module~datainterfaces->module~surfacegroundheatexchanger module~dataprecisionglobals DataPrecisionGlobals module~dataprecisionglobals->module~surfacegroundheatexchanger module~dataprecisionglobals->module~dataglobals module~dataprecisionglobals->module~dataheatbalance module~dataprecisionglobals->module~dataloopnode module~dataprecisionglobals->module~datainterfaces module~dataprecisionglobals->module~datawindowequivalentlayer module~dataprecisionglobals->module~databsdfwindow module~dataprecisionglobals->module~datacomplexfenestration module~datavectortypes DataVectorTypes module~dataprecisionglobals->module~datavectortypes module~dataprecisionglobals->module~datasurfaces module~datawindowequivalentlayer->module~dataheatbalance module~databsdfwindow->module~dataheatbalance module~databsdfwindow->module~datasurfaces module~datacomplexfenestration->module~dataheatbalance module~datavectortypes->module~dataheatbalance module~datavectortypes->module~databsdfwindow module~datavectortypes->module~datasurfaces module~datasurfaces->module~dataheatbalance
Help

Used By

module~~surfacegroundheatexchanger~~UsedByGraph module~surfacegroundheatexchanger SurfaceGroundHeatExchanger proc~simplantequip SimPlantEquip module~surfacegroundheatexchanger->proc~simplantequip
Help

Variables

Derived Types

Functions

Subroutines


Variables

TypeVisibility AttributesNameInitial
real(kind=r64), private, parameter:: SmallNum =1.0d-30
real(kind=r64), private, parameter:: StefBoltzmann =5.6697d-08
real(kind=r64), private, parameter:: SurfaceHXHeight =0.0d0
character(len=*), private, parameter:: Blank =' '
integer, private, parameter:: SurfCond_Ground =1
integer, private, parameter:: SurfCond_Exposed =2
type(SurfaceGroundHeatExchangerData), private, DIMENSION(:), ALLOCATABLE:: SurfaceGHE
type(SurfaceGroundHeatExchangerQTF), private, DIMENSION(:), ALLOCATABLE:: SurfaceGHEQTF
type(SurfaceGroundHeatExchngrReport), private, DIMENSION(:), ALLOCATABLE:: SurfaceGHEReport
integer, private :: NumOfSurfaceGHEs =0
logical, private :: NoSurfaceGroundTempObjWarning =.true.
integer, private :: InletNodeNum =0
integer, private :: OutletNodeNum =0
integer, private :: ConstructionNum =0
integer, private :: TopRoughness =0
integer, private :: BtmRoughness =0
real(kind=r64), private :: InletTemp =0.0d0
real(kind=r64), private :: OutletTemp =0.0d0
real(kind=r64), private :: FlowRate =0.0d0
real(kind=r64), private :: TopSurfTemp =0.0d0
real(kind=r64), private :: BtmSurfTemp =0.0d0
real(kind=r64), private :: TopSurfFlux =0.0d0
real(kind=r64), private :: BtmSurfFlux =0.0d0
real(kind=r64), private :: SourceFlux =0.0d0
real(kind=r64), private :: SourceTemp =0.0d0
real(kind=r64), private :: SurfaceArea =0.0d0
real(kind=r64), private :: TopThermAbs =0.0d0
real(kind=r64), private :: BtmThermAbs =0.0d0
real(kind=r64), private :: TopSolarAbs =0.0d0
logical, private, ALLOCATABLE, DIMENSION(:):: CheckEquipName
real(kind=r64), private :: PastBeamSolarRad =0.0d0
real(kind=r64), private :: PastSolarDirCosVert =0.0d0
real(kind=r64), private :: PastDifSolarRad =0.0d0
real(kind=r64), private :: PastGroundTemp =0.0d0
logical, private :: PastIsRain =.false.
logical, private :: PastIsSnow =.false.
real(kind=r64), private :: PastOutBaroPress =0.0d0
real(kind=r64), private :: PastOutDryBulbTemp =0.0d0
real(kind=r64), private :: PastOutHumRat =0.0d0
real(kind=r64), private :: PastOutAirDensity =0.0d0
real(kind=r64), private :: PastOutWetBulbTemp =0.0d0
real(kind=r64), private :: PastOutDewPointTemp =0.0d0
real(kind=r64), private :: PastSkyTemp =0.0d0
real(kind=r64), private :: PastWindSpeed =0.0d0
real(kind=r64), private :: PastCloudFraction =0.0d0
real(kind=r64), private, ALLOCATABLE, DIMENSION(:):: QRadSysSrcAvg
real(kind=r64), private, ALLOCATABLE, DIMENSION(:):: LastSysTimeElapsed
real(kind=r64), private, ALLOCATABLE, DIMENSION(:):: LastTimeStepSys

Derived Types

type, private :: SurfaceGroundHeatExchangerData

Components

TypeVisibility AttributesNameInitial
character(len=MaxNameLength), public :: Name =Blank
character(len=MaxNameLength), public :: ConstructionName =Blank
character(len=MaxNameLength), public :: InletNode =Blank
character(len=MaxNameLength), public :: OutletNode =Blank
real(kind=r64), public :: DesignMassFlowRate =0.d0
real(kind=r64), public :: TubeDiameter =0.0d0
real(kind=r64), public :: TubeSpacing =0.0d0
real(kind=r64), public :: SurfaceLength =0.0d0
real(kind=r64), public :: SurfaceWidth =0.0d0
real(kind=r64), public :: TopThermAbs =0.0d0
real(kind=r64), public :: TopSolarAbs =0.0d0
real(kind=r64), public :: BtmThermAbs =0.0d0
integer, public :: LowerSurfCond =0
integer, public :: TubeCircuits =0
integer, public :: ConstructionNum =0
integer, public :: InletNodeNum =0
integer, public :: OutletNodeNum =0
integer, public :: TopRoughness =0
integer, public :: BtmRoughness =0
integer, public :: FrozenErrIndex1 =0
integer, public :: FrozenErrIndex2 =0
integer, public :: ConvErrIndex1 =0
integer, public :: ConvErrIndex2 =0
integer, public :: ConvErrIndex3 =0
integer, public :: LoopNum =0
integer, public :: LoopSideNum =0
integer, public :: BranchNum =0
integer, public :: CompNum =0

type, private :: SurfaceGroundHeatExchangerQTF

Components

TypeVisibility AttributesNameInitial
real(kind=r64), public :: TsrcConstCoef =0.0D0
real(kind=r64), public :: TsrcVarCoef =0.0D0
real(kind=r64), public :: QbtmConstCoef =0.0D0
real(kind=r64), public :: QbtmVarCoef =0.0D0
real(kind=r64), public :: QtopConstCoef =0.0D0
real(kind=r64), public :: QtopVarCoef =0.0D0
integer, public :: NumCTFTerms =0
real(kind=r64), public, DIMENSION(0:MaxCTFTerms-1):: CTFin =0.0D0
real(kind=r64), public, DIMENSION(0:MaxCTFTerms-1):: CTFout =0.0D0
real(kind=r64), public, DIMENSION(0:MaxCTFTerms-1):: CTFcross =0.0D0
real(kind=r64), public, DIMENSION(0:MaxCTFTerms-1):: CTFflux =0.0D0
real(kind=r64), public, DIMENSION(0:MaxCTFTerms-1):: CTFSourceIn =0.0D0
real(kind=r64), public, DIMENSION(0:MaxCTFTerms-1):: CTFSourceOut =0.0D0
real(kind=r64), public, DIMENSION(0:MaxCTFTerms-1):: CTFTSourceOut =0.0D0
real(kind=r64), public, DIMENSION(0:MaxCTFTerms-1):: CTFTSourceIn =0.0D0
real(kind=r64), public, DIMENSION(0:MaxCTFTerms-1):: CTFTSourceQ =0.0D0
real(kind=r64), public, DIMENSION(0:MaxCTFTerms-1):: TbtmHistory =0.0D0
real(kind=r64), public, DIMENSION(0:MaxCTFTerms-1):: TtopHistory =0.0D0
real(kind=r64), public, DIMENSION(0:MaxCTFTerms-1):: TsrcHistory =0.0D0
real(kind=r64), public, DIMENSION(0:MaxCTFTerms-1):: QbtmHistory =0.0D0
real(kind=r64), public, DIMENSION(0:MaxCTFTerms-1):: QtopHistory =0.0D0
real(kind=r64), public, DIMENSION(0:MaxCTFTerms-1):: QsrcHistory =0.0D0
real(kind=r64), public :: Qsrc =0.0D0
real(kind=r64), public :: QsrcAvg =0.0D0
real(kind=r64), public :: LastQSrc =0.0D0
real(kind=r64), public :: LastSysTimeElapsed =0.0D0
real(kind=r64), public :: LastTimeStepSys =0.0D0

type, private :: SurfaceGroundHeatExchngrReport

Components

TypeVisibility AttributesNameInitial
real(kind=r64), public :: InletTemp =0.0d0
real(kind=r64), public :: OutletTemp =0.0d0
real(kind=r64), public :: MassFlowRate =0.0d0
real(kind=r64), public :: TopSurfaceTemp =0.0d0
real(kind=r64), public :: BtmSurfaceTemp =0.0d0
real(kind=r64), public :: TopSurfaceFlux =0.0d0
real(kind=r64), public :: BtmSurfaceFlux =0.0d0
real(kind=r64), public :: HeatTransferRate =0.0d0
real(kind=r64), public :: SurfHeatTransferRate =0.0d0
real(kind=r64), public :: Energy =0.0d0
real(kind=r64), public :: SurfEnergy =0.0d0
real(kind=r64), public :: SourceTemp =0.0d0

Functions

private function CalcSourceFlux(SurfaceGHENum)

Arguments

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

Return Value real(kind=r64)

private function CalcHXEffectTerm(SurfaceGHENum, Temperature, WaterMassFlow)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: SurfaceGHENum
real(kind=r64), intent(in) :: Temperature
real(kind=r64), intent(in) :: WaterMassFlow

Return Value real(kind=r64)


Subroutines

public subroutine SimSurfaceGroundHeatExchanger(CompName, CompIndex, FirstHVACIteration, RunFlag, InitLoopEquip)

Arguments

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

private subroutine GetSurfaceGroundHeatExchanger()

Arguments

None

private subroutine InitSurfaceGroundHeatExchanger(SurfaceGHENum, RunFlag)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: SurfaceGHENum
logical, intent(in) :: RunFlag

private subroutine CalcSurfaceGroundHeatExchanger(SurfaceGHENum, FirstHVACIteration)

Arguments

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

private subroutine CalcBottomFluxCoefficents(SurfaceGHENum, Tbottom, Ttop)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: SurfaceGHENum
real(kind=r64), intent(in) :: Tbottom
real(kind=r64), intent(in) :: Ttop

private subroutine CalcTopFluxCoefficents(SurfaceGHENum, Tbottom, Ttop)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: SurfaceGHENum
real(kind=r64), intent(in) :: Tbottom
real(kind=r64), intent(in) :: Ttop

private subroutine CalcSourceTempCoefficents(SurfaceGHENum, Tbottom, Ttop)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: SurfaceGHENum
real(kind=r64), intent(in) :: Tbottom
real(kind=r64), intent(in) :: Ttop

private subroutine UpdateHistories(SurfaceGHENum, TopFlux, BottomFlux, SourceFlux, SourceTemp)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: SurfaceGHENum
real(kind=r64), intent(in) :: TopFlux
real(kind=r64), intent(in) :: BottomFlux
real(kind=r64), intent(in) :: SourceFlux
real(kind=r64), intent(in) :: SourceTemp

private subroutine CalcTopSurfTemp(SurfaceNum, FluxTop, TempTop, ThisDrybulb, ThisWetbulb, ThisSkyTemp, ThisBeamSolarRad, ThisDifSolarRad, ThisSolarDirCosVert, ThisWindSpeed, ThisIsRain, ThisIsSnow)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: SurfaceNum
real(kind=r64), intent(in) :: FluxTop
real(kind=r64), intent(out) :: TempTop
real(kind=r64), intent(in) :: ThisDrybulb
real(kind=r64), intent(in) :: ThisWetbulb
real(kind=r64), intent(in) :: ThisSkyTemp
real(kind=r64), intent(in) :: ThisBeamSolarRad
real(kind=r64), intent(in) :: ThisDifSolarRad
real(kind=r64), intent(in) :: ThisSolarDirCosVert
real(kind=r64), intent(in) :: ThisWindSpeed
logical, intent(in) :: ThisIsRain
logical, intent(in) :: ThisIsSnow

private subroutine CalcBottomSurfTemp(SurfaceNum, FluxBtm, TempBtm, ThisDrybulb, ThisWindSpeed, ThisGroundTemp)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: SurfaceNum
real(kind=r64), intent(in) :: FluxBtm
real(kind=r64), intent(out) :: TempBtm
real(kind=r64), intent(in) :: ThisDrybulb
real(kind=r64), intent(in) :: ThisWindSpeed
real(kind=r64), intent(in) :: ThisGroundTemp

private subroutine UpdateSurfaceGroundHeatExchngr(SurfaceGHENum)

Arguments

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

private subroutine ReportSurfaceGroundHeatExchngr(SurfaceGHENum)

Arguments

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

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