summaryrefslogtreecommitdiff
path: root/401/CH12/EX12.5/Example12_5.sce
diff options
context:
space:
mode:
Diffstat (limited to '401/CH12/EX12.5/Example12_5.sce')
-rwxr-xr-x401/CH12/EX12.5/Example12_5.sce20
1 files changed, 20 insertions, 0 deletions
diff --git a/401/CH12/EX12.5/Example12_5.sce b/401/CH12/EX12.5/Example12_5.sce
new file mode 100755
index 000000000..4314d57b8
--- /dev/null
+++ b/401/CH12/EX12.5/Example12_5.sce
@@ -0,0 +1,20 @@
+//Example 12.5
+//Program to determine the total channel loss ignoring dispersion
+
+clear;
+clc ;
+close ;
+
+//Given data
+alpha_fc=5; //dB/km - FIBER CABLE ATTENUATION
+alpha_j=2; //dB/km - SPLICE LOSS
+alpha_s=3.5; //dB - SOURCE CONNECTOR LOSS
+alpha_d=2.5; //dB - DETECTOR CONNECTOR LOSS
+L=4; //km - LENGTH OF OPTICAL FIBER LINK
+
+//Total channel loss
+alpha_cr=alpha_s+alpha_d
+C_L=(alpha_fc+alpha_j)*L+alpha_cr;
+
+//Displaying The Result in Command Window
+printf("\n\n\tTotal channel loss, C_L = %1.0f dB",C_L) \ No newline at end of file