summaryrefslogtreecommitdiff
path: root/3828/CH2/EX2.4/Ex2_4.sce
blob: bb219d5dc7a045b48ec3f44446b2f92b618e84e8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

//Chapter 2 : Diffraction

clear;

//Variable declaration
a=2*10**-4               //slit width                
lamda=6*10**-7           //wavelength

//Calculations
theta=asin(lamda/a)
TLW=4*theta/10**-2
theta1=asin(lamda/a)/10**-3

//Result
mprintf("Total linear width= %.1f cm",TLW)
mprintf("\nAngular position of the minima= %d*10**-3 radian",theta1)