blob: 31025b0090e070d5c2093566898640592e6af9fa (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
//chapter8,Example8_17,pg 210
grat=1/6000
f=30
n=2
lam1=5770*10^-8
lam2=5460*10^-8
dlam=lam1-lam2
lam=lam2
theta=acos(sqrt(1-(((n*lam)/grat)^2)))
dl=((n*f)/(grat*cos(theta)))*dlam
printf("linear separation of two spectral lines\n")
printf("dl=%.4f cm",dl)
|
