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 | |||
---|---|---|---|---|---|---|---|
character(len=MaxNameLength), | public | :: | Name | = | ' ' | ||
character(len=MaxNameLength), | public | :: | WaterInNodeName | = | ' ' | ||
integer, | public | :: | WaterInNode | = | 0 | ||
character(len=MaxNameLength), | public | :: | WaterOutNodeName | = | ' ' | ||
integer, | public | :: | WaterOutNode | = | 0 | ||
real(kind=r64), | public | :: | TstackNom | = | 0.0d0 | ||
real(kind=r64), | public | :: | TstackActual | = | 0.0d0 | ||
real(kind=r64), | public | :: | r0 | = | 0.0d0 | ||
real(kind=r64), | public | :: | r1 | = | 0.0d0 | ||
real(kind=r64), | public | :: | r2 | = | 0.0d0 | ||
real(kind=r64), | public | :: | r3 | = | 0.0d0 | ||
real(kind=r64), | public | :: | MdotStackCoolant | = | 0.0d0 | ||
real(kind=r64), | public | :: | UAs_cool | = | 0.0d0 | ||
real(kind=r64), | public | :: | Fs_cogen | = | 0.0d0 | ||
real(kind=r64), | public | :: | As_cogen | = | 0.0d0 | ||
real(kind=r64), | public | :: | MdotCogenNom | = | 0.0d0 | ||
real(kind=r64), | public | :: | hCogenNom | = | 0.0d0 | ||
real(kind=r64), | public | :: | ns | = | 0.0d0 | ||
real(kind=r64), | public | :: | PstackPumpEl | = | 0.0d0 | ||
real(kind=r64), | public | :: | PmpPowerLossFactor | = | 0.0d0 | ||
real(kind=r64), | public | :: | f0 | = | 0.0d0 | ||
real(kind=r64), | public | :: | f1 | = | 0.0d0 | ||
real(kind=r64), | public | :: | f2 | = | 0.0d0 | ||
logical, | public | :: | StackCoolerPresent | = | .false. | ||
real(kind=r64), | public | :: | qs_cool | = | 0.0d0 | ||
real(kind=r64), | public | :: | qs_air | = | 0.0d0 |
TYPE FCStackCoolerDataStruct
! user input data
CHARACTER(len=MaxNameLength) :: Name = ' ' !name of this stack cooler module
CHARACTER(len=MaxNameLength) :: WaterInNodeName = ' ' !HR Water Inlet Node
INTEGER :: WaterInNode = 0 ! HR Water Outlet Node ID
CHARACTER(len=MaxNameLength) :: WaterOutNodeName = ' ' !HR water outlet Node name
INTEGER :: WaterOutNode = 0 ! HR Water outlet Node ID
REAL(r64) :: TstackNom = 0.0d0 ! nominal fuel cell stack temperature
REAL(r64) :: TstackActual = 0.0d0 ! actual fuel cell stack temperature
REAL(r64) :: r0 = 0.0d0 ! stack cooling power coefficient r0
REAL(r64) :: r1 = 0.0d0 ! stack cooling power coefficient r1
REAL(r64) :: r2 = 0.0d0 ! stack cooling power coefficient r2
REAL(r64) :: r3 = 0.0d0 ! stack cooling power coefficient r3
REAL(r64) :: MdotStackCoolant = 0.0d0 ! stack coolant flow rate kg/s
REAL(r64) :: UAs_cool = 0.0d0 ! stack heat transfer coef
REAL(r64) :: Fs_cogen = 0.0d0 !
REAL(r64) :: As_cogen = 0.0d0 !
REAL(r64) :: MdotCogenNom = 0.0d0 !
REAL(r64) :: hCogenNom = 0.0d0
REAL(r64) :: ns = 0.0d0 !
REAL(r64) :: PstackPumpEl = 0.0d0
REAL(r64) :: PmpPowerLossFactor = 0.0d0
REAL(r64) :: f0 = 0.0d0
REAL(r64) :: f1 = 0.0d0
REAL(r64) :: f2 = 0.0d0
! calculated and from elsewhere
LOGICAL :: StackCoolerPresent = .false. ! control modeling
REAL(r64) :: qs_cool = 0.0d0 !
REAL(r64) :: qs_air = 0.0d0 !
END Type FCStackCoolerDataStruct