summaryrefslogtreecommitdiff
path: root/3669/CH11/EX11.12/12.sce
diff options
context:
space:
mode:
Diffstat (limited to '3669/CH11/EX11.12/12.sce')
-rw-r--r--3669/CH11/EX11.12/12.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/3669/CH11/EX11.12/12.sce b/3669/CH11/EX11.12/12.sce
new file mode 100644
index 000000000..904071c0f
--- /dev/null
+++ b/3669/CH11/EX11.12/12.sce
@@ -0,0 +1,15 @@
+
+//Variable declaration
+n1=1.563; //refractive index of core
+n2=1.498; //refractive index of cladding
+
+//Calculation
+NA=sqrt((n1**2)-(n2**2)); //numerical aperture
+theta0=asin(NA); //acceptance angle(radian)
+theta0=theta0*180/%pi; //acceptance angle(degrees)
+theta0_m=60*(theta0-int(theta0));
+
+//Result
+printf('numerical aperture is %0.3f \n',(NA))
+printf('acceptance angle is %0.3f degrees %0.3f minutes \n',int(theta0),(theta0_m))
+printf('answer varies due to approximating off errors\n') \ No newline at end of file