summaryrefslogtreecommitdiff
path: root/3717/CH16/EX16.1/Ex16_1.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3717/CH16/EX16.1/Ex16_1.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3717/CH16/EX16.1/Ex16_1.sce')
-rw-r--r--3717/CH16/EX16.1/Ex16_1.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/3717/CH16/EX16.1/Ex16_1.sce b/3717/CH16/EX16.1/Ex16_1.sce
new file mode 100644
index 000000000..bc1c629d2
--- /dev/null
+++ b/3717/CH16/EX16.1/Ex16_1.sce
@@ -0,0 +1,15 @@
+// Ex16_1 Page:306 (2014)
+clc;clear;
+n1 = 1.43; // Refractive index of core
+n2 = 1.40; // Refractive index of cladding
+theta_c = acosd(n2/n1); // Propagation angle, degree
+NA = sqrt(n1^2 - n2^2); // Numerical aperture
+theta_a = asind(NA); // Acceptance angle, degree
+printf("\nPropagation angle = %4.1f degree", theta_c);
+printf("\nNumerical aperture = %6.4f", NA);
+printf("\nAcceptance angle = %5.2f degree", 2*theta_a);
+
+// Result
+// Propagation angle = 11.8 degree
+// Numerical aperture = 0.2914
+// Acceptance angle = 33.88 degree \ No newline at end of file