有時會想知道某一鏡片的有效
焦距 C<6u}czA |@Q(~[It .I
{X I)_072^O 如圖,想知道第二枚鏡片的有效焦距,然後鍵入Eva (efy s3..4) 指令後得到
vlp]!7v 91.7933170054708。
4h:Oo }_@cqx:n^ 但因為第二及第三枚鏡片為膠合鏡,所以前述焦距其實是受到第三枚鏡片影響,而非第二枚鏡片本身在空氣中的焦距。
REQ2pfk0 5}e-\:J>B 應用造鏡者公式,下述函數可計算出第 s1 及 s+1 鏡面所形成之鏡片在空氣中之焦距:
~W%A8`9 !--------------------------------------------------------------------------
Q:>;d-D|1 fct @EleEFY(num ^s1, num ^z)
>^D"% Oj y ^s2== ^s1+1
[)Xu60?Q ^n== (ind s^s1 z^z); ^d == (thi s^s1 z^z)
8[(c'rl|)| ^c1== (cuy s^s1 z^z); ^c2 == (cuy s^s2 z^z)
xm/v:hl= ^K== (^n-1)*(^c1-^c2+(^n-1)/^n*^d*^c1*^c2)
2s?j5 Sd if^K <> 0
K]N^6ome ^EleEFY == 1/^K
hSp[BsF`, els
s3/->1#i ^EleEFY == 1e11
|KplbU0iC endif
z})H$]: $ end fct ^EleEFY
dm)V \?b !---------------------------------------------------------------------------
{~b]6}O q+WO nTS 鍵入eva @EleEFY(3, 1) 得到57.1690177496983。這才是它本身的有效焦距。