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.17/Ch03Ex17.sce | 12 ++++++++++++ 1 file changed, 12 insertions(+) create mode 100755 1871/CH3/EX3.17/Ch03Ex17.sce (limited to '1871/CH3/EX3.17') diff --git a/1871/CH3/EX3.17/Ch03Ex17.sce b/1871/CH3/EX3.17/Ch03Ex17.sce new file mode 100755 index 000000000..e6a2662aa --- /dev/null +++ b/1871/CH3/EX3.17/Ch03Ex17.sce @@ -0,0 +1,12 @@ +// Scilab code Ex3.17 : Pg:125(2008) +clc;clear; +F = 10; // Equivalent focal length of the combination of lenses, cm +d = 2; // Distance between the lenses of doublet, cm +// The condition of minimum spherical aberration gives +// f1 = f2 = d or f2 = f1 - d +f1 = 2*F; // Focal length of the first lens, cm +f2 = f1 - d; // Focal length of the second lens, cm +printf("\nThe focal length of component lenses of a convergent doublet, f1 = %2d cm and f2 = %2d cm", f1, f2); + +// Result +// The focal length of component lenses of a convergent doublet, f1 = 20 cm and f2 = 18 cm \ No newline at end of file -- cgit