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

---
 3415/CH11/EX11.5/EX11_5.sce |  28 ++++++++++++++++++++++++++++
 3415/CH11/EX11.5/Ex11_5.JPG | Bin 0 -> 49603 bytes
 2 files changed, 28 insertions(+)
 create mode 100644 3415/CH11/EX11.5/EX11_5.sce
 create mode 100644 3415/CH11/EX11.5/Ex11_5.JPG

(limited to '3415/CH11/EX11.5')

diff --git a/3415/CH11/EX11.5/EX11_5.sce b/3415/CH11/EX11.5/EX11_5.sce
new file mode 100644
index 000000000..c97455c76
--- /dev/null
+++ b/3415/CH11/EX11.5/EX11_5.sce
@@ -0,0 +1,28 @@
+//fiber optic communications by joseph c. palais
+//example 11.5
+//OS=Windows XP sp3
+//Scilab version 5.4.1
+clc
+ clear all
+//given
+RL=100//load in ohm
+T=300//temperature in kelvin
+lambda=0.82*10^-6//wavelength in um
+e=1.6e-19//charge of electron in colums
+k=1.38e-23//boltzman constant
+h=6.63e-34//plancks constant
+deltaf=1e6//link bandwidth in Hz
+Error_rate=10^-4//desired error rate
+eta=1//quantum efficiency
+c=3*10^8//speed of light in m/s
+snr=17.5//Signal to noise ratio from plot correspnding to error rate of 10^-4 in dB
+SNR=10^(snr/10)//signal to noise ratio in normal scale
+tau=10^-6//bit interval in Sec
+//to find
+f=c/lambda//optic frequency in Hz
+P=(h*f/(eta*e) )*sqrt((4*k*T*deltaf)/RL)*sqrt(SNR)//Optic power incident in Watts
+mprintf("Optic power incident=%fnW",P*10^9)//multiplication by 10^9 is to convert the unit from W to nW
+i=eta*e*P/(h*f)//current in Amperes
+mprintf("\nCurrent=%fnA",i*10^9)//multiplication by 10^9 is to convert the unit from A to nA
+np=P/(h*f)*tau// No. of photons per bit
+mprintf("\nNo. of Photons per bit=%fx10^5 photons/bit",np/10^5)//multiplication by 10^5 is to convert the unit x10^5
diff --git a/3415/CH11/EX11.5/Ex11_5.JPG b/3415/CH11/EX11.5/Ex11_5.JPG
new file mode 100644
index 000000000..717c9ce4e
Binary files /dev/null and b/3415/CH11/EX11.5/Ex11_5.JPG differ
-- 
cgit