summaryrefslogtreecommitdiff
path: root/623/CH21/EX4.4.1/U4_C4_1.sce
blob: 143c4e89ee42a0d736a5ce3016669a20419d0843 (plain)
1
2
3
4
5
6
7
8
9
10
11
//variable initialization
e=1.6*10^-19;                                                                   //charge of electron (Coulomb)
B=0.5                                                                           //magnetic field (Tesla)
lembda=6438*10^-10;                                                             //wavelength of the line (m)
m=9.1*10^-31;                                                                   //mass of electron (kg)
c=3*10^8;                                                                       //speed of light (m/s)

//calculation
dlembda=(e*B*lembda^2*10^10)/(4*%pi*m*c);                                       //normal Zeeman splitting (Å)

printf("\nZeeman shift = %.3f Å",dlembda);