From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 1871/CH3/EX3.8/Ch03Ex8.sce | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100755 1871/CH3/EX3.8/Ch03Ex8.sce (limited to '1871/CH3/EX3.8') 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 -- cgit