summaryrefslogtreecommitdiff
path: root/3411/CH7/EX7.7/Ex7_7.sce
diff options
context:
space:
mode:
Diffstat (limited to '3411/CH7/EX7.7/Ex7_7.sce')
-rw-r--r--3411/CH7/EX7.7/Ex7_7.sce9
1 files changed, 9 insertions, 0 deletions
diff --git a/3411/CH7/EX7.7/Ex7_7.sce b/3411/CH7/EX7.7/Ex7_7.sce
new file mode 100644
index 000000000..6da7e824c
--- /dev/null
+++ b/3411/CH7/EX7.7/Ex7_7.sce
@@ -0,0 +1,9 @@
+//Example 7_7
+clc();
+clear;
+//To calculate the fiber length
+alpha=0.5 //units in db/KM
+it=2*10^-6 //units in W
+i0=1.5*10^-3 //units in W
+l=-1*(10/alpha)*log10(it/i0) //units in KM
+printf("The length of the fiber is L=%.1f KM",l)