diff options
Diffstat (limited to '3506/CH2/EX2.4/Ex_2_4.sce')
| -rw-r--r-- | 3506/CH2/EX2.4/Ex_2_4.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/3506/CH2/EX2.4/Ex_2_4.sce b/3506/CH2/EX2.4/Ex_2_4.sce new file mode 100644 index 000000000..5e201862e --- /dev/null +++ b/3506/CH2/EX2.4/Ex_2_4.sce @@ -0,0 +1,15 @@ +//Optical Fiber communication by A selvarajan
+//example 2.4
+//OS=Windows XP sp3
+//Scilab version 5.5.1
+clc;
+clear all;
+//given
+
+V=2//v no. for single mode
+a=4//radius of fiber in um
+//to find
+w=a*(0.65+1.619*V^(-3/2)+2.87*V^-6)//effective mode radius in um
+//display
+
+mprintf("Effective mode radius =%f um",w)
|