PipeHeatTransfer Module

  1. PlantPipeHeatTransfer.f90
  2. PipeHeatTransfer
module~~pipeheattransfer~~UsesGraph module~pipeheattransfer PipeHeatTransfer module~dataplant DataPlant module~dataplant->module~pipeheattransfer module~datainterfaces DataInterfaces module~datainterfaces->module~pipeheattransfer module~dataglobals DataGlobals module~dataglobals->module~pipeheattransfer module~dataglobals->module~dataplant module~dataloopnode DataLoopNode module~dataglobals->module~dataloopnode module~dataprecisionglobals DataPrecisionGlobals module~dataprecisionglobals->module~pipeheattransfer module~dataprecisionglobals->module~dataplant module~dataprecisionglobals->module~datainterfaces module~dataprecisionglobals->module~dataglobals module~dataprecisionglobals->module~dataloopnode module~dataloopnode->module~dataplant
Help

Used By

module~~pipeheattransfer~~UsedByGraph module~pipeheattransfer PipeHeatTransfer proc~simplantequip SimPlantEquip module~pipeheattransfer->proc~simplantequip proc~initinternalheatgains InitInternalHeatGains module~pipeheattransfer->proc~initinternalheatgains proc~getplantinput GetPlantInput module~pipeheattransfer->proc~getplantinput
Help

Variables

Derived Types

Functions

Subroutines


Variables

TypeVisibility AttributesNameInitial
character(len=*), private, parameter:: Blank =' '
integer, private, parameter:: None =0
integer, private, parameter:: ZoneEnv =1
integer, private, parameter:: ScheduleEnv =2
integer, private, parameter:: OutsideAirEnv =3
integer, private, parameter:: GroundEnv =4
integer, private, parameter:: PreviousTimeIndex =1
integer, private, parameter:: CurrentTimeIndex =2
integer, private, parameter:: TentativeTimeIndex =3
real(kind=r64), private, parameter:: InnerDeltaTime =60.0d0
type(PipeHTData), private, DIMENSION(:), ALLOCATABLE:: PipeHT
type(PipeHeatTransferReport), private, DIMENSION(:), ALLOCATABLE:: PipeHTReport
integer, private :: NumOfPipeHT =0
integer, private :: InletNodeNum =0
integer, private :: OutletNodeNum =0
integer, private :: PipeHTNum =0
real(kind=r64), private :: MassFlowRate =0.0d0
real(kind=r64), private :: VolumeFlowRate =0.0d0
real(kind=r64), private :: DeltaTime =0.0d0
real(kind=r64), private :: InletTemp =0.0d0
real(kind=r64), private :: OutletTemp =0.0d0
real(kind=r64), private :: EnvironmentTemp =0.0d0
real(kind=r64), private :: EnvHeatLossRate =0.0d0
real(kind=r64), private :: FluidHeatLossRate =0.0d0
logical, private :: GetPipeInputFlag =.TRUE.
integer, private :: NumInnerTimeSteps =0

Derived Types

type, private :: PipeHTData

Components

