diff options
Diffstat (limited to '2381/CH12/EX12.13')
-rwxr-xr-x | 2381/CH12/EX12.13/ex_13.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/2381/CH12/EX12.13/ex_13.sce b/2381/CH12/EX12.13/ex_13.sce new file mode 100755 index 000000000..9102f1dc6 --- /dev/null +++ b/2381/CH12/EX12.13/ex_13.sce @@ -0,0 +1,12 @@ +//Example 13//doppler shift and velocity +clc; +clear; +close; +h1=3737;//Å +h2=3700;//Å +ds=h1-h2;//Å +disp(ds,"doppler shift is ,(Å)=") +c=3*10^8;//m/s +v=((ds/h2)*c);//m/s +disp(v,"speed is ,(m/s)=") +//speed is calculated wrong in the textbook |