1 files changed, 10 insertions, 0 deletions
diff --git a/2183/CH2/EX2.13/EX_2_13.sce b/2183/CH2/EX2.13/EX_2_13.sce
new file mode 100755
index 000000000..130a3b3f9
--- /dev/null
+++ b/2183/CH2/EX2.13/EX_2_13.sce
@@ -0,0 +1,10 @@
+// Example 2.13:Cutoff Wavelength
+clc;
+clear;
+close;
+n1=1.48;//Waveguide Refractive Index
+a=4.8;// core radius in micro meters
+d= 0.0025;// Cange in core-cladding refractive index
+Hc= (2*%pi*a*sqrt(2*d)*n1)/2.4;
+disp(round(Hc*10^3),"Cutoff wavelength in nano meters")
+//answer is wrong in the textbook