shulman@topaz.RUTGERS.EDU (Jeff Shulman) (11/09/85)
[ Uploaded from Delphi - JSS ]
Name: FRACTAL ISLANDS GENERATOR
Date: 7-NOV-1985 19:43 by BURFURD
This generates "fractal islands" using a sort of wonky algorithm. It is very
slow and bad code, as it was converted directly from BASIC, with few amenities
added.
Scott Berfield
(This file must be converted with BinHex 4.0)
:#'CbB@0dB@ac!%&38%aQFQ&M)!#3"bS!T,-!N!3"!*!$+!#3!bF!N!6U!*$c+5K
QFQ&MG'&XFb"@49*658p1)$%Z-#!Y,5"16eC&68*&8L!e,#!a16Je!!!"!2q3")!
!!!'!!'!"J!(i!B!"cJ'!"i-"J$rR`B"rir'$rS"prr`F1rri$ifrjJI(ej("rk`
IJr[i2i"pi0$`Im!#IKhr3$m(pF!KrkUi"H[9@`$9UVrmkpIAhP@mDZjVm$9@9F(
kUk["r9A9Z"qUqpE2e9f[rqUVe9999rq3K!#3!`G"8&"-!*!'('CbB@-!N!-"580
1)`#3"!(#4P*&4J#3"!(#!*!$&3"N!(-!b!''!!%"!*!)J!#3"*!!!!8!N!8h!"3
!9`"l"!C%Eb"*G#%!N!8C!--!+3$Q%!%e!*!'0`#D!&F"!`3%8A9TG!#3"38!0`!
9!2U)'8K[Gb"YB@jj)'CbB@0dGA*P)'aPGQ9XFcm!N!BC!$F!+3#jL")S3Q9dGf9
PEL!a)'&ZC#!h+6S!N!8'!!S!*J!US!)"``#3!``!+`"U!4)"P`$i4%3!!!&Z!!8
!N!A#!(-!hJ$$"!C(*dKPB@3!N!8)!!8!+!!PS!)"``#3"38!,!!i!5Q)894SDA-
JF(0PG@4[,@CbB@0dB@`JF(*[Ch*KE5"TFb"MEh9bG'9cH5"[CL"6BfpdG#"#CA*
QD@9XC#"KEQ3J8'&bDA4j)&"bEf4eBh4TEfjc,J#3"N!!"3"Z!5k)@%C5380838a
6)'eKH5"LC5"NGA"XD@0KG'9N)'&ZC#"NDA0dFQPLGA4PC#"QFQ9PE(NJBA-JE'p
ZCb"KFb"dD'Pc)'j[G'PMC5"bC@eKD@jc)'PZG'&MG#i!N!9d!!S!L3%LL#K'8N&
$9%&-8b"MEh"jFQPRD(3JU5!a16Jf)&0MEh4d)%*PFQCTC@aN!*!&N3!8!,8"')J
p+("c1L"*CL"jEh8JE'PVC5"dD'Pc)("bEfGbB@dX)'G[Ef64DA3RFb"cCA*fC@3
JDA4c)("eFR"[Ff8Z+3#3")$rN!5!!!!"J!"J!B!"q!'!!Fi"J!H$!B!rjm'!Iq2
aJrk!IIrm($[rq!q0[qB(apH4`IqX(i2lq$q!IH$3m(r!!RiGrd!r"rA!)IqUZ!A
Ve9X!eDUrr1[Aepj9['VZDr!e9PA"qUZV`Ie9eEJIU[[@cp9GVrrUUp9999IrN!3
!N!-B!*!$+!!!4-3!N!-)!*!$)"`k2c`!!DR`!!!L)J#3!`&+Eqrm6PErm%*RU'%
pArr`5'lrm%KZrr)r2#!16VSGT%Kk!$*)E[rb2c`!"Nkk(C3#,J"rrr*)E[rb5'i
!#$mm%""1ZKeq6Pj1GG*"6N3JN!3!#N!0rri!N!C+Eqri6PErq#m-+'i!$%*Y[A"
#,J!83QHTFa!I#J!!!F!Y[$eR"UK@3Lfm26!8C`a63'Fb98"R8Q!!!,4)E[rmUA*
#CbmZrra)EEe#U+d3(fF+)'fm2Lm3U&&J"NKYZjUS8@!!!)T)E!!+U(&#CbmX!!T
)EEe#U+d3(fF''h`!!E`p5'`!#UK`B'3[,!!#,c`!!!%!6VSGG#!IDaL`I!!2EK*
"qJ"L-J$Q584"!6!3r`Sm!!4Q1#mZ!"!r2!!"5'fpENKY[@C)EEe5UBd[,EeQ2c`
!!DPGF!-[!%KZrrK1ZKb'(A`!!3!81h`!!Ee`+&p1AL"Ih[`!$%l3e%K&4NP-9%8
!!L!)5Qr[qNj@rrT#,E`h3Hfm"Lm)U'kSrMmmrrp#Cb!IS$+T%UR-3UHTHkK33UF
r2!!"UENVAl`q3Lfm28(Yrj3[#+K[3HhrP#m)U(0)EE[qU*e)EE[fU(a)EIqNU+0
#TkPe+eqlL$mm!!1SL8KY[9T#Ccmm!6ir2!)!2c`"9ULR6Pj1GFP1594*38a*!!"
+Eqrm6PErr%MR!`"#4f!L3NCJ&L!(`I`!JL)'id(338(Y[Ij#F!!!8NB-4J"!Eq4
54`a(!)"[f%cI!-"1ANjeb8j*9%&58N%!!%T[m!"19[rX5'fpd%KZrrBr2"!16VS
EFNKk!F*)E[rf2c`!"%kk'f*)E[rf5'fpd$mm%""1ZKY55'fph%(ZrrC$qJ'3!#$
C)0N`N8KZrrBr2"!%6VSE0!SZ!)$rpNKk!@T)E[rf3QG1ZKXJ5'lrpNKY[G`r2"!
36VSE%"!Yri"R%LYY[G#pP#YY[GbpQ#YY[G#pe%KY[CK)E[rf2c`3$Nkk'ZK)HJ%
D5'lrpMmm!!T1ZKVB8m")EEhF5'lrl$mm%!j1ZKV'5(S!q%KZrq`r2!!+6VSDYP2
"`!&R!!$#3UG)EEf85'lrpMmm%!j1ZKUF5(S!a%KZrrC#Cdkk'Sj)E[rf6VSF8#!
I2`"#TdKY[CK)E[rX2c`3$Nkk'R")HJ#15'lrl%*R6VSDBNKZrqa1ZK`N)"mr!+L
63UG)EEh35'lrpMmm%!j1ZKT#5(S!DNKZrrC#Cdkk'M4)E[rf6VSEpL!I2`"#TdK
Y[Ga)E[rX2c`3$Nkk'KC)HJ!d5'lrl%*R6VSD#%KZrqa1ZK[+)"mr!+L4+ffpd,f
8+ffph,fB6Pj1GG"-6e4-58j&!$a!"+!!N!G!!mJ!N!G!"kX!N!G!")52A#Me`Sp
G2rkTZPie2hcYN6rqS!#3"dT[m!"19[rX5'fp[%KZrrBr2"!16VSCM%KY[Ea)E[r
f2c`3"%kk'Aa)EEfd5'lrl$mm%!j1ZKPX5'fpY%KZrq`r2"!%6VSCA%KZrqa)E[r
f3QG1ZKP15'lrpMmm!"*1ZKP#5'lrpNKY[D!r2"!36VSC-NKY[E4)E[rf2c`3$Nk
k'5*)HJ'N5'lrpMmm!!K1ZKN5CM*)HJ'F3HlrpN2k!B!Jf5$C-*&)E[rf2c`!"Nk
k'2*)E[rf5'fpR$mm%""1ZKMLB!!!N!")E[rf5'fp[%KZrq`r2"!16VSBbNKY[E4
)E[rX2c`3"Nkk',T)E[rX6VSF`&L25'lrpNKY[C`r2"!36VSBS%KY[E4)E[rf2c`
3$Nkk'*!!5(S"%NKZrrBr2!!+6VSBJ'3Z5'fpR%KZrrBr2"!16VSBENKk!1C)E[r
f3QG1ZKKJ5'lrpNKY[C`r2"!36VSB8%KY[Ca)E[rf2c`3$Nkk'%")EEfX5'lrpMm
m%!*1ZKJ`5'lrpNKY[DJr2"!36VSB)%KZrrC)EEfS5'lrl$mm%!j1ZKJ-5'lrl%k
k(!jBMdKY[D")E[rf2c`3"%kk&r*)EEfd5'lrpMmm%!"1ZKIL5'lrpNKY[E3r2"!
36VSAdNKZrrC)EEfS5'lrl$mm%!j1ZKHq5'lrl%kk'laBMdKY[D")E[rf2c`3"%k
k&k4)E[rf5'fp[$mm%""1ZKH86Pj1GG4*6&4%6eG1!"j!!-N2ci$F-h)G!*!+3!#
!!*!(5Qr`!%j@rqa)EEfd5'lrpMmm%!j1ZKG35(S#BNKZrrBr2!!)6VSA3'F!!*4
)E[rf5'fpZ%KZrq`r2"!16VSA+%KY[E4)E[rX2c`3"Nkk&aK)E[rX6VSE(PL25'l
rpNKY[C`r2"!36VS@rNKY[E4)E[rf2c`3$Nkk&Zj)HJ)!5'lrpMmm!!T1ZKEHC#j
)EEfF5'lrpMmm%!j1ZKE-5(S"bNKZrrC#Cdkk&Vj)E[rf5'fpR$mm%""1ZKDZB!!
!L%KY[EK)E[rf2c`3$Nkk&TT)HJ'X5'lrpMmm!!T1ZKD+BMC)HJ'3!%(ZrrC$qJ&
q)0NJf6#45'lrpMmm!!C1ZKCU#Li!J2rf5'lrpNKY[C`r2"!36VS@9'!Z5(S"@N(
ZrrC$qJ&))0NJf6#45'lrpMmm!!C1ZKBd5'lrpNKY[C`r2"!36VS@*%KY[Ca)E[r
f2c`3$Nkk&K4)EEfN5'lrpMmm%!"1ZKB%5'lrpNKY[DJr2"!36VS9p%KY[E4)E[r
f2c`3$Nkk&H4)EEfd5'lrpMmm%!41ZKA85'fpZ%KZrq`r2"!16VS9a%KY[EK)E[r
X2c`3"%kk&E4)E[rX5'lrpN*R6VS9TNKZrrBr2!!56VS9QNKZrrC)EEfJ2c`3%%k
k&BT)E[rf5'fpU%KZrq`r2"!16VS9GNKZrqa1ZKPi@)p)EEfJ5'lrpMmm%!41ZK9
F5'lrpNKY[E3r2"!36VS96%KZrrC)EEfS5'lrl$mm%!j1ZK8i5'lrl%kk'6CBMdK
Y[D")E[rf2c`3"%kk&4j)E[rf5'fpZ$mm%""1ZK816Pj1GG*29%&845!J!"j!!-N
2ci$F-h)G3!#!!*!45Qr`!%j@rq4)EEfd5'lrpMmm%!j1ZK6+5(S"6%KZrrBr2!!
%6VS8ZNKZrrC)EEfd2c`3%%kk&+T)EEfi5'lrpMmm%!j1ZK5D5(S"(%KZrrBr2!!
%6VS8LNKZrrC)EEfi2c`3%%kk&(T)EEfm5'lrpMmm%!j1ZK4U5(S!l%KZrrBr2!!
%6VS8@NKZrrC)EEfm2c`3%%kk&%T1Z[cJ6VVkS%KY[G4)E[rf2c`3$Nkk&$*)HJ#
U5'lrpMmm!!K1ZK3LCJJEI!!"ri"J"%)Yri"#TdKY[EK)E[rf2c`3$Nkk&!*)E[r
f6VS9a#eIrqK)E[rS5'lrl$mm+!j1ZK2Q5'lrl%KY[G!r2"!36VS6eN+R5'fp[%K
ZrrBr2"!16VS6a%KZrrC1ZK@',9rrj%KZrq4)E[rX2c`S$Nkk%kK)E[rX5'fph$m
m%""1ZK1B6VVi$%jH6RA06eC&8%a29!!8`!Mj`!#3"MrlK4ki8HZ&(VP+Er!!6PE
rl%KY[G4)E[rf2c`3$Nkk%eT)HJ,J5'lrpMmm!!K1ZK0+C`!#B%KY[B")E[rf2c`
3$Nkk%cC)HJ+b5'lrpMmm!!T1ZK-QAX")EEfm5'lrl$mm%!j1ZK-85(S#N!")E[r
X2c`!#Nkk%`4H`F!"C`SVEEfm[B"J!!*D5'fpJ%KZrrBr2"!16VS5j%Kk!Q")E[r
f2c`!#Nkk%Y49`%KY[Ea)E[rX2c`3$Nkk%X*)HJ)q5'lrl$mm!!T1ZK+b9F(!!@F
D+ffp[,f!5(S#)NKY[E`r2"!36VS5PQ!!!IK)EEfm5'lrpMmm%!j1ZK+#5'fp[%K
Zrq`r2"!16VS5FNKY[B")E[rX2c`3!Nkk%Q*)E[rX5'lrpMmm!!C1ZK*55'lrpNK
Y[B3r2"!36VS53NKY[AK)E[rf2c`3$Nkk%M*)EEfd5'lrpMmm%!*1ZK)L5'fpK%K
ZrrBr2"!%6VS5%NKY[E4)E[rf2c`3!%kk%J*)E[rf5'fpL$mm%""1ZK(b5'fpI%K
ZrrBr2"!16VS4iNKY[EK)E[rf2c`3!Nkk%G*)EEf%5'lrpMmm%!41ZK(#5'fpZ%K
ZrrBr2"!!6VS4XNKZrrC)EEf-2c`3%%kk%D*)HJ%H5'fpN!!r2"!36VS4NLYY[Eb
pb#YY[ELpa#YY[E5p`%KY[Ea)E[rf2c`3$Nkk%A")HJ$X5'lrpMmm!!T1ZK&JEcB
VEEf3!,fm+ffpM,fi+ffpL,fd6VVmD%KYZrkSR5YY[FLp[#YY[F5pZ#YY[F#pY#Y
Y[EbpJ'!q+ffpN!#p[#YY[BbpZ#YY[BLpY%kkr$*)EE[HU*e)HJ#)5'fp[$mm%""
1ZK$m+ffpa,fi+ffp`,fd+ffpb,f!B%a)EEfm5'lrpMmm%!j1ZK$B5(S!9%KZrrB
r2!!+6VS3b'3H5'flhULG+ffp[,f!5(S!0NKY[E`r2"!36VS3UQ!-5'flrULG+ff
p[,f!+ffpY,ei+ffpZ,em6Pj1GG0&38a&9N9-!"3!N!V!#2R!!*!'5Qr`!%j@!!!
`,EhbX'fplQmF-#fpl&*!N!"Y[I)l3,hm-#fpl*!!EEh`1d#pqQ!-1ffpmVhm1ff
pm,hk-#fpqX(m!))b,Ehmid(338(Y[IiaVEhd!!"1ANjed&9839*539N!!%T[m!"
19J!!-#fpmV"Y[Hj[($!Y[Ha53*!!EEhb1d#pr$!Y[Hb3!'fpm$Y![ITJ$$YY[I+
pr$YY[I#pqM!Y[IV"r!##-Lfpr10"d%&"lEhq1h!!!,hd6Pj1GFG&9%&58N&C!!"
+Er!!6PErfNKk!bC)EEh-2c`3%%kk$j*)EEh-5'lrpMmm%!j1ZJq#-#fpl&0!28$
rp%KZrr4)E[rf2c`J#Nkk$fKL!!,+5'fpkNKZrrBr2#!16VS29%KZrrC)EEhB2c`
3%%kk$d4)EEhB5'lrpMmm%!j1ZJmd5'fpl%KZrqSr2#!16VS2*%KY[Fa)E[rU2c`
3!Nkk$a4)E[rU5'lrpMmm!!T1ZJm%BJ!#-N+R5'fpc%KZrrBr2"!16VS1lNKY[GK
)E[rf2c`3!%kk$Yj)EEhU5'lrpMmm)!*1ZJl15'lrpNkk%*!!)"ml3,h`3UG)EEh
B5'lrpMmm%!j1ZJkZ5'fpkNKZrrBr2#!#6VS1RNKZrrC1ZK"J)"ml3,hb6VVqJMY
Y[I5ppN+R5'fpc%KZrrBr2"!16VS1G%KY[GK)E[rf2c`3!%kk$Q4)EEhU5'lrpMm
m)!"1ZJj85'lrpNkk%"BJ(cY![I"#TdKY[GK)E[rf2c`3$Nkk$M4)EEhU5'lrpMm
m)!"1ZJiN5'lrpNkk$qBJ(cY![I*1Z[i)1ffpp,hi3UG)EEh-5'lrpMmm%!j1ZJh
k5'fpf%KZrrBr2"!!6VS0kNKZrrC1ZJqX)"ml3,h`3UG)EEhB5'lrpMmm%!j1ZJh
+5'lrpNkk$i`J(cY![I*#Tc!Y[IM3EEhf28$rk%KZrqK)E[rf2c`J$Nkk$Cj)HJ%
B5'lrpMmm!!C1ZJf13UG1ZZr',9rrj%KZrq4)E[rU2c`3$Nkk$A4)EEhQ5'lrkMm
m)!41ZJeN5(S!hNKZrqSr2!!'6VS09%KZrqT)E[rf3QG1ZJe'5'fpjNKZrpSr2#!
16VS00NKk!+C)E[rD2c`!"Nkk$5C)E[rD5'lrpMmm!!*1ZJd@5'lrpNkk$YJJ(cY
![I41Z[bB5'fpf%KZrrBr2"!16VS-p%KY[E")E[rf2c`3!%kk$14)E[rf5'fpf$m
m%""1ZJc8B!$pMNKY[Fa)E[rf2c`3$Nkk$-")EEf`5'lrpMmm%!"1ZJb`5'lrpNK
Y[F`r2"!36VS-S'!!r3a1ANjea%P"4dK&58F!(N!"J!#3"d!!J!#3%8T[m!"19[r
F5'fpl%KZrrBr2#!16VS-@%KZrrC)EEh-2c`3%%kk$%K)EEh-5'lrpMmm%!j1ZJ`
i5(S#E%KZrrBr2!!+6VS-+'d!!MT)EEhU5'lrpMmm)!j1ZJ`85'lrpNKY[GJr2"!
36VS-"%KY[GK)E[rf2c`3$Nkk#r4)EEh-5'lrpMmm%!T1ZJ[NBJ!"`N+R5'fpc%K
ZrrBr2"!16VS,cNKZrrC1ZJf3!#!I1d#pm%+R5'fpf%KZrrBr2"!16VS,VNKY[HT
)E[rf2c`J!%kk#jj)E[rf6VS0B#!I1d#pmNkkqi)lEEhd[IC#TdKY[GK)E[rf2c`
3$Nkk#h4)EEhU5'lrpMmm)!*1ZJYN5'lrpNkk$5BJ(cY![I*1Z[Y)1ffpp,hi3UF
`,Ehid'fppMe!rr4)E[rd5'lrpMmm)!j1ZJXZ5(S"@%KZrrBr2!!'6VS,(N+R6VV
Y9LeIrqC)E[rQ5'lrkMmm%!j1ZJX%5'fpjNKZrqSr2#!%6VS+p%Kk!4j)E[rU2c`
!"Nkk#Z4)E[rU5'lrpN*R6VS+eNKY[HC)E[rF2c`J$Nkk#XC)HJ$Q5'lrh$mm!!C
1ZJUf5'lrh%KZrrBr2!!#6VS+TNKZrrC1ZJaS)"ml3,hd3UG)EEh-5'lrpMmm%!j
1ZJU'5'lrpNkk$%JJ(cY![I"#TdKY[GK)E[rf2c`3$Nkk#QC)E[rf6VS-+#!I1d#
pmNkkqHK)EEhB5'lrpMmm%!j1ZJT%5'fpX%KZrrBr2"!!6VS+0%KZrrC)EEhB2c`
3%%kk#L4J!2iH5'fpc%KZrrBr2"!16VS+%%KY[E")E[rf2c`3!Nkk#J")E[rf5'f
pc$mm%""1ZJR`B!$pTNjH6RAC5%9*4dK8)!!H3!'!!*!(3!#!!*!(2rq!!*!(5Qr
`!%j@rpT)HJ+Q5'fpf$mm%""1ZJQS5'fpf%KZrrBr2"!16VS*Q$!Y[Ha63$e!rr4
)E[rd5'lrpMmm)!T1ZJPqBJ!#5NKY[HT)E[rf2c`J$Nkk#@T)EEhB5'lrpMmm%!"
1ZJPD5'lrpNKY[F`r2"!36VS*5NKY[Fa)E[rf2c`3$Nkk#6T)EEhX5'lrpMmm)!T
1ZJNUBJ!"`N+R5'fpc%KZrrBr2"!16VS*&%KY[HT)E[rf2c`J!Nkk#34)E[rf6VS
+aL!I1d#pm%+R5'fpf%KZrrBr2"!16VS)j%KZrrC1ZJUQ)"ml3,hb6VVib$YY[I5
ppN+R5'fpc%KZrrBr2"!16VS)ZNKY[HT)E[rf2c`J!%kk#+T)E[rf6VS+E#!I1d#
pm%kkq)ilEEhd[IK#Tc!Y[IM3EEhf28$rmNKZrr*)E[rf2c`J$Nkk#(4)HJ&B5'l
rpMmm!!C1ZJKN3UG1ZZUF,9rrj%KZrq4)E[rS2c`3$Nkk#%T)EEhQ5'lrk$mm)!4
1ZJJk5(S"(NKZrqJr2!!'6VS)+NKZrqK)E[rf3QG1ZJJF5'fpjNKZrpSr2#!16VS
)$%Kk!1C)E[rD2c`!"Nkk"ra)E[rD5'lrpMmm!!*1ZJIX5'lrpNkk#DiJ(cY![I4
#TdKY[Fa)E[rf2c`3$Nkk"ma)E[rf6VS*ML!I1d#pm%+R5'fpf%KZrrBr2"!16VS
(V%KZrrC1ZJPZ)"ml3,hb6VVh,NKY[Fa)E[rf2c`3$Nkk"iT)EEf`5'lrpMmm%!"
1ZJGk5'lrpNKY[F`r2"!36VS(DQ!!rKj)EEhB5'lrpMmm%!j1ZJG@5'fpX%KZrrB
r2"!!6VS(4NKZrrC)EEhB2c`3%%kk"cCJ!2f-6Pj1GGK)48P(5&3J!"j!!B!!N!G
!!)!!N"&+Er!!6PErl%kkp[")EEhd5'lrpMmm)!j1ZJEU5'lrpNKY[E`r2"!36VS
'fNKY[I*)E[rf2c`J$Nkk"XT)EEhX5'lrpMmm)!C1ZJDk5(S!VNKZrrBr2!!%6VS
'UNKZrrC)EEfi2c`3%%kk"TT)EEh`5'lrpMmm)!j1ZJD+5'fpl%KZrrBr2#!'6VS
'HNKk!'j)E[rf2c`!"%kk"QT)EEfi5'lrl$mm%!j1ZJCD5(S!4%KZrq`r2!!'6VS
'5NKZrqa)E[rf2c`!!Nkk"MT)E[rf5'fpY$mm%""1ZJBU6VVbYNkkm8*1ANjea&*
"9dP14b!!&%!!J!#3"d!-R%!!N!C+Eqrq6PErh#m(2ccrrd*R)"qJ-MYm!!+pj$e
Y[HMrr(i"B%*#Tc!Y[H4)`#)(8d&)`5m"FJ)[!8kk"`3L(p+!,8(rlNKZrqj)E[r
b2c`S$Nkk"Da)E[rb6VS(EL!I1d#pj&*(D3DqE[rmElJ`,EhN8d!l3,hX3UG)EEh
X5'lrmMmm)!j1ZJ9i5(S#R%KZrr)r2!!'6VS&D%KZrr*1ZJFU)"ml3,hZ5(S#G%(
Zrr*$qJ*L)0NJf6#45'lrmMmm!!41ZJ8m5(S#3NKZrr)r2!!'6VS&,%KZrr*)EEf
N2c`3%%kk"4a)EEfN5'lrmMmm%!j1ZJ8-5(S##%KZrr)r2!!%6VS%r%KZrr*)EEf
X2c`3%%kk"1`pEEhSrqaq!@!!!5)r2!!8)!I"r!!22`#SNd+R5'lrmNKk!Eir"dk
k#'TBMdKZrr*"l[rL3rS"S#$C)0N`N8KZrq)r2!!'6VS%SNKZrq*1ZJCN)"ml3,h
Q-!G63'Y8$%!!"Qj1idJ`1`!'6[X!N!-3!"J!)!!S!$!!1!"!5(S"4+L%B#j)HJ%
SU)4J*NKk!3bSK'!H5(S!m+L%B"C)HJ$8U)4J$NKk!,LSK'!'5(S!R+L%3UG)EEh
X5'lrmMmm)!j1ZJ3S5-F["h!#,`"1ZJ9F,9rrhNKZrpj)E[rb2c`S"Nkk"!K)E[r
b6VS&bL!I1d#pkM!Y[HVM3$e!rpa)E[rF5'lrmMmm)!j1ZJ2J5'lrmNKY[E!r2"!
36VS$d%kkqJj1Z[GD6VVd(&*(D3LqE[rXE`$qfNKYrk5SSbiI6Pj1GFC5380899*
&!0)59fpbDfPZCb"[EL"XCACPE#!h!"*AEh*VD@jR)'pZ)'aPGQ9X)$B!%PG[FQY
TEQFJEfiJE'9fC@`J03!59fpbDfPZCb"[EL"XCACPE#!d!"*AEh*VD@jR)'pZ)'a
PGQ9X)$-!%PG[FQYTEQFJEfiJE'9fC@`J-J!59fpbDfPZCb"[EL"XCACPE#!a!%!
-R%!!N!BrrqCQN!CR2rqCN!K!"V3!N!G!!-N2ci$F-h)G3!2`!*!(3!#!!*!(5Qr
`!%j@!!!r22rr3QFJ(k!b3LhrJ8*R2ccrrdKYri5TF"YIri%3,Iq"CqT1ANjeb84
-45#3"!!!5Qr[r%j@rra#Tcmm!)"#Th$r,`#TI#YI[A)r22rr3QFJ(k!b,bfpFMm
m!!*)EEeZ5'fpBNKY[8+TM5mY[A+SFkK33IVNl#m)5'fpF+Q4,bfpFMmY[A")EEe
Z5'fpDNKY[8UTM3aY!!'pF&I!$'d!!le`9m'!!@I+$'d!!le`CJ+Tp#mY[@*)EEa
#UC!!5'fm3NKZrra1ZJBd$+i!N!-"rraF`!bZ!*!$"rrmAm(!!@F)1flrrVhSB!B
lI!!&[HJ[,EebUB0"lIq8,`LSFdKYrk5SSdjH6RA*6P"99%4*33!!5Qr[rNj@rrk
S8d*R2c`$k8+RUB8pArrq5'hrT+LM6Pj1GFe984P*"!!"1ZJ-S6PB!!#aI6P@
m+TrY!""1ZJ-U6VVP%NkkrlLS8%kkjC41Z[l1U&*1Z[YH1ffpl,`d3Qfpm'!f5(S
"3NKY[G3r2"!36VS"3$YY[I#m-N*Y[I*J#NkkqLa5EEhbD3S`,EhbX'fm-QrX8Qf
pm'N+-#fpm,"Y[$4[`$YY[Hbm-%*Y[I*J1%Kk!2C)EEh82c`3%%kk!23lEEhX[#i
lEEhb[I"J#NkkqGj5EEh`D3S`,Eh`X'fm,QrX8QfpmQN+-#fpmV"Y[$"[[MYY[Hb
m,%*Y[H"J6NKk!+K)EEh82c`3%%kk!+B`,EhXN!"Y[H!l3,`U3QfpiQ!F-#fpiY"
Y[H!l3,h`1ffpiVhb6VVjHP*Y[H*T#M!Y[H+`EE`UEpT5EEhJD3S`,EhJX'fm,'q
S5'fp@ULM2c`!Qcmm!8#SNdKk!#DSK%kkrACJ!2l@6VS"rNjG6VS"kNje6Pj1GFC
5380838a6!#3B3faTBfXJBR9dG'pZ)(4[)'0[ER4TER9P!-!)qF!!N!DYkb!I)Pm
JAbm!S$XLJ%je6PB!!%+Y[#C#,E`J3Lfm)8+Y["T#VE`@3Ufm#NjH6R@P58j*9%K
&33!!6PB!!#aI,`![!6![!"$"l`!1-Lm!$-2[!",338K!3N!b,`!5`Zm!$Y#",d!
!%#)I)"m[9`!%@)p1G8jH6R8P59p098`d)%j@!!![!#m")#m!&#)[!""1ZJ!k,d%
!&#)I)"p1ALpA!!4BMdje6PB!!#m!,`%J,`!8)Lm!%%kk!"3[3!!8)KmJ(djH,eF
!"&L26R919J!!,&p)jci!+J"U!N5!,!&U!N5"*!&)3NT#CK`f!%*!5%"R")$"0!"
)3M!$J-%d!#)#3N")3'!F*!!Q!8+!3S&i(p5#dB$5JE#$E353!)05!9(-rr"+K@S
#4)#lKQS#4)&-h`"m6R91ANje584*9Ne24#"19J!!51IJ!(3")#m!&#)[!"KU!N5
"CbB)!3!!C`S[!#m#6VVqeL3I$)%!N!-"E`S[!#m!6VVqa#!IiS&QfL)[!"KX$(!
",`![!Nkkr[3N(bp#!"K-h`!(6Pi[9`!%@)p1G8+[!"""qJ!))+m!"%je!*!%6R8
JAdjG,`K1Z[j56R8JAdj9!!"1d&@26VS!T"mm!!01ZJ"Q-"mJAdkk!Bi[#$m!6VS
!9Nje)&pd(m4IB!JJAh3Ia&rK5Q%b3PI!3QF#8KG1d'%DiJPP"NC#`%)d!)"#2`"
)9cmm!!'Tke526Y!LAb"I%Kpd(m4I,`P9MdKA2c`!!kRV-"p1G5"IBHi#3*rr0"r
V5J*#B!"Ja'(5i8VL#@5f-J!#3H$rJN)r!8KA2c`!!DRV9)mr!#m)6[S![#"IBEM
R@'!@)&pKX!)!!*pd!"3IkdTJL#"IBD$U#!)!!!-HJ%l360m$"f%8,`)[#5"!2c`
!$+RV,`NL36+!6Y!Lf#,B-T!!8BK4L8je60m$!A3(%K%L9f(S"C&+!@S`"G&J,%c
I!3&)9b*[!!B[#@(30$`J''&19)mZL@!560m$"5m*BE`[#5m#2c`!%kRV)%"1d(!
8B!*`'NcI!3)L9bm*BCiJ36m!UHY1d(3")&p)9f%59)p1d(3$B!Cd'@$ZG"FLAf!
#)Pmr!URV6Y%LAdK[!!4JmNcI!`&)9dMR!-"d#f(L@)pJU#*I*"mL&dMRB!"d#@$
50$`J%'$50$`S%'$-)&p#3(3)BEaP#Qi'C`*5!&)!8J!HJ%l360m$!f&@`iN[!8M
R3%!r2)!5)(J+c")3UH`3J@!L)"mJE`!#)Qm!"Q%b5&F[#6mmJ"!JH!V-%K#Tl"#
"A)mZL5"!6Y!J(b"A2c`!)#*i#X`5%DRX%S%L9f%#B13Lf#,B-T!!8BK4L8jeF!*
J)R!%B"j`#Q!DF!aJ&R!FB"*`''!1F"TJ#R!HB!C`!'!#F!K-h`%#)PF[#5,B)YJ
bN!!J36m!)RJ+c")4UH`5J8l3)'m!#$mm!!'TlL"[!!3JJ%lk!!iJE`!%)#m!#%*
RUHiJAe"26Y!!N-JF!1S!#%024%8!!3"+58026J#3!f*"6&*8!*!$EN4*9%`!!3"
k4%a24`#3!j*#6N4-!*!$RNC548B!N!1U5801)`#3!lCQFQ&M!*!$`J!!rrmJ!!3
2!*!&!Irr0!!%+`#3"!($rrm!!!1,!*!%!qRrr`!!!JN!N!@!rrm!!!&e!*!&q2r
r!!!#'3#3"B$rr`!!!9`!N!3"`[rr!!!"2!#3"!(#rrm!!!%a!*!%!F,rr`#3!bd
!N!Errb!!N2m!N"jAYJ: