5 files changed, 103 insertions, 0 deletions
diff --git a/2084/CH20/EX20.1/20_1.sce b/2084/CH20/EX20.1/20_1.sce
new file mode 100755
index 000000000..6b2c8bae0
--- /dev/null
+++ b/2084/CH20/EX20.1/20_1.sce
@@ -0,0 +1,15 @@
+//developed in windows XP operating system 32bit
+//platform Scilab 5.4.1
+clc;clear;
+//example 20.1
+//calculation of the dispersive power of the flint glass
+
+//given data
+mur=1.613//refractive index of flint glass for the red light
+mu=1.620//refractive index of flint glass for the yellow light
+muv=1.632//refractive index of flint glass for the violet light
+
+//calculation
+w=(muv-mur)/(mu-1)//definition of the dispersive power
+
+printf('the dispersive power of the flint glass is %3.4f',w)
diff --git a/2084/CH20/EX20.1w/20_1w.sce b/2084/CH20/EX20.1w/20_1w.sce
new file mode 100755
index 000000000..e2679ede3
--- /dev/null
+++ b/2084/CH20/EX20.1w/20_1w.sce
@@ -0,0 +1,16 @@
+//developed in windows XP operating system 32bit
+//platform Scilab 5.4.1
+clc;clear;
+//example 20.1w
+//calculation of the angular dispersion produced by a thin prism of the flint glass
+
+//given data
+
+mur=1.613//refractive index of flint glass for the red light
+muv=1.632//refractive index of flint glass for the violet light
+A=5//refracting angle(in degree)
+
+//calculation
+delta=(muv-mur)*A//angular dispersion
+
+printf('the angular dispersion produced by the thin prism of the flint glass is %3.3f degree',delta)
diff --git a/2084/CH20/EX20.2/20_2.sce b/2084/CH20/EX20.2/20_2.sce
new file mode 100755
index 000000000..25835a333
--- /dev/null
+++ b/2084/CH20/EX20.2/20_2.sce
@@ -0,0 +1,22 @@
+//developed in windows XP operating system 32bit
+//platform Scilab 5.4.1
+clc;clear;
+//example 20.2
+//calculation of the dispersive power of the material of the lens
+
+//given data
+fr=90//focal length(in cm) for the red light
+fv=86.4//focal length(in cm) for the violet light
+
+//calculation
+//(1/f) = (mu-1) * ((1/R1) - (1/R2))
+//muv - 1 =K/fv.....and.....mur - 1 = K/fr
+//let m = muv - mur and K = 1
+m=((1/fv)-(1/fr))
+//muy - 1 = ((muv + mur)/2) - 1 = (K/2)*((1/fv) - (1/fr))
+//let n = muy -1 and K = 1
+n=(1/2)*((1/fv)+(1/fr))
+//w = (muv-mur)/(mu-1).........definition of the dispersive power
+w=m/n
+
+printf('the dispersive power of the material of the lens is %3.3f',w)
diff --git a/2084/CH20/EX20.2w/20_2w.sce b/2084/CH20/EX20.2w/20_2w.sce
new file mode 100755
index 000000000..625b99a4f
--- /dev/null
+++ b/2084/CH20/EX20.2w/20_2w.sce
@@ -0,0 +1,26 @@
+//developed in windows XP operating system 32bit
+//platform Scilab 5.4.1
+clc;clear;
+//example 20.2w
+//calculation of the angle of flint glass prism and angular dispersion produced by the combination
+
+//given data
+A=5//angle of crown glass prism(in degree)
+mur=1.514//refractive index of crown glass for the red light
+mu=1.517//refractive index of crown glass for the yellow light
+muv=1.523//refractive index of crown glass for the violet light
+murdash=1.613//refractive index of flint glass for the red light
+mudash=1.620//refractive index of flint glass for the yellow light
+muvdash=1.632//refractive index of flint glass for the violet light
+
+//calculation
+//delta = (mu - 1) * A.......deviation produced by the prism
+//D = ((mu - 1)*A) - ((mudash - 1)*Adash)....net deviation
+//net deviation for the mean ray is equal to zero
+Adash=((mu-1)/(mudash-1))*A//angle of flint glass prism
+//deltav - deltar = (muv - mur)*A.........................for crown glass prism
+//deltavdash - deltardash = (muvdash - murdash)*Adash...for flint glass prism
+delta=((muv-mur)*A)-((muvdash-murdash)*Adash)//net angular dispersion
+
+printf('the angle of flint glass prism needed is %3.1f degree',Adash)
+printf('\nthe angular dispersion produced by the combination is %3.4f degree',abs(delta))
diff --git a/2084/CH20/EX20.3w/20_3w.sce b/2084/CH20/EX20.3w/20_3w.sce
new file mode 100755
index 000000000..04948e933
--- /dev/null
+++ b/2084/CH20/EX20.3w/20_3w.sce
@@ -0,0 +1,24 @@
+//developed in windows XP operating system 32bit
+//platform Scilab 5.4.1
+clc;clear;
+//example 20.3w
+//calculation of the refracting angles of the two prisms
+
+//given data
+w=0.03//dispersive power of crown glass
+wdash=0.05//dispersive power of flint glass
+delta=1//deviation(in degree) produced
+mu=1.517//refractive index for crown glass
+mudash=1.621//refractive index for flint glass
+
+//calculation
+//w = (muv - mur)/(mu - 1)........dispersive power
+//(muv - mur)*A = (mu-1)*w*A......angular dispersion
+m=((mu-1)/(mudash-1))*(w/wdash)
+//Adash = A*m........(1)
+//net deviation produced is delta
+A=delta/((mu-1)-((mudash-1)*m))//refracting angle of crown glass
+Adash=A*m//refracting angle of flint glass
+
+printf('the refracting angle of the crown prism is %3.1f degree',A)
+printf('\nthe refracting angle of the flint prism is %3.1f degree',Adash)