Z}X oWT2f
FORMAT 20.9 <n#phU Q
GETSYSTEMDATA 1 .$ o0$`}
Nbc1=VEC1(1) .8.4!6~@
Nbc2=VEC1(4) R=7,F6.
Nbc3=VEC1(5) adCTo
Nbc4=VEC1(6) *8I+D>x
Nbc5=VEC1(7) B|fh 4FNy
Nbc6=VEC1(8) $m
hIXA.
Nbc7=VEC1(9) &XvSAw+D@
Nbc8=VEC1(10) AiF'*!1
Nbc9=VEC1(11) N~=,RPjq
Nbc10=VEC1(12) jH5VrN*Q
Nbc11=VEC1(13) s(2/]f$
Nbc12=VEC1(14) [ClDKswq
Nbc13=VEC1(15) OuZPgN
Nbc14=VEC1(16) t[r<&1[&
Nbc15=VEC1(17) "Y1]6
Zu
Nbc16=VEC1(18) k vuSE
ce&Q}_
!////////////////////////////////////////////////////// vk1E!T9X
{M_*hR;lL
KfPYH\0
eb#yCDIC
_ArN[]Z
n=nsur() Y5/SbQYf1
%&Fsk]T%:
hx.ln6=4
PARAXIAL ON Yl$R$u)
RAYTRACE 0,0,0,1 `SfBT1#5G
R=RAYM(n)/RAYN(n) If*+yr|
ld=-1*RAYY(n-1)/R 7]8nW!h;
ld$=$STR(ld) bb4 `s0
n5NwiSE
#/,Wgs AC
Lu][0+-
PARAXIAL OFF w7d<Ky_C
RAYTRACE 0,0,0,1 Y[R;UJE`5
r_1h=RAYM(n)/RAYN(n) _\ &