summaryrefslogtreecommitdiff
path: root/3669/CH14/EX14.7/7.sce
blob: 21bf9989a0bb796997bf52bbba17968e7d4b349b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13

//Variable declaration
lamda=500*10**-9;    //wavelength(m)
n=10;
D10=2*10**-3;     //diameter(m)

//Calculation
r10=D10/2;    //radius(m)
R=D10**2/(4*n*lamda);
t=r10**2/(2*R);        //thickness(m)

//Result
printf('thickness is %0.3f    micro m \n',t*10**6)