Pumps – EnergyPlusFortran

Used By

Derived Types

Subroutines

SimPumps GetPumpInput InitializePumps SetupPumpMinMaxFlows CalcPumps SizePump ReportPumps PumpDataForTable GetRequiredMassFlowRate

Variables

Type	Visibility	Attributes		Name		Initial
integer,	private,	parameter	::	Continuous	=	1
integer,	private,	parameter	::	Intermittent	=	2
integer,	private,	parameter	::	VFDManual	=	1
integer,	private,	parameter	::	VFDAutomatic	=	2
integer,	private,	parameter	::	OptimalScheme	=	1
integer,	private,	parameter	::	SequentialScheme	=	2
integer,	private,	parameter	::	UserDefined	=	3
character(len=*),	private,	parameter	::	cPump_VarSpeed	=	'Pump:VariableSpeed '
integer,	private,	parameter	::	Pump_VarSpeed	=	101
character(len=*),	private,	parameter	::	cPump_ConSpeed	=	'Pump:ConstantSpeed '
integer,	private,	parameter	::	Pump_ConSpeed	=	102
character(len=*),	private,	parameter	::	cPump_Cond	=	'Pump:VariableSpeed:Condensate'
integer,	private,	parameter	::	Pump_Cond	=	103
character(len=*),	private,	parameter	::	cPumpBank_VarSpeed	=	'HeaderedPumps:VariableSpeed '
integer,	private,	parameter	::	PumpBank_VarSpeed	=	104
character(len=*),	private,	parameter	::	cPumpBank_ConSpeed	=	'HeaderedPumps:ConstantSpeed '
integer,	private,	parameter	::	PumpBank_ConSpeed	=	105
character(len=*),	private,	parameter, DIMENSION(101:105)	::	cPumpTypes	=	(/cPump_VarSpeed, cPump_ConSpeed, cPump_Cond, cPumpBank_VarSpeed, cPumpBank_ConSpeed/)
integer,	private		::	NumPumps	=	0
integer,	private		::	NumPumpsRunning	=	0
integer,	private		::	NumPumpsFullLoad	=	0
real(kind=r64),	private		::	PumpMassFlowRate	=	0.0d0
real(kind=r64),	private		::	PumpHeattoFluid	=	0.0d0
real(kind=r64),	private		::	Power	=	0.0d0
real(kind=r64),	private		::	ShaftPower	=	0.0d0
type(PumpSpecs),	public,	ALLOCATABLE, DIMENSION(:)	::	PumpEquip
type(ReportVars),	private,	ALLOCATABLE, DIMENSION(:)	::	PumpEquipReport

Derived Types

type, private :: PumpVFDControlData

Components

Type	Visibility		Name		Initial
character(len=MaxNameLength),	public	::	Name	=	' '
character(len=MaxNameLength),	public	::	ManualRPMSchedName	=	' '
integer,	public	::	ManualRPMSchedIndex	=	0
character(len=MaxNameLength),	public	::	LowerPsetSchedName	=	' '
integer,	public	::	LowerPsetSchedIndex	=	0
character(len=MaxNameLength),	public	::	UpperPsetSchedName	=	' '
integer,	public	::	UpperPsetSchedIndex	=	0
character(len=MaxNameLength),	public	::	MinRPMSchedName	=	' '
integer,	public	::	MinRPMSchedIndex	=	0
character(len=MaxNameLength),	public	::	MaxRPMSchedName	=	' '
integer,	public	::	MaxRPMSchedIndex	=	0
integer,	public	::	VFDControlType	=	0
real(kind=r64),	public	::	MaxRPM	=	0.0d0
real(kind=r64),	public	::	MinRPM	=	0.0d0
real(kind=r64),	public	::	PumpActualRPM	=	0.0d0

type, public :: PumpSpecs

Components

Type	Visibility	Attributes		Name		Initial
character(len=MaxNameLength),	public		::	Name	=	' '
character(len=MaxNameLength),	public		::	PumpSchedule	=	' '
character(len=MaxNameLength),	public		::	PressureCurve_Name	=	' '
integer,	public		::	PumpType	=	0
integer,	public		::	TypeOf_Num	=	0
integer,	public		::	LoopNum	=	0
integer,	public		::	LoopSideNum	=	0
integer,	public		::	BranchNum	=	0
integer,	public		::	CompNum	=	0
integer,	public		::	PumpControl	=	0
integer,	public		::	PumpScheduleIndex	=	0
integer,	public		::	InletNodeNum	=	0
integer,	public		::	OutletNodeNum	=	0
integer,	public		::	SequencingScheme	=	0
integer,	public		::	FluidIndex	=	0
integer,	public		::	NumPumpsInBank	=	0
integer,	public		::	PowerErrIndex1	=	0
integer,	public		::	PowerErrIndex2	=	0
real(kind=r64),	public		::	MinVolFlowRateFrac	=	0.0d0
real(kind=r64),	public		::	NomVolFlowRate	=	0.0d0
real(kind=r64),	public		::	MassFlowRateMax	=	0.0d0
logical,	public		::	EMSMassFlowOverrideOn	=	.FALSE.
real(kind=r64),	public		::	EMSMassFlowValue	=	0.0D0
real(kind=r64),	public		::	NomSteamVolFlowRate	=	0.0d0
real(kind=r64),	public		::	MinVolFlowRate	=	0.0d0
real(kind=r64),	public		::	MassFlowRateMin	=	0.0d0
real(kind=r64),	public		::	NomPumpHead	=	0.0d0
logical,	public		::	EMSPressureOverrideOn	=	.FALSE.
real(kind=r64),	public		::	EMSPressureOverrideValue	=	0.0d0
real(kind=r64),	public		::	NomPowerUse	=	0.0d0
real(kind=r64),	public		::	MotorEffic	=	0.0d0
real(kind=r64),	public		::	PumpEffic	=	0.0d0
real(kind=r64),	public		::	FracMotorLossToFluid	=	0.0d0
real(kind=r64),	public		::	Energy	=	0.0d0
real(kind=r64),	public		::	Power	=	0.0d0
real(kind=r64),	public,	DIMENSION(4)	::	PartLoadCoef	=	0.0d0
integer,	public		::	PressureCurve_Index	=	0
real(kind=r64),	public		::	PumpMassFlowRateMaxRPM	=	0.0d0
real(kind=r64),	public		::	PumpMassFlowRateMinRPM	=	0.0d0
real(kind=r64),	public		::	MinPhiValue	=	0.0d0
real(kind=r64),	public		::	MaxPhiValue	=	0.0d0
real(kind=r64),	public		::	ImpellerDiameter	=	0.0d0
real(kind=r64),	public		::	RotSpeed_RPM	=	0.0d0
real(kind=r64),	public		::	RotSpeed	=	0.0d0
logical,	public		::	PumpInitFlag	=	.TRUE.
logical,	public		::	PumpOneTimeFlag	=	.TRUE.
logical,	public		::	CheckEquipName	=	.TRUE.
logical,	public		::	HasVFD	=	.FALSE.
type(PumpVFDControlData),	public		::	VFD
logical,	public		::	OneTimePressureWarning	=	.TRUE.
logical,	public		::	HeatLossesToZone	=	.FALSE.
integer,	public		::	ZoneNum	=	0
real(kind=r64),	public		::	SkinLossRadFraction	=	0.d0

