[comp.binaries.atari.st] v01i004: mwc:all:uue;arc Xprolog - prolog interpreter , Part03/03

atari-sources-request@daisy.UUCP (10/14/87)

Submitted by: Andreas Toenne <ihnp4!likewise!uunet!unido!laura.irb!atoenne>
comp.binaries.atari.st: Volume 1, Issue 4
Archive-name: Xprolog/Part03



Hi James,

this is the improved version of my Xprolog.
It took more time than I though first but I hope it's worth waiting :-)
It's uuencoded and arc'ed.
I would be glad if you submit it to comp.binaries.atari.st.
Xprolog 2.0 runs on all Atari machines but due to an odd bug in MWC it
doesn't catch ^C on a Mega ST.

	Regards
	Andreas Toenne
	University of Dortmund, W-Germany
	Dept. of CS

	atoenne@unido.uucp
	atoenne@unido.bitnet
	...!uunet!unido!atoenne

+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
[Editor's Note]
	 My prolog is rusty so i haven't really beaten this up, but it does
 run with the aformentioned cavaet about the mega ST's. The cksm's are:

bytes =    31299(    31799)   cksm = 2698   xproloa.uue
bytes =    31290(    31790)   cksm = 3967   xprolob.uue
bytes =    14042(    14270)   cksm = 3613   xproloc.uue
bytes =    54511(    54813)   cksm = 1653   xprolog.arc

+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
table
 !"#$%&'()*+,-./0123456789:;<=>?
@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_
begin part c
M4<4T3&=K 'D0+"%I$(0Q4GB*+(&(-C-FKYAZ5PA5>&!#5!-7/U61!\$$?A,Ac
M/'(HK7)6=8$3B @MF/52]HB.3#@1=\.%BS,GTA02W((3+M$J.-$K;9!EM+59c
M3R,P(+<5:<AF/SD >HEIM04Y'V<L6V%G= 65VV55Z*,;5#D -*),-H)@5+8Dc
M5S:7!X8C@M5S*B=L5B!F$"1M!6&&_R$UT*:&\J@BQ4(MR/,9SKB,E4%W-1(Ac
M1!9)FL*&I\@HT:=85L$#3]4P#<%/E'(%;W)<Z+B"F7<BB/@&8T!*<V!:;%$&c
M*Q1YM18V("!?F,@2+-&03(<"3H"7$_$$9H!"+@@;M7$$J^@1>3$$MD@&XLETc
M*4"1 B@5A =_/0E*>8(3NAAE[<(AP"=4HC%\&X->AW)967%<@3<>J&DW&68Zc
MKF(L>U%K\\5X\5(M+I&*-C*//<EEP[.<S:6:17$WW,D?"\84B+@W]JDG4W42c
M[60MZ?B*#)*@1EA2'($1>^-S0"=T$+$0EF2)&Q>?/C)8,+9"]I@J,D$33+&#c
M=W,"K?)ST282_ *;.G(JF+$I.)*D;;&D0/=)3WI]*Q88(D02ZL01)U 708$&c
M*-"9;#!F[RD2RS1@>/%GUB-!4BI"9(!!F @6L^4KQ%%[2AD&)6$L6 H1+#$'c
M6VH5Z)6=7<$&9@"?UJ<2G1A"FT*F/M,4;P M<@@2\DB*9D9%"X-(4JH5M$@[c
MM9$2#9,'3(,'#ZJA"1II:D$'GII%V3(["S.JRS0YJJI(<9:H9O"JFX%>YL5*c
M&DJJ#A-G#I@>O JJLJI+TP:F860HGSI /+ 2>B%8+V(UJIF5R#-IE<$2*C*7c
MO8(2JI([B,40<<%Z*N$#'!&MT/.4O=DA5Z$EE-HJ"NI_XTI4_"D:$;@30^ 0c
M%!(D@8FN]P0"35 W(%$K "M+2*B$Z6@L&CH%6"AJT*HBE6$AY((&(W6P''%+c
M%-@N0EF6E5$&]O(](=&@DR.=&DJR.\&2-:D;'%$M?");!6L5LL,@T<%GMJ5"c
MMW44(U80I=@1$-.B@Z:6*JM&5W>,2I,"FI,X%GN?9+%38OI43"9)*""111$Uc
M: 4X=>$@_$%C]K,R(+ YSM)-/VN%Z<&"Q$&U(0&VE39L(U5#V0,9NT$M;R"Fc
M6T"UK58;=EM:(& > ] %]M-_ZG1;,#0'#XL'>_5(TGD"EY<C&#.UQ=)J5RLDc
M65L'6[NF*1$Q9S&?OH6>&PB*KK,@T-,K/I-&A](0;JFY,5114O,B$Z$I$!$Fc
M;>!!9@,Y5 NX("52HDM/@1E2K!L;]12?Y@,H=@%C%\H2@?$1#;J  %4C'2I"c
MAY*W@!)4'30>H&0N;*1ED,@@)] "C%H00:!$-:*GE',B'A6X0KB\E7@D-*9Mc
MC2('%*F1-\EE;X4TXW$HQP<U=C- PEE#$55KTHL\%D(H=?$JUN(W<#!Y3(&Yc
M>;>**6(V+0O NH%\Q*&A#9-=K^@^F[1 MO*,'+&_2M*_4(LQ:?2BQ8+ 9$D&c
M.O)9@5G!I'LA00%DXE$0L&L1!;2V(%LCDR%## R)E107EK0IL N)/V!FCZ,#c
M9G:GV<)A',D]FQ$5)M%<2C+$@6G$TK,F7<$45'R-ZHLH()(C=%,9*% 5(-46c
M3O(X)Y 'GUEC&MH64T49+D5#4[=B"KE\";LW@]-9#NN4 Y2$>J,8G^5(*DPDc
M@H>9G;*&<6:8&V=F"G)&-F*$>*;%%4A8L\@QR2B#U/)9>^48A"P@\BC(TP9\c
M9? 5%)$ *$ [V4@'Q%-9@RE_QD,YQD46=W A<U=W*A'+W4)C<:8<U40>I=S(c
ME:7+<;S(U8'*U!.N_?(O>SD:N-RHV0@HFU5_%I(J;<!CBL,^#*(E$V%>A5<7c
M+UD9&OHU'-&;4?4D.\'-E%$;WS)#-@LY)_ %W9L *@FVW"0V%T)_8$AWJ&8Cc
M$Y&TG'.B7JD9#E%XI!6];L 107(&)Z*UEYBNMO*C/O(G81>^E=47A5RG#G$4c
M3H+/4DH9JO(1X%A1.0D"!YL T5I[T-',&.9_0] $2S(X1M4&<[DI077'#^$Dc
M(\T1G:DV=_9"IP1W0I,[5"-?$Z7-*F'.A,DS0*TD[?S.\>PR1T&#-Z;3)X(Cc
M[8(C<<'/_H17AU(T?F9!'('(2^+.=)P 4] PP^S(,1@9,D%R(?>BD&6,4,(@c
MZ>$@,J858Q%8"-P7(%*:;'8WWRMZX%-K&IUJ$P$2,LM *10U*XP\IW5$(-J=c
M8T28E<?7RGRX#50&=*T9=HUI7,)C?'(',O&2M BW<NT9KF43$F-IELP1?&A?c
M;6H1H6P1.;0\;RT'CFLYM9$>3Z6.-=,M]4,I?,P_5H:IU%<8(2&ZG5P\<N<Bc
M3*& "2;79MW(Q1Q4C&/%*J&M' &FKBC7)'DB*AIRH+T7SOLF'#P>5Z8@<:P>c
M(3DVD7%$@LL46] %$"A4PBS=M2RNR*-L*-$;"%K;2V(_*QS+!+F&UATH:&A\c
MBA1RAX+<2'PF=6HNA.N4-G;-F'I;&3) Y?&3!_ "(, %/TD S&,Y>_N3"<#Ac
M'CX>P%@ NHTC.$&5!9   6GB/UD O8T3^Q;?,SX7(>$"MZT@M<'C*TX;>XL"c
M-5X;\9T"!]'@W6TL$9Z%M5:WE>/C;+K;5EPY9."W7FN_"3Z6(H4M((LJRIB+c
M;C&/[5W.F%H;/[<@''$J/O&1/Y4M4D$UX2TZXP'EN#WE+%[EW0("?  "4L!Ec
MD$$%NI$$<T %B@2>*'3>=(#EUM<F6PT]7HX'8'XB>(*BGQW:-E'0=1[B4A[Dc
MO/T1>][G\2W?&U0W8]T31F,LU_M2FX7<)0<YBZQ?,U+!H@B#KAYRH"S*(7$'c
M'ETK%4H]\V5\%Q($4S $29 $I[;1R#+KK1?'<Y[I-O0N\:+0$'0W(D#39R "c
MM3:@BIT86\!IM1$#,4 #X7X0X0X#.%#N W#N,\#H")L 2=@__W/:*$@8S#*Mc
ME.0B,'(BU=(JM5B 4&.K4*+?DP/8;L4QK74JPG6GA9?PKQ7'5-T:8P'*U$//c
M$;:PW@PET8$H"T(&!UH0!)76!J9EE35?7_R*RN=8CX-6A;P9$U0@)RV5N@$"c
M*X ",< ",E!CY5/JK'3I>Y'I(&)R-'\1?JTD#A_8R;C6:326(W%_8W'TY+F2c
M.%.N==W%]7C7C!W-(\JV3,LG5 /U<G WT:I5WEPQ7&D58"D3)(1>6P'V?==<c
M'L/2&,O,CSHK5#I1#P^#;1F#<&E#_4N***#H5S&[_3L2Q#-C>-L\2;(7+C &c
M>[4'(" "1BP"M6$"6& $EU\%3C $5/ $4E ;I%8#??"/XP'Y(C#$E \")H#Yc
M1J#YG._YH%\#HD_Z!6'ZDU_YK._ZG?_Y%R'[H\\1IK\#J6_Y1I %K;_YNQ_[c
M-/#[I1_Y+##\EV_\N@_[O3\#S%_[D8] >3#\N8_\U$]J,'#]"6#Z;:']W)_Yc
MWL_[X"_^IL\%7'#^Q__ZO&\#X<\"Y/$"*D#?6!L[]C4'@#&I(>!I*O "P!_Yc
M; 3_TS__]0_\D>\"T%_\\9_\(% #,<#^D0\2T-_]\E\;-%#_P!_Y/> "+@#]c
MW2__M4$#]0_\D=\#T-_]\E\;-%#_P!_Y[M\#T-_]\E\;-%#_P!_Y/ #]W2__c
MM4$#]0_\D=\#/ #]W2__M4$#]0_\D>\#/0#]W2__M4$#]0_\D>\#T-_]\E\;c
M-%#_P!_Y/= #T-_]\E\;-%#_P!_Y[M\#/0#]W2__M4$#]0_\D=\#.M #T-_]c
M\E\;-%#_P!_Y/>#^/0#]W2__M4$#]0_\D0\$/ #]W2__M4$#]0_\D0\$/@#]c
MW2__M4$#]0_\D0\$/< #T-_]\E\;-%#_P!_Y0. #/0#]W2__M4$#]0_\D=\"c
M\#_]O#\#,<#^D=\"PV_\Z"__M3$#,<#^D;\"PV_\Z"__M3$#,<#^D?\"[C_\c
MQH_^\E\;,Q #[!_Y[O\"PV_\Z"__H!\#[!_Y*C#\QH_^\@_Z,<#^D?\"PV_\c
MZ"__H!\#[!_Y[$$&T-_]\A_N,<#^D<\#/ #]W2__X1X#[!_Y/N #T-_]\A_Nc
M,7#]A6'T>!_8_@X8"H]@Y<,GI2<3'E]#:6Y 5\<GKB50=S/O"O\XNAG'QF$&c
M3ZG!>, R8X$'9O"4>*#!>6 &3YD'"W0W\Z[P!S]8_@X8*:&\I'@"+X$"/7P3c
M=;TF.V5:T?R>2-S#-U'7_L0G_WO= K(Q,= "H6^[&85YF3QM0B"E&2*/TPQ#c
M?)(>>(_:@_^17X_W@3VS.=%2?AAG-!4P;.:B_'C6/E(^,R,U9Y8ZQ-'#-U'7c
M(4=J4PB0YBBMN<B\PS<YU3(S*O$1-&$L/7P3==V<6 ?0+H(^$ QG*&Y#K4TAc
MKQUG0U&=V&?T>!_84V/TW8)\MAK-3 /0+@(6K]S:%-*FA2(=E#*%:N:P[I0Jc
M2'"5F8D3.=>O[H<E(&3WKD>;0>51P+:-9%!CE'A).02#5P?*/F$5%<41>"5Hc
M2Y*?!>(D<36T:0Z#SKU9%)]J%38>WRP@;)4GV#N6L]$J<O E(D2X[E3>)E40c
MB4H'=],1J\D0$^4L#\,I#]B_P;I,Q(,]AH(\T')?+P$J(*)1=' W"1 $&B6/c
MV8./Y4:/(A1YS2DOG@LY%U<;:($=4")A:1I $1>L$.33;HIW_#<?"%HL\>=;c
M"1 $?ZI9Q1)_NYX8O]J5I@6&7RE>@GHA9(K"%N;"2H*(_^D^&T/!+JPM&D4'c
M=].S;4&U4G<W"1 $?UH9;4&U4K="B?&K73EY%X*(9"JW& 6C*9%:6!\[M$G=c
M*9&^-G$W/6M-R)$$;F ';^!@0K50<3MLIFZ.\^@&9?-+U@/6Q%0$QH0<+'%Uc
M85/@#7=*Q!:N/8^;GS(?U!M=[U3*T?S;XP'/;F ';^!@D+-0<>N2;HX&# %Tc
M1)/6<3MLICX?U'M@G#0&OI4 (TC,4@71U9D>G$H<1K));S$&OM6S9-+>*&"Zc
MM:%"OST>"6 :86'!IAN8.%LMI8NB5(.S9-+>>9@>G'JVL($<6QG!1P$YI&1*c
M0]7>\XW/0J(>0+R:9@- =T/*Z:$2SQ,]SZPD7\XN>C4?XT$"M=@H*/ F3(CFc
ME6JJ+P--=/ %%E(=:/ %](,<2'"5-K;D9R-"QS:?*/ F3(CFE9H'[WDW\#SQc
M;F ';Y A0S:[V6/*\Q4;!5[C [Z!GNUJR:$DLP$]LX$3B'PW"4 "M:C5&J<Cc
M]7P:&OPF![XGE;H3'(0\;W+@>U*I_,VS8\GI3,$\F:)0\VE980D;=],1  SJc
M T79^3A@2C($2! $3G $14 $*- KE$$[>0!'+JKI/)OKQL)!C'T8+Z+@J&A*c
M/5AX:<]6@1T4R#&0?'J$Y*&2)%"+>,42*4%[;Y A0S:[0EFJ^1X;!7X4>, 4c
MS),I@(,<M8A7:<]6@3VHB"$'L#E0QH<\N>Z@@D4&(J+99' W'8$&;?*@I*+Oc
M:3"A%R); \5*M=@HJZ:5&%1?Z7$W\(SU,2;F5T$\(5F+C5+@-3[@TXH<.!,Zc
M-"A8@P]!M8+(H,(1@7HW9%VH:<6D\0JJ%O%\93J=R_2*NGHW/7NE9<"D=T/6c
MA9I63!JO=AVFX]&S)&#PMGVW/<(:Z PS=/ %%E(=:/ %](,<&HN-%OL&?JA&c
M>IC:2X+<@.,DF\7R A(7>]41  SJ T79^?A@CY@8044"M=@H:/XO%JLG(;&#c
M%L;8A_$B"HX\_R\V&C=DM7TW"4 "!E\9I$H\6\9*LF@Z2F+P%-%19<$00%<Kc
M179?4HID0K)7/4L"D4>&*(#<>Y4 2'"5-F:_+S' @G(]E%%)'.V 7X4<'GSQc
M'GO"@B62KZL;IL5*,B:#E'$3R('(F>FAE8/2P0P^2$*<%(^_ZI4'8]009"%,c
M=^.SYK.)[Q?5OK+3K7XDE2$9<A"A:80"9-+>@&-AV3J4DK2^L,/U*/JKQ$$"c
MD4>&=Y, )!!Y9!B)>B)8[QUR\70_*MS*%HNB+R_5?T5]8=3MQH<\8+T7Z:&Hc
M=Y, 9"^'DXX^$&Q12S+;*& $44X'.>TK,5(;7U ;7R #,T #[XD<U(,QJ[8%c
M*' "1A#E=)#3OA(C\>0\,C #2*M&[2P#,T #\>0\,D #*>#N'$$"'5@&*(#(c
M>Y4 2'"5-F:_+S' @G(]E%%)'.V 7X4<)-"!C'(:S$.ZC$W9UL.0:.Q)^(;Uc
M,28]V)$3]G5D!=PXQKC ;G?%SG(6M$.#?SJQ;^)C1+*&"UQ9JY*LGZ)&WY*!c
MVB-L/[!7";!2D\Y3AS5*.((@P85@6Q%YU)<<:%X;O\H&*# $2$NI*7&F02 %c
M21 $0A W2.LN=X-(R&,%02 %21 $0A WT[E,KXC&KB,6D!-Y@H7F\SV]/"L:c
M"B:=_:3=\C<;+#Q0DC01;YP:OM41:- F)-"!,.?<_>Z:,0T66(^;$T$QTMD5c
M'T\>$-W&$_'&J>%;I)P>*O$\T?/,J@(;2+8I7\XN>D4I)$ F[5W*T;Q7"4 "c
M9-+>M>;<U3+G4C-4[6T1S6*\TD0O%84=1>6,,4TGF!H&PM/*#99&A?]+;_&?c
M;H);R/&@? <"" )#ET8U,.G>M7.$O&P8MH(ZIV2QX,4@.$LF[=W1<%$K+#$;c
M\WP3>T72;L(23!JN5,40]64BR82.["%D-@08'"TYJX&9(CT?XU%$WX,"R/V0c
M9O %]4W,$+17"1 $K#1#J>%HC$S,:80"/6S8'/LFE7,5M;V^GLRS3B$'&3)0c
MT\,?^DP&=Y, 0?"G<G 2MVPK""@@5\<G*<$>0I:]H5NP\RVLJ78W":!AUF,<c
M]HPC>?!G(8'($;2M,ZCK')/,:W@W/3L;1?0]*(#<#VD&7U#?Q Q!>Y4 (R@Yc
M LU+8O$](5=$WW,W/?L1K8("R/V09O %]4W,$+17"1 $K#1#J>%HC$S,(^PCc
M3B$'&3)0; D=K9(_R(%".Q'+T-1&U[U,Q#,MD$@"!A_V\S$>*9$:!8("R/V0c
M9O %]4W,$+17"3""DB/0O"06(AMR']$J=].S[I,:I1S->T76Y^.FI&1*SWU8c
MJ\D0W!5V643[Y%&+>/5R@6GP5R1V@H8ZV<9!R#-#J:$DK78W"7"1Z'/%*Z$Tc
M(>'$=%-#WR(6,68]9#)C3=^T5_5*R(&,!>90,7(W'8&*IB1QVF7*=:I@&A3,c
MYR.WTH$<*MF_@^K3LI([3 :.1DM\!:Y:F/E*J24Y,N'Q-20[W"YDK\3=#^1;c
M/9L2X(8<(Q@T(=&_>O8O#L&$(I2J9Q!5=Y, >LBI$_RG$XL\==HI]55XJR(2c
MH .=5F&=\S$>)""I9KK*>T76;;J2U?@=H1$4LODX]ONI88\<1,Z)60*I$%$[c
M(^PC-)F61&7X<H#X(GD&+H &>Y4 (Q!;V^@Q06!,7P %GD\%0P0#>! #R#$"c
ML;6-614$</,%4.#Y5)  ,( ',H <(Q!;V^CG14 %4I %7P %GD\%"0 #>$ #c
MR#$"L;6-*H4%24 %7P %GD\%"0 #>( #R+$K90$")""IM?*@I*+O:3"AS@JKc
MI5T7^HP3U$D2/C92OM6SBQNUKKM&WBD'>T76;7KQ(2Q)(E1VJO.*JWPW\#P6c
M-U^<F EF[-$JM99J-#1Y8Z%F#XJ=4!.9J0$J!Z.6VBU_#/)DX(L9E05C>6&$c
M=_,$1V% JA+:*M$7WU191.TDE'A).61#_43!R^TCD,P19%*N1FA#C&.4*8(8c
MQ QSI&1*[;+D9X,DFB[#C.UY](B^EX21$8_$_42)EX21S^QY](@B3/:?6_^\c
M42XV I[,:_A*'$$F$_7>F8D3"4FZC.UY]&@5M\Y!  SJ T79!',W*FF31'ABc
M!4[17)8F3A)79%*N1EAK"@BB8HP7GD>/,9@C%8Y_6=&#)%?@G([O#/)SDI@Dc
MX7P5D(5@%'S9N[W85@Z#SUY#U#TG>Q6MONBBD 01R*U0 A)-H+1"_5)X9%*Nc
M:'W3X\&%:G:^.IJ^H'93"5 %A%(MB\:/B'%1Y<,GC>:2Y SG9&%0=U,$3_86c
M@ ([_(@80.6FI&1*U[./BXP8.1G7;'0T!HV3D$-*IA2.=+"/BXP8Y6TX8\'&c
MBXP80!5!GW<3!=Z^*6Q1$HP7-G+<:2 \)%P7U_GJ6KF9/=V/2]*^[VP$CQLUc
MG0U#?() X<L\-+AJAS(;K2('7_*E>.^Z5^A.Y5T01O"X41/,2^Z2D-&<@3G-c
M,,0GU"XQ8W$4,^8^'J@?6\6+03B$B.B(Q9=1(X7F_Q(62](65!M_GN0L9T$[c
M-T'[B+2:*9&^&+DN?[$3";JYO 0E6T&U"HZ*IG0]^[C(B %4?3<3^-N5D#B]c
M(*_U#>D3#VD&$5DL[[R%1N?GZ2A"+NV,Q3T>(2RUT*M7R+&$* PYM=@HJ_:\c
MS:.A+]RZ _:,Z!2XNDT'%I&$,""CX[&X44L'CEL7K;97"7!EPA/"DG2JAG@\c
MV,J,Y'H3:-W*!MECXY$ *1%;VSA0/B*OR[@G=@$;JPO#XYU"T-F#)'<W/0OEc
M==%J? "]$-0%R%$$QPN^"J20XXNGD(/<@HV9(JR.C[.X48O:R!$6M/NXBDTJc
M.-.AARU4V_O./<N%_6,$S9-S/K%S Y0>9>"X==%J>]41G-@\4;%0I(L\.$M*c
MIG0]^[C(B%'>/*N2S]L\J\+Q(U045H'&=&#"!OE/C?8I\T&]S04XCEL7K;97c
M'<&)CZO8!OE/"2DK^)W8@&*/R$%*IG0]^[C(B%'>/&O04(P<CT1*IG0]^[C(c
MB %4F>LB- @E[1M#"[5QB(0\.$M*IG0]^[C(B%'>/-NR=>.X==%J>Y4 \SY:c
MG-@\83P65]=H:@PE#99&#_HTT(D<I&1*X4@'^[C(B%'>/-NR!"LDCEL7K;97c
M'<&)CZO8!OE/"2DK^)W8@&*/R$%*IA2.=+"/BXP8Y<VS+6NZR/%(I&1*X;B/c
MBXP80)6Y+D*#4-*^R!$5"T6ZR(.SI&1*X4@'^[C(B%'>/!O. 5T&CEL7K;97c
M";"O+I)&T'N$Y.%!Q1)_U)< /;$3YXN(!CE_V*<M&D4'=].S;4&U\4=]"= 3c
M.W&^B&B0(( @,)2@4K^C1W(W/0NRQ.VX==%J>T76U>'#*(QOM-L\($O<@<D2c
M<XX8,7(W/<L]48,"IEL;*K17"3""K>:F5-LG*%HM*G0W\#P6.,L2\6W=1H^Bc
M+)$2["%D=].S7%A+2> &^_@$DV%@ Q0Q*"#H%K57"?"];XX"\HIEJ V)%.DDc
M&LH@.%L[>E5KE\9ER)&0LI([@FY1H++FZ?@%M5,&@8^I>]41R',4>, 4M0-Sc
MEZ:A@L\2"2DK^.UJ"8#<(3?8^BQ__\LCM8-A28!A"[Z-R!&4H4.#@L6/LCX>c
M/3OG98 "@FY1>]41R"/H%E5KS^ZVAH(\>[:/BXP8Y<VS'#'GF(T"@FY1>]41c
MR"/H%E5KSUY#[#.0K182U+Z01^-J8<2\PQ<^HQF.=+"/6S'GF&U _W2Y+2H[c
MT\NSVGHW/?LM" 08>8 "@FY1>T76W;[KH;TTD,04$2_U=I$&3[GJ""9!?SP>c
M"< 2"@@J'#'G9? %M5,&*%#6K;=7'8$\9=UZ*(#<(3?8^DP1@;;KF/ZAR/%(c
MM0-S]WLDRDOA1W$5'7HW/<N?!(,"@FY1>Y4 2'"5-H:,:?HMFQ*TR^3>_#F#c
M88\<.>TK.SU8_#F#"YD[<[XTD,04J3ZQ?SP>R>$CSUY###E?L7$J>8 "@FY1c
M[WDW/0M?=Y, WXNSM0-S06.HV(,\>[:/BXP8Y<VS'/$5=  #'L4M>]41R',4c
M>/ YW$+8V\I;0 LE TGLQH[L;PES"7D3R,$^&GTW"7"1Z'/%L<H@]!AR5!NKc
MV8./QK6/BXP8L3L>"? 5=*!FI$H\4E6TJ#.#H@Q)3-&0/O&09A"1Q?+./?L5c
M=.!1W+)79-WM(?$5=  #:/XO$8\H;F B A(A_ E5\3+8^BQ_GLRS$6,13Q"2c
M@ZW/WOS02.9YGS(?U(MD<.!1W+)79(UD,3G8^BQ_L_$6=\(MM>8XLT$&=].Sc
M!N91W+)7"; 0P.>F@ZW/2%T6D$/LQH[L;RD5W'(W/=LI8L"=>Y4 "P%\(>$$c
M>?5>NC,9^[C(B%'>[UYV"8(&R&$$:3JZ;DI*IA2.=+"/BXP8SZADZ<&IRLJSc
MLRD6,8830G@W/9L>9; &*( %>Y4 IA$6%IP]^%AN+B+>AXH]J&A*UV-@ZH63c
MQEPK6  J'/$5=/ %&9(''L4MN5UI;ZE7R#$%WU3R*9&^&+E900!W:=!?29P'c
M=Y, 2XC"Y)SLA*U9LWLH&9('T),FQKRT)$IW[;&SY#&"Q#Q:R$/LQH[L;XFGc
MR;[815)I;WF$?-5 E?:6,(=8+B+>A^H&((V]-&DKR)$A>0 ]:=)1Z:$2I!.#c
M,*'@R!,$<)<&_74];EP@R_SN9JAF-$4KHO$68S! %XD^5YR61,5W26R!,ZCKc
M@<G&B9<7U'H]CL$XIQ[::" :;S$&$(IX6W78D2A):-71</$S82 \C8T&HO$6c
M8\ 1(/MCJX&9')/,:W@W:'K2C8T&HO$68R"'/P:4F F#>3:<]1*8! A_<PA]c
M);2^ X0'*Y 'Y,&$W\(['($'+9 'Y,%D8H!?O,,1>* ">4 >TRQ);#4O6L81c
M>/ ">4 >N0ZHJ $2%38>3\D>.+$3"?"4[(%0#O&U<88'Y!'3"<(13_D"7/"Uc
MY/$=)F'8,>@&"!)<%38>3\D%')X'Y/$=)F'8[@(2"!)<%38>3\D#T9H'Y/$=c
M)F'8+%H2/A,63+$53RD[4+$7U/>4/B!$>4 >WV$2ABU7K>HS81'#"< %>$ >c
MWV$2AOV<9Z!EX6Q@!D4>JQQRWBJZ).@3?8>,&A)707,3'/$F82 9 I4 SOURc
MA[6:#,%=80>K0=5OU+<%@ZW/<M %B(0\Q#X$QL[WFYT]W$+8] OR8 C99#1 c
M0D";U)T2Z9M#6^\J8H9)(/MCJX&9KS1 6E!K6( <"7&4?'HD P4E6E!K"2DKc
M^'W=0RE)=].S"=$#.M #() %R/%(?+KT8Y$0&IH%,(C9=G(W/9L0/< %/0 "c
M68 <C\2G2S\6":&A60"#5X?9=G(W/9L0T9H%R/%(?+K9"4$7T <Y?+K967 Wc
M/9L00I0% Y00/1"M63! ">$#/0 "64 I;:AF^90:IU'7@1E:'3) 4  "M1$%c
MR $%@1D%=].S4  ".P "48 <4##?47 W/6O61T@>0< &*MIWU>'#*'PW/9N@c
M=Y, 3D"R&^K#*'PW/9L0/0 "68 <"<$2"2DKN9,%%N%EVSA0QH8%/9 %73L>c
M/;NS?)5_=& 11  2YK7GIOQYW[(I=/<&B])WR(@^JTDD!(,<TKDJLQ8;GS(?c
MXY$2L9(7R)%S;0:S&$EW;[ HOI4 7K:- ^4Z8R$[I)@ *1$K>7$W"9 2L<(Cc
M5)P2L9(7H +\/5AX?8 <4]#MU K#*&!7MI@"OVWO!8&':C:P"F:5,S0& Y0Vc
M*( %>Y4 "6&\4>TK,7(W/=MG:8,"6+!7"9 0+%&T4>TK,3+6NHP"6+!7"9 0c
MQJLMT7PW/9OK$X$"6+!7"9 0QHLZ,RC*=].SN@P7*( %>Y4 "6&\VJ+U<'T]c
M-B'*H&+0T4W,98 "6+!7"9 0QLN/9YT2EVQ1'26+IJ,MUQ49EHQI>Y4 %XD^c
M5^R2D($"6!!H[&+!]4W,98 "6/#;]EX0/R>)28("6+!7"9 0QAN)PD;=*9&^c
M=,ZS'E3;*"#H%E4;3J"W-,4:>P7/8R'H%E5K,Y0:;E ;3M#M4$)3K &#U%DMc
M UU\'T\>C2WQD"/H%D4Q!A_VR*&2@FY18LX4,Y0:2A+&&,8@LP$]LX$3B*S&c
M_'C6*8$<+*'%J*U&UMQG>?!G(8'(U#K@!;-7"<!!R#-#J:$DK1:8C9T'=].Sc
M7L&=M2'H%E4;6+!7"6 :86'!"<%!R.,$%)/,<3H6@FY1=].S@FY1(- #+F 1c
MBHX<@F^\PPU#O.XB*O$F5FB\VJ+UOPY!P?XM0#RWXX%(G.C?6R'H%A68>Z$Cc
M"1Z4C$W9UH/<(2?H%G4W\#P6@FY18LX4,Y0:;E ;@C_-,,0G+,_)OH+:=Y, c
M*S7I$$2*1,00"&4C*  #+. $+. $+1 #-=8#+F 16T F"&4C+  #+. $+. $c
M+1 #[DX>"=$#+F 16W#S8< "8B#?!DF$P\$Q>\,2;&S2^!DU=].SK88"01#-c
MM:'H>P7/8Q$$6L\2,Y0:;E ;@F^0_Y20LH+?18VIJ87U*D'LQH[L;[GT8Q$$c
MT4PQK78W\#P60:#U+'%U,Y0:;F#"+)&0LI+4+OF1O.XBKA9&BLT2/S<<RKO@c
M%;X5Q&[LR/Z6U8X<:> "&-9J*%#=D<\X(O#;X]&SO\H&*&">!;)7'8$\YEE9c
M1XD'.(S:'!,6D&.>O^QYB)$2J6TK/@88O3H6O\H&*&">!5(_('"1Z'/%D#,$c
M_X(")Q "]51K_%H@%F8HR&.>!7(W/<L1.9 1?FQ1'E-@IS42FFY2!9$0/= #c
M() %R"'H,!06YQ*860"#L6XC[8+9=G(W/9L07- #/0 "68 <@@Y#87$N@9D%c
M,'AUL6XC[8+9=G(W/9L00!"M68 <@@Y#87$NM497.J8D67!8#531:0*!K1+Vc
MR!&M#IXF$-@JWKQJ<D)4(]VS"0$$0I0% Y000- #T9H% Y000. #/0 "63! c
MR4@D*/ _M8$%M9$%>Y4 0? 7%OP_*!^867 W"? __L0G3!)/41)/2](#W6O0c
M\*++/4X'N4V"/K%7"3 $;]*O^":8BCV6G+X@6M\K:?2_B2T:J87UD,GB+@D9c
M=].S3"8&0=#Y3=#C=)#;).@3>Y4 5R8\3%9?6I_FLU-X2=(JG]<J! ,J>0,#c
M&<$9&%1?Z3% +]RZ*+"OMKA79-WMU K#>G W/?O"K1L&*+"OMKA7"1 $'N^Fc
MM4A_;LKIGS.?"KZ:Y'H31G@W/?O"K:L'*+"OMKA7"1 $'N^FM4A_;OK_GS.?c
M"KZ:Y'H31G@W/5N+C8("2)".M=$W';97"8 $+3K-,,0GT#,;<DO?T4W,1\A7c
MR"-3G5)?A3>HB"$'L#EDQA@@[EAW$%&+/H@<?=-AVXX\"2DK^!T[E2KQM&O)c
M/9@>=P//8T$W6#(;MJ4B-E(;?=-AX=KSC'(:S",KN1,S9_17=Y, ^VJ+_L0Gc
MPJJ0K_@5"\)*3N&.=0<1M=@HOM6SPIIJ*( $Z;A7'<&)4;Z!WUAW$%&+>,42c
M*<$>V$*3D%.GG5)?Z7$W/8N[!<N=>DM3K+%7"3""[)$:@L5*M=@HNVZQA==Jc
MM>8$W1[7H6V!(4%3K'$W/2MB('"1_>$?0X"/=- N; R;],(23M$JKUA)J6$]c
M0?L0SBB['RFLJ29">Y$>BFH1^VJ+<9P2["%D*P'3EG0D7W*=7/(4Z!BU))H:c
0J.-FH%.F(=>_(;!O! $: &H1c
 c
end