TYPE WindowThermalModelParams
CHARACTER(len=MaxNameLength) :: Name = ' ' ! Window thermal model name
INTEGER :: CalculationStandard = -1 ! Tarcog calculation standard
INTEGER :: ThermalModel = -1 ! Tarcog thermal model
REAL(r64) :: SDScalar = 0.0d0 ! SDScalar coefficient
INTEGER :: DeflectionModel = -1 ! Deflection model
REAL(r64) :: VacuumPressureLimit = 0.0d0 ! Pressure limit at which it will be considered vacuum gas state
REAL(r64) :: InitialTemperature = 0.0d0 ! Window(s) temperature in time of fabrication
REAL(r64) :: InitialPressure = 0.0d0 ! Window(s) pressure in time of fabrication
END TYPE WindowThermalModelParams