summaryrefslogtreecommitdiff
path: root/1664/CH3
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1664/CH3
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1664/CH3')
-rwxr-xr-x1664/CH3/EX3.1/Ex3_1.sce9
-rwxr-xr-x1664/CH3/EX3.2/Ex3_2.sce12
-rwxr-xr-x1664/CH3/EX3.3/Ex3_3.sce9
-rwxr-xr-x1664/CH3/EX3.4/Ex3_4.sce14
-rwxr-xr-x1664/CH3/EX3.5/Ex3_5.sce11
-rwxr-xr-x1664/CH3/EX3.6/Ex3_6.sce13
6 files changed, 68 insertions, 0 deletions
diff --git a/1664/CH3/EX3.1/Ex3_1.sce b/1664/CH3/EX3.1/Ex3_1.sce
new file mode 100755
index 000000000..b0ac62c23
--- /dev/null
+++ b/1664/CH3/EX3.1/Ex3_1.sce
@@ -0,0 +1,9 @@
+
+//Example No. 3.1.
+//Page No.98.
+//To find numerical aperture.
+clc;clear;
+n1 = 1.6;//Refractive index of core.
+n2 = 1.5;// Refractive index of cladding.
+NA = sqroot((n1^(2))-(n2^(2)));//Numerical Aperture.
+printf("\nThe numerical aperture of the fibre is %.4f",NA);
diff --git a/1664/CH3/EX3.2/Ex3_2.sce b/1664/CH3/EX3.2/Ex3_2.sce
new file mode 100755
index 000000000..a830b340a
--- /dev/null
+++ b/1664/CH3/EX3.2/Ex3_2.sce
@@ -0,0 +1,12 @@
+
+//Example No.3.2.
+// Page No.98.
+//To calculate numerical aperture and acceptance angle.
+clc;clear;
+n1 = 1.54;//Refractive index of core.
+n2 = 1.5;// Refractive index of cladding.
+no = 1;
+NA = sqroot((n1^(2))-(n2^(2)));//Numerical Aperture.
+printf("\nThe numerical aperture of the fibre is %.4f",NA);
+t = asind(NA/no);// Acceptance angle.
+printf("\nThe acceptance angle of the fibre is %.4f degree",t);
diff --git a/1664/CH3/EX3.3/Ex3_3.sce b/1664/CH3/EX3.3/Ex3_3.sce
new file mode 100755
index 000000000..e3e0e119f
--- /dev/null
+++ b/1664/CH3/EX3.3/Ex3_3.sce
@@ -0,0 +1,9 @@
+
+//Example No.3.3.
+//Page No. 99.
+//To find critical angle.
+clc;clear;
+n1 = 1.6;//Refractive index of core.
+n2 = 1.49;// Refractive index of cladding.
+Qc = asind((n2)/(n1));//Critical angle.
+printf("\nThe critical angle of the fibre is %.2f degree",Qc);
diff --git a/1664/CH3/EX3.4/Ex3_4.sce b/1664/CH3/EX3.4/Ex3_4.sce
new file mode 100755
index 000000000..eb600fe93
--- /dev/null
+++ b/1664/CH3/EX3.4/Ex3_4.sce
@@ -0,0 +1,14 @@
+
+
+
+//Example No.3.4.
+//Page No. 99.
+//To find refractive index of core and acceptance angle.
+clc;clear;
+NA = 0.15;//Numerical aperture.
+n2 = 1.55;//Refractive index of cladding.
+n0 = 1.33;//Refractive index of water.
+n1 = sqroot((NA^(2))+(n2^(2)));// Refractive index of core.
+printf("\nThe refractive index of the core is %.4f",n1);
+t = asind(NA/n0);// Acceptance angle.
+mprintf("\nThe acceptance angle of the fibre is %.3f degree",t);
diff --git a/1664/CH3/EX3.5/Ex3_5.sce b/1664/CH3/EX3.5/Ex3_5.sce
new file mode 100755
index 000000000..e63163422
--- /dev/null
+++ b/1664/CH3/EX3.5/Ex3_5.sce
@@ -0,0 +1,11 @@
+
+
+//Example No.3.5.
+//Page No. 100.
+//To find refractive index of cladding.
+clc;clear;
+d = 100;//Core diameter.
+NA = 0.26;//Numerical aperture.
+n1 = 1.5;//Refractive index of core.
+n2 = sqroot((n1^(2))-(NA^(2)));// Refractive index of cladding.
+printf("\nThe refractive index of the cladding is %.3f",n2);
diff --git a/1664/CH3/EX3.6/Ex3_6.sce b/1664/CH3/EX3.6/Ex3_6.sce
new file mode 100755
index 000000000..9d5413690
--- /dev/null
+++ b/1664/CH3/EX3.6/Ex3_6.sce
@@ -0,0 +1,13 @@
+
+
+//Example No.3.6.
+// Page No.100.
+//To find refractive idex.
+clc;clear;
+NA = 0.26;//Numerical aperture.
+del = 0.015;//Refractive index difference of the fibre.
+n1 = sqroot((((NA)^(2))/(2*del)));//Refractive index of the core
+printf("\nThe refractive index of the core is %.2f",n1);
+n2 = sqroot((n1^(2))-(NA^(2)));// Refractive index of cladding.
+printf("\nThe refractive index of cladding is %.3f",n2);
+