diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /1871/CH3/EX3.8 | |
| download | Scilab-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.8')
| -rwxr-xr-x | 1871/CH3/EX3.8/Ch03Ex8.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/1871/CH3/EX3.8/Ch03Ex8.sce b/1871/CH3/EX3.8/Ch03Ex8.sce new file mode 100755 index 000000000..3dc620bab --- /dev/null +++ b/1871/CH3/EX3.8/Ch03Ex8.sce @@ -0,0 +1,14 @@ +// Scilab code Ex3.8 : Pg:108 (2008)
+clc;clear;
+mu_v = 1.5230; // Refractive index of violet color
+mu_r = 1.5145; // Refractive index of red color
+R1 = 40; // Radius of curvature of first curvature of lens, cm
+R2 = -10; // Radius of curvature of second curvature of lens, cm
+// As 1/f_r = (mu_r - 1)*(1/R1 - 1/R2), solving for f_r
+f_r = 1/((mu_r-1)*(1/R1 - 1/R2)); // Focal length for red color, cm
+f_v = 1/((mu_v-1)*(1/R1 - 1/R2)); // Focal length for violet color, cm
+CA = f_r - f_v; // The longitudinal chromatic abberation, cm
+printf("\nThe longitudinal chromatic abberation for the object at infinity = %5.3f cm", CA);
+
+// Result
+// The longitudinal chromatic abberation for the object at infinity = 0.253 cm
\ No newline at end of file |