Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public | :: | NumStates | = | 0 | ||
integer, | public | :: | SurfNo |
TYPE WindowIndex
INTEGER :: NumStates =0 !No States for this window
INTEGER :: SurfNo !Surface number of window
!REAL(r64) :: Azimuth !Window surface azimuth
!REAL(r64) :: Tilt !Window surface tilt
END TYPE WindowIndex