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

---
 3740/CH10/EX10.5/Ex10_5.sce | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)
 create mode 100644 3740/CH10/EX10.5/Ex10_5.sce

(limited to '3740/CH10/EX10.5/Ex10_5.sce')

diff --git a/3740/CH10/EX10.5/Ex10_5.sce b/3740/CH10/EX10.5/Ex10_5.sce
new file mode 100644
index 000000000..ab89abf0a
--- /dev/null
+++ b/3740/CH10/EX10.5/Ex10_5.sce
@@ -0,0 +1,16 @@
+//Optoelectronics - An Introduction, 2nd Edition by J. Wilson and J.F.B. Hawkes
+//Example 10.5
+//OS=Windows XP sp3
+//Scilab version 5.5.2
+clc;
+clear;
+
+//given
+V=4;//Value of Verdet constant in rad m^-1 T^-1
+Mur=1;//Relative permeability of Silica
+Mu0=4*%pi*1e-7;//Permeability of free space in SI Units
+n=10;//Number of turns of the fiber coil
+I=30;//Current flowing through the fiber in A
+
+Thetar=Mu0*Mur*n*V*I;//Corresponding polarization rotation in radians
+mprintf("\n Thetar = %.2f degrees",Thetar*180/%pi);//Multiplying by '180/%pi' to convert in degrees
-- 
cgit