summaryrefslogtreecommitdiff
path: root/3506/CH3/EX3.1/EXP_3_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '3506/CH3/EX3.1/EXP_3_1.sce')
-rw-r--r--3506/CH3/EX3.1/EXP_3_1.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/3506/CH3/EX3.1/EXP_3_1.sce b/3506/CH3/EX3.1/EXP_3_1.sce
new file mode 100644
index 000000000..a0a29adab
--- /dev/null
+++ b/3506/CH3/EX3.1/EXP_3_1.sce
@@ -0,0 +1,13 @@
+//Optical Fiber communication by A selvarajan
+//example
+//OS=Windows XP sp3
+//Scilab version 5.5.1
+clc;
+clear all;
+//given
+PL=1;//length of preform in m
+PD=25e-3;//daimeter of preform in m
+OD=125e-6;//outer daimeter of optical fiber in m
+V=%pi*((PD/2)^2)*PL;//volume of Preform cylinder in m^3
+L=V/(%pi*((OD)^2));//Length of optical fiber in m
+mprintf("Length of optical fiber=%fKm",L/1e3);//division by 1e3 to convert unit from m to Km