summaryrefslogtreecommitdiff
path: root/2381/CH12/EX12.13
diff options
context:
space:
mode:
Diffstat (limited to '2381/CH12/EX12.13')
-rwxr-xr-x2381/CH12/EX12.13/ex_13.sce12
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