summaryrefslogtreecommitdiff
path: root/1865/CH4/EX4.5/prob_5.sce
blob: 6e5ce54ef5705b30fd71bf3c6de9c2ef4cebfaed (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14

//Problem 5
//Calculate the (1) the line frequency, (2) the bandwidth, (3) the coherence length
clear
clc
w=6058//wavelength (in A)
dw=0.00550//Doppler width (in A)
c=3*(10)^8//speed of light
f=c/(w*(10)^(-10))//the line frequency (in Hz)
df=(dw*f)/w//bandwidth (in Hz)
l=c/df//coherence length (in m)
printf('line frequency = %.f Hz \n',f)
printf('bandwidth = %.f Hz\n',df)
printf(' coherence length = %.f m' , l)