Einfachspalt

Gitter

b und g in μm, λ in nm
(oder jeweils um gleichen Faktor skaliert)

Intensitätsverteilung hinter einem Beugungsgitter 
mit  N Spalten, Gitterkonstante g und Einzelspaltbreite b
für zwei Wellenlaängen λ_1 und λ_2

λ_2 = 555 (slider from 400 to 750, step 1)
N = 15 (slider from 1 to 200, step 1)
g = 3.9 (slider from 0.1 to 10, step 0.1)
s_2(α) = (((π * 1000) * g / λ_2) * sin(α°))
b = 1.3 (slider from 0.1 to 10, step 0.1)
r_2(α) = (((π * 1000) * b / λ_2) * sin(α°))
ES_2(α) = If[-90 ≤ α ≤ 90, (sin(r_2(α)) / r_2(α))^(2)]
λ_1 = 700 (slider from 400 to 750, step 1)
r_1(α) = (((π * 1000) * b / λ_1) * sin(α°))
s_1(α) = (((π * 1000) * g / λ_1) * sin(α°))
ES_1(α) = If[-90 ≤ α ≤ 90, (sin(r_1(α)) / r_1(α))^(2)]
I_1(α) = If[-90 ≤ α ≤ 90, (ES_1(α) * (sin((N * s_1(α))) / sin(s_1(α)))^(2) / N^(2))]
I_2(α) = If[-90 ≤ α ≤ 90, (ES_2(α) * (sin((N * s_2(α))) / sin(s_2(α)))^(2) / N^(2))]