From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 2243/CH15/EX15.4/Ex15_4.sce | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)
 create mode 100755 2243/CH15/EX15.4/Ex15_4.sce

(limited to '2243/CH15/EX15.4/Ex15_4.sce')

diff --git a/2243/CH15/EX15.4/Ex15_4.sce b/2243/CH15/EX15.4/Ex15_4.sce
new file mode 100755
index 000000000..e2fe99aab
--- /dev/null
+++ b/2243/CH15/EX15.4/Ex15_4.sce
@@ -0,0 +1,17 @@
+clc();
+clear;
+//Given :
+n1 = 1.525; // refractive index of core
+n2 = 1.500; // refractive index of cladding
+d = 30; // core diameter in mu_m
+a = d/2; // core radius in mu_m
+ab = 0.00001/100; // percentage absorbed
+delta = (n1-n2)/n1;
+Ls = a*sqrt(2/delta);// skip distance in mu_m
+//1 mu_m = 1.0*10^-6 m
+R = 1000/(Ls*10^-6); // reflections per km (1000 m)
+red_p = 1 - ab; // reduced power for each reflection
+//Power P1km = P0*red_p^(6*10^6)
+// A = 10*log10[P0/P1km] , P0 in the numerator and denominator will cancel each other
+A = 10*log10(1/(red_p)^(R));
+printf("Attenuation = %.1f dB/km",A);
-- 
cgit