summaryrefslogtreecommitdiff
path: root/1655/CH2/EX2.7.12/Example_2_7_12.sce
diff options
context:
space:
mode:
Diffstat (limited to '1655/CH2/EX2.7.12/Example_2_7_12.sce')
-rwxr-xr-x1655/CH2/EX2.7.12/Example_2_7_12.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/1655/CH2/EX2.7.12/Example_2_7_12.sce b/1655/CH2/EX2.7.12/Example_2_7_12.sce
new file mode 100755
index 000000000..158bf138c
--- /dev/null
+++ b/1655/CH2/EX2.7.12/Example_2_7_12.sce
@@ -0,0 +1,15 @@
+// Example 2.7.12 page 2.30
+
+clc;
+clear;
+
+n1=1.48; //refractive index of core
+n2=1.478; //refractive index of cladding
+lamda=820d-9; //Wavelength
+
+NA=sqrt(n1^2 - n2^2); //computing Numerical aperture
+theta= asind(NA); //computing acceptance angle
+solid_angle=%pi*(NA)^2; //computing solid angle
+
+printf("\nNumerical aperture is %.3f.\nAcceptance angle is %.2f degrees.\nSolid angle is %.4f radians.",NA,theta,solid_angle);
+