blob: 64f284d63d3666a72957df1775a5407f01624a4b (
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
n1=1
n2=2
lamda=6000*10**-8 //wavelength
N=6000 //number of lines for diffraction grating
//Calculations
theta1=((asin(n1*lamda*N))*180/%pi)
theta2=((asin(n2*lamda*N))*180/%pi)
//Result
mprintf("Angle between 1st and 2nd order line is %.2f degrees",(theta2-theta1))
|
