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

---
 3822/CH5/EX5.1/Ex5_1.sce | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100644 3822/CH5/EX5.1/Ex5_1.sce

(limited to '3822/CH5/EX5.1/Ex5_1.sce')

diff --git a/3822/CH5/EX5.1/Ex5_1.sce b/3822/CH5/EX5.1/Ex5_1.sce
new file mode 100644
index 000000000..d808eae32
--- /dev/null
+++ b/3822/CH5/EX5.1/Ex5_1.sce
@@ -0,0 +1,20 @@
+
+
+//OptoElectronics and Fibre Optics Communication, by C.K Sarkar and B.C Sarkar
+//Example 5.1
+//OS=Windows 10
+////Scilab version Scilab 6.0.0-beta-2(64 bit)
+clc;
+clear;
+
+//given
+Tc=727;//temperature in celcius
+lamda=0.5*10^-6;//wavength of emitting radiation in M
+h=6.626*10^-34;//Plank's constant in SI units
+KB=1.38*10^-23;//boltzman constant in SI units
+c=3*10^8;//speed of light in m/s
+f=c/lamda;//frequency in Hz
+T=Tc+273;//temperature in kelvin
+c1=(h*f)/(KB*T);//constant value
+B21byA21Pf=1/(exp(c1)-1);//ratio of stimulated and spontaneous emission rate
+mprintf("\n Ratio between stimulated and spontaneous emission is =%.1fx10^-13",B21byA21Pf*1e13); //multiplication by 1e13 to convert the ratio to 10^-13
-- 
cgit