summaryrefslogtreecommitdiff
path: root/2084/CH20/EX20.1/20_1.sce
blob: 6b2c8bae0bfb20b79d67524ee9da2eb6f969723a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
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)