From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 3834/CH12/EX12.3.2/Ex12_3_2.sce | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)
 create mode 100644 3834/CH12/EX12.3.2/Ex12_3_2.sce

(limited to '3834/CH12/EX12.3.2/Ex12_3_2.sce')

diff --git a/3834/CH12/EX12.3.2/Ex12_3_2.sce b/3834/CH12/EX12.3.2/Ex12_3_2.sce
new file mode 100644
index 000000000..5893eca02
--- /dev/null
+++ b/3834/CH12/EX12.3.2/Ex12_3_2.sce
@@ -0,0 +1,22 @@
+//Fiber Optics Communication Technology, by Djafer K. Mynbaev and Lovell L.scheiner
+//Windows 8
+//Scilab version- 6.0.0
+//Example 12.3.2
+clc;
+clear ;
+//given
+
+g=106;//maximum gain coefficient in 1/cm
+alpha=14;//loss coefficient of a cavity in 1/cm
+GAMA=0.8;//confinement factor
+L1=50E-3;//assumed length of a typical travelling-wave semiconductor amplifier in cm
+y=GAMA*g-alpha;
+z=y*L1;
+Gs1=exp(z);//Gain of a travelling-wave semiconductor amplifier
+mprintf("Gain of a travelling-wave semiconductor amplifier = %.2f.or  %.1f ",Gs1,10*log10(Gs1));
+//case 2
+L2=100E-3;//assumed length of a typical travelling-wave semiconductor amplifier in cm
+y=GAMA*g-alpha;
+z=y*L2;
+Gs2=exp(z);//Gain of a travelling-wave semiconductor amplifier
+mprintf("\nGain of a travelling-wave semiconductor amplifier = %.2f.or  %.1f ",Gs2,10*log10(Gs2));
-- 
cgit