summaryrefslogtreecommitdiff
path: root/3480/CH5/EX5.2/Ex5_2.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /3480/CH5/EX5.2/Ex5_2.sce
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 '3480/CH5/EX5.2/Ex5_2.sce')
-rw-r--r--3480/CH5/EX5.2/Ex5_2.sce37
1 files changed, 37 insertions, 0 deletions
diff --git a/3480/CH5/EX5.2/Ex5_2.sce b/3480/CH5/EX5.2/Ex5_2.sce
new file mode 100644
index 000000000..61baa8b33
--- /dev/null
+++ b/3480/CH5/EX5.2/Ex5_2.sce
@@ -0,0 +1,37 @@
+//Example 5.2, page 107
+clc
+r1=1.5//in cm
+r2=1.5//in cm
+d=2//in cm
+n=1//in cm
+n1=1.60//in cm
+n11=1.30//in cm
+n_by_f1=(n1-n)/r1
+n1_by_f21=(n11-n1)/r2
+f1=n/n_by_f1
+f11=n1/n_by_f1
+f21=n1/n1_by_f21
+f211=n11/n1_by_f21
+disp("Part a")
+printf("\n The focal length f1 is +%f cm",f1)
+printf("\n The focal length f11 is +%f cm",f11)
+printf("\n The focal length f21 is -%f cm",f21)
+printf("\n The focal length f211 is -%f cm",f211)
+n_by_f=(n1/f11)+(n11/f211)-((d*n11)/(f11*f211))
+f=1/n_by_f
+f11=n11/n_by_f
+A1_f=(-f)*(1-(d/f21))
+A2_f211=f11*(1-(d/f11))
+disp("Part b")
+printf("\n The primary focal length is %f cm",A1_f)
+printf("\n The secondary focal length is %f cm",A2_f211)
+A1_h=f*(d/f21)
+A2_h11=-f11*(d/f11)
+disp("Part c")
+printf("\n The primary point is %f cm",A1_h)
+printf("\n The secondary point is %f cm",A2_h11)
+
+
+
+
+