summaryrefslogtreecommitdiff
path: root/3840/CH11
diff options
context:
space:
mode:
Diffstat (limited to '3840/CH11')
-rw-r--r--3840/CH11/EX11.1/Ex11_1.sce24
-rw-r--r--3840/CH11/EX11.10/Ex11_10.sce14
-rw-r--r--3840/CH11/EX11.11/Ex11_11.sce20
-rw-r--r--3840/CH11/EX11.12/Ex11_12.sce19
-rw-r--r--3840/CH11/EX11.2/Ex11_2.sce16
-rw-r--r--3840/CH11/EX11.3/Ex11_3.sce13
-rw-r--r--3840/CH11/EX11.4/Ex11_4.sce14
-rw-r--r--3840/CH11/EX11.5/Ex11_5.sce15
-rw-r--r--3840/CH11/EX11.6/Ex11_6.sce14
-rw-r--r--3840/CH11/EX11.7/Ex11_7.sce16
-rw-r--r--3840/CH11/EX11.8/Ex11_8.sce17
-rw-r--r--3840/CH11/EX11.9/Ex11_9.sce21
12 files changed, 203 insertions, 0 deletions
diff --git a/3840/CH11/EX11.1/Ex11_1.sce b/3840/CH11/EX11.1/Ex11_1.sce
new file mode 100644
index 000000000..04b5a8173
--- /dev/null
+++ b/3840/CH11/EX11.1/Ex11_1.sce
@@ -0,0 +1,24 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.48 //Core refractive index
+n2=1.45 //Cladding refractive index
+
+//Calculation
+NA=sqrt(n1**2-n2**2) //numerical aperture
+theta0=asin(NA) //acceptance angle(radian)
+theta0=theta0*180/%pi //acceptance angle(degrees)
+theta0m=60*(theta0-int(theta0)) //acceptance angle(minutes)
+thetac=asin(n2/n1) //critical angle(radian)
+thetac=thetac*180/%pi //critical angle(degrees)
+thetacm=60*(thetac-int(thetac)) //critical angle(minutes)
+delta=(n1-n2)/n1 //fractional index change
+
+//Result
+printf("\n numerical aperture is %0.4f ",NA)
+printf("\n acceptance angle is %0.3f degrees %0.0f minutes",theta0,theta0m)
+printf("\n critical angle is %0.3f degrees %0.3f minutes",thetac,thetacm)
+printf("\n fractional index change is %0.2f ",delta)
diff --git a/3840/CH11/EX11.10/Ex11_10.sce b/3840/CH11/EX11.10/Ex11_10.sce
new file mode 100644
index 000000000..e89db0a03
--- /dev/null
+++ b/3840/CH11/EX11.10/Ex11_10.sce
@@ -0,0 +1,14 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.45 //Core refractive index
+n2=1.44 //Cladding refractive index
+
+//Calculation
+delta=(n1-n2)/n1 //fractional index change
+
+//Result
+printf("\n fractional index change is %0.4f *10**-3",delta*10**3)
diff --git a/3840/CH11/EX11.11/Ex11_11.sce b/3840/CH11/EX11.11/Ex11_11.sce
new file mode 100644
index 000000000..96b4ff79f
--- /dev/null
+++ b/3840/CH11/EX11.11/Ex11_11.sce
@@ -0,0 +1,20 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.50 //Core refractive index
+delta=4/100 //fractional index change
+
+//Calculation
+n2=n1-(delta*n1) //Cladding refractive index
+NA=sqrt(n1**2-n2**2) //numerical aperture
+theta0=asin(NA) //acceptance angle(radian)
+theta0=theta0*180/%pi //acceptance angle(degrees)
+theta0m=60*(theta0-int(theta0)) //acceptance angle(minutes)
+thetac=asin(n2/n1) //critical angle(radian)
+thetac=thetac*180/%pi //critical angle(degrees)
+thetacm=60*(thetac-int(thetac)) //critical angle(minutes)
+
+//Result
diff --git a/3840/CH11/EX11.12/Ex11_12.sce b/3840/CH11/EX11.12/Ex11_12.sce
new file mode 100644
index 000000000..6cc9f641d
--- /dev/null
+++ b/3840/CH11/EX11.12/Ex11_12.sce
@@ -0,0 +1,19 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.563 //Core refractive index
+n2=1.498 //Cladding refractive index
+
+//Calculation
+NA=sqrt(n1**2-n2**2) //numerical aperture
+theta0=asin(NA) //acceptance angle(radian)
+theta0=theta0*180/%pi //acceptance angle(degrees)
+theta0m=60*(theta0-int(theta0)) //acceptance angle(minutes)
+
+//Result
+printf("\n numerical aperture is %0.3f ",NA)
+printf("\n acceptance angle is %0.3f degrees %0.0f minutes",theta0,theta0m)
+printf("\n answer for angle in minutes given in the book varies due to rounding off errors")
diff --git a/3840/CH11/EX11.2/Ex11_2.sce b/3840/CH11/EX11.2/Ex11_2.sce
new file mode 100644
index 000000000..c1b873fc0
--- /dev/null
+++ b/3840/CH11/EX11.2/Ex11_2.sce
@@ -0,0 +1,16 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.563 //Core refractive index
+n2=1.498 //Cladding refractive index
+
+//Calculation
+NA=sqrt(n1**2-n2**2) //numerical aperture
+theta0=asin(NA) //acceptance angle(radian)
+theta0=theta0*180/%pi //acceptance angle(degrees)
+theta0m=60*(theta0-int(theta0)) //acceptance angle(minutes)
+
+//Resul"
diff --git a/3840/CH11/EX11.3/Ex11_3.sce b/3840/CH11/EX11.3/Ex11_3.sce
new file mode 100644
index 000000000..392b3dcd2
--- /dev/null
+++ b/3840/CH11/EX11.3/Ex11_3.sce
@@ -0,0 +1,13 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.563 //Core refractive index
+n2=1.498 //Cladding refractive index
+
+//Calculation
+delta=(n1-n2)/n1 //fractional index change
+
+//Result
diff --git a/3840/CH11/EX11.4/Ex11_4.sce b/3840/CH11/EX11.4/Ex11_4.sce
new file mode 100644
index 000000000..6dd8e205c
--- /dev/null
+++ b/3840/CH11/EX11.4/Ex11_4.sce
@@ -0,0 +1,14 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.55 //Core refractive index
+n2=1.50 //Cladding refractive index
+
+//Calculation
+NA=sqrt(n1**2-n2**2) //numerical aperture
+
+//Result
+printf("\n numerical aperture is %0.4f ",NA)
diff --git a/3840/CH11/EX11.5/Ex11_5.sce b/3840/CH11/EX11.5/Ex11_5.sce
new file mode 100644
index 000000000..72ee299ee
--- /dev/null
+++ b/3840/CH11/EX11.5/Ex11_5.sce
@@ -0,0 +1,15 @@
+clear
+//
+//
+//
+
+//Variable declaration
+NA=0.39 //numerical aperture
+n1_n2=0.05 //difference in refractive indices
+
+//Calculation
+n1n2=NA**2/n1_n2
+n2=(n1n2-n1_n2)/2 //Cladding refractive index
+n1=n2+n1_n2 //Core refractive index
+
+//Result
diff --git a/3840/CH11/EX11.6/Ex11_6.sce b/3840/CH11/EX11.6/Ex11_6.sce
new file mode 100644
index 000000000..6dd8e205c
--- /dev/null
+++ b/3840/CH11/EX11.6/Ex11_6.sce
@@ -0,0 +1,14 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.55 //Core refractive index
+n2=1.50 //Cladding refractive index
+
+//Calculation
+NA=sqrt(n1**2-n2**2) //numerical aperture
+
+//Result
+printf("\n numerical aperture is %0.4f ",NA)
diff --git a/3840/CH11/EX11.7/Ex11_7.sce b/3840/CH11/EX11.7/Ex11_7.sce
new file mode 100644
index 000000000..fa06d77f8
--- /dev/null
+++ b/3840/CH11/EX11.7/Ex11_7.sce
@@ -0,0 +1,16 @@
+clear
+//
+//
+//
+
+//Variable declaration
+n1=1.48 //Core refractive index
+n2=1.45 //Cladding refractive index
+
+//Calculation
+NA=sqrt(n1**2-n2**2) //numerical aperture
+theta0=asin(NA) //acceptance angle(radian)
+theta0=theta0*180/%pi //acceptance angle(degrees)
+theta0m=60*(theta0-int(theta0)) //acceptance angle(minutes)
+
+//Result
diff --git a/3840/CH11/EX11.8/Ex11_8.sce b/3840/CH11/EX11.8/Ex11_8.sce
new file mode 100644
index 000000000..8b7d46ee7
--- /dev/null
+++ b/3840/CH11/EX11.8/Ex11_8.sce
@@ -0,0 +1,17 @@
+clear
+//
+//
+//
+
+//Variable declaration
+NA=0.33 //numerical aperture
+delta=0.02 //refractive index of cladding
+
+//Calculation
+x=1-delta
+n1=sqrt(NA**2/(1-x**2)) //refractive index of core
+n2=x*n1 //refractive index of cladding
+
+//Result
+printf("\n refractive index of core is %0.4f ",n1)
+printf("\n refractive index of cladding is %0.3f ",n2)
diff --git a/3840/CH11/EX11.9/Ex11_9.sce b/3840/CH11/EX11.9/Ex11_9.sce
new file mode 100644
index 000000000..eec791858
--- /dev/null
+++ b/3840/CH11/EX11.9/Ex11_9.sce
@@ -0,0 +1,21 @@
+clear
+//
+//
+//
+
+//Variable declaration
+NA=0.20 //numerical aperture
+n0=1.33 //refractive index of water
+n2=1.59 //Cladding refractive index
+
+//Calculation
+n1=sqrt((NA**2)+(n2**2)) //core refractive index
+x=sqrt((n1**2)-(n2**2))/n0
+theta0=asin(x) //acceptance angle(radian)
+theta0=theta0*180/%pi //acceptance angle(degrees)
+theta0m=60*(theta0-int(theta0)) //acceptance angle(minutes)
+theta0s=60*(theta0m-int(theta0m)) //acceptance angle(seconds)
+
+//Resul"
+printf("\n acceptance angle is %0.3f degrees %0.3f minutes %0.3f seconds",theta0,theta0m,theta0s)
+printf("\n answer for angle in seconds given in the book varies due to rounding off errors")