TypeVisibility AttributesNameInitial
character(len=MaxNameLength), public :: Name =Blank
character(len=MaxNameLength), public :: Construction =Blank
character(len=MaxNameLength), public :: Environment =Blank
character(len=MaxNameLength), public :: EnvrSchedule =Blank
character(len=MaxNameLength), public :: EnvrVelSchedule =Blank
character(len=MaxNameLength), public :: EnvrZone =Blank
character(len=MaxNameLength), public :: EnvrAirNode =Blank
real(kind=r64), public :: Length =0.0d0
real(kind=r64), public :: PipeID =0.0d0
character(len=MaxNameLength), public :: InletNode =Blank
character(len=MaxNameLength), public :: OutletNode =Blank
integer, public :: InletNodeNum =0
integer, public :: OutletNodeNum =0
integer, public :: TypeOf =0
integer, public :: ConstructionNum =0
integer, public :: EnvironmentPtr =0
integer, public :: EnvrSchedPtr =0
integer, public :: EnvrVelSchedPtr =0
integer, public :: EnvrZonePtr =0
integer, public :: EnvrAirNodeNum =0
integer, public :: NumSections =0
real(kind=r64), public :: FluidSpecHeat =0.0d0
real(kind=r64), public :: FluidDensity =0.0d0
real(kind=r64), public :: MaxFlowRate =0.0d0
real(kind=r64), public :: FluidSectionVol =0.0d0
real(kind=r64), public :: InsideArea =0.0d0
real(kind=r64), public :: OutsideArea =0.0d0
real(kind=r64), public :: SectionArea =0.0d0
real(kind=r64), public :: PipeHeatCapacity =0.0d0
real(kind=r64), public :: PipeOD =0.0d0
real(kind=r64), public :: PipeCp =0.0d0
real(kind=r64), public :: PipeDensity =0.0d0
real(kind=r64), public :: PipeConductivity =0.0d0
real(kind=r64), public :: InsulationOD =0.0d0
real(kind=r64), public :: InsulationCp =0.0d0
real(kind=r64), public :: InsulationDensity =0.0d0
real(kind=r64), public :: InsulationConductivity =0.0d0
real(kind=r64), public :: InsulationThickness =0.0d0
real(kind=r64), public :: InsulationResistance =0.0d0
real(kind=r64), public :: CurrentSimTime =0.0d0
real(kind=r64), public :: PreviousSimTime =0.0d0
real(kind=r64), public, ALLOCATABLE, DIMENSION(:):: TentativeFluidTemp
real(kind=r64), public, ALLOCATABLE, DIMENSION(:):: FluidTemp
real(kind=r64), public, ALLOCATABLE, DIMENSION(:):: PreviousFluidTemp
real(kind=r64), public, ALLOCATABLE, DIMENSION(:):: TentativePipeTemp
real(kind=r64), public, ALLOCATABLE, DIMENSION(:):: PipeTemp
real(kind=r64), public, ALLOCATABLE, DIMENSION(:):: PreviousPipeTemp
integer, public :: NumDepthNodes =0
integer, public :: PipeNodeDepth =0
integer, public :: PipeNodeWidth =0
real(kind=r64), public :: PipeDepth =0.0d0
real(kind=r64), public :: DomainDepth =0.0d0
real(kind=r64), public :: dSregular =0.0d0
real(kind=r64), public :: OutdoorConvCoef =0.0d0
character(len=MaxNameLength), public :: SoilMaterial =Blank
integer, public :: SoilMaterialNum =0
integer, public :: MonthOfMinSurfTemp =0
real(kind=r64), public :: AvgGroundTemp =0.0d0
real(kind=r64), public :: AvgGndTempAmp =0.0d0
integer, public :: PhaseShiftDays =0
real(kind=r64), public :: MinSurfTemp =0.0d0
real(kind=r64), public :: SoilDensity =0.0d0
real(kind=r64), public :: SoilDepth =0.0d0
real(kind=r64), public :: SoilCp =0.0d0
real(kind=r64), public :: SoilConductivity =0.0d0
real(kind=r64), public :: SoilRoughness =0.0d0
real(kind=r64), public :: SoilThermAbs =0.0d0
real(kind=r64), public :: SoilSolarAbs =0.0d0
real(kind=r64), public :: CoefS1 =0.0d0
real(kind=r64), public :: CoefS2 =0.0d0
real(kind=r64), public :: CoefA1 =0.0d0
real(kind=r64), public :: CoefA2 =0.0d0
real(kind=r64), public :: FourierDS =0.0d0
real(kind=r64), public :: SoilDiffusivity =0.0d0
real(kind=r64), public :: SoilDiffusivityPerDay =0.0d0
integer, public :: AvgAnnualManualInput =0
real(kind=r64), public, ALLOCATABLE, DIMENSION(:,:,:,:):: T
logical, public :: BeginSimInit =.TRUE.
logical, public :: BeginSimEnvrn =.TRUE.
logical, public :: FirstHVACupdateFlag =.TRUE.
logical, public :: BeginEnvrnupdateFlag =.TRUE.
logical, public :: SolarExposed =.TRUE.
real(kind=r64), public :: SumTK =0.0d0
real(kind=r64), public :: ZoneHeatGainRate =0.0d0
integer, public :: LoopNum =0
integer, public :: LoopSideNum =0
integer, public :: BranchNum =0
integer, public :: CompNum =0
logical, public :: CheckEquipName =.TRUE.

