summaryrefslogtreecommitdiff
path: root/1871/CH3/EX3.16
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1871/CH3/EX3.16
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1871/CH3/EX3.16')
-rwxr-xr-x1871/CH3/EX3.16/Ch03Ex16.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/1871/CH3/EX3.16/Ch03Ex16.sce b/1871/CH3/EX3.16/Ch03Ex16.sce
new file mode 100755
index 000000000..cdf254579
--- /dev/null
+++ b/1871/CH3/EX3.16/Ch03Ex16.sce
@@ -0,0 +1,14 @@
+// Scilab code Ex3.16 : Pg:121 (2008)
+clc;clear;
+R = 20; // Radius of curvature of the spherical surface, cm
+mu = 1.5; // Refractive index of the material
+h = 5; // First height of the incident ray from the principal axis, cm
+delta_f_h = h^2/(2*mu*(mu - 1)*R); // Spherical aberration of the spherical surface, cm
+printf("\nFor h = %d, the Spherical aberration of the spherical surface = %4.2f cm", h, delta_f_h);
+h = 7; // Second height of the incident ray from the principal axis, cm
+delta_f_h = h^2/(2*mu*(mu - 1)*R); // Spherical aberration of the spherical surface, cm
+printf("\nFor h = %d, the Spherical aberration of the spherical surface = %4.2f cm", h, delta_f_h);
+
+// Result
+// For h = 5, the Spherical aberration of the spherical surface = 0.83 cm
+// For h = 7, the Spherical aberration of the spherical surface = 1.63 cm \ No newline at end of file