summaryrefslogtreecommitdiff
path: root/3669/CH11/EX11.8/8.sce
diff options
context:
space:
mode:
Diffstat (limited to '3669/CH11/EX11.8/8.sce')
-rw-r--r--3669/CH11/EX11.8/8.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/3669/CH11/EX11.8/8.sce b/3669/CH11/EX11.8/8.sce
new file mode 100644
index 000000000..106b6d054
--- /dev/null
+++ b/3669/CH11/EX11.8/8.sce
@@ -0,0 +1,14 @@
+
+//Variable declaration
+NA=0.33; //numerical aperture
+delta=0.02; //fractional refractive indices change
+
+//Calculation
+x=1-delta
+y=sqrt(1-x**2);
+n1=NA/y; //refractive index of core
+n2=n1*x; //refractive index of cladding
+
+//Result
+printf('refractive index of core is %0.3f \n',(n1))
+printf('refractive index of cladding is %0.3f \n',(n2)) \ No newline at end of file