summaryrefslogtreecommitdiff
path: root/1655/CH2/EX2.7.8/Example_2_7_8.sce
diff options
context:
space:
mode:
Diffstat (limited to '1655/CH2/EX2.7.8/Example_2_7_8.sce')
-rwxr-xr-x1655/CH2/EX2.7.8/Example_2_7_8.sce16
1 files changed, 16 insertions, 0 deletions
diff --git a/1655/CH2/EX2.7.8/Example_2_7_8.sce b/1655/CH2/EX2.7.8/Example_2_7_8.sce
new file mode 100755
index 000000000..64cf4e386
--- /dev/null
+++ b/1655/CH2/EX2.7.8/Example_2_7_8.sce
@@ -0,0 +1,16 @@
+// Example 2.7.8 page 2.28
+
+clc;
+clear;
+
+core_diameter=80d-6; //core diameter
+delta=1.5/100; //relative index difference
+lamda=0.85d-6; //operating wavelength
+n1=1.48; //core refractive index
+
+a=core_diameter/2; //computing core radius
+v= 2*%pi*a*n1*sqrt(2*delta)/lamda; //computing normalized frequency
+M=(v)^2/2; //computing guided modes
+printf("\nNormalized Frequency is %.1f.\nTotal number of guided modes are %.d.",v,M);
+
+//answer in the book for Guided modes is 2873, deviation of 1.