diff options
Diffstat (limited to '3669/CH11/EX11.8/8.sce')
-rw-r--r-- | 3669/CH11/EX11.8/8.sce | 14 |
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 |