blob: 3899f92ca8ca793ab25606e234fce0b89f973f62 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
//chapter8,Example8_13,pg 193
lam=6000*10^-10
b1=30//for m=1
b2=6//for m=2
//(1/b)-(1/a)=(n*lam)/(R1^2), b=b1,b2
//from b1,b2 equations
a=((5*b2)-(3*b1))/2
R1=sqrt(lam/((1/b1)-(1/a)))
F1=(R1^2)/lam
printf("distance of source from zone plate\n")
printf("a=%.2f cm",a)
printf("\nradius of 1st zone plate\n")
printf("R1=%.4f cm",R1)
printf("\nprincipal focal length\n")
printf("F1=%.2f cm",F1)
|
