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 | = | ' ' | ||
| real(kind=r64), | public | :: | NumInSeries | = | 0.0d0 | ||
| real(kind=r64), | public | :: | NumInParallel | = | 0.0d0 | ||
| real(kind=r64), | public | :: | NominalVoltage | = | 0.0d0 | ||
| real(kind=r64), | public | :: | LowVoltsDischarged | = | 0.0d0 | ||
| integer, | public | :: | NumTablePairs | = | 0 | ||
| real(kind=r64), | public, | Allocatable, Dimension(:) | :: | DischargeCurrent | |||
| real(kind=r64), | public, | Allocatable, Dimension(:) | :: | DischargeTime | |||
| real(kind=r64), | public | :: | k | = | 0.0d0 | ||
| real(kind=r64), | public | :: | c | = | 0.0d0 | ||
| real(kind=r64), | public | :: | qmax | = | 0.0d0 |
TYPE BatteryDichargeDataStruct
! user defined variables
CHARACTER(len=MaxNameLength) :: Name = ' ' !name of this battery data set
REAL(r64) :: NumInSeries = 0.0d0
REAL(r64) :: NumInParallel = 0.0d0
REAL(r64) :: NominalVoltage = 0.0d0
REAL(r64) :: LowVoltsDischarged = 0.0d0 !not used
INTEGER :: NumTablePairs = 0
REAL(r64), Allocatable, Dimension(:) :: DischargeCurrent ! amps
REAL(r64), Allocatable, Dimension(:) :: DischargeTime ! hours
! calculated variables
REAL(r64) :: k =0.0d0 !parameter in Manwell McGowan model
REAL(r64) :: c =0.0d0 !parameter in Manwell McGowan model
REAL(r64) :: qmax =0.0d0 !parameter in Manwell McGowan model
END TYPE BatteryDichargeDataStruct