From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 3834/CH3/EX3.1.2/Ex3_1_2.jpg | Bin 0 -> 174800 bytes
 3834/CH3/EX3.1.2/Ex3_1_2.sce |  23 +++++++++++++++++++++++
 2 files changed, 23 insertions(+)
 create mode 100644 3834/CH3/EX3.1.2/Ex3_1_2.jpg
 create mode 100644 3834/CH3/EX3.1.2/Ex3_1_2.sce

(limited to '3834/CH3/EX3.1.2')

diff --git a/3834/CH3/EX3.1.2/Ex3_1_2.jpg b/3834/CH3/EX3.1.2/Ex3_1_2.jpg
new file mode 100644
index 000000000..5e88f423c
Binary files /dev/null and b/3834/CH3/EX3.1.2/Ex3_1_2.jpg differ
diff --git a/3834/CH3/EX3.1.2/Ex3_1_2.sce b/3834/CH3/EX3.1.2/Ex3_1_2.sce
new file mode 100644
index 000000000..75e5d90e2
--- /dev/null
+++ b/3834/CH3/EX3.1.2/Ex3_1_2.sce
@@ -0,0 +1,23 @@
+//Fiber Optics Communication Technology, by Djafer K. Mynbaev and Lovell L.scheiner
+//Windows 7
+//Scilab version- 6.0.0
+//Example 3.1.2
+clc;
+clear;
+//given
+
+//case 1
+n1=1.48;//Refractive index of the core for silica fiber
+n2=1.46;//Refractive index of the cladding for silica fiber
+
+//case 2
+n3=1.495;//Refractive index of the core for plastic optical fiber
+n4=1.402;//Refractive index of the cladding for plastic optical fiber
+
+//case 1
+alphac=asind(sqrt(1-(n2/n1)^2));
+mprintf("\n The Critical propagation angle for case 1 = %.2f deg",alphac);
+
+//case 2
+alphac2=asind(sqrt(1-(n4/n3)^2));
+mprintf("\n The Critical propagation angle for case 2 = %.2f deg",alphac2);
-- 
cgit