Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=r64), | private, | parameter | :: | SmallIncrement | = | 1.0d-10 | |
real(kind=r64), | private, | parameter | :: | HCMULT | = | 100000.d0 | |
real(kind=r64), | private, | parameter | :: | sqHCMULT | = | HCMULT*HCMULT | |
real(kind=r64), | private, | parameter | :: | kHCMULT | = | 1.0d0/(HCMULT*HCMULT) | |
integer, | private, | parameter | :: | NoOverlap | = | 1 | |
integer, | private, | parameter | :: | FirstSurfWithinSecond | = | 2 | |
integer, | private, | parameter | :: | SecondSurfWithinFirst | = | 3 | |
integer, | private, | parameter | :: | PartialOverlap | = | 4 | |
integer, | private, | parameter | :: | TooManyVertices | = | 5 | |
integer, | private, | parameter | :: | TooManyFigures | = | 6 | |
character(len=*), | private, | parameter, DIMENSION(6) | :: | cOverLapStatus | = | (/'No-Overlap ', '1st-Surf-within-2nd', '2nd-Surf-within-1st', 'Partial-Overlap ', 'Too-Many-Vertices ', 'Too-Many-Figures '/) | |
integer, | private | :: | MAXHCV | = | 12 | ||
integer, | private | :: | MAXHCS | = | 15000 | ||
integer, | public | :: | MAXHCArrayBounds | = | 0 | ||
integer, | private | :: | MAXHCArrayIncrement | = | 0 | ||
integer, | private | :: | NVS | ||||
integer, | private | :: | NumVertInShadowOrClippedSurface | ||||
integer, | private | :: | CurrentSurfaceBeingShadowed | ||||
integer, | private | :: | CurrentShadowingSurface | ||||
integer, | private | :: | OverlapStatus | ||||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | CTHETA | |||
integer, | private | :: | FBKSHC | ||||
integer, | private | :: | FGSSHC | ||||
integer, | private | :: | FINSHC | ||||
integer, | private | :: | FRVLHC | ||||
integer, | private | :: | FSBSHC | ||||
integer, | private | :: | LOCHCA | = | 0 | ||
integer, | private | :: | NBKSHC | ||||
integer, | private | :: | NGSSHC | ||||
integer, | private | :: | NINSHC | ||||
integer, | private | :: | NRVLHC | ||||
integer, | private | :: | NSBSHC | ||||
logical, | private | :: | CalcSkyDifShading | ||||
integer, | private | :: | ShadowingCalcFrequency | = | 0 | ||
integer, | private | :: | ShadowingDaysLeft | = | 0 | ||
logical, | private | :: | debugging | = | .false. | ||
integer, | private | :: | OutputFileShading | ||||
integer, | private, | ALLOCATABLE, DIMENSION(:) | :: | HCNS | |||
integer, | private, | ALLOCATABLE, DIMENSION(:) | :: | HCNV | |||
integer(kind=i64), | private, | ALLOCATABLE, DIMENSION(:,:) | :: | HCA | |||
integer(kind=i64), | private, | ALLOCATABLE, DIMENSION(:,:) | :: | HCB | |||
integer(kind=i64), | private, | ALLOCATABLE, DIMENSION(:,:) | :: | HCC | |||
integer(kind=i64), | private, | ALLOCATABLE, DIMENSION(:,:) | :: | HCX | |||
integer(kind=i64), | private, | ALLOCATABLE, DIMENSION(:,:) | :: | HCY | |||
integer, | private, | ALLOCATABLE, DIMENSION(:,:,:) | :: | WindowRevealStatus | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | HCAREA | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | HCT | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | ISABSF | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | SAREA | |||
type(SurfaceErrorTracking), | private, | ALLOCATABLE, DIMENSION(:) | :: | TrackTooManyFigures | |||
integer, | private | :: | NumTooManyFigures | = | 0 | ||
type(SurfaceErrorTracking), | private, | ALLOCATABLE, DIMENSION(:) | :: | TrackTooManyVertices | |||
integer, | private | :: | NumTooManyVertices | = | 0 | ||
type(SurfaceErrorTracking), | private, | ALLOCATABLE, DIMENSION(:) | :: | TrackBaseSubSurround | |||
integer, | private | :: | NumBaseSubSurround | = | 0 | ||
type(SurfaceErrorTracking), | private, | ALLOCATABLE, DIMENSION(:) | :: | TempSurfErrorTracking | |||
real(kind=r64), | private, | DIMENSION(3) | :: | SUNCOS | |||
real(kind=r64), | private | :: | XShadowProjection | ||||
real(kind=r64), | private | :: | YShadowProjection | ||||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | XTEMP | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | XVC | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | XVS | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | YTEMP | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | YVC | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | YVS | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | ZVC | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | ATEMP | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | BTEMP | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | CTEMP | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | XTEMP1 | |||
real(kind=r64), | private, | ALLOCATABLE, DIMENSION(:) | :: | YTEMP1 | |||
integer, | public | :: | maxNumberOfFigures | = | 0 |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public | :: | SurfIndex1 | = | 0 | ||
integer, | public | :: | SurfIndex2 | = | 0 | ||
integer, | public | :: | MiscIndex | = | 0 |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | SurfNum | |||
integer, | intent(in) | :: | ConstNum |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | SurfNum | |||
integer, | intent(in) | :: | ConstNum |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | NBS | |||
integer, | intent(in) | :: | NRS |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | NRS | |||
integer, | intent(in) | :: | NSS | |||
real(kind=r64), | intent(in) | :: | ZMIN | |||
logical, | intent(out) | :: | CannotShade |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | HTS | |||
integer, | intent(in) | :: | GRSNR | |||
integer, | intent(in) | :: | SBSNR |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | NVT | |||
real(kind=r64), | intent(inout), | DIMENSION(:) | :: | XVT | ||
real(kind=r64), | intent(inout), | DIMENSION(:) | :: | YVT | ||
real(kind=r64), | intent(inout), | DIMENSION(:) | :: | ZVT |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | NS | |||
integer, | intent(in) | :: | NGRS | |||
integer, | intent(out) | :: | NVT | |||
real(kind=r64), | intent(out), | DIMENSION(:) | :: | XVT | ||
real(kind=r64), | intent(out), | DIMENSION(:) | :: | YVT | ||
real(kind=r64), | intent(out), | DIMENSION(:) | :: | ZVT |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | I | |||
integer, | intent(in) | :: | NS | |||
integer, | intent(in) | :: | NumVertices |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | NS | |||
integer, | intent(in) | :: | NumVertices |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | NS | |||
integer, | intent(in) | :: | NumVertices |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | N1 | |||
integer, | intent(in) | :: | N1NumVert | |||
integer, | intent(in) | :: | N2 | |||
integer, | intent(in) | :: | N2NumVert | |||
integer, | intent(inout) | :: | NumVerticesOverlap | |||
integer, | intent(out) | :: | NIN |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | NV1 | |||
integer, | intent(in) | :: | NV2 | |||
integer, | intent(inout) | :: | NV3 | |||
integer, | intent(in) | :: | NS1 | |||
integer, | intent(in) | :: | NS2 |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | NS1 | |||
integer, | intent(in) | :: | NS2 | |||
integer, | intent(in) | :: | NV1 | |||
integer, | intent(in) | :: | NV2 | |||
integer, | intent(inout) | :: | NV3 |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | NNN | |||
integer, | intent(in) | :: | LOC0 | |||
integer, | intent(in) | :: | NRFIGS |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | NV3 | |||
integer, | intent(in) | :: | NS3 |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | NS1 | |||
integer, | intent(in) | :: | NS2 | |||
integer, | intent(in) | :: | NS3 |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=r64), | intent(in) | :: | AvgEqOfTime | |||
real(kind=r64), | intent(in) | :: | AvgSinSolarDeclin | |||
real(kind=r64), | intent(in) | :: | AvgCosSolarDeclin |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | iHour | |||
integer, | intent(in) | :: | iTimeStep | |||
real(kind=r64), | intent(in) | :: | EqOfTime | |||
real(kind=r64), | intent(in) | :: | SinSolarDeclin | |||
real(kind=r64), | intent(in) | :: | CosSolarDeclin |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | iHour | |||
integer, | intent(in) | :: | iTimeStep |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | IHOUR | |||
integer, | intent(in) | :: | TS |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | NGRS | |||
integer, | intent(in) | :: | CurSurf | |||
integer, | intent(in) | :: | NBKS | |||
integer, | intent(in) | :: | HTS |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | NGRS | |||
integer, | intent(in) | :: | IHOUR | |||
integer, | intent(in) | :: | TS | |||
integer, | intent(in) | :: | CurSurf | |||
integer, | intent(in) | :: | NGSS | |||
integer, | intent(in) | :: | HTS |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | IHOUR | |||
integer, | intent(in) | :: | NBKS | |||
integer, | intent(in) | :: | HTSS | |||
integer, | intent(in) | :: | GRSNR | |||
integer, | intent(in) | :: | TS |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | HTSS | |||
integer, | intent(in) | :: | SBSNR | |||
integer, | intent(in) | :: | Hour | |||
integer, | intent(in) | :: | TS |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | IHOUR | |||
integer, | intent(in) | :: | CurSurf | |||
integer, | intent(in) | :: | NBKS | |||
integer, | intent(in) | :: | NSBS | |||
integer, | intent(in) | :: | HTS | |||
integer, | intent(in) | :: | TS |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | JulianDayOfYear | |||
real(kind=r64), | intent(out) | :: | SineOfSolarDeclination | |||
real(kind=r64), | intent(out) | :: | EquationOfTime |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=r64), | intent(in) | :: | CurrentTime | |||
real(kind=r64), | intent(in) | :: | EqOfTime | |||
real(kind=r64), | intent(in) | :: | SinSolarDeclin | |||
real(kind=r64), | intent(in) | :: | CosSolarDeclin |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | SurfNum | |||
integer, | intent(in) | :: | FrDivNum | |||
integer, | intent(in) | :: | HourNum |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer | :: | ZoneNum | ||||
integer | :: | IntWinSurfNum | ||||
real(kind=r64) | :: | IntWinDifSolarTransW |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(BSDFGeomDescr), | intent(inout) | :: | Geom | |||
type(BSDFWindowGeomDescr), | intent(in) | :: | Window | |||
integer, | intent(in) | :: | ISurf |