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

---
 2183/CH6/EX6.13/Ex_6_13.sce | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100755 2183/CH6/EX6.13/Ex_6_13.sce

(limited to '2183/CH6/EX6.13')

diff --git a/2183/CH6/EX6.13/Ex_6_13.sce b/2183/CH6/EX6.13/Ex_6_13.sce
new file mode 100755
index 000000000..a22b9b043
--- /dev/null
+++ b/2183/CH6/EX6.13/Ex_6_13.sce
@@ -0,0 +1,14 @@
+// Example 6.13 //coupling efficiency
+clc;
+clear;
+close;
+t=1;//
+no=1;//
+na=0.3;//
+x=1;//assume
+y=1;//
+nc1=(t*(na/no)^2*(x/y)^2)*100;//
+alpha=2;//
+nc2=((t*(na/no)^2*(x/y)^2*(alpha/(alpha+2))))*100;//
+disp(nc1,"coupling efficiency for step index fiber in (%)")
+disp(nc2,"coupling efficiency for graded index fiber in (%)")
-- 
cgit