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 --- 3822/CH3/EX3.5/Ex3_5.sce | 21 +++++++++++++++++++++ 1 file changed, 21 insertions(+) create mode 100644 3822/CH3/EX3.5/Ex3_5.sce (limited to '3822/CH3/EX3.5/Ex3_5.sce') diff --git a/3822/CH3/EX3.5/Ex3_5.sce b/3822/CH3/EX3.5/Ex3_5.sce new file mode 100644 index 000000000..d004ae7c5 --- /dev/null +++ b/3822/CH3/EX3.5/Ex3_5.sce @@ -0,0 +1,21 @@ + + + +//Optoelectronics and Fiber Optics Communication by C.R. Sarkar and D.C. Sarkar +//Example 3.5 +//OS = Windows 7 +//Scilab version 5.5.2 + +clc; +clear; + +//given +a=4*10^-6;//radius in m +n1=1.5;//core refractive index +delta=0.03;//delta +lamda=0.80*10^-6;//wavelength in m +c=(2*delta)^0.5;//constant value +n2=sqrt((n1^2)-(2*delta*n1^2)); +c5=((n1^2)-(n2^2))^1.5; +Rcs=(3*n1^2*lamda)/(4*%pi*c5);//critical radius +mprintf("\n Critical radius is =%.2f um",Rcs*1e6);//multiplication by 1e6 to convert unit to um//the answer vary due to rounding -- cgit