summaryrefslogtreecommitdiff
path: root/2411/CH4/EX4.1/Ex4_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '2411/CH4/EX4.1/Ex4_1.sce')
-rwxr-xr-x2411/CH4/EX4.1/Ex4_1.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/2411/CH4/EX4.1/Ex4_1.sce b/2411/CH4/EX4.1/Ex4_1.sce
new file mode 100755
index 000000000..21da92162
--- /dev/null
+++ b/2411/CH4/EX4.1/Ex4_1.sce
@@ -0,0 +1,11 @@
+// Scilab Code Ex4.1: Page-233 (2008)
+clc; clear;
+c = 3e+008; // Speed of light in vacuum, m/s
+v = 3e+004; // Speed of earth, m/s
+d = 7; // Effective length of each path, m
+lambda = 7000e-010; // Wavelength of light used, m
+n = 2*d*v^2/(lambda*c^2); // Fringe shift
+printf("\nThe expected fringe shift = %3.1f", n);
+
+// Result
+// The expected fringe shift = 0.2 \ No newline at end of file