summaryrefslogtreecommitdiff
path: root/3415/CH11/EX11.9/Ex11_9.sce
diff options
context:
space:
mode:
Diffstat (limited to '3415/CH11/EX11.9/Ex11_9.sce')
-rw-r--r--3415/CH11/EX11.9/Ex11_9.sce21
1 files changed, 21 insertions, 0 deletions
diff --git a/3415/CH11/EX11.9/Ex11_9.sce b/3415/CH11/EX11.9/Ex11_9.sce
new file mode 100644
index 000000000..06281d1d6
--- /dev/null
+++ b/3415/CH11/EX11.9/Ex11_9.sce
@@ -0,0 +1,21 @@
+//fiber optic communications by joseph c. palais
+//given
+//example 11.9
+//OS=Windows XP sp3
+//Scilab version 5.4.1
+clc
+clear all
+//given
+alphadb=30//transmission loss in dB
+Gi=1e3//gain
+Fidb=3//noise figure of amplifier in dB
+N=10//Number of amps
+SNRin=1e8//signal to noise at transmitter at input
+//to find
+alpha=10^(alphadb/10)//transmission loss in normal scale
+Fi=10^(Fidb/10)//noise figure of amplifier in normal scale
+F=N*Fi*Gi//Noise Figure
+SNRout=SNRin/F//output signal to noise
+SNRoutdb=10*log10(SNRout)//output signal to noise in dB
+mprintf("Output SNR=%fdB",SNRoutdb)
+