diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /1949/CH3/EX3.9 | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '1949/CH3/EX3.9')
| -rwxr-xr-x | 1949/CH3/EX3.9/Ex3_9.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/1949/CH3/EX3.9/Ex3_9.sce b/1949/CH3/EX3.9/Ex3_9.sce new file mode 100755 index 000000000..1c26cc6f4 --- /dev/null +++ b/1949/CH3/EX3.9/Ex3_9.sce @@ -0,0 +1,17 @@ +//Chapter-3,Example 3_9,Page 3-21
+clc()
+
+//Given Data:
+u1=1.47 //R.I. of Core
+u2=1.46 //R.I.of Cladding
+lam=1.3*10^-6 //wavelength in meter
+
+//Calculations:
+NA=sqrt(u1^2-u2^2) //Formula to find Numerical Aperture
+
+//The condition for single mode is V<2.405
+//2*%pi*a*NA/lam < 2.405
+
+a=2.405*lam/(2*%pi*NA) //Maximum radius of fibre
+
+printf('Maximum radius of Fibre is =%.8f meter \n',a)
|