B@"@VH*P!]F.@#@!Q/4*8UE='W1I7DU]0/';F.",Z=@s
MOU%!H)>M0@&::#+R VB9!E$ *#B*-CFF,J8ZY5T 2%#YFP4,: 3"3V08!$&Tr
M "#PDYE]&N0+MMH"91 #V/[QDZ(^*-'K&P:AX-U_;/QSZB3>@9 LO:;!*Z]3q
M4_2:5I.F'7!O6FI@.ZT_U3;FG<#QSIN6%#3:R ^.V@%PI,1*0@#@!:[\1.24p
MH:6EPKOWUEMROB=/-[!K(D0<&L4&2< C/QD#*,23&5#Y3WJ7U;6J@7KPHX%?o
M&? A$)FT';47/Y59,:.E#D)HT(057LADAAMV^&&((_+Z=&,UWI@C #(@63.3n
M0A)II@=F_Z@QDTX2>2_(50K#):YZ[,,(:m
MO @T'A1X[V/$X8G_8PWCCO?\!>2LYDT"Y8W)BWD CV]6]-'BN/D/.*HSHF " !/j
M 0 0 '1E,O 7,V[L"""$Q0=7Y*2A4\8D2I4LR] [ ,# Q9< g
M1,CDJ''$S2)R3LKQF7)E2W@P!5C\)\[ IRV(S!"D K@'_@"I09@^8-V0%;f
MO1W@^7 ($K(?SVI#("7,'9$D\6ZUED!(G3EY ),A:_.L- ,Y=Y8AZ_2LLP61e
M>4*56O$BO ( 8%JT2*" XJ%%CUHD\;GL:(L&%BB> C;BF=9P7P-0H#C(F3 1d
M41L=@+1$:XVO#3#(7(:V3C>W08/6C8 Y$S=(0706T-KH:P0+@LR9D^:,&\79c
MM[/+F#2-S.$>M (J#-X7]X-\\X#M): ;@0@0!L9Z%D4(&@*$,C b
M@?(E-A(92"T(P *Z"9# @7-Tz
M96T ! *2,H !! @ @" ('#@L$DS)@R=-&_<&)SXBL> 3;L y
M&? 3P \ $P 2 # 0 -T>*-+%")(F8,'/*3)SH"M6 -!E9)AD2D8Z<-VSFx
MS 10@& ( $B1J#ID<),#'R7Y8TF5@D0)9I6L2%9;G$M*R8H_FN0@I2O^n
M8!*D /[HXX4P1 B0@1#_@#"@F 14*4J5H%3I296<' C/8F0:"-VL"4ZBFV!Um
M"->/'P#Z(2D $$@A! (F 7"& .IZ(HP)"[;P1',D/#&%$!1L$X4R 0K!RFD"l
M_V,"HO\ PH!$3R0L$0 82)IPI4\ F"=4_8\U!Q*Q6 ]-^B/$I'Z$2$-X Q5X8+<+__./:T0"0,VRJE'@J@D'h
M\K)8"S^:\(\T)/HCRHE_&)RH-#<(@6[GG_,2.KV;EPZ !)U[ KKHK9M.0>>f
M,H0/ZZJR)4;GU\8@9P8'Z3e
M(%P #+B"()%I" 24V";#8F CSHRF!*Ea
M2 LMPJ $4PAA@PA7HU.0T8P) N,7GJ@C*7JA0<)S FN2(#C)6]YG'0>]*1'z
MH#,\LHO5DV05.2F\[;&@>Z_\WBO#]\K<[6YYT#'C^21)R2@:! .K3%'_3NE%y
M52Y @ 4B9B3#&"0%ZM @&C@3F&1E&PC(Z3YM\E9U!B.$'(8! /H0S3;KH", x
M/,H@!)@($B9BAXF08B+.F @^#!( %:#3'P81@$?0PL^9;&$&7=@""*0PA2&Tw
M@ @.*4,:0. &AJ"!#B X0QG,4 7-T96T ! *2,H !<+,'X!6/ 9MV 6(0! X<-FG&t
MA*&3YHT;@JY0#4BC<,&1(DVL$$DB)LR<,O $ "@ , @2M F#ATT9.V78s
MT&L9 (" E ! M%3)H$D9-W6,SID3Y@Q*E4)]!G!P)8T;,F_N*&7J%!Z!H"T3r
MP$D#IPR=/&7EJ?P*LTV9I4W+J 7P58"!AG"2$)G[E< !FV[.T$'#%X"! FZ1q
M%D90( V=,FT*&SB )LQ5FXL%X"FL0$">P@P$W"GL0 :>@@ 0/ *($1+!F[Ap
M.CV;EFA+!'+F2"1#1LY*FC+T.NIDN5M>@8 T ( ?@1K$J_Q,DDSAP[ZLO#Tn
MQ-8_XA2 %QL! H ? /^X@$ 8#D'47X(#LI A _=E!.%+?VC@@(B)8&$9638m
ME"!P#)J0 !'$47$<2CVA^(\("1B%E(O():@2@R <,,0;;+Q1AQSK^;122P#Dl
M !\ =- %0 FLF0! ^$>,4;&&+8%"QDM1)@[$NZ"K# %&ADh
MY026,[%1ZT\LL86D Q@FY6-=0CAISPMA6"L>T@2T$ 1.)6W55S&QJ?K2DFXg
MX9BQ!^P+@ )4E"%'&U9-I%[ \0T0[<,]G0!/?"JEIJL"#?3KF!1O"2G'&&78f
MDZL] _B#"4P! =RGQ/T" >A! 0!C/P$ T!(;F*+YQ 0 (4" ! e
M 8FEO7-T96T ! *2,H !d
M! @ @ (4F>3#'(L"%#6*T$['@ B@ . " 8/@ @@", "U/RS*%3IHW#DR<'c
M6'02A^4+!BCT_,/GQ(I!!.P,_O-WQH 3+RB^.*EC@@T (":F.)D$!@ !!B]Cb
M_J-6TR = #1< & 0L / $Z:M "P$%3CC^#@OA"Y9$3:%%ELJH*X&K6K5V_a
MVM7J("]8L60AG!60]LM:+&[API2IA^Y>O%[K8N7K]S$$OV'' I PN/!:+HGCz
M_O-!%X16J)+O7H[\6 )FP H= 9J^ N4T(O_^;2)\?2+U%I7?\U,EK-!PK0_y
MXX[I#YOCR9#U0N_+&KKPWIM_/[90&3J&UYHUS%;[Y"F(5G)L+:='/ZH("< 13K@8)$,'/FBu
M S+^%Z"/4^)A)0%%6N#@"UI)\$-P;Y85)P,0VJ$DD^ @(&(:YFW58E3RF!Et
M 7%"P.96]_6C39A0@@9H/P@,.N<+/-28J"MW-FG6CE#V&!<_TEAIP'W\L)-Is
MG@R(.-2G5?+F7HH'S$DJ.J_HO2;)T<>'"?%<807-T96T ! *2,Hn
M !<+,' %8K 3L>@"H@),F3*?0$ " CP $ &&A"! H=.?(D8M38!DX;m
M,VQ"7IQHH&2;,"E% D" H,T;.6_LE)%##P$ !A4!A,A(H D4(2I'MF23QLT:l
ME0PF'F@SATX8.714/IA9DTT9-V?HH('ZLX#-.VYZ H 05$3& 1SI90P H \k
MB2,R2B0 10J5NP#R A 0@$"0*E@ "Q8@@,"0)TX4ZQU0=,H4R8,)$%A"1$A0j
MP0>(E+&39DP9N0#H4I1(0F]=*67"D '<>G U?DI*%3AK9> 1)@RW;RIDD9i
M,FG"#$$3!FQOUI,GY-Y=AKAQY,J9.P]:>X"4*ZCI#@!,X/[ZV1:YAT 30TQA%6\13124"1D=(,11'H$D40$-g
MRE'&&'.DH8=*% I@P!AL9+CAA%*!**(8'&ID@!QD>.5&B@@48(:(*2IP@!EAf
M?'1AB@P<0$:.%HZ1H@,&N%%'&V/$D"($!XB!4AAGS*&6!$&=0-2#0M!#%XD9e
M/4#/ (,!@$)0*624 !&ZZ31%&72$!\ !@*G@V@)2I'$&&G1,@48:9M 1IUX!d
M*,!$&7WJR:>?$LDYF +#/&&&Q^]P<829>3QYV #-! $&[S)X4:.95!J::)Zc
M$9# $&' ,0<3;XRQQJ4"%!!!G7?2T<0;=:\ M3KZ!SY9L4OO%M9!+"#]R;Q8KO[z
M C >A13.2P "]C[Z1*\1DQ Q Q$7$'+(_<(+[[P,&/!=$&)\2Y?(="DP[IOSy
M:M3 FG04@8=I<-"1QJ,DPQN53P WD&[..Y?1\\_,(@Q C4#$ $5:;2Q$ZI,x
MB2%'CDP'#0"#"M0L +IL8NEU>0N(SC'D@" "" 0 0 &-L;V-K+F]B;0!B;0 1u
M '\.8P ' Q8MPM0 &D .#0< ("C LCA1I0N3)E(71$3D(L2G"EYYM ITP:E38<#s
M+CJ)L_,% Q1Z_N%S8L4@ G8&__D[8\")%Q1?G-0QP08 !!-3G$RB"H "5JU@r
M!'KR"?0?,Z+_W-$!0,,% ;JE/00\D_?VK9O!0@!\&&NT+LNZNH%\,"O/*7WIM_]%+)X2:FW_VUE6^C,^OOQ^!_7&]RI"+5L!6"?$;@$Z H*3_p
MQ,FE*P^U ]4 >" 1XA>>;=P\_+J+[*[=YG_P-%O^)\\O/]#_^(TVP9",5J=0o
M07SA\L@)-+)!$:!UA^2RZ*JD 6 YS39T7+]VVRL=W)F>UB^/L4&n
M-/989),=E]EQ^)C@QELV"%)>=-,Q! 9[D?'S'EWQ54C?.+S1AM]@/_2&'SNSm
MI44<,?SDMAP\"KYUPUX"1"8/BJRUR,"+ !" W1?:8=$=-#M*E2, $0$,Pl
M-$3/30X%!-RGQ/T" >A' 0!V1P$ T!)JEZ:??@ '( ! k
M8VQO8VLN7-T96T ! *2,H !<+,'j
MX!6/ >MV 3(PA,V;,6OD"0!0 F3"Y)%($8" VW2N*E#IPS'B@08A&3#i
M)LV<,F/>N"%##P$ _ ( !AL0"5-&U,!M@)K^)0BQ8-()A2AL[/H/(L@BCJh
M$:E% @B.-'U:QMY1>P/^D?,8$-RGQ/T" 1(J @ V2 $ T!)-EZ_O"IH! -SAg
M ! 8V]M<&EL92YO8FT !$ ?P;J =S>7-T96T f
M ! *2,H !! @ @" (6_:P$G#IHS!AQ!C%1I@;A>@)[H*B J 02 "0 $e
M!+ #)0P=-!!3/GQ5HT"2+L",,"SC)DP;ARH!N$(UH(G%(T6:8,F9TA4Q ;ILd
MP H"!PZ;-&-,IGGC)N4K'@,V_0QJA4@2,6'FX(2X0>?"!\@<4Cx
M3D!3X@/FE,B!$B5^X$**X='0(@ _N " @/5=J!@&^KWX18Q4T @-D/](,"1_w
M+%"PPC_BT&*D V889&"2)BA&@7XE @!!D4=B628 3$[B9(PSU@BD/](,*<0Iv
M6/ZP)3C\9:@8 @!6)> G;IH)8)(,K/ 1EV$" (D)ABHQR1D&&4*"H29(T2@ u
M!P P0:1V) K F00"P,*G)4!JD!1[]OGGIFU*\8*C#]8G* $%-HFHF0JNE^Et
MEQID :T"2J&$HQ)$ZI^A0DR2I@(_\ " F$ X(\V)?YCQIPR2@ED/_X,^8*1s
M#&3KCRR4'OGI +QB"H )YQ[Y@K4&!< ?"K?^@PQ_'RK&@G[5JJHN(N#6.>5Wr
M>O0#RY D& D!+:X<*:\*$:NY+RVK_$-,I!)DC"0 *'#LK[S46MN#ND" "X6Xq
M#/>#!GG_*-.N!1T,6C,#1B)0"#A!O_H)/M/_0::<&Y66^-!I:?5N J &:8BNK5_T"CKC[U?NU"VUOS(,09o
M;*,#\)N$3G(WV]#L/:A^-'R PP>X"/&&01H4_ /5AASA3M9%3 X-'060L$T4n
MROS#3YH22$ZYY9AKSKGG[4K0PQ3_.,- 58"T7E\ !"B!M3.1&I"F*#3,[ ,'?6$-#0GT\D*!&?TY((;"@>^F0(1D#,\ R"J"/) @"/,PWLVT$8&,SB%VW7+"@4\H/$LZ+T7+*!]j
MZ'A?_*@GB<*9X LV$(0)V^<\Z$F/A2[\P@V$$)+W$>$&:N 2KU(GA2E,JV!"7Rh
M1Z_>\Z0O/.$= '" G1BV#Q#0C!E[^H"U_*,K*?KJ4'D#(#\HE;6<]:=U2VN:g
M,\1@$!,@JU,SQ!O64FA#^54OASN,XQ&M)85L[<,0>@1 !0I6 4]R G 1 4Af
MH6%(GS$#;.@ F]L P ]P/-)6)Y1DVU1XP_EADH<06-H 6A!DPH)]P9,.>.$-% ,!31H$!#1PE -HP $023&M6:Z,@#DPV8X!< %GMA3:1E$z
M! 6#0+;R80HK6N!L(U/2J= D$$=8T0.NXDA;\VBM @3*C\/ZE1!,B@\A8,VBy
M:>VH0>@0JR3YB9^AU%,"/%1:5?Y147.F+ Lx
MF*L 4AI/\1S->/3D1PFF$)(6F%8\4GAL6V>*+0#@@QE6=.(7Q33<;W+T;&&Tw
MUAB-JXDTG;&,_X@>5VN+CVO=X+%QO $?/$* 4%J@8 _(%CX8D28U6%&GRP4 v
M%=HJ5 !JP8IKC>\6$9LFN%I+KL85@5WQVMS^60L$V;I'N=A()XCJX1XFH!D\u
MTL0.\O!CD%5! *TT/#T'T""F#' L:%7UJ1-PB0P&F6^&^P4/D!;L#U>[\%SIt
M$$H*%*P!"?8%V_S1+@0(=*C_T$3Y>)SA-XUS"N;,9I&1:0.3\CBM)M9O@:_;s
M+3]8,05GTT%;=]SC'V\-!D/NL9%I@62#*+D_1FZR>MS3X!KMBVC_H,8_X/%-]&0HB.(AV-/'4.5(VJ*RJ+@N.4!+@L)R=A&='K%<(q
M+"J*PB)NMNP!A^2R-;13=&Z?XQM= $S7'CZPKJH!\ \]U/C&FT8"V^"Q:0D0p
M$A^$=H#G2GI2@ZB MEB#1TC QH^KM:D^'5(, PKEN5Q[#@PV$LBCTYKG^-ICo
ML";EQV*7>FB#R$#1+&"THR$M6DE_=I"AM72J](JJ5UL+QP"H!R:Z'4>VT2-;n
M]1"&IN--!5XSU2 >("0]5MI2YF*-'H06P)QG6M-XHX#7_)!7P$U;6V$+@-C&m
M'EFRCZ2?4&:@8!? MP:08 6JG=D!JSM2*%%0, K@>UYI-<&G,;U7MP(@0J,&l
M8\&&2@]6K!J- .@''6!\0Y$ AX'>;;HP01Z P&D:[<#Q.4U(=,2?%3&,BK%j
MI\=2!3 \6_,0Q[[G88TT>8'>LC;MVCTP=^?:W5$LQ?M'7FJHC,K46!>MO$8+i
MUO!Y"&+P=GCH',$C#T_0S!W;QD>=)6[%'F21N6FE>GP9T?JS6:"M'3#[/]QAh
M72',#?6GN)N/=@\VU6\63IW]K.JQ9C7%$$!=7/"TE$'-UYO3N]33E8XX/NOA4/MP].:)\M?ZD5[T_ZZ;%P:Q@O_@JP(@7.UFGJf
MIPH%R%(":Q!G<41O/@!W ! =C4<0*75WD9(@IA6 BL%2#O!W ! /^K!O\\= K%*5M6/=?Y,9UG/)U7"4$S")B_G!+!A5'FX8/d
MMV1DGX( _2$O]+( !>,%V1(/>/!"9=%58.4QUR($R 2%:M(#R*0>5*@Fc
ME/8I&7 V >=_-E@T10@":;(A::5_@/a
M"N0YB1.(!4.(<:@*B.@YZH&'E/"'L-(#0J >.U@T5T@ NV9:\D(!)( O?%@(z
MD\,/?J@>_",!0U8,LTB*ZI$F@@@ F@@/5- #XZ6*-_R y
M/!0 U/"'F;1&,!(NHZ<'[X %-&-\).8H@"4.*'9S!1,"A5@\_O=77%(&ZC!Ux
M9\,@_E=?V@( )2( MF!%-W V\^9_A 4 $=""?^1UH31;QV='D["&>G@&">8(w
MMR0"ND(":0,%@K-UA<]" $MT1Hu
M"F!HS/(.L) F/G!K/>B4!E$AS!=-R61PXL$ t
M[P0!_!,U5@D [L ',\4#5PD'MR1V+$4 )1( 2F!%-G VP'!UH;0 )E8AP)Vs
MR#27Q<@KH<0!!8,!5RD#].8%".@.7 !QSV1420)$_%2 Z59]%_)X(5%P1Z-Wr
MGC.1?6>![: *OKB&Q=4/=) F5I96/W V8\./*P@ #1"871>4R2)V!#!$:16.q
MD:(!;64\+S !<^4,H&.9)-.$(EB!4"./\J '5B1SXH 36_0I6"8.3S,^!2,"p
MV<(.4#5J.(&&7 0 V;F=N?*- ) #)V9FPZ4,) @DZV .-!-+$B-4@=(OW, ?o
M&Z=N[W4V6+!ED_2=:% O$) W_(E8T@$G Vn
M?I6..6<0[E45$& I\J($M&(@GN(H$>"5 * #X,9H)0I)5W5\O6)N]G*?Z)*@m
M2U)]49,#V;(./.5_^[8.EI F&9)6$<"%]"4Q..H@U4=EVI(G2/I-6=V5G!@$)@00 Z^ ")64Q;Y4W^%D?(:(8'.!3@W(D,P4$/8J.ZFF&'7L2GV)\G@.a
M8%!\,1LP %!A@FD"C)4F-E"O'Q5L_'&FR#<)>/M4GD0-LSMGK_LF!MFL /"Lz
MY\ "=^D.5H1%\>4-PVDH20@OTZ8JX?0/WK [F3>2'?,O28(L-3" W$ \\A&]y
M#)!1_X +6"*!(:B]\U$?7"N]_X!<2=*\^XF\/-0>Y>N!Z$L+X?N! T@-Y,N]x
MWANU2<($ZP S:0^_PLO\*L>_Q!$AO /HO /P/ /W' $^K!4P!-BO#(& D 'w
M_S .0D #,P " . $L^#!=[F\Y4D"9W,?YAMUJH2\XZ6\LL)/ZJ,8"'0D-\A'v
M # BRG9I=&IS_)NTD3(A\8@NV5(.H,"[SUH.OI F@""U9X-S::@?<-LOAK$1P) M!"S&_>2-N=? %"T % .,B!4H&J^_;)1T/,F8AR?t
M#$,.0D SYB"/_) V:14 %0L T9=6!L E?.H$6)(S7(*I;;4T@>RI8@+&;X("s
M^M&E_& !L5JO5]JK;Z*RTH()<@P>X^ +=FQ%/A-?6_S$LBO$K$8%CJP8!ME?r
M5G0 !,;%0"9@:07+U6D0?ZR>"2#(+E+( R@.B.Q_2[/+C*PFJZPJD1RR>%+)q
MZ'*RF)RR*]O)>B .\'\O@/M*R>27G+ '!3ZOD O(S)26+(P&P. AHVVJ(.p
MS$S#D[2DFCR&5@0!6GS.6J,ML)2XH#^=I&^PH>X@ %_YI6\!4I5VS*74H.o
M,WEUPRTQNNS*CD\8/"VAKIK4L'Y$[VT;5V0;3^?DGQ$9Nl
M:6IS42,#V1(.UFK*^Q8.SO"P^Y5IHM;3T.6G ! .G,!]W:(!H60".W?6IB#-k
MX, *3D=OB;;4B_8GH63#NZ)N4VTJ_AFQ!L:&=5W*Y2FG$*O6<8VQEZi
MRQ4 BI!^^#!GOJ<>M1=?,FG*N2<0Q-VA*SK4F#4W_E!\Y!8GD^:-E:;#Q1K9h
MQ04.OU:&,[?#:3(BS+VQ / -^+"(Q1TI-\O9Y6V\D.VD_R %[F:;V?(-WL Vg
M[-"C* #<2Q4Q2Z54\' Q E=;Z$$ 8-.Z([9Q?2-P[;=48*"^ZDF=# K9XBW7f
MI-;7Y8T$Z.W=\;7>75S>$PO>'PMT_J 'Y&=^Z,=\Z[=4#?Y^LQ%L\G=P]7=_e
M,(X!DWHJ>*@$0L & J",F80 1IPMW@ .;/8%4@H-IV<\A(:PUX:L<_HIO!TFd
M 3!H6&,/%37<3Z:>46X0Q[W#R4->?4IEOW6-1?>UT?7W1#2 -#=6OZ.@-Z7[[UJ_X $\PUOb
MW0 ,;.,.V9(."I!^\O /^N#?^J!49FX0I8(UF>XH!*!4[B O1@GJ7LLKG])-a
M"! I8+E[JZZB&D!/^I#J!'!4UT)([L QUX*HUE($V=(-&P+J6A(27J(>OG[#z
MP0Z5F-[@&;C$,??=V5WA8FYF&,X-S^MK#^OA0\4-Q""H)$X"99[L1I MW. )y
M00X W$ +17[D-'-MG+LD(\8#9JG<\37K@8OCDBN)1\*+;IYW^4X!X=0?_,X x
M_KZ :A KIO4#$Q!* T!NC*U\MY9;$]F;T*@8QP(]F"D.<));%\!WY[0 &%?Ew
include modula2.uae
Rainer Klute ---- klute@trillian.irb.informatik.uni-dortmund.de
Univ. Dortmund, IRB |)|/ klute@unido.uucp, klute@unido.bitnet
Postfach 500500 |\|\ ...uunet!mcvax!unido!klute
D-4600 Dortmund 50 ---- Tel.: +49 231 7554663