summaryrefslogtreecommitdiff
path: root/3689/CH14/EX14.4/14_4.sce
blob: 91384a9585eeae209562245afa1e06144faf5124 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
////Variable Declarations
h = 6.626e-34      //Planks constant, J.s
k = 1.38e-23       //Boltzman constant, J/K
c = 3.0e8          //speed of light, m/s

J = 4              //Rotational energy level
B = 8.46           //Spectrum, 1/cm

//Calculations 
T = (2*J+1)**2*h*c*100*B/(2*k)
//Results
printf("\n Spectrum will be observed at %4.0f K",T)