function [LineStrength_T]=IntensityConversion(LineStrength,Temperature_flame,Temperature_ref,Energylevel,Wavenumber_shift,QT,QT_ref)
sradiationconst=1.438786; %[W cm^2/sr]
LineStrength_T=(QT_ref/QT)*LineStrength.*exp(sradiationconst*Energylevel*(1/Temperature_ref-1/Temperature_flame)).*((1-exp(-sradiationconst*Wavenumber_shift/Temperature_flame))./(1-exp(-sradiationconst*Wavenumber_shift/Temperature_ref)));