1 files changed, 18 insertions, 0 deletions
diff --git a/3828/CH5/EX5.3/Ex5_3.sce b/3828/CH5/EX5.3/Ex5_3.sce
new file mode 100644
index 000000000..c6783b534
--- /dev/null
+++ b/3828/CH5/EX5.3/Ex5_3.sce
@@ -0,0 +1,18 @@
+//Chapter 5 : Fibre Optics
+
+clear;
+
+//Variable declaration
+n1=1.6                 //core refractive index
+n2=1.58                //clad refractive index
+
+//Calculations
+NA=(n1**2-n2**2)**0.5
+im=asin(NA)
+im=im*180/%pi
+
+//Result
+mprintf("Numerical aperture= %f",NA)
+mprintf("\nAcceptance angle= %2.2f degrees",im)
+//The answer provided in the textbook is incorrect
+