summaryrefslogtreecommitdiff
path: root/3828/CH2/EX2.8/Ex2_8.sce
blob: f2b383e05fa7e522f1381a80b8e374e81814dcdd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
//Chapter 2 : Diffraction

clear;

//Variable declaration
N=5000                     //number of lines for diffraction grating
n=2                        //second order 
theta2=(30*%pi/180)    //angle in radians

//Calculations
lamda=sin(theta2)/(n*N)/10**-5*10**3

//Result
mprintf("Wavelength lamda= %.0f Armstrong",lamda)