summaryrefslogtreecommitdiff
path: root/374/CH2/EX2.5/25.sci
diff options
context:
space:
mode:
Diffstat (limited to '374/CH2/EX2.5/25.sci')
-rw-r--r--374/CH2/EX2.5/25.sci16
1 files changed, 16 insertions, 0 deletions
diff --git a/374/CH2/EX2.5/25.sci b/374/CH2/EX2.5/25.sci
new file mode 100644
index 000000000..b68334e9b
--- /dev/null
+++ b/374/CH2/EX2.5/25.sci
@@ -0,0 +1,16 @@
+//chapter2.example.5//
+clc
+clear
+//core refractive index=n1,cladding refractive index=n2,radius of core=a,operating wavelength=l,number of guided modes=M,ratio of power flow in the core and cladding=z//
+n1=1.50;
+n2=1.49;
+a=30*(10^-6);
+l=0.85*(10^-6);
+h=(2*%pi*a)/l;
+x=(n1^2)-(n2^2);
+M=((h^2)*x)/2;
+printf("\n number of guided modes=M=%f modes\n",M);
+y=(4*(M^-0.5))/3;
+g=1-y;
+z=g/y;
+printf("\n ratio of power flow in the core and cladding=%f\n",z);