summaryrefslogtreecommitdiff
path: root/2411/CH3/EX3.d.305/Ex3d_5.sce
blob: 976a0f98271bd3110ad0152150674920565df4fc (plain)
1
2
3
4
5
6
7
8
9
10
11
// Scilab Code Ex3d.5: Page-207 (2008)
clc; clear;
N = 4250;    // Number of lines per cm of grating, lines/cm
a_plus_b = 1/N;    // Grating element, cm
n = 2;    // Order of diffraction
theta = 30;    // Angle of diffraction, degree
lambda = sind(theta)*a_plus_b/n;    // Wavelength of spectral line from diffraction condition, cm
printf("\nThe wavelength of spectral line from diffraction condition = %4d angstrom", lambda/1e-008);

// Result
// The wavelength of spectral line from diffraction condition = 5882 angstrom