Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Path: utzoo!mnetor!uunet!husc6!uwvax!uwmacc!uwmcsd1!leah!itsgw!nysernic!rutgers!mit-eddie!bloom-beacon!think!ames!amdcad!sun!imagen!atari!daisy!atari-sources-request From: atari-sources-request@daisy.UUCP Newsgroups: comp.binaries.atari.st Subject: v01i002: mwc:all:uue;arc Xprolog - prolog interpreter , Part01/03 Message-ID: <538@daisy.UUCP> Date: Wed, 14-Oct-87 15:00:21 EDT Article-I.D.: daisy.538 Posted: Wed Oct 14 15:00:21 1987 Date-Received: Sat, 17-Oct-87 04:15:35 EDT Sender: turner@daisy.UUCP Lines: 535 Approved: daisy!turner Submitted by: Andreas Toenne comp.binaries.atari.st: Volume 1, Issue 2 Archive-name: Xprolog/Part01 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 644 xprolog.arc M&@A?8F]O= 0) @ [0L $P/['S$)?H6 ,+U0T:* A(H$";" @"+Ea M"9,G1T" L%)&SAP7(&2X@#&PH$""!CL:3'!%3AHZ=,JX 2$F#P@=(!($<4-&a M3IDP:/231F1!R$-&#(%!)$R<.A@9 $BB10A0!,(K>(FC9V*8>CP=.,3R-@T9-ZXJ%-G#!P?;@?P< &)a M0(@Y9=+,:?,FQ-V\(>+.]0D89%#!DGN6L5LUKPLQ)WW2J>PQZI WHTK%.28>ER9LV;.7=J=A$82EK%6=^LG'U&a MSEKA(-!4+-,2A%P0O5-[UPY")9TT-@/#"3-F39@S97:[&<.F#IDT;LZ,Y^U[a M=6L0;KQQWACQW7$2&F_4X9H9993!G&5 O2!21R4DM) <;[#QAGY"O"$@"$:Da MP<9/!%&8'7MK>/<&>#;%%=]:\J4D1QMEW.\$08;()CQ%7@[LF$B';+Ea MI-8:\1$9WQ@*@J#A&#NJ""0;0I9($)14HA!$"B^U ()6+*A90H/*F B&668a M@=]):4B7DX]R@">=&F.-<9YT(*PUW'UST#G?G6Z8*(: :( !X8$DE&'33GEa M%I]::'IGG1MSK&>3&ZY]IR1X"G;4D98@[ ""$%SJX"6808Y9)JBBDMKEEV&Ba M0&J9GP8! E.NF@IKJELRA6J6LWI*4 D]+JIDG(?6F :4*;@5JI@*T]@!"$"U(5a M0&P9<=2QHU:&IGMMERD\>RA^TE*1EKYVY(:"RS-^"T*X(-QA4DHSOUSFRICVa M7/.K<'Q%AW5Y"-T&F0@16S182-.&8!UL#"=&?/!6! *::OI$QK-AP &'2F2@a ML$47+#"1-M.%$=M;&XRM%/;8-)7\1J*+DJC W&2;C04?3,2 -A,RL+#%WTS,a MT(6^?-.$0N!I%YXXNQ;3V,;59VXYT>0:=7a MI#GG7_"1Q>*OMI[YYB!D0;F9PZH(QXA7\2NI"L)&J*&@ER_EQ$\TPDL3$=NFF*QX9'Q:'9KCAB6)KB\6(1:39S"8,/2)7?713$ZNHY'BH>1;XD#<^U "Oa M#&S(5D<2T+\V) 4%3Z@:4T[ !Q 4Y@3?:MKULM>P^'#M76QP30>3LD&;C"TNa M+) * 8@5/CCTZ"OFJ\@&$T""&4KK!#_P$@ISF#X<.3!/=O,@'8;8HK+1;&E,a M)!9N3O+#.#&J:)32&T)(4!LV7$5I3"'?!3.8PX5EZ"KCB4_(*B) !7 00U)$a MP1>8$D(RI%!T(&"47'2S*2-N, 1EFJ#XKJ =FV1+ASQ$'O5<$Q??.2F(5;*Ca M$4$H0A"0T),I;.)]S,"@2[GFA523(1YI2) $V/ F=,AAVP*9H+KIB99C&R1B,H /SNZDEY*"R6QJD@;TI6A@/D9(AG?a M6 8T@H"1VTFA&\T8GY-L<)-[!$$?_SB :3)SD"T\YA1;B<@-=L27P!0F8N*Da M*X;AYPPH&*;-BKC*(Y9PB3?[64%_&4:,PD]D5;8:S<95+E-(Y 27'0"!Da MWF]2\''>CIK9TFZ^])N-Q%:7I-).29%T166$(Q=Q L4<[6B#))BC'))V5'#:a MA"E'>%Y9L$<'F[E-.^U)9FW @*N@&".]Z/8(5EPSH)R,F DA,D2L1K5,GS!a MJF(*ZX[&&A=Q.E5*?:WJ\^I*N@^F8)0@ >?F5-K]^Za M[LZ,^K+(VO&X]NQ= 7-RP-:^(47? =APDM4_Z:XU)VQ( Y)06ITPP"TW@:1:a MDB8U!WX-F6<:=&3(*9*6AV ].(M:.1YB3..<$3^2X9O&=->38M5I1N^IH3a MP#:36-&*9];:VA42,$8WMR0!8&-F$0GV]:_/\^:3:?+()@8(Q'.X0T68\ND=a MR<@-$[N*;6,U4UDV]6@NX:)T"'3(T.T0Q,/YM!F,)6)35P35YU$U2R\-6#TRa M9=-^3(!FFQB&0<'178N>K'7I:=X$N($-3,$NSY"(T&MSS-," B9)R3/,87,3a MTSOR9IPU.-I)Y^:T3%!,68LYAS# <5-5K,@)L@9UN2]5,3Z3+/,7PUZF.SP^P:L.0/D[>?'PXO[GA E=J;3N>ZE,MO92_(N8A*XS.&$H.78%F]V41 @B%14S>V.A_.W*9^FN$6/W7&]9ZBC 7HZ>E5 D0a MKW@@O@H^TL*"S>:PAC3 04Q@('-%,*%'F2L!CG "+& 7V5/[N $J4<[V->>a M&[*;W6RTTQ7,5?]UM;.][&[? @J%I-^% *@(5$:(0.%X?GD1^\M7Y$U"QT8(.H1B-Ya MR%HTYG@V5F++M$'^I(E]E 1R5FTI027_=%=/H""U.&\<=XE#&$.SJ'O51@3 a M9 :.2"/%)XGG(8Y>$H[>MT'>2$J&6'R)" >+" )>8HC5UGYF6&TH )2P'<9a M P.WDC/S]V%RDHW8@4*ALD$2L8^^MX?_V'X""8<$62.@Q(GMMXYF8(@VXY#$a MT2R@5(_S9Y'HF)$!"0)M@!ACX +Q9T'#X$3/YE6O=YW3GIUVNZ)5XH4PC,I7@Y9%#=X]B26T\1UE0^4Y!a M*8I5:7ZM%"WE@0?R=EKWJ$)+.$D_E$MOR7X!&1NH."(=.9:YR)@?EA?,))AEa MP)?W@Y*1[! 9S+>0/.N9R[1B72"9NXUYQB"!H(:&ED95]B;V\ "0( "L! !,#\A[a MG?>^ 0 # T:*"@! DT:,F5 T$&3T$V9.R#@R'DSI@R9.G+*S FH@*..%@4/a MED&Q94P8-FQ0?$G! H3*'2M;JF01$T09.1/ES*R)<,X8.6G$E/ER,Z=*EB#6+%.7.^F$ESW'+-,6_5-&3=N+@[4".)@a MPH4-=;1(&88-&Q!KW+RYXP9$F)<@E-(!@28-&3(W':3 D8)\.QL:!]OUGTA9$QSIA;C3?Fa MN*5<=,W%GHE'DFE&&&FPX8*.!2BGHEA#@L"11_A--8=(.RI$1X@E32<:I6&F$(08;K5G*W!9=: J"J#H2a M(.A:<#@U51EMP('@-:&##IH;H 2O@F"A5BN>ZU];*KH)H4@V(CCO=$.a M6<:23><80-X[""2^?a M$#O%7X@1)PH;%XA#@0F)1>@0DQXMX[CKCN.G!>8-PLA(0Z+K1R&-a MU%#3,RW=J5FNPMI6&7*T,0>#WW^*N)G.2BS["2I 4L"JX+\*UQEO% 4"0B"(a MD1L(\2N [=YC.N?E 04H" (+A* @FK@J>N&RS[,85,#=*="!8B@0B-H0).(!a MSG,L0)[[FK<[(12("@]$S!LX& :=E8Z$STO@#AAXPA0:82MMN,);(!+!:*& a M00FXX0IU2#ZX] $P?L;$'< 1"'F<(=&1"*P)B*21]DG>2,\2\4,F, :9E"*a M;:#B2-RP/HG1P54H0*$8/&B\'8B0@C \H DQ"+PI@FB,+E1 !6,8A!DV4(T0a M9%T")FB?DID1C6IDH^=F)SH&.0%A:MS?3"*Y A#\#HY:S)T%*P3)%*HHC'<,a M41D9=$8Q"*B3:Y08YSSGQD9>+I-4*!UJ(7^HTE4,%"2U V1E!2H,5\AP%3 ICS?EVa M,I!)504KG?-6@;R%MP:FK%P0RMO(-*BDKCGI:P&MDD0A1A;FO@'@\Ha MT9 N5'#IW&BMS F?@0 :"&YR978 ;F< D" "- 0 3 ^0?)D.40( POa M5(!P$B:-G3(@I)0Y*&<.0B%EW(Q!TR:,G#4)5+QHT$ !1P5NY"S4T0+$'3EIa MZ)1!<8)-FCET0+")>(8.&AT@3J1@\3&!R#!D4 V7/,&S=S7,(4R@($DY=Ta MB'9,0"4&B)<@QL"I0R=-FS(\IX9<6*;ARJ8AHUZ*MN2C=UC8+*3I,H4Y\ T<;A&!?I=?!>>?AU5.![\3G' A,C2I< >R5D]48;;1P%0AAPP!$1&2# (<<;8Y1!a M1ATB?3@&?,UEAUYW,K" G78S-!B>>S_&A]Z(13)QV'0>=00:"'!R;VQO9RYTa M=' !6C 3 ^.? >*6-4 Q@- O'P R4!EYA!P"2 Q5O ! T08 a MAFCM ' @49&%$$ BD"B1< :*"$4FE)#(HD2#&7XG1Y[AP6 #@"!FV-4$(,6,a MN9U'S(#;:<6,MIT]S"A0,N&,@1'+!B8S(203B 0G4ZYL^3*F!#/R3 P(Z/Ja M51'\I"(IDA$0!0U(! F1 0* '!!OSUB@%> ,OBE*1"C+JX"O&7Q"5/S[!\9?ON! ))^%$ ( 0B10%@A%#"X @ #&H( A1"H7!?BB"@ a ML( 00)P8 1#KN0AC C(J>*(0: !@P(TE7DBAB"1^>&..%>J' 1P!P (&->Aa M R$&0D!AH1#^,2D -BD14I a M4: 9IP(0XH42 $$ S *(,9U4I2#! Q 1),603B(Z 0T5K;XXXA$6LG"B7#\a M$P.,%%@I0IP11M$"H?_PDU^Q#*"QV'YFP'!BG,6&D 8 $'P(;)'11D'MD!'^a MZ$JQ8&AR+#_#4OL//M#B,ZZT'V[KQKDAO!OHZ;Z\&35O@M/DS^8\&:;JCY+IMNVJ#OG'7>a M&5$ *>G'@)\>!#HHM88NJFB=C7(70*1I38I!I04"8.RLF^[G*:C7C0H .J:Ba MJNI L!#!I#^4%/RT*2.7"T&QXSH< +,@T!OMM Q0JZ^\(6C+P-.JC%LN ^>Fa MN^ZT^.X;;['N1FA2O>R&#<'8\)J]K];,$CSKQ+PFO/#?RO[#K,+R(ODT+^/Ba MB# _M R]K89&AFE$UXX44=]_^B#Q+O^O+ ; .VP,'KH2+:W:*$).CK0S9*"a MX$+HG'L.NNCOZF/Z0*FOS@]NN-7\*.TY*_$M/S-!^_.',*2B8^1 0) BX]0Ja M2;WU -!(H?;RLLC] D]J?SL_N7]N'^^A_XZZZHT'T%[QL=N,<[$(4K3"0&;A#00-Aa MARL2J48VNG$@LN )$]'BV-,LI+R \ ?C_./+CF@2PK@CA.XH9Y;LG(:W+$$a M.\:SR;;5L!R)L-V'TH$(: 0"&AZB #0M,DT.3!,!!@!$0P9 @1:4B1\(*A9Wa M' &*\8P & -I!ADH:,E'&4 'F1S!_M0)/&V ( ?I),,USPD\%-RSGP(HDS^Ha M A^!B $M! "Q%8 VD=H7 T@AL_8\7S'Y0-P1$: $4BM5<1J8EJLX#@?0$T%1^@ $(.6T'"2(H@#.:BK*9a M)0$7XHHZGKJ5!)A-IQHX"PB1 "!AQ;D7RD"X*0(B" :a M=FS@%BE74*0%*PA$6.#S J.R8 7#CLP*UO7.M!TP&"YH7GO7(*!C/R -PCJa M? <7:<+C^U!a MUI&Q%: @8SO@0U '@ 0D(H1*@* !DM[D0':<(@,$U$V9&O +4B2[[H58OX%>a M^X>X ^('!1H$*T%!R=_&ZL\_PSO#X)W@S\M2U-KGE)8- A\ SEQ3]#-U (]U53*QW::\7:"B@,KO ##T#a M"Q%(!EA@?"9"<"' "KEP9@@P!A20"Y-15Q6A&B((:7D" &SD;O[F#FS 3@;Pa M?:SF;K]54ALW;]PF!2N0;-RE@:RP"QXX!A"P"R,8 IC0!CI A"A(%RSX*"X(a M@S*H7S3(;C<( HW0?.[!>/!@:3@ "+"G( _X(9F6/0>088S4#"9 91,04$EFa M!A.Q &"@ [P&UA_]C BKCAX#8 H/X*(4H)M @B<*6:Z$(!(ZH#$K0?P)P!L2@ A5Aa M;]YV#2E23.; A5[H@!!(AVVP(Z7H)M# BGJH7+GT* Y@"$P2 +Z C8XX$(X0a M@#:PB+((2+3H80-QBX>8B)^G#\>B#R&P!-H8A[UD;4X$ V@"..QB'X CJ2C'_RS:6:8*LTP93;69(XH 3]Pa M "]0* W '0\ !^JA & @:F7H8S@) AT6CP ID$56D>WP;LX5;_.&D3;)E-&P#%J)a MB:H$.[CS*!#@ V(B V48#,@$ D&0ER$0*E)P!!E#, N@B>&6>?^ #EP(#I\8a MAA 0DR9@9T*P"9\ICLHU1S0SE(_R . @)K$& Q0@BAZ9(!00E$29FD]@>[V(a M8$; F@>F7#Y $=<1"PPQC'T%!-]H!;XI #H 3Q0 $I@!"># S!@ #<9#6AXa M9N4EG7C)#"9@G5-@!&"@#=CHBFXB:JV9C6T2 0@FF?@![KIBZ,9E* 1@*0@a M)@MD&K IFX IF$^P J$BGL&"X$T2(D% (PP'M%V!D00a M7C#"/V%%:K! 5H'E (056(.%D'1EA'?%'3'@ -PQ ^*@9=SA J0@!'/F"O2Ca M($)P"MRA /APE%,J0BFZKNV:%@ICK3HY$9+:0I2Z-RP[+02@ CF202L;JC8K$<=Ya M0AY0J;$TK;9*E$:ILK'VG?A8<#2+ E+RJP2@!)1@!AR0I]FV9W4&:2-P9M7Ra M5T\#(CX8 LE& $S2#_X M<"*GP.A (Z ILAZ!MW*K,4JKD&+J19+K2?[*.P*a M $LP[[0F:&ZOLG* PWX L@@@K@@@K71KLBFBKGB;LC%RB2ASP ?R85L;00a MAPV[@0_[:PF58*?P A. N.X:JB%PB4GV8-8: Y<8-OFBQ3W,+E0GMI1#"_B+a M.OK;$/S[!+AAJ:%KN@# J2H+B(?[*(XZR38,PQ7,/Y1*PS,K$3N;00"@#RUBa MK3LKROH@ Y)93.S0>N!0P]3JP>RRAP3@S-5:PC$ -D*"J?Z161J@ @!0P#V\a MLY@H!/4VP\<9 L?GH\+8F%Q a MHOH'X7 GY@H#N!,S(;FP:^J(.C,!H+2!/\\!&>V(TRP;6:Fa M(S$0 DC5F&! #N$E$#9LK7NL =$)R/Y:JX3,R,WGI*LW6J%:+#3]5^="1Z<@a M9>Y3"P^ UI&:PA%$J=B# .5B JBUK%$2QJJJ>XAUZ%VV1> UV--F=C0 M8!a M ,,P7?@@V]>1!/#P#_2 VP%@"*#P#_" VP P "#P#^Q W . #I5)W.H !O]@a M&J?C#KZ[OV?Z!&EZ2V:E3MSQ"*A 3(\": 'V#TX:WHKP>=S JZ@C H'E$8>*a M)#. 3@( "X&FD)S X2X&8Y^D,%' -72 M/6a M ^\B#N0]8O\0J-(@XGA9XB+"/0& !(! =)% ")E$ # B!D0C :,2 $1 V(T$a M"W#@*K#B"_"]5B(@QS1N7#8.!:G%C@#0"#(P'I^'#V8@"9=]!+BK1_8 2T0'a M'YF4,7 PY1H6(U8N0OR]Y9Y7)O30)O_ !)?]!F!@"VS.2%5^Y7'.Y67"#G8.a M I=]"6"@"'V>*G\.YX^BY8(NW&WB#_1PV;^0,5ZPZ-'0Z"N9Y7+^>>@PZ<9Pa MV>>0,3"@Z9R.Y9 ^Y]$]Z9C@/K;P !DC +!^ T^##]JZWF: F<"#F>@TK<#a M#M-9XG+$'0Q,DC8 J@?E V" N;<##^%4Z;>##^'$#N$41[=SR@= NJ! =P1a M CC '230.8\B F)0/*=C"Y/V* 0 "_T;D2WYW^GD!;G>#B(P$W @ _-S"HLJa MR;&<[F/ '2( #^-AIX25IW9EM>IM[[3J#D(0DB[)ZIL'ZVG '>W^[A"?U?RPa MF#J"[@-A"[D[$!?_!*F1\7 7+3"RC0.Q HK@']_"#9^'#; ^!V.NNV4NA3NUa MS1&D (!X.LL=3MC ':V "&+2\P/Q\[<3](_2"DY-\E_]\6!^.GA$YI)2U=PQa M ?KPVO^E#^/-8A,&R#\& +? /)"I=FU77!Pa M?^[S"_YA\;0_>/)"I=FU75[M/K^@":ZMRISW*&BNUYE7UJ?S"ZM 2".)W=)&a M "P"!@* )%X]I1S29 @F.#8B)2+$,P^Y_K/+(F#PCW5&KBE #J_?48/ , 1;JKVG.4a MU/C0!F&)#S>87-([a M!54E#OO%!BZ?TR3+HOO%!CK_;T8/ ,# "Y.DND@2=HSG#QGN49N=GDV&8#YBa M([A\'3SC 2=V=U"PCR'K 'ZX_K/+(@LD#%/*(3RI7'0PI5 0 J35#%[ E?EXa M=U"PC_WXCW>GXA/FU5/*(4V&8()C(U(B0CSSa MD.L_NRP"!M * A, X)Q0O2T;PRVD!6; 4Wa M#&@@M0UO!28_I5# \?8V$*K0\!I@\KBF GC.90__*/&^GS#25V>@:_R GK7&a M/W90\G*/\8\2[_I5$0; \0:@:_R GA^W*N]@![YI #6F (WI"Z35#&C !ES"a M91I@\@JM ,:X'KY 6LV !FU@" UO!2:OT)\M(F#+E?EX=U"PC_WXCW>GG< C)!C:PHD_XD&XYA3+*2'1Y8I& )%X-a M CA +K@U>ZS F( !R;P64YP2%_F#5X-!P5@].,G!G!@ I_E!(>D\ZCC#26_a M]/3 N^DW9H&F AQRF\H%(L=X0AHP;7ZX_K/+(F"@!CW;0B[!!:PIa M7"!RC">D =/FA^L_NRP"!FK0LRWD$ES RJ$:GZ=9M(5_KTYV!M# RJ$:GZ=9a MM(5/I1=4%P8PKIGKRK"\'D>+"4@2=NDW9H&F AQRF\H%(L=X0AHP;7ZX_K/+a M(F"@!CW;0B[!!:P+"4@2=NDW9H&F AQRF\H%(L=X0AHP;7ZX_K/+(F"@!CW;0B[!!:P+"4@2=GM=a MRM1-O(?DU5/*(4U6+3"X_K/+(F#0P7<'!?9\'6V #B=VXB6"5-4B &ZP03;"a M(56\_A^+)%[-QNL_NQ<> I*TU^[C HX !R1 =*4 "H<4_%/*(3RI7 ;@A]_(a M!5/*(4V&8.PPI5(B0I5B!MXP_/I1_/[ !EA@^6'/_/<*(P101I8?]NV !"(@a M)7ON!+ON&*)?W?LC'<0EIP!J9_J&: .H?L8@*a M!%X]I1S"D\JE!U-J$OT?S5R9CW<'!?O8C_]X=PJW44<89'>G< C)!C:PHD_Xa MD&XYA3+*2'1Y8I'@.$(PI1S29 @F.#8B)2+$,PK@A^L_NP%1O2( PW# ([#!)9?:]?OX*;@G^/+=G&+)>+;LC'<0EIP!J9_J&: a M .H?L8@*!%X]I1S"D\JE!U-J$N(;S5R9CW<'!?O8C_]X=PJW44<89'>G< C)a M!C:PHD_XD&XYA3+*2'1Y8I'@.$(PI1S29 @F.#8B)2+$,PK@A^L_NP'AGU0#a MPW# /&?ODCBa MU5/*(4V&8()C(U(B0CS#HQGD!-4K C!\=U(BJ?R(*6W7IV"0EN(K C!\=U(Ba MJ?R(*6T'J)Z:ZZ)D!@B@_A&+J$#@U=X_WTCBU1?.ODCBU5/*(4V&8()C(U(Ba M0CSSD.L_NRP"!B-U!E,J)2*46JOU**'@!8<4;4*!))OD#^H2:-(5>0I2+@1Pa M+N-RKTYV!CPE+U1:*3"T+_?J9-.V+U3*,P^Y_K/+(F!P%_42PRU4%#PE+U2:a M6JOU**O@!6@*!&P@$H=J!LQ07V @#/M"I:G%5/)"I:GUV ,!#+SC#TS]*)+@a M *H[.O[ U&4ZDM@-!&: "TCBU?YI"G($!^Q!;N(K(CHI 4[@'X>$)'QW=QS"a MDV,!0'?'(4U6+3"X_K/[C5X+ON0+(T_L +DN2@\L#W P !I4O7)4O2*BDW[Ja M'^,Q 0#.":"R&/]3O1=TR0W?&X_2DIX* 7D5 IR@XVE4\H\BDI'^/ _&(3RIa M7'0PI5 P-VDA $F[@5,*!?O8C_]X=PJW44<89'>G< C)!C:PHD_XD&XYA3+*a M2'1Y8I'@.!:0771B7_*"(9Z<_Sa M8!S"D\I%!U,*!7.3%@*0M!LXI5"PC_WXCW>GC (L$_I1S29-4"@^L_NRP"!BK5_^0+a M(T\L'(=J!N0 !P/PG=4K1]4K(CKII_XQ'AT@4*"R&'HA 78?"%/*(56LX[" a M$\C +>#5/XP,-5[09<,!I* ),&O=G_W*'%PW0R6ZZ)T!@3 (F P;^(K1XCBa M4?YI"B*BDQ+@!/YQ2$@2_&KW=X\2!]?-8+DN2F= "P"!BQP85- .FDZ;^(Ka M1TO>'OYI"B*BDQ+@!/YQ2/>&),$_I1S29-4R,'ZX_K/+(@L4P7=WPO?J9&<@a M#IN]Q95B!M*PV0369 @F#)O]8")4*6:@H'?'(57,8%ZT&/X@!J2 *!ZUV8/;a M89O]8"*46JOU*)M_E$C"=_W?LC'<0EKP/]4K(@* O]P#JI5O4AR,.-\4-;+a M=F?WQ/QQJ&: ' P .L_NRP"!F; '60 \]\$OHMa M2D'-/+Z0ZZ)D!K:0N4I-MW'W=X^"NJKKU:MG#a M5&R" 0W?&X\2[R=O+S"207( ;=C#SJ>1B7_*"*9U?8"(SO2_W)4O2*BDW[Ja M'^/1 65B#T2C &>0[%RF 28O-RF_+^6B .=2O3>>(A:@XV<' 07R#W#0\%9@a M\G*3\M5[XREB 3I^=A# 1;DN2I..!_7U-&R0N4I-MW'W=X^"NJJK@ ,F7:!'a M7$V&8%TC+S'<0AJ0;N,2PRUD!:SJA^L_NRRR0),O+S'<0BZ!!JP$)%X]I1S"DUF8>6-W=QS"DZ/8HRSBU5/*(4V&a M8#9Z=U(B0I7BACW*(EX]I1S29-7BU5/*(4V&8()C(U(B0CPC.#;"(4W6D3P:a M &#@HT# =W?'(4U6%S"X_K/+(F#P*X$F E& 8@)0+@)0+$'-/$!T>&57K%X]a MI1S29'7AU4CBU2QB6%/*(4V&8&YBG'=WPO?JGI=B![@QI5(B0JFU6G*/\8\2a M[W!G(R?,\0*0M!NXV02PC_W8-7=7Q6.)!%-:Q6?)!CA74@W9H"\ZD?\&EW+)a M2'1Y8M(S$7=G:/?JGI?RCWB#WY"!5Y$a M :&C'P&@!(@2.IN]Q:FU6G*/\8\2[Q)_)OKP!AY@CG4?.E/0.W=_F(E)6QL?a M*F# #5,*!7.3%@*0M!LXI5"PC_W8-7>G'R]=1*9.N"YN]Q:G%5'@JB E+B@# <:&FH(.U9%S"X_K/+(F @!1RI7.P [1( QV)O[0!D"4)Q+Fa M416F#9G[QIB**"D9N@Q M$=9\H^"NJJKB5E(F97&@%/*(3RI7/-V=R=\K^[)a MJGZX_K/+(E9BG'?'(3RI7&Y"!P,6T1/! +'6]>.:N0Q M$=I>^6)8+H@P9S-a M/R[A^QXUU:P "(CB4:Pa MFT"0X=35;S-)!>.:N:X,R^L1:T++RJ$:GZ=9M.M1\ODYF.=S]X>9F,S \0( a MX]XE"E,*!6#+E?EX=U"PC_WXCW>GC;"(3RI7/-V=R=\K^[)a MJGZX_K/+(M^HH'=WPO?JGCWS/ \F)1T&?Q9 @ VO 2:/:]0G+TH 3,Q+B/'a M#Q 3J>1B7_*"(Y'A\Z/?*B!!!P!K?+91I@\A^Z'BB0)TC)"PUO!2;_H3%Ra M=R>LSUR9CW=WPOO8CUUS=U4\ED@PI55\EFR D87X*K3%]2C@#UQ_!J/C#_I@\7-?\H\2[W$&!)G; $*Ka M=G_W**BKNECXI#1=J\42U,S3'&JSU>/2LC$,LV:P-_)RPZ'-VX8C+^5" +Q]a M+/00PRWTLUJ@-EL]+BT;PS!K!GLC+S< @*4H "$?:.V[((F @!)+%#W%+8 ;IUV"0a MG@9I(3QV/LYZ!@1FD'X-!NEID!H"/M"#D4AB6,*S.AA&.JMS6%["[N @*4H a M"$ #/.F]@ !<&!NEID X$/M"C.E/:8?!G 00X+A 3J>1N/@7*L2#.D) 7Y-- 9@-/" a MY*L""Y"#V+ R$.(P+DH 6?P*_(R #1G#!..M#V>B#V8@ GSRa MJR0\_W($!R?0'OYI"B*BDQ+@!/YQ2..B!! P$UE3+2<@M?YI"G($!R?0'OYIa M"B*BDQ+@!/YQ2/YI"G(T+B/'#Q 3H.!JIP)OI@!B+ )[]*PO,O1W!P NWAa MGZ8@(CHI 4[@'X=D6$P64!W)4W'78>XC# 0COK*_1WW$) ;0P8%VK^[9,[K@a MGZ8@1W#P!>WAGZ8@(CHI 4[@'X?$9 $%(VU2 %BI(/=JG@!0 $X2.V,I [F2a M&ND8;#I?5R6_]$U?\DM/#T7_] @#!*0,4L6.RTH!VU ND8;#I_5B6_]$UOa M] @#!:0,:T2=QWF/L*@ 1E#U'>7R^X@!F; !?YI"G($!WO0'OYI"B*BDQ+@a M!/YQ2(M" 8OBDVRMH99*,Z/ZRD6['B7_*+O42_YI"G($!WW ) 2@#DRVJDM^a M=R)4*69 !GQ"$DP@/)LM *FU6H_"!*8@)FE:K^DK1W" NWAGZ8@(CHI 4[@a M'X>T*+$YJ@#0!!9P2$Q" ':P*+$YJ@#0!!; ) 3@!YO-Q1'D$@_CGZ8@1W"Pa M!>WAGZ8@(CHI 4[@'X>T*!2P*#ZY&^!4)Y9*,Z/ZRD6['B7_*+O42^-ZVJ/Za MRD6['MYD(W>7RWPOM?YI"G($!RS0'OYI"B*BDQ+@!/YQ2)O-Q1&D 07R#WBPa MV5P<059P!CK@GZ8@1W# !^WAGZ8@(CHI 4[@'X>T*!2P*#ZY&^!$,Z.:VKWDa MGZ8@1W#0!4PR %[ 9+LY,(WB/L+@ 6-+ 2<682CI#UX4 !YUGG; )R0Q$+JPa M.NSS/ \F0JFU6H_"!$S01Y(+ )8@6?S@X=0RPOYI"G($!RC0'OYI"B*BDQ+@a M!/YQ2(L2FZ,* $U@ 8?DGZ8@1TO>'OYI"B*BDQ+@!/YQ2(M" 8OBDP:IH99*a M,Z/ZRD6['B7_*+O42Y+%#QY.+1$A (1@)63 )R31CJO#/L_S8"*46JOU*$L@a M#WTDN0"@Z/VF'Q PPOYI"G($!RC0'OYI"B*BDQ+@!/YQ2(M" 8OBDP:IH99*a M,Z/ZRD6['B7_*+O42_YI"G*TY.WAGZ8@(CHI 4[@'X>T*+$YJ@#0!!9P2!GCa M UXD !YUGL*A'R3A)@2P.NS##ZOC#YLM *FU6H^R!'R@NI(+ -QP81Y.+2/La MGZ8@1W" NWAGZ8@(CHI 4[@'X>T*!2P*#ZIU'5BJ30SJJ]'OYI"B*BDQ+@!/YQ2(L2FZ,* $U@ 8?DGZ8@1TO>'OYI"B*BDQ+@a M!/YQ2(M" 8OBDP:IH>-ZVJ/ZRD6['B7_*+O42Q?V-,9QGZ,* $U@ 8?DGZ8@a M1W" NWAGZ8@(CHI 4[@'X>4X=35;S/I!8M" 8OBD[L!3G6"**9%,Z/ZRD6[a M'B7_*+O42Y+%#QYN_"0\_W($!RS0'OYI"B*BDQ+@!/YQ2##N79,OOG($!RG0a M'OYI"B*BDQ+@!/YQ2%X- 7D5 IR@XT2C &:0EOW?LC'<0EI@!O,FOG)DL_%W/'54 !!,04LT@!A"Pa MW6*@XVDT#LZU*L% #-0AX58^G4a M!A 0 3J>1N/@7*L2# 3 % 70,X9@^Z%?V,W@!G#@ A 0'8]2!4 P 2'5a M#&( =LM!CJ>1N/@7*L2# 3 %"@(,UB^Z%?V,W@!DL. 8 Z332,W@!D( a M =/?##39#A+@.&X"#Q"PW6*@XVDT#LZU*L% #-01N/@7*L2# 3 %"P1> Y87^O-*O2#&ZPY!"P))0Ca M#A"PW6*@XT13 F;P=X]2!7^]'@7B#[H !O!@^Z%?V,W@!A"PW6*@XQ "!"Pa MW6*@XT3S05BD'P'@46^@!#! .HW4#$%7+2]01E5 .MQ1!4 P 2'5#$(.(Q\4a MUH]2!4 P 2'5#$(.(RIP!NX =LM!CI.-"]@!L[P-#Z011\@4._L/L) S4_a M$+N;U@*P_K/+(@O$#+DN2F!1O3>>(A:@XV>' 690(?U_XREB 3I^=A P;;DNa M2F8@#' P &" "]"+.O!@!H7U*%4 !!,04LT@!G7O47\/ WJ?3FX 8 =LMa M!CJ>1N/@7*L2# 3 %!0W&: #&,K"<>[AZ@##VW2#X; '54 !!,04LT@!G7Oa M47\/ WJ?3FX 8 =LM!CJ>1N/@7*L2# 3 % @$6: #&/;&WM=MQ*@!! Pa M,-Q1!?(0;6[((F#0P; E 7 I 1-0'A:+#-'A'X<$!LS@/L*0!34_$+M[\OR@!!!P!H8N]1TC+R/'#Q 3K>a M'A:+#-'A'X>D074K 4( ;DN2F: ,Z__K.+NW# 'N1&6L@0'?YQ2*7<#F==a MIL5K6.XC#&2 VF B)M&F% 'HC0,!^I%EEJ35#&C !CK0*)*E#YV&GK7&/W90a M\F4:)M@-!&9 9*E#YV&GF'_#G:0<&#@!3">D;K@13(0.F.\_K/[$6! !%;Ya M39*E#YV&GF'_#G8@9*85.Y*E#YV&GK7&/W90\F7:6D\@!:35#$N&>?]5Z0,Pa MWOR0Z^X !URDWNZPYFX5J,6]YFX%#T2# &) #TB^*K" )8@-*Z>,!;:0ID<1a MN\ ##V8 *^H X\,3^A/V]TJS*LR@!1"PW6*@XQ 0'8^"!;:0IA)PO-B!.O#@a M!F'D!EOC46V@#%FT-1XU,.XC#&; '5E .,! Z332,R@!4( 6?"/&[" ^J_a M5N+@/LR@_8^2!3W=X"'5#%I07U:24!=C =LM!D@P"$@P#'# \X T[4)/#[@Xa M" 2P6P, UW.'5A@"VFJ ,>+':@##V=@#-Z/.N*PU"$YD@T>4LV@!8YS'5;0a M ["UV\-#.MR!!7SN5O#@X<4BM1*PW6* !(%0MQ( 1"@X[" $]/[*%C YQ/Va M]TJS*LR@!1"PW6*@XQ 0'8^"!;:0IF\+//#@X<5B!A8@ =LM!D@0"'4K 1 a M 3H."S@11FZP-1[5!HJ015OC40/C/L) !]R1!00P'C! .HW$#%H@!'_W*%A@a M"V)4+.>)" LO#M//#%J03EK (M]H"!"PW6*@XT3S F8PS, C 2C^>F9 ]R!a M!;:0IAH =LM!CI.-"HP;74K 2@.2&; #=R!!;; '5A@"V.[Q@' 8!"PW6*@a MXQ,04LR@!1"PW6*@XT3C KO.'5A@"VE* L[AZ@C#F9@ 1[;a M#%R@XT23 F801A3B40/C/L+@']R1!00P'HCB4:/C#Y(D]QC_*/'.ZJIP)O[Pa M!BC08U3^#ZIP87X]XM/@#-+R#QXB %- 8M+05)*T>@.F!! PPPUO!2:_0(+0a M\!I@\EU.@ .6<0H" 1"@XVE4\H\BDEEM+S"R(X&F!!!P!H;.91I@\G*3\OM2a M+@IP+@.F!!!@!F+*959@\G*3\@FX>@VO 29/@%U^'%8]$&#@!ZR&-S RO8^Ba M!:9 - 30+![;#%R@XT3# F8@ @VO 28O-RF_+^6B %(-"\>[AZ@C#F9 A[;a M#%R@XT3#!V9@ <=AU0,!!G[ :GB3\F#0,EQF!28O-RGO_?RSY)CW7_"0ZZ+4a M)@3 !./-U(^B!:9 - 4@!N]V*H4-"\:"V-"0ZZ+4)@1 MRA!>H+! ^,8;TCa M/*M3.MNM_8^R!'R@NFDJ!A?FX0KB!E@@6?S@X>?2!DXPKK3:#-HO]QC_*/'.a MZO!P+/ P-_2@(_HFW+R-*'\Y$&#@!ZSV+O3 \0K XAXEU0#P#VJP.NP#3MNMa M_8^R!/+01VF*^OT6:&Y !)(5D/6"A*R<3MHO]QC_*/'.ZO!P+/ P-_2@(_HFa MW+S-XL4BU0"@.-[//TM^._3 ) /@ <=; , C#C]TO'N(.N(@M1[;#%R@XT2#a M JSJL"YW5R@XT3# F: "E[4#PK2!J#@1?R@5*_.a M90__*/'.ZO!P+/ P-_2@(_HFW+Q]'/W '6#@!ZSV+O3 \0K0 ];1#^?# '5I@"D1# /CL58]$%I@"D13 *SJ/L/Pa M=X^2!03 MLDK 0[%V_]*6_B@9(&?@%K8>J-G(R)DSY,80S9"965W=B#@%"SRa MC9&;631P!L9Y=R)DSY.(!%/:83Y' V?0*H&6MK-#KB VF;0TQ*O/!\R;1K*'6; #4?4\.3.D@ 0Z;A^a MJ':N!0"\9[BPU%7M>(_" #S01]0G+U1JSY-H 'P" ;^>71&F O4V+E2JSYB(a M =D581$M &9+ "A !6" #RI "2C0"$B"A9QX#1+"9 $%(WKA>(_2 %R02;$&a M %6PAU_WC:.G(/=:/9F,W \0(@TL#0\%9@\M\F(0HXI5*2R^[0$V+ RA4;a M=W]WFD6['@0XKD*K=G]WFD6['ET^+O?J9#"X_K/+(F @ Y8Z[54=$%/*(4V&a M8-CP1XNJ=G_W*&4 "D>I@%,J);GL#CT!!JQ-RKTX&@^L_NRP"!BY /SE]/F 00S;"(4V&8-I /*>@=G_W*&4 "D=9a M3-PP9H$F79&G(.5" .?I!,="#_?JGLLU+E1JSY/H)G3Q+O0@ %!P#_]P+/0 %! >?(B K#Z+O3 a M+MAA>+R]LP) TU8;W31=J^2=[_LNM/X>(PW0,ZA T_\FW#2]?@HB79&G(.5" .! L<8JP: J2E3C3];[Q-T]LGW#3MILA]@I9%!FXB#$=,+>>Ia M4H?'D\KE)BZ &TB0)ZLE]QC_*/%^\AL?*DF[@>.RC_T8EOPPEF59+&?)!FG9a MA SZD&XYA3+*2'0I9*"'#_?JGCU##*R91B7_*"*9U?82*DF[@?NRC_T8EO@Pa MEF5Y+F?)!FG9A SZD&XYA3+*2'0I9.>"!'FR6F6Z6$_0:_"' 0K-7>NH6]O4a M%P0@!<+H./N+!'G"5/)"I:FU6F4:)M@M;0#P#S0 !A @ Q1P]_OBE.T<"&< a M"M'.'0MPW0Z%W$KF4,)-5DB0)ZM5IHOU!+T&?QB :\NG6]MDN<*_?%( "+CVa M-.'^*$B # )0!>^@.%5P;<+((EA83-PP9G?'(4U6%S"X_K/[C<_S8%*2R^[0a M$S[ RA4;=W]WFD6['@0XKD*K=G]WFD6['ET.!J!;L7'W=Z=)FP1(5./0PI1S29 @V;WE9Q>TQI5(B0JFU6G)_2 0X+O8\BG@!:PP_K/[$4PR !HPKIGKRK"\'B7_*'%PW6+!a MRJ$:GZ=9M.M1\H\2!]<-#8-@)=(PKIGKRK"\'B7_*'%PW6+!RJ$:GZ=9M.M1a M\H\2!]?M'X-@)8HPKIGKRK"\'B7_*'%PW:G!RJ$:GZ=9M.M1\H\2!]==\DM/a include xprolob.uue