1 files changed, 13 insertions, 0 deletions
diff --git a/3651/CH8/EX1.1/1.sce b/3651/CH8/EX1.1/1.sce
new file mode 100644
index 000000000..f02bf8cfd
--- /dev/null
+++ b/3651/CH8/EX1.1/1.sce
@@ -0,0 +1,13 @@
+//variable declaration
+n1=1.50          //Core refractive index
+n2=1.47          //Cladding refractive index
+
+//Calculations
+C_a=asin(n2/n1)        //Critical angle       
+N_a=(n1**2-n2**2)**(1/2)
+A_a=asin(N_a)
+
+//Results
+printf('The Critical angle =%0.3f degrees\n',(C_a*180/%pi))
+printf('The numerical aperture =%0.3f \n',(N_a))
+printf('The acceptance angle =%0.3f degrees\n',(A_a*180/%pi))
+\ No newline at end of file