diff options
Diffstat (limited to '3875/CH9')
| -rw-r--r-- | 3875/CH9/EX9.1/9_1.txt | 1 | ||||
| -rw-r--r-- | 3875/CH9/EX9.1/Ex9_1.sce | 15 | ||||
| -rw-r--r-- | 3875/CH9/EX9.2/9_2.txt | 3 | ||||
| -rw-r--r-- | 3875/CH9/EX9.2/Ex9_2.sce | 14 | ||||
| -rw-r--r-- | 3875/CH9/EX9.3/9_3.txt | 2 | ||||
| -rw-r--r-- | 3875/CH9/EX9.3/Ex9_3.sce | 11 | ||||
| -rw-r--r-- | 3875/CH9/EX9.4/9_4.txt | 2 | ||||
| -rw-r--r-- | 3875/CH9/EX9.4/Ex9_4.sce | 11 | ||||
| -rw-r--r-- | 3875/CH9/EX9.5/9_5.txt | 1 | ||||
| -rw-r--r-- | 3875/CH9/EX9.5/Ex9_5.sce | 11 | ||||
| -rw-r--r-- | 3875/CH9/EX9.6/9_6.txt | 5 | ||||
| -rw-r--r-- | 3875/CH9/EX9.6/Ex9_6.sce | 22 | ||||
| -rw-r--r-- | 3875/CH9/EX9.7/9_7.txt | 1 | ||||
| -rw-r--r-- | 3875/CH9/EX9.7/Ex9_7.sce | 9 |
14 files changed, 108 insertions, 0 deletions
diff --git a/3875/CH9/EX9.1/9_1.txt b/3875/CH9/EX9.1/9_1.txt new file mode 100644 index 000000000..0ed179703 --- /dev/null +++ b/3875/CH9/EX9.1/9_1.txt @@ -0,0 +1 @@ + The no of modes propogating in the fibre are 5.615496e+03
\ No newline at end of file diff --git a/3875/CH9/EX9.1/Ex9_1.sce b/3875/CH9/EX9.1/Ex9_1.sce new file mode 100644 index 000000000..c55b2a328 --- /dev/null +++ b/3875/CH9/EX9.1/Ex9_1.sce @@ -0,0 +1,15 @@ +clc;
+clear;
+d=60 // diameter in micrometer
+n1=1.48 //core refractive index
+n2=1.41 //cladding refractive index
+lambda=0.8 //wavelength of light source in micrometer
+
+//calculation
+
+NA=sqrt(n1^2-n2^2) //numerical aperture
+V=(%pi*d*NA)/lambda //normalized frequency in cycles/sample
+M=V^2/2
+
+mprintf("The no of modes propogating in the fibre are %e",M)
+//The answer provided in the textbook is wrong.
diff --git a/3875/CH9/EX9.2/9_2.txt b/3875/CH9/EX9.2/9_2.txt new file mode 100644 index 000000000..52cc95d68 --- /dev/null +++ b/3875/CH9/EX9.2/9_2.txt @@ -0,0 +1,3 @@ +The fraction of intial intensity that will remain after 2km is = 0.363
+
+The fraction of intial intensity that will remain after 2km is = 0.048
\ No newline at end of file diff --git a/3875/CH9/EX9.2/Ex9_2.sce b/3875/CH9/EX9.2/Ex9_2.sce new file mode 100644 index 000000000..68d3e7d4d --- /dev/null +++ b/3875/CH9/EX9.2/Ex9_2.sce @@ -0,0 +1,14 @@ +clc;
+clear;
+alpha=2.2 //attenuation of light in dB/km
+L1=2 //distance in km
+L2=6 //distance in km
+
+//calculation
+//Case(a):when distance is 2km
+It_by_I0=10^-((alpha*L1)/10)
+mprintf("\nThe fraction of intial intensity that will remain after 2km is = %1.3f\n",It_by_I0)
+
+//Case(b):when distance is 6km
+It_by_I0=10^-((alpha*L2)/10)
+mprintf("\nThe fraction of intial intensity that will remain after 2km is = %1.3f",It_by_I0) //The answer varies due to round off error.
diff --git a/3875/CH9/EX9.3/9_3.txt b/3875/CH9/EX9.3/9_3.txt new file mode 100644 index 000000000..e4816be4b --- /dev/null +++ b/3875/CH9/EX9.3/9_3.txt @@ -0,0 +1,2 @@ +The numerical aperture is = 0.468
+The acceptance angle is = 27.9 degree.
\ No newline at end of file diff --git a/3875/CH9/EX9.3/Ex9_3.sce b/3875/CH9/EX9.3/Ex9_3.sce new file mode 100644 index 000000000..ec8796bf9 --- /dev/null +++ b/3875/CH9/EX9.3/Ex9_3.sce @@ -0,0 +1,11 @@ +clc;
+clear;
+n1=1.48 //core refractive index
+delta=0.05 //fractional refractive index
+
+//calculation
+NA=n1*sqrt(2*delta) //numerical aperture
+i_a=asind(NA)
+
+mprintf("\nThe numerical aperture is = %1.3f\n",NA)
+mprintf("The acceptance angle is = %2.1f degree.",i_a)
diff --git a/3875/CH9/EX9.4/9_4.txt b/3875/CH9/EX9.4/9_4.txt new file mode 100644 index 000000000..8b2655cbc --- /dev/null +++ b/3875/CH9/EX9.4/9_4.txt @@ -0,0 +1,2 @@ +The numerical aperture is = 0.3775.
+The acceptance angle is = 22 degree.
\ No newline at end of file diff --git a/3875/CH9/EX9.4/Ex9_4.sce b/3875/CH9/EX9.4/Ex9_4.sce new file mode 100644 index 000000000..7aff2104e --- /dev/null +++ b/3875/CH9/EX9.4/Ex9_4.sce @@ -0,0 +1,11 @@ +clc;
+clear;
+n1=1.45 //refractive index of core
+n2=1.40 //refractive index of cladding
+
+//calculation
+NA=sqrt(n1^2-n2^2)
+mprintf("\nThe numerical aperture is = %1.4f.\n",NA)
+
+i_a=asind(NA)
+mprintf("The acceptance angle is = %d degree.",i_a)
diff --git a/3875/CH9/EX9.5/9_5.txt b/3875/CH9/EX9.5/9_5.txt new file mode 100644 index 000000000..631a473ec --- /dev/null +++ b/3875/CH9/EX9.5/9_5.txt @@ -0,0 +1 @@ + The loss specification of the fibre is = 1.2 dB/km diff --git a/3875/CH9/EX9.5/Ex9_5.sce b/3875/CH9/EX9.5/Ex9_5.sce new file mode 100644 index 000000000..6b178a2fc --- /dev/null +++ b/3875/CH9/EX9.5/Ex9_5.sce @@ -0,0 +1,11 @@ +clc;
+clear;
+L=0.5 //length of the fibre in km
+I_0=7.5*10^-6 //input power in Watt
+I_t=8.6*10^-6 //output power in Watt
+
+//calculation
+alpha=-(10/0.5)*log10(I_0/I_t)
+
+mprintf("The loss specification of the fibre is = %1.1f dB/km",alpha)
+//The answer varies dur to round off error.
diff --git a/3875/CH9/EX9.6/9_6.txt b/3875/CH9/EX9.6/9_6.txt new file mode 100644 index 000000000..4d0b400ef --- /dev/null +++ b/3875/CH9/EX9.6/9_6.txt @@ -0,0 +1,5 @@ +The numerical aperture is = 0.285
+The acceptance angle is = 16.6 degree
+The critical angle at the core cladding interface is = 79.1 degree
+The velocity of light in the core is = 2e+08 m/s
+The velocity of light in the cladding is = 2.04e+08 m/s
\ No newline at end of file diff --git a/3875/CH9/EX9.6/Ex9_6.sce b/3875/CH9/EX9.6/Ex9_6.sce new file mode 100644 index 000000000..0136b4662 --- /dev/null +++ b/3875/CH9/EX9.6/Ex9_6.sce @@ -0,0 +1,22 @@ +clc;
+clear;
+n1=1.5 //core refractive index
+delta=1.8*10^-2 //fractional refractive index
+ratio=0.982 //ratio of cladding to core refractive index
+c=3*10^8 //velocity of light in m/s
+
+//calculation
+NA=n1*sqrt(2*delta) //numerical aperture
+mprintf("\nThe numerical aperture is = %1.3f\n",NA)
+
+i_a=asind(0.285)
+mprintf("The acceptance angle is = %2.1f degree\n",i_a)
+
+i_c=asind(ratio)
+mprintf("The critical angle at the core cladding interface is = %2.1f degree\n",i_c)
+
+v_core=c/n1
+mprintf("The velocity of light in the core is = %1.0e m/s\n",v_core)
+
+v_clad=c/(ratio*n1)
+mprintf("The velocity of light in the cladding is = %1.2e m/s",v_clad)
diff --git a/3875/CH9/EX9.7/9_7.txt b/3875/CH9/EX9.7/9_7.txt new file mode 100644 index 000000000..60d72d219 --- /dev/null +++ b/3875/CH9/EX9.7/9_7.txt @@ -0,0 +1 @@ + The length of the fibre is = 57.5 km.
\ No newline at end of file diff --git a/3875/CH9/EX9.7/Ex9_7.sce b/3875/CH9/EX9.7/Ex9_7.sce new file mode 100644 index 000000000..cb718eea2 --- /dev/null +++ b/3875/CH9/EX9.7/Ex9_7.sce @@ -0,0 +1,9 @@ +clc;
+clear;
+alpha=-0.5 //attenuation in dB/km
+I_t=2*10^-6 //input power in W
+I_o=1.5*10^-3 //output power in W
+
+//calculation
+L=-(10/0.5)*log10(I_t/I_o)
+mprintf("The length of the fibre is = %2.1f km.",L)
|