1 files changed, 15 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)