summaryrefslogtreecommitdiff
path: root/3834/CH13/EX13.4.1/Ex13_4_1.sce
blob: 1c029ddafb3473aa47210dc8f4115bf234c7766d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
//Fiber Optics Communication Technology, by Djafer K. Mynbaev and Lovell L.scheiner
//Windows 8
//Scilab version- 6.0.0
//Example 13.4.1
clc;
clear ;
//given


Oe=(10^3)/(4*%pi);
pfib=0.0128/Oe;//verdet's angle min/Oe-cm for silica fiber
pcry=9*60/Oe;//verdet's angle min/Oe-cm for BIG(Bi-substituted iron garnet) crystal
H=1000*Oe;//strength of magnetic field in A/m
phi=45*60;//angle in minutes

Lfib=phi/(pfib*H);//Length of faraday rotators made from silica fiber in cm
mprintf("Length of faraday rotators made from silica fiber= %.2f cm",Lfib);

Lcry=phi/(pcry*H);//Length of faraday rotators made from silica fiber in mm
mprintf("\nLength of faraday rotators made from silica fiber= %.2f mm",Lcry*10);