summaryrefslogtreecommitdiff
path: root/2411/CH4/EX4.1/Ex4_1.sce
blob: 21da92162203d28b81753ec543044ca80ed982d7 (plain)
1
2
3
4
5
6
7
8
9
10
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