summaryrefslogtreecommitdiff
path: root/1061/CH2
diff options
context:
space:
mode:
Diffstat (limited to '1061/CH2')
-rwxr-xr-x1061/CH2/EX2.1/Ex2_1.sce14
-rwxr-xr-x1061/CH2/EX2.10/Ex2_10.sce10
-rwxr-xr-x1061/CH2/EX2.11/Ex2_11.sce10
-rwxr-xr-x1061/CH2/EX2.12/Ex2_12.sce12
-rwxr-xr-x1061/CH2/EX2.13/Ex2_13.sce10
-rwxr-xr-x1061/CH2/EX2.14/Ex2_14.sce11
-rwxr-xr-x1061/CH2/EX2.15/Ex2_15.sce14
-rwxr-xr-x1061/CH2/EX2.16/Ex2_16.sce13
-rwxr-xr-x1061/CH2/EX2.2/Ex2_2.sce12
-rwxr-xr-x1061/CH2/EX2.3/Ex2_3.sce11
-rwxr-xr-x1061/CH2/EX2.4/Ex2_4.sce13
-rwxr-xr-x1061/CH2/EX2.5/Ex2_5.sce10
-rwxr-xr-x1061/CH2/EX2.6/Ex2_6.sce10
-rwxr-xr-x1061/CH2/EX2.7/Ex2_7.sce20
-rwxr-xr-x1061/CH2/EX2.8/Ex2_8.sce11
-rwxr-xr-x1061/CH2/EX2.9/Ex2_9.sce11
16 files changed, 192 insertions, 0 deletions
diff --git a/1061/CH2/EX2.1/Ex2_1.sce b/1061/CH2/EX2.1/Ex2_1.sce
new file mode 100755
index 000000000..9c04e346b
--- /dev/null
+++ b/1061/CH2/EX2.1/Ex2_1.sce
@@ -0,0 +1,14 @@
+//Ex:2_1
+clc;
+clear;
+close;
+n1=1.55;// core refractive index
+n2=1.50;// cladding refractive index
+x=asin(n2/n1); // Critical angle in radians
+x1=x*180/(%pi);// Critical angle in degree
+n_a=sqrt(n1^2-n2^2);// Numerical aperture
+x_a=asin(n_a)*180/(%pi);
+x_a1=ceil(x_a);// Acceptance angle in Degree
+printf("Critical angle in degree= %f degree",x1);
+printf("\n Numerical aperture= %f ",n_a);
+printf("\n Acceptance angle in degree= %f degree",x_a1); \ No newline at end of file
diff --git a/1061/CH2/EX2.10/Ex2_10.sce b/1061/CH2/EX2.10/Ex2_10.sce
new file mode 100755
index 000000000..3fd8be472
--- /dev/null
+++ b/1061/CH2/EX2.10/Ex2_10.sce
@@ -0,0 +1,10 @@
+//Ex:2.10
+clc;
+clear;
+close;
+n1=1.50;// core refractive index
+n2=(99/100)*1.50;// cladding refractive index
+x_c=(asin(n2/n1))*180/%pi;// critical angle in degree
+n_m=sqrt(n1^2-n2^2);// numerical aperture
+printf("critical angle = %f degree",x_c);
+printf("\n numerical aperture = %f",n_m); \ No newline at end of file
diff --git a/1061/CH2/EX2.11/Ex2_11.sce b/1061/CH2/EX2.11/Ex2_11.sce
new file mode 100755
index 000000000..0a295d480
--- /dev/null
+++ b/1061/CH2/EX2.11/Ex2_11.sce
@@ -0,0 +1,10 @@
+//Ex:2.11
+clc;
+clear;
+close;
+n1=1.50;// core refractive index
+n2=1.45;// cladding refractive index
+n_m=sqrt(n1^2-n2^2);// numerical aperture
+dl=(n1-n2)/n1;// fractional difference
+printf("numerical aperture = %f",n_m);
+printf("\n fractional difference = %f",dl); \ No newline at end of file
diff --git a/1061/CH2/EX2.12/Ex2_12.sce b/1061/CH2/EX2.12/Ex2_12.sce
new file mode 100755
index 000000000..5bcaac7af
--- /dev/null
+++ b/1061/CH2/EX2.12/Ex2_12.sce
@@ -0,0 +1,12 @@
+//Ex:2.12
+clc;
+clear;
+close;
+n1=1.46;// core refractive index
+n2=1.45;// cladding refractive index
+x_c=(asin(n2/n1))*180/%pi;// critical angle in degree
+n_m=sqrt(n1^2-n2^2);// numerical aperture
+x_a=(asin(n_m))*180/%pi;// acceptance angle in degree
+printf("critical angle = %f degree",x_c);
+printf("\n acceptance angle = %f degree",x_a);
+printf("\n numerical aperture = %f",n_m); \ No newline at end of file
diff --git a/1061/CH2/EX2.13/Ex2_13.sce b/1061/CH2/EX2.13/Ex2_13.sce
new file mode 100755
index 000000000..a9b128a86
--- /dev/null
+++ b/1061/CH2/EX2.13/Ex2_13.sce
@@ -0,0 +1,10 @@
+//Ex:2.13
+clc;
+clear;
+close;
+n_m=0.204;// numerical aperture
+dl=0.01;// index difference
+n1=n_m/(sqrt(2*dl));// core refractive index
+n2=n1*(1-dl);// cladding refractive index
+printf("core refractive index = %f",n1);
+printf("\n cladding refractive index = %f",n2); \ No newline at end of file
diff --git a/1061/CH2/EX2.14/Ex2_14.sce b/1061/CH2/EX2.14/Ex2_14.sce
new file mode 100755
index 000000000..74d89cac9
--- /dev/null
+++ b/1061/CH2/EX2.14/Ex2_14.sce
@@ -0,0 +1,11 @@
+//Ex:2.14
+clc;
+clear;
+close;
+n1=1.46;// core refractive index
+dl=0.01;// index difference
+n_2=n1-(n1*dl);// cladding refractive index
+x_c=(asin(n_2/n1))*180/%pi;// critical angle in degree
+n_m=sqrt(n1^2-n_2^2);// numerical aperture
+printf("critical angle = %f degree",x_c);
+printf("\n numerical aperture = %f",n_m); \ No newline at end of file
diff --git a/1061/CH2/EX2.15/Ex2_15.sce b/1061/CH2/EX2.15/Ex2_15.sce
new file mode 100755
index 000000000..eeca7fb38
--- /dev/null
+++ b/1061/CH2/EX2.15/Ex2_15.sce
@@ -0,0 +1,14 @@
+//Ex:2.15
+clc;
+clear;
+close;
+n1=1.50;// core refractive index
+n2=1.45;// cladding refractive index
+x_c=(asin(n2/n1))*180/%pi;// critical angle in degree
+n_m=sqrt(n1^2-n2^2);// numerical aperture
+x_a=(asin(n_m))*180/%pi;// acceptance angle in degree
+n_c=(n_m)^2*100;// percentage of light
+printf("critical angle=%f degree",x_c);
+printf("\n acceptance angle=%f degree",x_a);
+printf("\n numerical aperture=%f",n_m);
+printf("\n percentage of light=%f%%",n_c); \ No newline at end of file
diff --git a/1061/CH2/EX2.16/Ex2_16.sce b/1061/CH2/EX2.16/Ex2_16.sce
new file mode 100755
index 000000000..eb8782dcb
--- /dev/null
+++ b/1061/CH2/EX2.16/Ex2_16.sce
@@ -0,0 +1,13 @@
+//Ex:2.16
+clc;
+clear;
+close;
+n1=1.50;// core refractive index
+dl=0.01;// index difference
+n_m=n1*(sqrt(2*dl));// numerical aperture
+x_a=%pi*(n_m)^2;// acceptance angle in radian
+n2_1=1-dl;// the ratio of n2 to n1
+x_c=(asin(n2_1))*180/%pi;// critical angle in degree
+printf("numerical aperture=%f",n_m);
+printf("\n acceptance angle=%f radian",x_a);
+printf("\n critical angle=%f degree",x_c); \ No newline at end of file
diff --git a/1061/CH2/EX2.2/Ex2_2.sce b/1061/CH2/EX2.2/Ex2_2.sce
new file mode 100755
index 000000000..1e90bae26
--- /dev/null
+++ b/1061/CH2/EX2.2/Ex2_2.sce
@@ -0,0 +1,12 @@
+//Ex:2.2
+clc;
+clear;
+close;
+c=3*10^8;// speed of light in m/s
+v=2*10^8;// in m/s
+n1=c/v;
+x=75;// in degree
+n2=n1*sin((x*3.14/180));
+n_2=1.44;
+n_a=sqrt(n1^2-n_2^2);// numerical aperture
+printf("Numerical aperture = %f",n_a); \ No newline at end of file
diff --git a/1061/CH2/EX2.3/Ex2_3.sce b/1061/CH2/EX2.3/Ex2_3.sce
new file mode 100755
index 000000000..02ab86280
--- /dev/null
+++ b/1061/CH2/EX2.3/Ex2_3.sce
@@ -0,0 +1,11 @@
+//Ex:2.3
+clc;
+clear;
+close;
+n1=1.50;// core refractive index
+n2=1.47;// cladding refractive index
+dl=(n1-n2)/n1;
+n_a=n1*(sqrt(2*dl));// numerical aperture
+x_a=(asin(n_a))*180/%pi;// acceptance angle in degree
+printf("Numerical aperture = %f",n_a);
+printf("\n acceptance angle in degree = %f degree",x_a); \ No newline at end of file
diff --git a/1061/CH2/EX2.4/Ex2_4.sce b/1061/CH2/EX2.4/Ex2_4.sce
new file mode 100755
index 000000000..2bd9647e1
--- /dev/null
+++ b/1061/CH2/EX2.4/Ex2_4.sce
@@ -0,0 +1,13 @@
+//Ex:2.4
+clc;
+clear;
+close;
+n1=1.50;// core refractive index
+n2=1.45;// cladding refractive index
+dl=(n1-n2)/n1;
+n_a=n1*(sqrt(2*dl));// numerical aperture
+x_a=(asin(n_a))*180/%pi;// acceptance angle in degree
+x_c=(asin(n2/n1))*180/3.14;// critical angle in degree
+printf("Numerical aperture = %f",n_a);
+printf("\n acceptance angle in degree = %f degree",x_a);
+printf("\n critical angle in degree = %f degree",x_c); \ No newline at end of file
diff --git a/1061/CH2/EX2.5/Ex2_5.sce b/1061/CH2/EX2.5/Ex2_5.sce
new file mode 100755
index 000000000..55bfaa20b
--- /dev/null
+++ b/1061/CH2/EX2.5/Ex2_5.sce
@@ -0,0 +1,10 @@
+//Ex:2.5
+clc;
+clear;
+close;
+dl=0.012;
+n_a=0.22;// numerical aperture
+n1=n_a/(sqrt(2*dl));// core refractive ondex
+n2=n1-(dl*n1);// cladding refractive index
+printf("core refractive ondex = %f",n1);
+printf("\n cladding refractive index = %f",n2); \ No newline at end of file
diff --git a/1061/CH2/EX2.6/Ex2_6.sce b/1061/CH2/EX2.6/Ex2_6.sce
new file mode 100755
index 000000000..f0ea381fc
--- /dev/null
+++ b/1061/CH2/EX2.6/Ex2_6.sce
@@ -0,0 +1,10 @@
+//Ex:2.6
+clc;
+clear;
+close;
+dl=0.01;
+n_a=0.35;// numerical aperture
+n1=n_a/(sqrt(2*dl));// core refractive ondex
+n2=n1-(dl*n1);// cladding refractive index
+printf("core refractive ondex = %f",n1);
+printf("\n cladding refractive index = %f",n2); \ No newline at end of file
diff --git a/1061/CH2/EX2.7/Ex2_7.sce b/1061/CH2/EX2.7/Ex2_7.sce
new file mode 100755
index 000000000..e348d2934
--- /dev/null
+++ b/1061/CH2/EX2.7/Ex2_7.sce
@@ -0,0 +1,20 @@
+//Ex:2.7
+clc;
+clear;
+close;
+n2=1.59;// cladding refractive index
+n_a=0.2;// numerical aperture
+n1=sqrt(n2^2+n_a^2);// core refractive index
+n_1=1.60;// core refractive index
+n_o=1.33;
+A=(sqrt(n_1^2-n2^2))/n_o;
+x_a=(asin(A))*180/%pi;// acceptance angle in degree
+x_c=(asin(n2/n1))*180/%pi;// critical angle in degree
+y=1300*10^(-9);// in meter
+a=25*10^(-6);// in meter
+v=(2*%pi*a*n_a)/y;
+V=floor(v);
+M=V^2/2;// number of modes transmitted
+printf("acceptance angle in degree = %f degree",x_a);
+printf("\n critical angle in degree = %f degree",x_c);
+printf("\n number of modes transmitted = %d",M); \ No newline at end of file
diff --git a/1061/CH2/EX2.8/Ex2_8.sce b/1061/CH2/EX2.8/Ex2_8.sce
new file mode 100755
index 000000000..34ba7d300
--- /dev/null
+++ b/1061/CH2/EX2.8/Ex2_8.sce
@@ -0,0 +1,11 @@
+//Ex:2.8
+clc;
+clear;
+close;
+n1=1.50;// core refractive index
+n2=1.47;// cladding refractive index
+dl=(n1-n2)/n1;
+n_a=n1*(sqrt(2*dl));// numerical aperture
+x_e=(asin(n_a))*180/%pi;// the maximum entrance angle in degree
+printf("Numerical aperture = %f",n_a);
+printf("\n the maximum entrance angle in degree = %f degree",x_e); \ No newline at end of file
diff --git a/1061/CH2/EX2.9/Ex2_9.sce b/1061/CH2/EX2.9/Ex2_9.sce
new file mode 100755
index 000000000..eedb4942b
--- /dev/null
+++ b/1061/CH2/EX2.9/Ex2_9.sce
@@ -0,0 +1,11 @@
+//Ex:2.9
+clc;
+clear;
+close;
+n1=1.44;// core refractive index
+dl=0.02;
+n_a=n1*sqrt(2*dl);
+n_a=n1*(sqrt(2*dl));// numerical aperture
+x_a=(asin(n_a))*180/%pi;// acceptance angle in degree
+printf("Numerical aperture = %f",n_a);
+printf("\n acceptance angle in degree = %f degree",x_a); \ No newline at end of file
generated by cgit (git 2.34.1) at 2024-12-20 07:49:16 +0000