1 files changed, 18 insertions, 0 deletions
diff --git a/3755/CH13/EX13.1/Ex13_1.sce b/3755/CH13/EX13.1/Ex13_1.sce
new file mode 100644
index 000000000..78b1bdb85
--- /dev/null
+++ b/3755/CH13/EX13.1/Ex13_1.sce
@@ -0,0 +1,18 @@
+clear
+//
+//
+//
+
+//Variable declaration    
+n1=1.5;     //core refractive index
+n2=1.48;    //cladding refractive index
+n=1;
+
+//Calculations
+NA=sqrt(n1^2-n2^2);       //numerical aperture
+i0=asin(NA/n);             //maximum entrance angle(radian)
+i0=i0*180/%pi ;         //maximum entrance angle(degrees)
+
+//Result
+printf("\n numerical aperture is %0.5f ",NA)
+printf("\n maximum entrance angle is %0.2f degrees",i0)