Path: utzoo!utgpu!jarvis.csri.toronto.edu!rutgers!sun-barr!newstop!sun!grapevine!koreth%panarthea.ebay@sun.com From: koreth%panarthea.ebay@sun.com (Steven Grimm) Newsgroups: comp.binaries.atari.st Subject: v06i089: modula2 -- New version of German Modula-2 system part13/15 Keywords: zoo, uuencode Message-ID: <34247@grapevine.uucp> Date: 8 Sep 89 18:46:20 GMT Sender: news@grapevine.EBay Lines: 509 Approved: koreth%panarthea.ebay@sun.com Submitted-by: uunet!mcvax!unido!klute (Rainer Klute) Posting-number: Volume 6, Issue 89 Archive-name: modula2/part13 table !"#$%&'()*+,-./0123456789:;<=>? @ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ begin part m modula2.uam M;LB])_]^'5QV3#W^P/7U*H&K5P="&5C1,0)YY@64%@0!" /" (+L](]YAAW@EH!:,3#%m M/_^8@1.&#-@ R'I?<-&?7OX(45N"@Z%U (L.,"@0A!(B.):"-@HF08YER1@ l MC0!P:!X)65EPEG=9:<"580BXU1P 'CRWFG2ND=B>!._)U \O*][88EHP^@BDk MD"ZR" &/ .Q8II<4B!EAD!.Z2"1(1W:5Y))L)>"D8E$:E!ITDK4&G'Y79JE'j M/S9T*=Z063E0)XMJ@LFFFS6N*9B1EF:% 9H:4 HGHQG5Z14(>+KGQ),D2!F=i MH-016A<&AO+CR7Q:A>7EF2X:QH!Z<,EE8JQTT%J?F12RU0"O^OWJGTS\**$Hh M?83P \ 2 @Q9IR%L>5 ;HSYR5N@TY&X6:R6W>3E>.6Y*)@#!ZJK8+MIZ0COg M 8)1,.^E\QKV +)QS577KLOJL0\KM7E5GU=@V0D !:42YT1B &"@*KA5]NJOf M5H;N YJYHK$506ZG>0NH;Q4+)=QU^]!FKGCW-CKOG+@BN7"I6.;7;WL ZZ6/e M/\]^^:*7,3;XXYMD2BH8KD9G%>G/]7I:] %S8BJSDO9-L">4$Y,\Z,UU81FPd M/GCT91@%_)XLDSYB],P F@Y$>U^UUQ8+0 5N);?76,&G(\4?;'N>MRYLK4![:=;3D*79ODL5O&.]IZ1a M6QTHEK?(4TYNL=\!XZ/=ZN?*> #OV0+0 ?"&XB-+[MDWN#WLW=5KX/[A@%!Z:BG%WS,CF/GRA=;0E WY3!',=URy MS,CVUJI^U4XO]^!&Y@@2.>BM*ES5P>#X$,BR=,7+92:TSP@:>#?G20Z$^B'@x M=>ZAAKX<01__H(<+%E"JX=DL<8:Z!Q(V6(*R64&)I;W,N7-T96T u M ! *2,H !<+,'X-68 9JZ #. 14B2)U/H 0 0 $ !> ( @)B8t ML0&1-'/"B&%3ILF;.G/*8-3(,8 #*678A*&3QD[)DRE7;@0@0("#(&+FO&%3s MA\Y-E"HS[A0P@$$5-TC)F$2JDR.!!DO*Y!GSALS1G 18 E P-265/'!4&@#Pr M@.+$MP .2 GCALR;-O *\(0[<<&4,7+*E'%#I$X;./(J%DAL$=Y:O0/X$H Pq MY(T;,VG.U D\9+-0.8P?Y 40%BX!!E/*T"$RLPR5-&W4LK7(%P"#(ZI9&WT=p M>_1:O@F$I'DS)VN>.?8J K WX!\Y 8" MRGQ/T" :80-l MF3IL0) )ZH8."#UUVH (4F<.'#EOQ 254V8EF:%%C[()TR+APC-G3,YQ\;/(k M'!!BN@:BH\?I&399P[ I Z*.&S(@\*[1R]=*&#EIPHC9N]*.VC%H@GYU8Q($j ME3QPNK+XN91O&JEF&::5 ^(SPC!TNIKI"K%R#+AZ[K@XG=K-:C>M2BI>1.EBYTJ @H6^:HG!94S9P2+?(WT(@J+J41&CF+($89?.58=)4!9(I2E#$&D2"\*$410W!(1(K\W>1$&&WPU1)^04@A11!9d M@+ %#"ZX( ,,78#PA!$@#(%$G4&VB=\1#T&V%V1TM+0B9F4DJNA-2(1QF!F'c MQ<42"$-2:NFE*F+UT!QRWC1$G40DX4003(RJ:!%.$"$BF&)"00=I+V[HJH52b M6/8$"&&.*2J#,*H PEUY[47288DMUM579J3A1AITI.2&"@LJ8$6=R"Z+EU9-a MS3G2KT4<442(/S$KQAB'D6'NJE*T^FJL/W'G8U?F%GHHN\Z! ,<;UJ8F1[_%z MZBI'HER-\<9\_1(K)I&W*@#%@T,40="9 K^&@AMUT(77'"T)\<03!@7AQ)PUVHH?\DQ@EGYRR$XF.T9*AB$(MM1,_C8$U""*,(4*B8CSNQ!,>v MBI$H'!X; >L41; 0@R)NDOVXS; 8#L,B>H+65>/u MBQ#$Y#\-7'!E9G\H!0H-/TP&RR-=D0052 A,<%,F>8'0$RF^&6?O351EL(S*t M 1_P2(Q*B<:C:#A5O(PTV@C9J)ENVJF<+R;YUZA'F#H'JH_'< ,.B1I=19P's M/6Y5;"1[J]CH0M.0A]"A.0$!W*?$_0(!8QT$ /(8U])_ <0 r M $ !H96QL;RYM;V0 ;V0 #P!_OT !7=O. '1Y F1*DR*@ A29,J.l M!@HP&I'RI F(*5FF4"GB,4D3*$^D4)E(A(B4BA8QRE2 0@6(%CASZMS)LZ?/k MGT"#Z@2A(L7,FA,K3H0#ATV:,6'HI'GC!@23-&+DA)&3!T0:-W3*R#$39DP9j MHD8SJL4(A>.0(@]?+FV:Q$T:J6&@VA39LZ<,&?.PDD#IXQEg MS)HY>Q[SADR9T'(R;ZY*W3KV,K!A@.@!0NQS.:+7*FC[Y&U430,6" (=;TC7WG79@;!==]^I)QX(Y)F'e MGHGL50\EQ@F=E4=89GFG-M*=IJ/V)6:^M42$'HXZR!*EQ#UJ[z M:;:XZ7:JNYYS&+y MX[,[!LA&$7CY-0&&>LL<;Y69PK"$78(9N[5V6Ux M55=?A35666?E.;".?8(L,EA+E$'H&UNU9F6X6J(*PA5A/&Q&C2"L8;,8./OJw ME1MPU$$'Q<["+%?((_M&!X=5H3"$9&O, 9L0380QQQI?3T%'5*->6:JDF+;=v M=I!#"M$&%E^WD<775F/]===GAT5JEJ;^K=O"2 $M--&PMO$&L6D049ML%F.1!EIG($&'8+W[/;LE<+]t M^=RI0S>ZY7E3E?L:9J,=NZF$8QBTNT/CISCC&W8X<9E!QS?CLS7A#JP02I-XM8\,,@ K$),BBBY["81!GL3@9-o M1!U#9!!%U\%.;8!CFQ5GQSX)O2]255RCVR*8P0J"X()U/"//"A-'.5+*=I9+n MXAMV]X;>N>%WP0L+;/KH1TLM 3SK^1HD.!]S*@m M^/@T-04287%B$)4-784H)Y3A#K Y0F:>((13F9*3BSC)N1@VO.$,=9 AYV##A"2$KJ.CZ^@5.)H$i M)%!1 8V\E! \^K4DC&ZE(P7!2I' 0?FU\(5IJ!\UD54O-]&+6L BH1DX!U$$h M$HF:01!5.Q%%A#*8P9"6!('MS$:@V2B)24Z"DI2H%+A<]LQB1&A,4P:%K*KDg M12SN\F:.P"E1:A9!#O=!U%OO\ZUX8DF7/@NK]01%IS+5!ZY$4VM$)3+1(3SOf M@>=,VW"V91&I"@D$H1M=3&GJ5>)MR;!@(:AT?I67B[+J#7@04U72-8?O.W(!!O&,P@A3J(H5]R$ )H$179U'TEC,YMPE?*^#I+,C*EU+6*b MV.@ 8(XNF,!ZO"MA.H@4(FCE#L@"@0CD8%_\?A8/(B@J6R4B7S-8&#OZ#2T*a M&GQ'UID1-NRD0^AB_%(*DB%T^M4@&>YV8#_FV UDB.F/R4!9>?98CK;SD5WFz M@(;0*;DQ:,A"3;>45(O>8: A[! 9M!(L6"$MM((U:HDM)[(4(XK%$%XD2A$\y MJ2DL3@YFF?&;S3*ZIM8I=':F@Y2Q*[\38]A#;[!#4+\L8OB66+QON(.946"Vx M&>L9Q@PVG1C-EN8CKU')3O[*Z)3,8B5#>,IYO7!9ZX,'.'CO5[/YL)BHJ7EV&A(C\YL+*9TL"-<*@K;v MQ,^C9K*M![W?Q=&AU;Q]V8AC/5^@T6$,:%AT8J7+K2>)00W$A4U=$@FC)SB-u MW94K/#.'@E,[M/LNHKH!>W!F5OU[4-W\'700A;,2?"p MWUAN6B<:U& 5*U_%A)^#.F8,FQGY=&13^$+9R.2#90CIDV GF,_J4(F:_&+5o M"1@[P<;UKL*\!_4ZUJX0S?.-0]&76-F&K1QJ7>TB8>)([Q4[O7I'CF=]HXIPn MI%3R9=R4;ZST.P6RZHM*]TBA?ABL[QFB_>HZY/<0\PL4G:3#VO$,O'89G$#-m MO$@>G=GOUEU$!1OZCS,OX/=LFD=6ZD=X&[)_9P$G9O)_;,!YNU(&(B,'CB%Hl MYM$A[@=]I$<%[))8_-3+E(CLG(L*9A\j M(4<=!JA6JN5W5I@QW_4Q$$=<(+!/Z95;BK=WJ;>%]1($9% MLD)[>%@O*# '*; T*'B)?JB)J&=4@ZAD:(A_f M'EAN"S<[,4:*(&"*8M0$::=S:;0EQCAJP#@L0)8F 31W.C5.@2@1@_@$P+$7e M')B&C/4@C%A9:L1FMH,%8V(&K!B/@B(5U*.'/U=:IU45FRB(_$A+YH%8Z$A[@]A_KP0%;S '1TU63LW.3Z3$'@4JQB0LOAR8CES9XF5;A.4:W<9YW%A]6B"V,B/GF%V=I 7&;5W2'&%z M?!D4WX49<@EF,::!B'3B344E<]4@5$=A+v M_.B$X+85R9(F>, "7>%/VX$'9=" ^]D55,AW?7F@//%=H#)>AL=/ZK5-+(.8u MV[:@D,$B)Y@N'RIZ#$FB)DI<-9*B.%*%"!JDW@5X-D%K =J MU68ZW68!9IZs M1LH&;&"A6@,=Q0=DGA(T;*"AHKDC3\H&-,I4;X PZC8'XC6F0R"<["@E5'IJr M5QI<6NJ<7/HE4&J,B!(A[I.,\2.;<7JDU&<'G'%V> DC#8K=0p MBWIE#RD1DYIH3] =6:-R1PK1KFJ/_,CB>:(+DJLQKI'5B>M9\&L5\9OSK&:U@.I*@IKP/I+n MB$*M,.(C 1J'V;EF*>5R,8"K,H"K,X"K-""'/;4&^3HFTJ&M_9JJ=)HYTXA=I.I!=&JQl M.I8F7'>QE%H%<$ &F"H$97 &U*>NUBH_)HNRAVBQS@JL],0&=IS)E<$3D $j MX.4"&!$0W*?$_0(!/#<$ #. '1Y F1*DR*@!"2<,H.$ T49$2A D2+CR!#BAQ)LJ3)DRA;g M9%RI (3+ES!=4GPRQ2/#-V3JL D#(HT;.F7DF DSI@P(.F\F5@1AIHZ;,732f MO'$SAV7&ERFS:MV:]:6*%%8U*C BY4D3$%.R3*%2Y&R2)E">2*$"(@@1(E**e M3+$8EDH6*$6N,B0"A8X<$#U Q"W(5@H(*D\&[V#I%[!@N$(0@\@[1"X1EQQ!d MM"G3YHV9c MRBECE$V:.71L@VV96S?O,+^#&R9NG+1IU-AECPD#E P(Y]"EXZZ._(V=H,";b M$-X.NJ,<]S[/I'[C\[5ZZKD5X001DXE566#4R:<99Y[5)YIWR9%1QAQCR)$&a M'$@==AN N;7AG!MKQ#??< ZZ408>T2EH&@A.0,0$"W610<9R<\R! @PI_%>=z M2VU MQH=P-F%EUX6%=>1CW)$%X:,-,X!PAMF@!#;;+5MN*-H;)3AQAETH $&5,056"Q:6AAU(%'H9-66@:,71HU1U!I8'=J=(NJ^E)G3KS:T1A3S?%&v MEKBBH6N%S+F1JK N-;&7L2"@D<89:( P!QS,F;>KA=C!V$021"3Q:Y!TK)8&u M""<"1954T@9+[1)$")'"1:'U5P:IVVH9W1IEY"'&&ZN1P:Z[\**HY1ST_O?Ht M7Q))<<6E4I2QY*;4EFA:&[XNM^2T.UYA(5 <4QN:&Q_[>L?)1ME;7<9+.O%&s M$V60T>L0:(2QY:TOA28R&3"2D13+2K+AWV@ZA]'"&#W_3')U)J4L2^G+UL-M-$@( T"=DOGW.O3477=-M(-,]RK:MFA$U_-[A;>=\]3"1I[Sp MU]7U7<;?;@3.!FH].VGXS^9M.#%@$T$AA'":+>9$8X]%=GMF!<;T^X)%=%8Fo MIS/5!,5JK97AGQ!P@E[=$(]GZJY0K6B]n M46Z*L>:$TNDZT?WWG,Y?!W1!\58:], ^::$O0TZ2V8[F9STQm M8 \$VLO?_L!7.#;\SS_KZXFTW,>F^,5$#F3(DK0>&$'N>8^"]WE#='1&O0RAl M1H1)@1/"E*SUDA>7A"Q2N"0 9N((,2%4?&,BHNB'118'7(0![J/7%[j M4?SAD8R8(1!8$4H]20\;V^4M.BKJAJIR0QW:,(88[+"$<:2@(-L@A@#B<8\\i M\1\ D?@D:>EL#G$:8W7$X)LPG,%)]X/C!#G5AN>,@2D[^:0'72*@SS@*;A03h M#!$L])XI.$\S4R@"79Y@!!!L 08N<$$,:M %"C;!!4)(DVG.D"9@NF &AI0=g M+"U#G24(80K:,@,=A& U)R4&!5+ '!VPF09MPH@)IQMG-ND HR%,Q3#+6D+!f M8!0$I04E=4"19QY8H$E5#2$,<)@#$Z@$HW!RBPY->,/_RB"$.M !*6XX9SJ;e MD-"%-O2A4]F78*Q)3FUZ$RVZ! $O0<#1=7*3#G-X948R]80A%.$A>0'!$9R'd M&118@4RB>8,8XF,[C5(G-%V+CD^LUBM3'><[J6&>:P(X)=JX@"4QV9!Y4\@N$,8B+JEHR2Ez MD9I=TEFGPQ*6KK4*,77K&^805SK,=5)VK55>]]K7OP96,$(;K;042@?$1L='y M5G72(Y5;!L@J<;)'<99E;65;S5H5JYW-[A5#"Q/"DM:TJ%4M:PEG.-:\EI*Rx MI:U^,HO;L#U42[L-BV]?"MRVOC4);CAN72/%7;V" $Q.$!/^!!O=D=67*/XQw MPWW:,-ZBI D%^44I4U9TX?ORED.6I:QX'6NIS Y-.6]H WM?XEZJ *?$KTF3v M$59$+!@E00A-: $4AE"X&*LF*K%YEL^*+"$-:E);L37-Y' <0#?)Y@Y1!F& u MQ9+6EA(XN&]]@D,5G-S+7F0,V4,"F7SJ(/\:A\1LES9MULVQF[!,V ;JU]_3-HF&VYMVK]!H]4=%)F#>.S.6 ;34JD'LN (YLS5,I772QWMI."I.BPp MFRKO/AL[O_OG.<,(!HAA;1!T "-#KG8B# LX:8&0B.MS!o M-!N'%QW&(&S1GM?&($#XPY^P!!BIT%F8?HY1@G*?PR!+0H\6RX#9BA;G%0$/n M1<$0O5#PGE,/,I029,)%B@X_9 HQ\#O@8R!XPD_(\)]+_&&.T!8BT$3:KX:\k MWS4S!_(!A<-1&@C[_#"G>S>IJ+YBJ(6PJ" 'M8Q$3W%j M$P,%04U(W4$I)3Z-@H8WO&$-OR_C%&0@^< +?O":'=?A*QZIMH!@H3GO\F]Ci M.E,Z_+SM4R&Z$;?.0U$RP<%"RA-??MJ1H+*]#$*?"@CL_G:7:/WH9W-GAV%+h MY@=T^$=UTE9C$6,'V%$'W055[15WE.6!+(@=+CB"^B>#f M%F1V9:,Q-!(=I00PZ#,59)"!&TA^SO,[9-9^2>=@OX,[*&A_8B 5@*)4SL-4e MT:-Y'5:#>/<2X"5H26%_PZ-Y%Z%R"A=Q#L=:0@ d M;G "T8%;$O(:RI=(96&AAI/#=+:? >30!0*.!@R%A+SB.*TE4HM 0_a M^O4.F#ILP+62 2..&3ADY9L*,*0."SIN)%4$$@0.'39HQ8>BD>>,&s M1!$W=M+((=NF3%,04YZFG3K')E %(GWJW$<27LQ8r ML.&@*,:D #'D#9P\2*%p MBE8B1*1@G.(1,6#EZ ,FS)G;9)1A!E-Io MB$5677?!!T)WLE&E4P\UP5!>3=&)H<9LG>$$(0@Q3+@@%660D80;9EQUTX8Rn M>"A%$F.0)00;;XRQADT;SJ"B$ 6^&..,--9$@XI3T)&9&V?DM&$-*B:QWW]$m MA!5&CR#8H.(38DP!QVQ&UG2#BB#BD6&6(.# 91EM=!66@S5MF(.*5H3A%1D/l M-=.)(!YZ%k M/@E"GS_2:42#00Y9Y*4<(JEI@TKZAV:?4CJG8%Y47CA&9W3D<26"AREXA!QAj MP('&5T*\@0=?$,H@87PCW9KKKF. ((:OQ=5DK*Y?-;I7L!T2.Q&NT";KE)<@i MC.9IL]<>RZNOTO(4;(K6/HNLLLS::2B!1%95!K=W.8LMLJ7^IU>P-J9[[U?*h M%KC4DE35&VZVK;UQ!A$"]A3LC]8F? :N;;2U6H #V@;GQ.(F^X:%&(*K[EG3!533F7VQFH<9\ONKP://(80==!A55D.f MORREM=+>4>"N9?&W%%HTHZSRSR+_.[2O0Z 1QFKFOKREOQUC[6X8\!;9\[JTe M?9UUQYTR]6G8,HA)ML_;=N:MW&]G:\3.^QD=8KEIOKRFM7_+$;A3&VLM+[V'd MV=MQXHN'R+*T$,XP+ AY41X6XX]WYC0=4(/PY+) 1WXPOG9."\(,U7(^4JLAc MDQX6" '.,49F8M!G>EE?D=4WLE04>+5/F:,K^^H Y]VMD'S7P1&<):[6EAMUb M5&5\P;4J4),39*&I880P(+%#7S:Q"O*KJ!UU!JT*QJ7RJV'87#@(,,1@OH(,a M1V74E_>#@0SVYSVSX$%@<<(?#0A8DR*0H4#U.UX <<# !87A@6\@FM&$MZ$8z ME,]#3-@('6C'/E"][(,*HH)]:%.$ WYI0S1 80&1D(8 4:%!+@N3#&LRH@?*y MIH2%\Z ,%00^Q;D)3##X(/JL14*]&H@(-(L@&2=8P2<4S2L:RZ$'*S@%KY'A#7=8HPF%14 %76%7w M3MG)AC:WQ.4U$00M@M%]HEB3%TF%1V#Z4P'G Z>POH='*FE*<,8B=KTDW.L-*5> SB*.GI3%JZQ5#G5.5's MVN.$]Q0P+T6PPS_UPQ]374Q !#*0&Q@)@B64(0_+^AH9$KI0"%WQ?#G)RQ70r MUIGJ@6",&'V#1D%0!H6^Q6 :/!I'WU(X 9I/)R(E*6IVIA_[<$1913L:2UW:q M&8,-17IEB,%,7ZC FX9T)",5F$G;X-,RO."'AB+2U5JZT!B ZZ@P0#p M"H(4)SF5*D^IBM2K8H@_9]@J45_V5?J8:JQ!5.)301#5DO+T26W9HJF&NE"#o M%<]B>"T<'\]ZD[3Z=35/$HO%"/O2[EG+HBE=Z6C.1%',2L&9=4R#&1R%/_UYn M"+.?&6UH1UO3+RH(LT.@@A28$"<8F/&U%PT"$[Q36[,ZQUI-H,\\,C8OR+]L @CM@DR/S YW!KL"4.]Z!DKB"Y?B$]5RH=C>?l MM@E1761#AO#R;;OGO8,*N=)<4,D@=M8*0G7C6UUL4E6A<+)*5=! %:O 5S=9*L'?[6Y3A"5="6H]BZ&=-0"!;.)Pf M7- )V#*_R?2FA8MJ!K_AIZ/&[_),36M/J[H,K*:/JZ]BX5LS$S&K*I;6ZK*?e M_OSGH1DKT%@F"JX7Q[BVC.4)=*NZ4\51M%%#6"1/S^DA(-_G"$?98H\254 Hd MO %G2.#/AS/G(2,N2^%461-_?V4- %"3%#PY0951UW:4AZUIG%=, 9@4!Sz M0$/A1.R3O(#(E:;CBE? (M&J7(6]X=TOH!.$&$8#^G.\*QI]6 "I%*/IUDLy MPYGF7.;3&,P)Q@QE33_:V)$4[^%4T8B4GP:"_AS38+;&^/B2^,7.4^;"2U<=x MAUUY&Y]F5U*G!]'WL%C:A$N[0-6>?HY^,#+BS3!@'$w MP=7FUX#-]HMU??5#SW;550$.UGYZ36,H_.5]7\?7-A@1\.B&\(O7HSC0J[76v M?P>BIU]U8MYRD?,J_^7E_RM'!&5=MAK<)"!TX'Z*E43EEQ>IU1E?(H-7L#.0%$3ED6Q_-F'_45(PN&8EM@3=!28TQDT@XIE(6DH0&EIH%"8)GMJ,1JQm M&$FZEA?N.""BT1E8!5=7PX=>,1JH"(7\=7E_.)"1!&':N(BVP2T+J54W4Q8/l MV1GR.)&J,Q\8MV>1-(8^=Y)5]CV'QC!ST(-=% ,U)C,DM=!H4i M,1WS"$MJ29501UV1K<1H]HI*.B7=[.6"W(S#N$IIU<79L]5.'.8E@]9E-$9J@g M4I/+LA<$=D'>N1/@*9Y.0)[:J1?OP@;Ie MJ1/K203CR03E"9^R4@;SF1/U>9_YZ1,O^);]>1/_V9[X^9X^L5E.4: V<:#Nd M64![,0=7,@8.:A-! ![B,07DH: ]@0>,EP<76A,0FJ 2JA=.0P:D,Z(E&J ]c M06#.=*$MZJ$Z401.0 0_6'C]YD!A""K6R1W9>:(^ 0=Y,Z(9&A[CX:(\0:2$b MV9TZ<:0;VJ%"VA-P4%QOHC)N(*-Y*JA\00>$Z1:.&JA,L*P&J6SFA-IT#5?,Z(%<1T4(06YBA-Xx MP*MRX*M. *Q%(*R8>A-Y8*S(JJS,RJHZ :(@(*(\\:M%$*S#>A,INJ([H:W=*'BNJS=:A-XT"C1NJWJ2JXUD0?N&J[)"J_3VA?R9:OV*JWK6A-Hv M4*\ZD:[YJA>:FJ,*(BEXTB,_BIWR2HZ >:NKJJ\U!*X#>Z_C2JTY8:Z<@:X8u M&Z\:2ZPA^J4$^Z^(-)SV<:P7*ZWD>K"<6A-;T14+ZZ.B"J0/VR(!\J59*JL/t M"P=?8TPCR@0*<02_VK(WFJ,U 04_VP8+"R$-2ZI\ 0Q,?XRI.s MFA,EV[.RD7,-BA-=>[4V,0;W ;;\*;8?6[![8:UYP'AWP'AH,)]CVQ=X, 8Ar MBKP=XFXP6NK+X:K(^2S%!.[1%2[8NBVP*\)S1J2 7,07H]C%N0@7[2;.Cq M^K XD2MB=C+"XYV)6DAY5QEG^B6>^Z@F"KIYEP1$D!.E:ZDFF[EPT!K]V);>p M*;1.< 3U^;HWD2M0,+5HXIT[.P4@H+LVD2LQ8))V8!.U.[2YB[F["P[O-2[8ZD2LTL+T@T+VX:[W.:Q9'VW*/6QFU.9R4n M>R66:[/@JQ.6@;.:U[IB"JF@6V=E,")T,"+3^[G]ZV8 ['#<"Z:NF[XVX;]!m M0 ;M)<#EJ\#[>[JHZ\ 0+ <(K+]M6K\WD;B.BQ$ /"+Q"TSA*05!D 4@L 4Pl MX (N$ ,VT 4@\ 1& )UJQ4BW!0.5\*%<\(IO,(M[ (W(,,S7,,W_+@/',%Nk MP,.@XL,JS,(N+ -$3,/?$:M2"K,8D<0:7#0\#"%.#,0N' -37,/!ZR$A/ 5*j M2S%T^!1=O" UZ[ >K!/">1K>N1W:*@7]]@0X/ 7N*R3PNY_7>Q-Q);FB6<=/i M<,=YO,>1JQ%L4,*!;!,X(\$3;,?WBL=4H,>/.\)+#,@,?!,X@\"3?,B5G,B9h MK,-:/,_X;,H -,&Ee M/$*G?"4>@L2SG'+^[,MR0,L"?<9:#,H)3-"_'- =P;X8,01NP@8F^3\37++6d MLLQ')!MSH-$2; I,-5KB[ Lb M[=(P704RKM;.@=,ZS=42H0)D2I,BH X4J2)v M%2))Q(294V9' P4?/Z)0 :*%R9,H4ZIIL\H9,'39A6L@ D<8-G3)RS(094P8$G3<3*X*PDD8.G3IAV( @4L9.t M&JH@DCB%*A6MSJ *1OZ<2[-GC*>Y)09@\8-U)M4JC ,Y(9Ur M&3$\E$8A'WXZ<>?"S-PV"&!!8$HH@(V"3$9%"6>F.**\+5(WXL6RMC?AC=Yn MF&,1""K(T!MU<"2DBBRZ"..%,\Z X=.&@AEB%).T498;%Q)Y(0W';FEDO[9m M&*:.4DIQA!!J9IF3FTEBZ((,7,8!)X!!(O"@E$6EP%D9M93@Z8:1<]D=#I4\2k MRB,(1J3!1AN=?AIJFQ5*.F,,,MQZ8V.I8LJKKVVH1<:APT):;*TN;,B"GZ4Nj MFRN9(P[!:)HH8OFHJ,;VARR3UK&4W((g MP<8;8ZQQ;[[8*NNAS]QYE[%Q4"0W1!$/<=?88WFH91D*\4J1EE-J/OUFOV2"f MP,9M9]#AL:4(II"Q7(Y!=G:BY>:Q7X#]N;"WFEN\[4;<:+10ZHA68963R6[\e M#4+@.$%>.-QR*\XA7%AKS7457N>=!Y!Y@$#VBR2:V+?:2;*=( @/WQNRW<;Ad M#7;JA ,X>7^X][W%PRHLU0((B^_:N$XJ1ZX[Y3&U:E",?Q%"V'7G'6>ZY]8]UCM!0*9M116\";BG0!@%B8'RB,K[RA>%\5\F*^C#"OH].(P1J80#9LH5L,1."XME"C#BK@@Y\+W0AK8$+[C<&(y M')M#'<1PPB^FT WZ8V$97&@P&#I%AI>BX6]LB$,0Z'"$- B"(1(1",B$01*x MG ,3IUB# -VAB&BPHQC)Z$4CBL"*6'Q? >G@F"::;@PPX-@88J#)&6BR!IJTw M 1SK]CWF&)!H<^ (&6!7M$\A39 NLPH:JB+%TH@%9T."F4T6R9$XU.$VEAD#v MFD#P!C/8<8<]Q,@C74.55.*L=$ !S$>*X 0B:! ]&N&("SX2$-RGQ/T" <)3u M! #*3@0 T!):EJ@T)@L /@$ ! =F1I871T0)s MD2I,BH"P0B1)$#ITY*01,V=' P4?/QJ1\J0)B"-%FE!,(B;,G#(@DC2!\D0*r M%1!0\.0)(D=.F#Q4\L IXQ&D410J0(3!J%%,'3HPS=1Q,X9.FC=NYH!0D2*Dq M B@DAQ1Y*$7BE#)TKFBTZN9,DS=D8*) $L8-&39E6(!H [>,CIA.J!1!*27%p MWX*""1?]B!3$2SI[^X*H\Y(,"#-OY#BNP[%,G#IEW$ FX_-.FK8@W@SU:16Ko M5JY>/X)](I:L6;1#WK!Y4T?SW+IW\\:T6P;/X<"#BTC9 4+*$2%)W/S-N;/Gn MSZ!#4RQ6T/@QB#&Z>6N64P8.^9>BEUYUL[6K4=EAQU8I"^(L'2:GRV"72]8NN>H9+CJh MEZ 'CNF8@Y>J"4)HE@5XZFONO7=H&LLIJ=B%,L"D):H?V'9OLD4B4D<89:$"F8I8@H*$NNW186YB]MI89f MX;;G:B;ONNUZ"A^3Y!K+[9%]XOGNG@G+\6=Q]A*J(+:X[GNP9HN*!X*CQ0F\e M9)Q.HA4$1T.@@6RZ +N+Y9[_THOO1R#$+//,--=LLQ5!2,&GR7)(R:5>)9\\d M;[LLP&SST4C;/$09;+#A7QN,3:!\4;I]$1M!Q4![PPBW"+]K("2?>--,XZS_TT&D#S7+?81ONMb MN-)2#QYUTX='O#=CB#JX-;)=O_B=U&"GK!>$<6N5-KC!?CILR'1(\08=G+)Wa M]]AM$6BUQ&)B[=WE/GFM64LOZ6I'&55%&JZP!+>-EA%8J9RJ7ICI/?ODW)'Iz M(%1X0&9&UZ1KR#;J1_@$!QIIC$%%<7*'I_#*PC7\<*!A5FLUQ9"=X3WX8X! y MO=;F-TH<'FN?/F?W8?A>^,97O2*8P0S HX-67@<" R*P*I)[G^T<)+\ TL]^x MY'/,4,:0AC"P85<'3""PM.>_K %0@.(C7Q J= 8WM*%2S8(7$C(3';U8X4ATw MB,[>%L?#F@$.!#.4PQ.>8D,<#K%>L\L7!><7/@Q63RDL="$,AV>ZXJ'."&EHv M6G1>=!4YR"J&>_*5[-IW(.@UR'I9_&#Y/%Y$NSCK?[XP4;J[U&%_%BHt MLC9'-D"!C2]\D172,(>-9#$- EKDYXXTRCGHL5#7FB E'P1*M'S-#J0T9852s MF1#/2I#)Z'@HB.Y#GT[[*'??@B'8;KH+SF30A"R ((G&"&2RO0;'-A0r MES*X,HE8NQ%ECK0C$.7',B$"9)%>Q!XJ%L$)1)A(12Z2D8W,P04?"0C5FF_8PUA5:0*%2 k M8/,F#)DY(,* (%/&3IHQ,CXAEU]#DSA*E)T!?GU2=BQ$H>PAIEV;=NW;N(F7MPX;T')E$UWi M30UBS/HRL)U1%1QHW,9<;;?%!,=&0\G!1A[ +0:"'-G5(8<;L-'Q1FQL$"A;h M&V_0!D)XXWD%EEA5D 6"666X844:467'+1Q5E/>.DE6F<_8659g M9D06N=E\C#FFUWV3%5$98$5&>=EFHRT5FDZ=D>:7?EOQ]\99(-@6XXQL@##'f M&!2V"%UG[MT8'XEBBJJ]P9,+XY)(YLVPB=?_AB&2@3.9WF@+\^5>&=6OVU"9\+H!01%7+C5:ZEH(@8!@$&MC?b M&^<&!QN<73V+'@A,M$:&$1C1 1L*LQ(%PA1E-#8&:((V*44*]D4FL;>JL>8:a M;&84#%MP(+01QAH &EM&&['9$48:;(0A1F.G.GOBOU6XH?' 'F>;9%$,.PPQz MMQ-C/)MR<[PQAKK:<9PSR!2"V%N&G*)LQD8H8P>B''G$G.K,K"Z\;9K3K:1VAFBI&UBF=Q)+6(!7A!!%&79311AVY %) W*?$_0(!?%X$w M )-7! #0$F&66Y\0$ Z08 $ !V9&EE. '1Y F1u M*DR*@+!")$F1.6/"P"DS9T<#!1\_&I'RI F((T6:4$PB)LR<,B"2-('R1 H5t M$%#PY DB1TZ8/%3R;&0!PD@:-FVIV4\@MR*0@4(s MCADWS@&A(D5(!5!(#BGR4(K$J7'JI)%39@B:,'*&E&'#9BP*)&&HLBFC(Z83r M*D502M$*HK'CQY C2[821 H(.6_NS"$ZY@V;.FWF%"Z(6'$*K1^[@DCC)NY-'2"L(%SM\F;p MJB#^!B8S>/3AQ$6DG#ZKVCET$&&FWP71YCK,LF>1JV5;Q2V((FY^RY%./8QUo M[-H)1IAAI84W'E=>E9$?<.BI%P9[[A47'UKS,0?"$'7(,<<;A=n M@>*AIH!JZ?6G6X8;!E?'A_ =1Z%R]-F'H88<$I&9&R!NUQV!X)5(GEFY>D5k M&HC"MJ>;@6;+#VGG%J5ACEi MA6X&(1MM?H58)U&8W<&99Z"YP:B!CBKYFF^P&DEI;+-Q-%:,U5YZ[1-UT %'h MOE18-:>WH@8;W@X350;"''28Z<89A54F11!9@/"$$1^U9I<=!6ZG\BU_7KNe M8@5;%NZXG[5A+I#"@KG:UZ^-25=^[3[X<9+P]]@$F!QE#O %''F;#C6ZIO"7;V>B;=PT"c M$6G, 0<;/XG]*U%X$)7'V3I[-7L88\!TAD_4I3'&F" K[N<;&=&1!M&MLPD"b MR^VY;'O4O%-=1O4PT8XP",-KA(;QR">YM:W2&\%A&]K:$5CPI8]Z^K!FK!^Ra M^V[ ?[[*]N&K;[Y78,V2[A _@:%-)SSQR>YP@L">_ 0KO6L5Q_(%@CL(,#/1z M(]1@\ ([V=$N#TR(W;\Bs M7'.91 DB/@?JIS/1P0WR8@%K]$.[X+'@=P@E8SV+2= AJE& 5F$F5) RE:I4Y_1L4)H&&!0"M*Q&A=Z: )G1M#@5>&H=(NHJ.\)U.+:#",XD&Cp MP>RH5:!)2L.1])U*,E-*,-$]$/(SB'R/H-E6AEn M2FURR)% N?2;,44L.6W*6+?F\EJ4S11FY,#.:=+3@"G(JMQ ^U?@S'9NE#.Mm M5PR;6G&N=K$X;2S_).(A,LC3LHE+9AF<\YO\9/9;[&$-%HC2!M9D@;MAP,-Vl MV1/>+)1P6"]R[B:9$EU ?N59C=SFA)8+@BN8Z3?0#8-T.0E&J=3R;1-=ZE;3k M)M6I,-&)$J-8@+4Z8,CT5XQS8$U6&]P8?8[1P"!P&,02O-ETW>&^,&&O?MT+j MG>T)UYNN+.Y,CVM.=$[HM3:ZR\)V",AE#C-(!$-FC9! #0$F261KMG"@ QP0 $ !V9&EI;G!U="YDg M968 %0!_-[X "V1E9B]G96UL:6( ! *2,H ")%#&2Q$D2*DF>f M. '1Y F1*DR*@+!")$D2-W#JT)FSHX$"CT:D/&D"XDB1)A23B DSIPR()$V@e M/)%"A>&;.BV#R)$3)@^5/'#*L QI4T8-FQT\O0)M$S'CPI"CB2:90J5DR]Cd MSJP9A @1*46F3'GJT2,*%2#28-0(PDP=-V/HI'GC9@X(%2G**H BJ![Y/O$+6&)AC4S>C E#YXT<*5% ,'8,63*>H7DZ%P1=1,I3$-"Ca M2Y].?;J5(%) X'FB$3EW.D/IE)'31OGG(J%'ZS6MUC (-KIY^QXJITR<.F7Fz MK-[L6F_LOG]5$=AM=.2V6V]R3$'2<(]%-M1Q("3G&7/.>53=A1A"=UUVVW47y MX7?AC5?>A.@UEX)Y%)+&GFKOQ8?@4'.$T08ED>BJBU1Y;=ESYw M(@CUW9???JWE"-N.LP4XX(]F^J:@<(TU*%F239(8VG-3!CH1=E:RD>66Y TUv M!1V\X?2EB6&FYEZ92@X)HXPTNG1C?V_*1IN MJDV!!IOI#%&&<#A29R#((S:u MYW)/[C!H=J-^]ZAHD8Z)VABDFBI9FOCI9R-_;NKEJ9RA&C9JJ:?>:61DM\I:t M):_,%W,71/7D;09!!AAP3>P666$X_;1VA3VS>n M.1E2A/Y56%. (.OF0]!EQZV"EX96XX_/ZY),M3D'K'$'C/P7R[0TF1WV"X1SJ']"#<+8?UPH_[W_.!(9&&8M2/?_W,T%Z+l MJ[8@J-^:^.0W?_ZG:6,:6=]E$()&>N,&S,4/:,V1%J&@L*A&S>%!R.D>_:;@k M/TW=I"4@$,, Z0("_? F93HJ5\MXAP;(!7"#;KADE&&HH/=$'='12-Jh MQG":P:*\D*<\!.D/3OR32!%]US[R<7%57DQ1&'$RQA@"$79G3"/4=,A#'Y91g MCI$J0QV7B#_F]2YR3.PC\\P'2"E2$%QE6$(9\B"&-X1!#F0P8")C-:LP>I .f MCI+?'#M801"L896M?&4L;^D2M9@!;KR92P%)600G$&$B%2'0'%S@D8 W*?$e M_0(!2V@$ .=C! #0$F:6IFVD"@ 9 0 $ !V9&EI;G%U:2YDd M968 %0!_IC8 "V1E9B]G96UL:6( ! *2,H ")%#&2Q$D2*DF>c M. '1Y F1*DR*@+!")$D2-W'JI)%39LZ.!@I @C0BY4D3$$>*-*&81$R8.65 b M)&D"Y8D4*B!!Z-2)0@4(.GG@= 2A(L7$BE?>R%GSI X=*D'+L,BYLZK5JE#Pa MY DB1TZ8/%"%3E5PM6Q5(6G.9-W:]6M8J53-EC7RQ@T=)V':E'D[5JY9*F7Pz MT E"AXX$y MB'[[,:3KGC(Q:N0(PDR=SW32U)U#-(5(!5!*#BGR4(K$(H++N"%3ALS%C!MCx MHD#BF0P;J2">7#'")LP9'3*=4"F24DIKT^BM!)$"(NG2IG3 LW3/U.G;%*U!w MPD9.1SES,K%!1YMMN.GF1F^_@13<$\,5)]%SLY4QQ!MLO%&''"!,5]UU+( Pv M88477L0<'AW"1 =WWH%7T'CEG8>>7^JQ)\<98H"'FFIMC58&?K_!EH9LT8$Pu M!H468L@1'!S!9%<8N=6%H&L*"D=<%<8%&"$3/X96F!QIB.'44!HN=YV*XI%7t MA'FEO6A:C" P:5B7X*&EEE:K1<7C:S[]*&!,<%"8!QM9MKEEEU_R5E2"P$GIs MH)71-1'&4F4<-JB7_?$6IG5ED,GBF2ZJZ2F;;G)9(PARKE6G4'?JER>0M/7)r M1AZ008IAJ(16^N1O"S9(Y8.LEF%$&I(1]B:E8%(G9J;A;8HF69Z^".JD<:9Eq M:H[WY:> C[W6!BP;;7(4AJ##%GJK:[E.626$T0$FF+"BBGOIF,F:N6RSSJX'p MKJC@J3O8EJ?N:"ULZ-)VAE=PH)'&&#\%1L>]M0YU*)2),F@NKWOJRY]R"[^+o M[(KR=DIO66QRQJ4;WX&PGA1!9)&=$1XBL9[''\NE,,;1SLE68M7VZ%/ ,?4Gn M& @SVS5NE!(ORO,0:#QZ11IDT(%&AL9BJFG'0B;MU1C]R0'>$"[/&_-5; Y1m MAF1+-XT&8U^;Q4099M!!Q-B==2A%6FBX#7<84Y>70MZ!EXZ07UAMB-789>=CE11QM\>YVV3FRZD1>R='5^k M^GVA_[OJGK5-#H+IEE?W]W*!C0L"T8]3'*'8P>9X^;&MI_DUF],F!E[RE0D%j M\^@[R?'&'6N3['2';GPNQ?1S%,\L]!/9.W85,)'1H?1WS$%^6 04f M@H]-9-A,9S[3$?!HAC.> 4V_GE<_>TFQ;$ZS(O38Q#8SE %K\;M1OV08P""-e MX4(<$9H99/>C(. '1Y F1*DR*b M@+!")&$=.G NSMG10$''CD:D/&D"XDB1)A23B DSIPR()$V@/)%"!004/'F"a MR)$3)@^5/'#*-E-=OG$#X@Q/.&C2C)FSN/'CR"I2= 3Q4<'1)TF7x M-K7<)(R<-67D@+"*52M7KV#%DBU(N(C:U7"3*Y=+]V;.G9'W2NG[-_!@M,8-w MMTZ\F.<=$&ULXY9#.@P=RF^FTB'MN,R8-&;2E"$#(G5KHTB55F%:\G/H,524v M@<=YO&6U55=X=)7'<&9AI]9$Et MM99R3++%7%W/X86A7QHFF=UA"G 7GX^2@3#&&VT\)B!Z4)VQ67VJW?A:;/M)s M-$09/MX5V9!;L<5@<<$#9G%W0+0BFG3T )A1R??$KQQAU,E.'&&72@r MT541;%31$AE=.5%'&XK>,4=75\A!1Q-OD%'&G0XNB6AR3W[U(Z!35B<8<0Y^q MB)AB8J1Q'H6BK9%7BB (>-I4(+A@K(1EN$3&&V-LZB@=YJ5QIHVMK:D??U^)p M!98JA6&I98]L2,:9;4&B>1^.L%TK4;=L2.$>M(_6o M^2VZQNW0IZ"P$HS73T'9FJ5B6[8KQ[Y8G5$GM2 J=H:CN86!V:7=A7&'A915n include modula2.uan 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