summaryrefslogtreecommitdiff
path: root/2243/CH15/EX15.3/Ex15_3.sce
diff options
context:
space:
mode:
Diffstat (limited to '2243/CH15/EX15.3/Ex15_3.sce')
-rwxr-xr-x2243/CH15/EX15.3/Ex15_3.sce10
1 files changed, 10 insertions, 0 deletions
diff --git a/2243/CH15/EX15.3/Ex15_3.sce b/2243/CH15/EX15.3/Ex15_3.sce
new file mode 100755
index 000000000..6dc4eeffe
--- /dev/null
+++ b/2243/CH15/EX15.3/Ex15_3.sce
@@ -0,0 +1,10 @@
+clc();
+clear;
+//Given :
+lambda = 1.25; // wavelength in mu_m
+n1 = 1.462; // refractive index of core
+n2 = 1.457; // refractive index of cladding
+// Single mode propogation : (2*pi*a*sqrt(n1^2 - n2^2))/lambda < 2.405
+a = (2.405*lambda)/(2*%pi*sqrt(n1^2 - n2^2)); // radius in mu_m
+d = a*2; // diameter in mu_m
+printf("Limiting diameter = %.2f mu_m",d);