Blackbody radiation function (IDL)

;blackbody radiation

Lambda = FINDGEN(100001,10,10);(mm),wavelength

h = 6.62606876e-34;(J*s),Planck's constant

c = 3e17;(nm/s),the speed of light

k = 1.3806503e-23;(J/K),Boltzmann's constant

B = 100000000000000*(2 * h * (c^2))/((Lambda^5)*(EXP((h*c)/(Lambda*k*T1))-1))