summaryrefslogtreecommitdiff
path: root/3547/CH2/EX2.12/Ex2_12.sce
blob: 7313ea286f78ffb9289f1db3dc1956e6f0295090 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
// Example no. 2.12
// To find the delay between the shortest and longest path.
// Page no. 81

clc;
clear;

// Given data
NA=0.2;                                         // Numerical aperture
L=2*10^3;                                       // Fiber length in meters
n1=1.45;                                        // Core refractive index
delta=(NA)^2/(2*n1^2);                          // Relative index difference
n2=n1;                                          // since difference between core index and cladding index is smaller
c=3*10^8;                                       // Speed of ligth in m/s

// The delay between the shortest and longest path.
deltaT=((n1^2*L*delta)/(c*n2));                // the delay between the shortest and longest path.

// Displaying the result in command window
printf('\n The delay between the shortest and longest path = %0.2f ns',deltaT*10^9);