type, private :: ReportVars

Components

Type	Visibility		Name		Initial
integer,	public	::	NumPumpsOperating	=	0
real(kind=r64),	public	::	PumpMassFlowRate	=	0.0d0
real(kind=r64),	public	::	PumpHeattoFluid	=	0.0d0
real(kind=r64),	public	::	PumpHeattoFluidEnergy	=	0.0d0
real(kind=r64),	public	::	OutletTemp	=	0.0d0
real(kind=r64),	public	::	ShaftPower	=	0.0d0
real(kind=r64),	public	::	ZoneTotalGainRate	=	0.d0
real(kind=r64),	public	::	ZoneTotalGainEnergy	=	0.d0
real(kind=r64),	public	::	ZoneConvGainRate	=	0.d0
real(kind=r64),	public	::	ZoneRadGainRate	=	0.d0

Subroutines

public subroutine SimPumps(PumpName, LoopNum, FlowRequest, PumpRunning, PumpIndex, PumpHeat)

Arguments

Type	Intent		Name
character(len=*),	intent(in)	::	PumpName
integer,	intent(in)	::	LoopNum
real(kind=r64),	intent(in)	::	FlowRequest
logical,	intent(out)	::	PumpRunning
integer,	intent(inout)	::	PumpIndex
real(kind=r64),	intent(out)	::	PumpHeat

private subroutine GetPumpInput()

Arguments

None

private subroutine InitializePumps(PumpNum)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	PumpNum

private subroutine SetupPumpMinMaxFlows(LoopNum, PumpNum)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	LoopNum
integer,	intent(in)			::	PumpNum

private subroutine CalcPumps(PumpNum, FlowRequest, PumpRunning)

Arguments

Type	Intent		Name
integer,	intent(in)	::	PumpNum
real(kind=r64),	intent(in)	::	FlowRequest
logical,	intent(inout)	::	PumpRunning

private subroutine SizePump(PumpNum)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	PumpNum

private subroutine ReportPumps(PumpNum)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	PumpNum

private subroutine PumpDataForTable(NumPump)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	NumPump

private subroutine GetRequiredMassFlowRate(LoopNum, PumpNum, InletNodeMassFlowRate, ActualFlowRate, PumpMinMassFlowRateVFDRange, PumpMaxMassFlowRateVFDRange)

Arguments

Type	Intent		Name
integer,	intent(in)	::	LoopNum
integer,	intent(in)	::	PumpNum
real(kind=r64),	intent(in)	::	InletNodeMassFlowRate
real(kind=r64),	intent(inout)	::	ActualFlowRate
real(kind=r64),	intent(inout)	::	PumpMinMassFlowRateVFDRange
real(kind=r64),	intent(inout)	::	PumpMaxMassFlowRateVFDRange

Pumps Module

Variables

Derived Types

Subroutines

All Modules

Uses:

Used By

Variables

Derived Types

Subroutines

Variables

Derived Types

type, private :: PumpVFDControlData

Components

type, public :: PumpSpecs

Components

type, private :: ReportVars

Components

Subroutines

public subroutine SimPumps(PumpName, LoopNum, FlowRequest, PumpRunning, PumpIndex, PumpHeat)

Arguments

private subroutine GetPumpInput()

Arguments

private subroutine InitializePumps(PumpNum)

Arguments

private subroutine SetupPumpMinMaxFlows(LoopNum, PumpNum)

Arguments

private subroutine CalcPumps(PumpNum, FlowRequest, PumpRunning)

Arguments

private subroutine SizePump(PumpNum)

Arguments

private subroutine ReportPumps(PumpNum)

Arguments

private subroutine PumpDataForTable(NumPump)

Arguments

private subroutine GetRequiredMassFlowRate(LoopNum, PumpNum, InletNodeMassFlowRate, ActualFlowRate, PumpMinMassFlowRateVFDRange, PumpMaxMassFlowRateVFDRange)

Arguments

All Modules