Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=r64), | private, | parameter | :: | HrsPerDay | = | 24.d0 | |
real(kind=r64), | private, | parameter | :: | HrsPerMonth | = | 730.0d0 | |
integer, | private, | parameter | :: | MaxTSinHr | = | 60 | |
integer, | private | :: | NumVerticalGlhes | = | 0 | ||
integer, | private | :: | N | = | 1 | ||
real(kind=r64), | private | :: | CurrentSimTime | = | 0.0d0 | ||
real(kind=r64), | private | :: | GlheOutletTemp | = | 0.0d0 | ||
real(kind=r64), | private | :: | GlheInletTemp | = | 0.0d0 | ||
real(kind=r64), | private | :: | GlheMassFlowRate | = | 0.0d0 | ||
real(kind=r64), | private | :: | QGlhe | = | 0.0d0 | ||
real(kind=r64), | private | :: | GlheRB | = | 0.0d0 | ||
real(kind=r64), | private | :: | GlheAveFluidTemp | = | 0.0d0 | ||
real(kind=r64), | private | :: | GlheBoreholeTemp | = | 0.0d0 | ||
integer, | private | :: | LocHourofDay | = | 0 | ||
integer, | private | :: | LocDayofSim | = | 0 | ||
real(kind=r64), | private, | SAVE, ALLOCATABLE, DIMENSION(:) | :: | LastQnSubHr | |||
real(kind=r64), | private | :: | MDotActual | ||||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | PrevTimeSteps | |||
type(GlheSpecs), | private, | ALLOCATABLE, DIMENSION(:) | :: | VerticalGlhe | |||
type(ReportVars), | private, | ALLOCATABLE, DIMENSION(:) | :: | VerticalGlheReport | |||
logical, | private, | ALLOCATABLE, DIMENSION(:) | :: | CheckEquipName |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
character(len=MaxNameLength), | public | :: | Name | = | ' ' | ||
logical, | public | :: | Available | = | .false. | ||
logical, | public | :: | ON | = | .false. | ||
real(kind=r64), | public | :: | MaxGlheFlowRate | = | 0.0d0 | ||
integer, | public | :: | MaxSimYears | = | 0 | ||
integer, | public | :: | GlheInletNodeNum | = | 0 | ||
integer, | public | :: | GlheOutletNodeNum | = | 0 | ||
integer, | public | :: | NumBoreholes | = | 0 | ||
real(kind=r64), | public | :: | BoreholeLength | = | 0.0d0 | ||
real(kind=r64), | public | :: | BoreholeRadius | = | 0.0d0 | ||
real(kind=r64), | public | :: | KGround | = | 0.0d0 | ||
real(kind=r64), | public | :: | CpRhoGround | = | 0.0d0 | ||
real(kind=r64), | public | :: | TempGround | = | 0.0d0 | ||
real(kind=r64), | public | :: | DesignFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | DesignMassFlow | = | 0.0d0 | ||
real(kind=r64), | public | :: | KGrout | = | 0.0d0 | ||
real(kind=r64), | public | :: | KPipe | = | 0.0d0 | ||
real(kind=r64), | public | :: | PipeOutDia | = | 0.0d0 | ||
real(kind=r64), | public | :: | UtubeDist | = | 0.0d0 | ||
real(kind=r64), | public | :: | PipeThick | = | 0.0d0 | ||
real(kind=r64), | public | :: | gReferenceRatio | = | 0.0d0 | ||
integer, | public | :: | NPairs | = | 0 | ||
real(kind=r64), | public, | ALLOCATABLE, DIMENSION(:) | :: | QnMonthlyAgg | |||
real(kind=r64), | public, | ALLOCATABLE, DIMENSION(:) | :: | QnHr | |||
real(kind=r64), | public, | ALLOCATABLE, DIMENSION(:) | :: | QnSubHr | |||
real(kind=r64), | public, | ALLOCATABLE, DIMENSION(:) | :: | LNTTS | |||
real(kind=r64), | public, | ALLOCATABLE, DIMENSION(:) | :: | GFNC | |||
integer, | public | :: | AGG | = | 0 | ||
integer, | public | :: | SubAGG | = | 0 | ||
integer, | public, | ALLOCATABLE, DIMENSION(:) | :: | LastHourN | |||
integer, | public | :: | LoopNum | = | 0 | ||
integer, | public | :: | LoopSideNum | = | 0 | ||
integer, | public | :: | BranchNum | = | 0 | ||
integer, | public | :: | CompNum | = | 0 |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=r64), | public | :: | GlheBoreholeTemp | = | 0.0d0 | ||
real(kind=r64), | public | :: | GlheMassFlowRate | = | 0.0d0 | ||
real(kind=r64), | public | :: | GlheOutletTemp | = | 0.0d0 | ||
real(kind=r64), | public | :: | GlheInletTemp | = | 0.0d0 | ||
real(kind=r64), | public | :: | GlheAveFluidTemp | = | 0.0d0 | ||
real(kind=r64), | public | :: | QGlhe | = | 0.0d0 |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=*), | intent(in) | :: | GlheType | |||
character(len=*), | intent(in) | :: | GlheName | |||
integer, | intent(inout) | :: | CompIndex | |||
logical, | intent(in) | :: | RunFlag | |||
logical, | intent(in) | :: | FirstIteration | |||
logical, | intent(in) | :: | InitLoopEquip |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer | :: | GlheNum |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | GlheNum |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | GlheNum | |||
real(kind=r64), | intent(out) | :: | ResistanceBhole |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | GlheNum | |||
real(kind=r64), | intent(in) | :: | LnTTsVal | |||
real(kind=r64), | intent(out) | :: | GfuncVal |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | GlheNum | |||
logical, | intent(in) | :: | RunFlag |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
logical | :: | RunFlag | ||||
integer | :: | Num |