有時會想知道某一鏡片的有效
焦距 o>HU4O} yof8L WXx
Mc{-2 "V`5 $ur 如圖,想知道第二枚鏡片的有效焦距,然後鍵入Eva (efy s3..4) 指令後得到
;_#<a*f 91.7933170054708。
G7%f|
Y dOVu D( 但因為第二及第三枚鏡片為膠合鏡,所以前述焦距其實是受到第三枚鏡片影響,而非第二枚鏡片本身在空氣中的焦距。
?\$6"c<G p8j*m~4B 應用造鏡者公式,下述函數可計算出第 s1 及 s+1 鏡面所形成之鏡片在空氣中之焦距:
fR]KXfZ !--------------------------------------------------------------------------
[1e]_9)p fct @EleEFY(num ^s1, num ^z)
C!U$<_I\2 ^s2== ^s1+1
=w/AJ%6 ^n== (ind s^s1 z^z); ^d == (thi s^s1 z^z)
B+z>$6 ^c1== (cuy s^s1 z^z); ^c2 == (cuy s^s2 z^z)
}/QtIY#I ^K== (^n-1)*(^c1-^c2+(^n-1)/^n*^d*^c1*^c2)
W3jwc{lj if^K <> 0
7^<6|>j4 ^EleEFY == 1/^K
e~geBlLar els
9Dp0Pi?29 ^EleEFY == 1e11
}#S1!TU endif
:eIQF7- end fct ^EleEFY
gv){&=9/
!---------------------------------------------------------------------------
{E0\mZ2 }Fsr"RER@{ 鍵入eva @EleEFY(3, 1) 得到57.1690177496983。這才是它本身的有效焦距。