type, private :: PipeHeatTransferReport

Components

TypeVisibility AttributesNameInitial
real(kind=r64), public :: FluidInletTemp =0.0d0
real(kind=r64), public :: FluidOutletTemp =0.0d0
real(kind=r64), public :: MassFlowRate =0.0d0
real(kind=r64), public :: FluidHeatLossRate =0.0d0
real(kind=r64), public :: FluidHeatLossEnergy =0.0d0
real(kind=r64), public :: PipeInletTemp =0.0d0
real(kind=r64), public :: PipeOutletTemp =0.0d0
real(kind=r64), public :: EnvironmentHeatLossRate =0.0d0
real(kind=r64), public :: EnvHeatLossEnergy =0.0d0
real(kind=r64), public :: VolumeFlowRate =0.0d0

Functions

private function CalcPipeHeatTransCoef(PipeHTNum, Temperature, MassFlowRate, Diameter)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: PipeHTNum
real(kind=r64), intent(in) :: Temperature
real(kind=r64), intent(in) :: MassFlowRate
real(kind=r64), intent(in) :: Diameter

Return Value real(kind=r64)

private function OutsidePipeHeatTransCoef(PipeHTNum)

Arguments

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

Return Value real(kind=r64)

private function TBND(z, DayOfSim, PipeHTNum)

Arguments

Type IntentOptional AttributesName
real(kind=r64), intent(in) :: z
real(kind=r64), intent(in) :: DayOfSim
integer, intent(in) :: PipeHTNum

Return Value real(kind=r64)


Subroutines

public subroutine SimPipesHeatTransfer(EquipType, EquipName, EqNum, InitLoopEquip, FirstHVACIteration)

Arguments

Type IntentOptional AttributesName
integer :: EquipType
character(len=*), intent(in) :: EquipName
integer, intent(inout) :: EqNum
logical, intent(in) :: InitLoopEquip
logical, intent(in) :: FirstHVACIteration

private subroutine PushInnerTimeStepArrays(PipeHTNum)

Arguments

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

public subroutine GetPipesHeatTransfer()

Arguments

None

private subroutine ValidatePipeConstruction(PipeType, ConstructionName, FieldName, ConstructionNum, PipeNum, ErrorsFound)

Arguments

Type IntentOptional AttributesName
character(len=*), intent(in) :: PipeType
character(len=*), intent(in) :: ConstructionName
character(len=*), intent(in) :: FieldName
integer, intent(in) :: ConstructionNum
integer, intent(in) :: PipeNum
logical, intent(inout) :: ErrorsFound

private subroutine InitPipesHeatTransfer(PipeType, PipeHTNum, FirstHVACIteration)

Arguments

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

public subroutine InitializeHeatTransferPipes(PipeType, PipeName, PipeNum)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: PipeType
character(len=*), intent(in) :: PipeName
integer, intent(inout) :: PipeNum

private subroutine CalcPipesHeatTransfer(PipeHTNum, LengthIndex)

Arguments

Type IntentOptional AttributesName
integer, intent(in) :: PipeHTNum
integer, intent(in), optional :: LengthIndex

private subroutine CalcBuriedPipeSoil(PipeHTNum)

Arguments

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

private subroutine UpdatePipesHeatTransfer()

Arguments

None

private subroutine ReportPipesHeatTransfer(PipeHTNum)

Arguments

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

public subroutine CalcZonePipesHeatGain()

Arguments

None

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