1 files changed, 10 insertions, 0 deletions
diff --git a/1397/CH8/EX8.6/8_6.sce b/1397/CH8/EX8.6/8_6.sce
new file mode 100755
index 000000000..d974d5e29
--- /dev/null
+++ b/1397/CH8/EX8.6/8_6.sce
@@ -0,0 +1,10 @@
+//clc();
+clear;
+//To calculate numerical aperture and acceptance angle
+n1=1.6;        //refractive index of core
+n2=1.4;        //refractive index of cladding
+n0=1.33;       //water refractive index
+NA=sqrt(n1^2-n2^2)/n0;
+printf("numerical aperture is %f",NA);
+theta0=asind(NA);
+printf("acceptance angle is %f degrees",theta0);