Path: utzoo!attcan!utgpu!jarvis.csri.toronto.edu!mailrus!csd4.csd.uwm.edu!gem.mps.ohio-state.edu!ginosko!usc!apple!sun-barr!newstop!sun!grapevine!koreth%panarthea.ebay@sun.com From: koreth%panarthea.ebay@sun.com (Steven Grimm) Newsgroups: comp.binaries.atari.st Subject: v06i085: modula2 -- New version of German Modula-2 system part09/15 Keywords: zoo, uuencode Message-ID: <34241@grapevine.uucp> Date: 7 Sep 89 15:59:53 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 85 Archive-name: modula2/part09 table !"#$%&'()*+,-./0123456789:;<=>? @ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_ begin part i modula2.uai MSD""$)C][&A/N]K7CG:1'SSA3(A!"$[^<"*8N^M?GW?8QTZ"5_L]&W\//. 'r M+WC!NYWD!H !K!M.:]QJG=$%0FD -[ O.9I40!: ( $ P %YA^Pq MG:^,,R*\A<@#U "(I1A#B$::%>^ H+)5,:24F$)")10AS;T!026?<,88M^$p M-Y"!]H1V@QG> (+F.__YSP= "Z9/_>I;__HML"0(@A #[0?!W VA<%=3 5S;=^[0<"W5>![.<&( !^>+6!(#!^&GB!m MYI: "MA\0\ &;U 4&*A]*;B"9="!+JB"+"B"(/""+%A^K5<B#5' 2+&&"l M$-A\KF<&3Q&#-H$3.J%]4O!Z=( 3= "29@3.T&$96"$4 $"3<@;83 &R->$k MR@&%6E@&7.B%VO>#>$ '82@'N@<":&@2E'&&0-@;4/& 0FA]VL<5B'@"B((. $0-B'?QB(V@<% /%@&#DA_;^!_+O@&<) 'VI<$;E 4;+B*E-%^;4@%82 &=< &P.&(h MZQ<'=" '+H"!XX<#,P #e M,,"(9_ &;* 2;K"/+R".V$@& &D7@&L'%_*.E\2E &QR<'>M".47@'7<$&:_ &;: 8;A "75,&:,"0=8 &c M; "9I"0( ");_"3GA").@$51_YD&'*T$(4=@$@1 ;b M:-!^UP*(9O"01."0+<"*9_"01_"01D (KDF>x MXRF>T*F=D>F=[)F=U2F=U_F>\GF=Q]F;]0F:1'"=^9F>^PF>_;F8_PD 2J"L$!%$,P81VC5=(E"M^] 2VC40(T"L ?!$9L6G-$4"*#M>m MC\2R U$"*-NH<"2S2>.O M&L!O%$)0L )X"R*U"O/XL"*'M^/X:S*8"RU6@0l MR_6S(("R2;"I/]M]0XNEA[JQ$,"H$#&HQ\4"*#L%+3&H ]$".AL U;.R9 L k MRJ.P550'X[JV+X"RA:"N:PL#*&NL/0L :ZL"*'L*];JVONAN.:"QW[&UFFH0j M$N"H,X"RN= 2BSL0-("RQ>"ID0L -8"RSS"NEVL#9ZL-ZGJY-X"R[3"KEXL#i M*#NR( H EYL#Q"H 67=RW^H#KVMN,?NM/_"Z/:"NWZH#KUN@2_2M9S1OI.:[&H:Xg M&6L0X\5;PU2\$2$ @AD1XS400_"Z5."I[\M$HOJE(-$%X_J^3'JB,HJ_$3!Of M$?$$"$"M33H0XY6U6.H/$1 ,:#008[1<=:J^I8I) 9"DSS40 _"Z1W'!O)7!e M(O*Z>R 0 S!.(+RDF;JFQLNAWWH "# 05)JIXINH W%= - #+PP 72K#+4'#d MPGO#.6RF*8P4 I (?$M3+CP0;CK$QNL(FLJE.:P 5:K"ZSL) % ".)K#"S#%c M-%6JE4!I63P0#,#%>PH2EP +Q#&C\K%QIL)F$M3")##&C;$1EJJE52-9?K"b M)ZK!&KO #?S UX1&$^R_ (&QL!@:##*IO$V_6ZIB 0)#9GS C]K' ,# AGQ>DIM5K JC:JK#I P2K #(6&IKK]L*@-P!-!6D%/Q(z MRP T[6K-(7")[JPI2H.N'M&-#%F&<0w M#)"F]/,D#?#(U[1')N)#IU ]ZV !*? %3R4$&PT ZL .'PU,2O1$6+JW!J$&v M$($*9J7" 6 '9N4,<#2_VZ4//0L,(.IY?F%%8_$6>! 78$!NF u M+HU;V2?! $ (>Q$&?1%%@"$8A&$8[9<8J-$2J@$9@* 51&'4=K$437&$N==%t M5H$56;1%:CT 7P0+:[0<;P1'2CU'<= CV?$D>*1A>H0_\H$X?R0?PS+8ZW$Ls MA@T C)/8D)/8A/-'%((!4- CK+ B%!( O !H$&QX,/0N *_\ /GXT=2" _r M_!!SV&$ -#< Z/ "Q[L>P])SDZ $H,T/G5HA]D,IRH,/J@U'Z- "PX0/I1W:q M+[#;A#TE10)(N- "\H,/]&,_D.0%$F541\ ._Z %+[ (HT$5@!$CD "'V "p M7T -.<$(' "FT8 #+ *OBTBEZ4 R?/ =T# $n MTT '3R !VG %RA#:)Q!-6G M+('> $ %0A B6/#B * %,LX%,NX%*[YI8B#Cm M8$ >$@X-W U$N%#=UWT#[E/#1@[')R"V#' "YY-5*#0?*P1+;K#A_2 *0Y#Al M12 /-T0'-D #V1 %)4^Y"5M /)H#A_^ &2C !1$0!V,$#/X%]@,![;X>P #O3"#O#<[DRY[1Q^8E3_("8*L,/P"VTD#P_Z &\L'Mf M1\)# +\E_. +QZ,//7#DX"'HM!!-9'#;#- "T53B#\>H@D[H;E#=5]X"[E8"[FH7T#MO%="L!-c M6X_GHK#E-Z3G=N#E,J -8L\/0T4%QK8E^T!L2V_=33^T54\D1&0"-T DY*KUb M+&3G7,_VUICA<"_W8R[N^S!*>[_G*1 B8I /FI #(0(&^8 )F@]B^6 )D+\Aa MDV\')X[Y " &-\ &G0\ 8+#ZH0]BD'_AI9_D X$%.9[ZV2T$9T#@J>_N\,X_z MDD #X?T%-[!I/1Y*>,\ YFX'48X%5L\%ER4!]PX [^[2-,#O].XERD\\W-#\y M#! BM_]A/C %,+[[O3^T8@#\+GUFPU_\Q^_ZNW\*OB\&/S"Tx MXLWB(J3[Z0%]( B:W_.+?I?%!TB!\Z?=Z)_ZNW^NC_V]D_Y7_ @^JM_$E#Xw M$3_Q%O^2'](;@.6N]#D]&/=A7, (! !_:93<@AV$ ,_"3<0X;6/?NGG78'\>#u M'Q Y.Z!! ( 9("(P(,II :NG@B":@Y,@GT0*:,$50@)"!!KH '* 2'T2'V _t M=( 6M'I@X A^0:-' K2@BULAO(0:L#O!7 +;23 M'6 AQ#N!& ^$ '-s MCP2HOUO7!Z& KBN$'Q ?T+W)U_1X'> 3"&K \%$YKN?V%!_8 W2A[00B !E3r MR+(;-SES:>_*O0 9\.A.H1!(A:( !;!"**#HLLH+( "N$!:B@*'% #"!+'ATq MMY!-( -XEXCFG29$?&IO%V:5;/ +H8#YFP]ECA:4/8-C/X:?)9P/8\ @& )3p M.+3,W"L\?(6.ZZU"8,@+T1XX-'2B0);0CUB3#.Q>0ZW&"9O@"#( P)(;:;P%"PVZH"X<6!,@$S3 :3D-N,/@[!0\;F]n MQC?W2 #8,@:^Y!\H Q;' )3 +U$&M\W>+0 )6'GF71-D.?= "ZP(&@"VQ(#)m M0WEK+\,=@7G0Y6R #7!\H4W)P&32%I< '1 % "]D8%7)L$=";&L"6ND' @!#9 9@"LVY.4)5J\!%Ki M'6?\!V:@UE4"7S=4)LKDT0/UP*T\B<:XJ@( 9*P0E9$!M(CB1C^J!S[ )S.h M('@Z0&$_9L5%I :SSMXAEI$"'.E'1C0&=K'@48+@Z-KD ^&(/?"!-C( ((($g MA!T%^'=?X)A 2>(&O$ S%&.P1$%4!5<( @^S,X+;$>'-0H=6 <;,^//@0#%f MD0$#:JH<_R&S,;CNR''J@e M&D.;?/@5(0(3;(\34#WN@2#(C>0JOCD ^Z$.IN#N.P'UCYNX.%Y2(#\9,!@@d MXLWF=#H-:3]\P?PCBU1% H(""BC>_B _4(NI[P?$R*,([]"B>,.18N "*H_3c MQB/;G[S;@%_@!R"6(@D W.*/7 #%+;3I2%K'))VD\2M[KD\@; Y!\D0\0_\E(&OD%YJ+Nz M$P &LFE\ 2"I(\%#6]1^B/+W,4D-"/^0WS/D O:#!?A$,,!+!F2)Y #'DS!%F#Y0AL+='U2YEMB >P@+O^!/="57A),w MBDF0L/'^@1C >NN23)I):6@N/PQA^95FD$A,:3UZQA/Z1J9SPP+6T@.,D*,X)23D))B"A!(%7A8' # =!;UCDQ^2+3))1"#Ot M4.07R !"(!_,2 $8#Z"! 1Q:6S!$>('W)A"U0+U+@O^@51@_(:@2B:8F '_Bs M#\1\&!A0_9"BA'R+U<,>^(F!.;2XP H1EEA 37:Z))A4Q)NXBP=. &O2%"V@r MWYZATS0(,"#\T10L\&%, -0T!.(MRH&!,Q?_^MZ,LWI>0 4V1"\PX\0=/- 'q M4= B:D1*\$NP@8UD>JB-'U0"]H8$9R6MXX5]4#A&22() (:A2RN&;E, P@-9p M4/&8'I>T R2 SE !2J *4I^-;""B@O>] #HC!J:)]1,!F.3,1 +B5T&^2Z/4o M![AS5(#.1>?:?!\2')*^$QD 3P 9"8KGYQF2U8!S)L_=F2.5AS[PG;1@>B:1n MZOD-ODORU)V\$WQ.3_XQ/#^ ]:P!R,]Q,K\G\4, @#P0!1AR-^9) " )6D1Am M*9'R0 7D3Q9I$)P?51F1PJ!$Y@- X"$]I_W;D?K/I=U*2-D]J60$G8"2P/]]l M3!W'*2$H4K229"]+#4X8IR7Q)'8\)G:/Y;P#9T(_*20 B ?J8(#.DFKH/ZG*k MQJP>\4 .R-!K8C\,*/U H"42'R"#!BK2R**D9)(S,H-60 [J0,OBIWR+,-*"j MGD7M%T*_RP@%,254".[/Z&8>4"AW= ?\[T_J@]&F#X@i MIQ*0="5P78(!%X<#Z RKM"4N1 @ 2*@2WA)-0!MR/,9&,B$AD]@2[D %' ^,+O,X>X-+&)3^@I>!2'[0 EY9*[4'RA( $f M@)"J NMY/D?:/S !X,UZ_D%Y<#Y[7_H\BM-3>!+/\GG#A@D\V)Z\,TK* ]LHe M 8BI(.6:O+-3P@/UB4G&I_6,<@:@$K@T+C#G^('5(P!NA )$.3(9(L[DD%23d M;D0'U("0B07V*RHN*9>[^TP.%00TI-8^>UH 83]79^y M4Y%6/?K!K'"?U/0/T@.6Z"[AJMH; G,5B]A54,@/..HS_9W!TPFT3^O9*)GIx M8 61V31C5H]ZX @&B/54D;H1W%TVPN)*K^IM\P 7]9T".X8ZM Q -3@?J(T>w M_-%06%NKP3KUJU L-K.X+8]AV24Q =1DAY$S^F9B-2J2GV@_T >M%1S2DTMv M:^IKJ2$5L8Y4Y(=+QR4\P*5@X!^X@UV:^OZ!.DB>%Q6L7D8AH"1!J23PIJ*Bu MF';4'\!2/^H$C 3)E)JZ-OKJ^J:K9GV?\@,>@!A_NI@ JOQ0!ZDOVV''X:$'t MU(%*+'U5\ IZ02'X2A@?E7/=Z!,$BQV^3*NEC_"!"AZ)"$o M@%CV@EI)3GEE)>"M;(CK 0P(RL0H -$!(UB)K6[3N$;V6"?+GH@4 KQ$/%Z3n M-ML"DI,$.*%$A3NB Q7Q)+B)IGF,K#;2O< #"FM[R:QS +KNUN;8+IIK60XZm ML "1\S=F1AO)$DR ::, 0RL I+EAMVRS8[,[C>= X %":4L_J&W2N+838-M"l M %QK&E'$.9@D/59RVL=KLF6IBK4-;1= U18;EG,.>&:\);?(=IB0.7MKVBQ k M 61V< 4:F%$A, &RH@#(BM.RGJ8T " -9E5,>20%2@!4DNW2T+:+1!L /JUIj M]"R7)B(@0<^R!3U+P"HI(E4 ] "(L@8_!@O\&-"%RMS9#9D/W6H^T#-53>8,:4D6L"YZX)S'L CJ?>&(0'H'(A $P# !&@h MXO*MVU8!*.H (_>VE7("D)-BW"1P0O7P,A<:R-O=P#@7;RFU^Z(=_!Kd MX@&PL 0$M.TST@<;;?)?E4,@/?< %I=4@FBR3LH O0I'91= x MI[0'6=BE(3MCV%//W+:UI S6'VB _QN C2Q\2+_H]_SROD&L<,Z ?+B_$U#_w M"L!^8 [X\)2H$I, $ -B0DR(#_&4R+_BKA^PSAXKTN0O 4 "L T4*Q8$/"5Dv MQ"1H 2"-'[P\@T#M0IL*I&VAS0U( UC,#SZ,%EB_2'429,[U^_3^@;5C5)E3u M2>+B$('L FC&L9DQ$CTX0WQ[= ;>BO$E7@](&),O(@I !_.P4M8:QH$(E#]t MIC"5 )51& ##.S( CB7Q^86 6$#^!@#Y2P;D[S]@$Y[#I271U/D!^4$2>1+(s MF!RG#TJ0@]%?814&2+)P9C=S/'^)H#IFQ^X8'L.[>1Q4ZS'*Q,=2N!]KMV<RYF2C^#@ O K!2&=Y3@(J=(]@@*OF5X]0?=>!PKQ6-9* V""PC*V \-%U9,QMDS@P 3K*&2!Rk M;AZU>-D;[V6?V0'47$C>6>=X.<]?YOR.U;)*%LT?,!^P4,9(@$V &O@'4"#=j M$9&M 0!218C(?L;X2"!C9LS[JH<^ !Q2^ : -&@@EBEQ(;;$^!?B36<]@ \:i M9%R6PKDX-V]D6L,HU9Q,OBQ'.3"[M UAF"GR379I3QG$LDC:7')%ALAV@RQ_&"GQ++0"8g M*W*5F'IDB'#1;,)RN+27,^^ +*,:F?X )&MH/XR>%_0]J,%Bf ME'O,9@%$C#d M#T<<)%EJ(.D0YX=IF&P"%< [O"C>[.RC]@2=C:4I7)LS:+\(2$13PG0-Q008Q9[E&0V>&/!7A0,43b MTWWX- \1@2 +T25Z(O-K;YRB__6*z M?H.2#MAQ@'#]JM% D]4^3W8^-$V+*>-8-=*DE_X V)F 5=VJ&[:PU *Q1@28y MP0H0"YI(K7[28("9>$XT<) O;:==#[ WNT00XWQO/"0/)O>4TT".PPPY_1!x MGD8#>QIB [V'HPW:Z0JYK49V9+H0+="K!\*O5M?F^D6+Y/,;H]GKC![/S?DSw MQ^/HW) 7-#WP!/\7%2C,,^'Q$+0?WL50"(VS> ;H,$P UBt M1$16- !FF_\IX@\X#S:Q09#+9Y2(F T @ H$P'O^!O\@@4IMD!"JX9WHGG>*s MVY7"8V2)2AAF]=O:_&_>$;M62KS-LYKNT@QV'@B!TDR*0X2S1LU$Q ;(A]Z]r M!OX!\!8&GGM\3PG1O8^GQ*G=Q^W77]C?7&PMV4'8'MO@H&Q+XRG!G_U''X8$q MM9F(4(PT_;[7+PKY!_);;I=O<;#NUF_\-MLN,W8K: 8K#_3 _2[?^1NBF>W^p MC8P!./C6X/L[1,AN:XGL('*:;LUG@) ": LH/\!-&@1DQ@:'^@0GHC?YEZ[o MW1#:DZ)M'RV3;YL,<,+D T@KKL9$K\B'UL^USX$S?04GR"YP_K$ ]D1 M5WR&"&4]K & '#'@*m M2>"]N&[KQO5[&,]==0, OF!MO[TG0 &V 8F3DHGD":Q?)%"^VS@-9W[M&VO\l MX:DM$ QT%*?A^==LJXC9O:#A@2/XOXQ @SCN8YS#-49V,]O&@Y(S6'C@!3"Yk M)F?@G#Q-J\H% ,K%.(J !W/%A&?R%(+*/Q4R%K^LG(:'/.G))D$S';I-([&%SW5'K)#XHEPS:#LH0'ESV2;;(!P!J>V-)@GP/A^,PK65<[/>C6f M &E+6?*AK2")?0*MCD<60 Z'Z-VS8d M4[VJ X"KGM6W>E?_Z@ @K#\1+=!T&('>Y"U-W:1KP2MPULU@6N_K:_VONW7!'M?%>A @b MZY.]LA?&RR[6V3I@?^M@7:S3=8CVV/&Z0;"'9GVOJW73OMGA^A<@[!E/I\MVa MS$[; 4!@M^VX/;&[CSK%V'],\I R=/*XZP,EX#W'AP+P!B(EZ)$K2\ 7 EBz M?\+R=P" 8L566#& _5 #U9U%A#;LGDBT^WHP!M6#'U2XF!+>"[MM4US9?;LSy M@_1.#DQJ>)<"XQV^)Y("L-VE07I7!E0YO$^!_,ZZY"\"V.[:(+W#@E-7!\+[x M==?O(F*[DX/T3@F^>WAG @1> ACX[:X.TKL>L!]00,!G>/E[ +8[/4CO8,"^w MNY*6]]X+_'[?[CX5 /"#'!/$74D6&/&=&10' .0WED @W?P.%Y)Z7@%D-[7v MK4$@!.T]R"< '2\!JL<^L <6WI4X@2#/WVF+!W#RW #$AW5?2!()\!-#QE\%ZL,%>N>6#?(FG+=W->I" - \ >BQYWRXZs M'@PX>05 YRU)D'_S < ,^&=W<-ET0'B/7VQ>_G83VH*+ ( ^H :7#02$=R,0r MY!> CM<#_ED77#8#$-Z30)!7 #H>$?AG4& _V$%X1P)!?M4' $K@GPV!_9 &q M%S[9ZWA1X)]G.@# !>%]RJ?Z\J[C88%_E@+VPQ,T^FU?(72\+?#/.,!^('E7p M@M_)/2VA+;[ /WL /K_F+WV5#P#.P#]3&/:^XJF\CK<&U2,?W$!&[TJN0)!Oo M #K>&P1\:$#I;>FE!_7N(.#;@D[_X%U\A*WV0!S)LX'C9l M1F*@[J,]SV_Y+L VJ@(^7^C)O1C)^C3 -D("CJ_M+[W19P*VT0Z(>2Y/[K&^k M ( "MA%5UO@6%^0/?-;' K91",3\.B#SB3[+S_JF 0#@ Q' YYT^A%_R61\-j MV$8$P/%W_J7W^R&E0I)Z@@\ 2/[7S_I^H$+"^KV_\A]_RR<$%5+7"_V9__1;i M/B2HD)Z TGO^2V_W+4&%) 04O^1[@@J)!L1\$2CYI*!".@&=;^=;OBJHD#0@h M]Q?]EN\**J1WY_<"JN3+@K"YW@& #9CUQ3_KXX*P6=])?\GG!6$3P*]^PV_Zg ML[XP")NN0,R7?HM?\_,] !";E)[%7WI@G_4!_OO_\./?TY-[R"\ Q$'8] ( f M 0P *U=20$\HC3F@.(6C@*K*,:D$FV2CQ E,-14QVA@(1B=B)1$T<9=;0!c M4DKN),'B'E-;;%!D(])/NTJ5JTF=D/#SIYP%O88B.V&6T405O;:Az MN['"XP,@O=80GW=5T1Y\A\Y^3E&'RG_(?.2<05*E !1y MK/SG"D],T8?+?Y0H)=J$-A$%S']Z%)<0$WL1I >+[5M !1Z/PG@8!4L"?52@#(@\^"\\U(%#\9R<--? 9M60=#w M]8!B#PGVH'*/$?.*/+O[ \P\W_^#SCSY'Z/./,@0($1(#F&8PA@!T_#..$#3, ( u M3LQ2JA G?"!1 ":P 0 E/ZSPCS,U!7!K3?^\"@ D)JP! "A.3.*$%RA\8= +t M#*"@AS@B.&'%0+RB\BL + RK:K9G"+%MM[SZ"JRPQ!J+;!W*,AN./- .1 *Ls MK)B@QC],B. N"6G(JX0$5PA#A 6"#)MM3!@>X*VW!Y\QK?5BEOLL "0[Q20LL:_U#SQD (*.$*0VXX S-#q M+0, 0;L O!LO$B0S9(,@#9=;T3_8=*S0L$4K@S0(PPYM$ :*S"0U%7+,E p MX@SD+]=*<(W.0)V)3#*0 9 X38J QU@P-RZN S#0 DP,M "o M7@S$P-< ,' W U ,% #@B1.S$ .$. X)(YC,] #;E3N2>7.5%XH !&0U($Vn M WE -0 >2%%UZJJOSGKKKJ_.1!INE*%#U4$X042I(0DQ!0H#!4&$%+Z')(44m M062A._#!%S'%%#ND6L0123@!@!!//,%$$;<_7WT25$Q1!!7<5Y\%%46,+P3Rl M R!1!!2C#^$^T1,'P03\#_AQ!14Z!X_%,.S+[R!Q ]\I2+"$PI8A"$,CPA%k M,,+TO)<$_(&@"4\@0A6RI[OY30$*3P#? I-@!=T5@0D$!$ 1<(<"%0RP""I(j M ?=.2(04&N$)4FCA^&"8PB08P8:EPJ$*KN ])/#0A"A4 1.N!X4APE"$6."@i M%/9'Q!BJ0 H)I"$1E$A"'3+1>SD/?O)LPQA(,,0PB ',OA."OP4*#Z'8,6!4%&7"BUH$MQ A^%1c M$0K:@R)!^WE1-@RTH%.@@QQD=P;?@6]_U2S5%,!H!#@.9 I)T((B@X2$4 YOb MI OU'16D4(4B#.2F56#D\*B A!.6*IU#9:E+?YH%BI:JIU0(H^ZL4+_A016:a M /AB&#+6PQ@<0"8y M@*5H@3, +""S @B $H*0V#+@80K\E,,8T*"ZR$[V T K6*K,(0'1G><(?4UG884!@N'H10!S.80;;*'4 @w M. $$)/ 3#J\;R"MJ4 04 (.C'6L&\+0AL>RSA6H&$ 3=@&(XKKAN'<00AABv MN[I7&*$ %+@ '$K9!"O,[S;X51U[!Y &^);7KGF8 U?;D%_PUJ *\ "P :?Pu M.E<00P"Y&"^ L=!= &A8 +JP 2P ' 3F$5B]J7,%) 80C#: (<48#K&+!P -t M$T^AP0\.L>H&8%DGQ$'(Y]+#H]9E$W8,Y!_^.(,!H%8'7J'!!%,8%J]@0&4Ks MPXH&69X$KW#095[Q(,RP @*9 4"$,R/AS$PX,Q3.3(4S8^',7#@S&,Y,ABX+r M9 (<*/(_R(!D[M;D DYP0@N ,#C=D.MAS/H'$9!,@X10 G"* 0_ & 8(> !q M!M1(\^48\*]( V#2E;ZT GJ *0J(FM26QC02-,UI3^/L7T,#P1>>\ Y,.P$:p M1?8'/2A&#R&XX1_TB#2Q3?#I"_!"(:62PK#I00< B!H" L#4!U#-Y&A/6QU*o M$ !E__&/:@/@ =CFA[83 @$\) =:C IJ" ;7W\H&3^,#8]D#TX),RA5/:6n M@A#PS0!]ERHC_] !%9YM;X K&P N:/:SY\V0A']:X-(N&3W\#7"*$UP !R>Vm MQ >W\(8/Z.$ET\?' [[OBA,;XQ-/>4;\H8R.%]OB"E\V"!SN<9HGV^8XG_FQl M=\[LD1/[W"7AMK>7'&Y,_0#;]B"Z!/"P '9C&Q\0Q\?)*=[O?[=\X(92@LQ/k MOO#!"IT>$+?'U5.>]8R[W% 2D'FMOP"%1^RZR/TP L6TP2L@'&$=_[!##X"Ej MA7]XXP9\ $!AM?!W &"A42]8@,Z 0 (U %3I"$";[ &!1C0NP&ESBN? /i MJ[BL!X570.@;KRJ(:Z,(2F;#"Q10DP2P"@ JF/T/D#!L<^@,!I&76N4I\('+h M=T (_T"'$DJ&CC,,1!6H/\'C>T^)WP?_"]U6/@ D08,5 $ +U,C]#3"E!=2?g M(B/]H $)IM\"XO.C\1#W!\3Y@?M_J(/\BKB\L/\!#@9<#@+XOQP 8)!]VY=>'C2=FU0(!3T,NMH9K %<\>#a M2(!D%;$/GH"$2J@I)\ K<08L!# L#, "AK$%@,B)GB@127B,>JB,I2B++$"+_"( M_B-7/-VE6A/x MO\@L^D '%*,.(!$$.$,&CL-=4K:,PQ)M%(!NEP( 0(!M_A!_[M!^O#)GP'*/w MDS"%_^ .)# !(" (J!]#* S:-![D2@))* 0&:E]"-"1'UEY(IE^\D:<$*F,--V,!U2AMU0(&P](!7Y!H@-,!A5=8#*"+Y5)D;4(Q46)XA'"6t MJD("$K%D+R C @L")"-V]B-71D 5F Q.^_ *UA>(E_,RM-)D P$!2C!L^G S"/"50X@/^(8 0B"9'0$''3%EP\8/r M## !F$826 :92B"99=@6G@F:3&:9D1*"F[F4: D \#$0+H!L#(&:AF-](J"!q M^B %,7.:EP-N^@"&GGD!8,ED'6$ O$/5'!\CV)]"N"94J R_#"+C3D0%%";p MS.F58-F5 & &4X"=+C,%EPD&WI!Z)<>7:MF,VC@0W)@0o M8BDMGIE]D4(+E]EYK@B9+A@ID8*;YUD07F!K6#"4-5%MI\ K>0:1V$)O]X>8n M9?9W*Q,I?,D'6G:0U<($!(,$5O!R0K"5C_*=)/$R)8,/9F .UXD/UF<#QJ8/m M>93BC&*958ME^AE4 HL@( MVX*AL**Al M !"1'3!L^ "A4%9D]\ #2-81C$ Q@IFE)PHLL3@)(6,R("J5D3*>-P,"X?B;k M_/ !$Y"8US()Q\D0]1DI8* -X3A[#="G2D.,GC![V@DKI&@M)FIFP$(#B^D*j MM=B.F"*@!%$L$SJ4ECDX_@>@ + 3 T$'%KJ76EHM$9EW>]=W 8@%W33>;;L"7FEBP)Y 1_-".(N,/?.F'>4=X0P@-?(D&PR*NY&JNZ*JNe M[.JN5@( ^8 %>/JHU?*O7LIDN#B6O&B)F,@L]> "% .8AZDJ*3N%*YNNZ]JNd M[QJSPJ"P7*HJ+W"O_IJ-UN<% RNI#@NQ*B.QF$:QM&*QBS>D /;-"MWUJTb M[S"N1^L YYJT+LL0'Q"@&9$/3O"TS[4J"?&49?8"M-(B,8L+3ZL$6#L)+"$-a M)BNIU>(T;SNIBIFQ>3INS[VBMz M?BN/@3L/HD QL("$AKF$_]"$ /"$@Z,T3,B)4+"\ 3*1M&"^x M4D '#Z"T+RN_\LN]3PJ] 7F[XSJMF (!._L%%!JX\D -%(,*@XD*.E-G\0(.w M ZE]@!!OI#>$]49O!QHI_F=R]%8$ZP @* $,E JUJ<.'FIL_% $$Z@*#\ADv M0\#"@%"!%RAT_*"!),QD)JP/_B<"QN8/*]S"#" #06=]$*#$3.S",(R>ME##u M-_P/JB $5CS%/>S$05>&0]QXLU< .L,#O6>*EO<%S9>R6JP*0\"R(J -2PNSt M^P .P'=YU<%;-QXBRQY'("#N/D/s MJ" 0_N /UXD*JUG&)P')ON?(* @ :1S)./C(L,("*,G&H-G"8@HQ\: &2':7r MFQJA#K.#S!(/]F0%XVK&CXB.JNNJ=J#%L-"X=CRLPP8+Y,<'3TL%AYNX$P@+q MC-NR=@ROQH>L R$#$PD+CU<$ZC#(T_RRQCBNOBR];SMFP"+)?TB9LV< Y,R,p MKLPL\ +R=NJ?"?,T%S,+WO,X[JQUFQ]S1RNB$NNXRK- \RT^F"=U[R;VLS-o MWFP'^@BOHG"L94AP;*V#1>8./KC+8A".$EUF%-UWk M5@FIS.B,)*$,@GV0A&T'\FN_4"B%2G;/#$$' T !VW %!$R]3"C.8A#9OM>[j MQ8C(PR8&AJW NHO6HRV.,3+1%8W:OQS8I?T/H%VS=ZBHG?B[N=W:3_#:?6>.i MMRW:+EW/?2?7+TO7,;O,_CD1+Q>)>PTQ[6 -:^G69@W4<1W33IW<^>"B'GN=h MDPD 1P/7???'7& O^"?"31 I(IP=^$##AVG$G8<#-6S"^.!_+%##0S -2A #g M,3PZ-=S,0Z .+:S#_! $TS !L #$&L@/8. + "X$ M["0M#?*L;/BW/7':" ":>![e MD6 0_\ HT& T^%=\0T I]F"0;: I # G?(IH4(#%>X$L5 J.%LHM S/>L .d MNI"\1Z!D>E#23Y#9FTW4*0T ^& /3RL$2PW-Q\VT\2 #3RL"65TM=?NT$*#:c MDOV'\ZR#0@"'XE"]H1V).ETN5E-X9I,XP^, DN XJE Y3% YTD"9"8$SQC 0b M$5 U$F " S$!F.)CF\[IG:XZ5B!;% U:A-BK(Y8BD5: '5:U24(K-4 ,,@*u M5E,W#T 0 4 #S@5;U+4ZN'Y;Q&[LT8;LRHYB*G9?+%8U-Q9C8&!A'91A&]9At M<$!C/G9C.08+"\;L/:8ZWU4 $P8/S@5=TN7V5U-;V*5=87XXD5>C54&s MYY5>K7-@[P4(SB5?]%5=@#DBX 3T@!!@&VD@W:29H!,Yn MT$#F R0 @=( BG LP,S6R:872=R@ $#$!C05=O'WY" 3T,#!$%'4 !'<'#0m M@+9! 0"@0!@ B"?W4"04" L0 =(.15CV!"Q!Y@".2 %M("."0NJP Z(;JP/l M!L"!EX,")"@:.,3 @#!08@HHA%E!=L &2^! %F4 QZP OH-HH3#00#UF Pk M:0-*)@[H4# S-OA 54#P"-^=(;YD3RQ*"1-'QR@?1(0$4 "Q( :$(*5A Z$j M("6X3$S' PT;>W Y @ \.(+%AP)( %IPF-2@*?P'J!!P<*=TY!X-='%RH0.4AAV &DX_<.#@\J ;=!SBg MD!U F !@ 98AC_N!UD<'*#%J '@44!,408+@.HD#65@RY(% _#250 HP*'FPf M?3H" HA;$7$@8("!^ 3'(0(:A8_"WY0@+2 /GQT$H&2B)P @@8[ "1@4/8A!e M"R#U:!\LL Y38!&0!Z7B]:P:CL@.?H @%PE@2?2N1>TL=R!'OL"PZ=17"=Nd M4 8SH0FC!_X'!# H>+!]C(TW&(C50 J0Q(Z #0#14RR"D+ EG@))V'LJX?FYc M/)AP^TR!3=@)/R'QT872XA:&'Z\(%BEA2KJ$F? Lb M'W#*I$WOJ51LC$&!J;=H,>)B7[*$9+$NHD6\N!8'DSCH"#+ $%)$+1"5 8a MN!D<0-1H@%H%A@+C)#1!.$@Z"81^ APEN@(@'WK"_"L2$24]@%;VV6=J0?:z M,TDHUMS $& '_X +M("R@ ]$P)=B )0N ) $$;#AE("'RRL#@05LN [W#^# y M'P,"M.!>="T,(!QA5 1H3]D1'Q!'@M"*/@]#Z A23 5(#6H@>0Q '50_W?$[x M&L<]R!)T)9Q *X0-@,A$UX#OY/?F((W3&0V807D "Zw MXP]( 6RD.WX !DD '"2#C K_@$4! 'T@#X /$_@&:*,H!@BW\:VD7)CB>7I v M'^B -+6D"):6ZXVXT:%MN$#V#]S ;XP4 VD"= 1)@ 0") S8<#=.,46"#8DVu M-MP,@$[0P" DQ^5H?7S =(2.SN(R54?P.!!40([\/QMN0?X#.< C<=P-^I$@A^ZAX#!(9T(FY0B(@ UTQ'7NDL$B3r M $!$4CD2F0\<@- :5FR@-](AUQ0CY1 =TEIE)F*5H3.4AJ+-!XA+L&+[ 0O\q M-;L,9:L8E;3"&2A*1MDJ:L*CE B[@FV)B^]F?4+1R\$"::O*X0-#@"*M$0 @p M6$L*#DPV%KEEQ)H=>)&"3$:6!7T0G-ZCM4"46" [ZH,G.1\'@A?PEAU.:GA+o M:H#C# .,(_\T3^BF4*IL0 R!.4'9+X*"0_N2I:!;>\E0*@40* 73G](B6.n MFY1 TE20R'LPW789/%"$<8TW1!*Z)0+],Gk M!0!%0 /@D!6@!)+'$$R= ,0&B* 7*(4EPQ[4MYO! \@DSNR15$!E%DRU:29Qj MG+.DE'!3VO3(%40IC28+J$WXH/,H 3*YN0# $!:,DG-HG; (>RKDXh M,Q*L<)P '(6S![0-2/%Y8/SF(0&'!(g M(,$!,4%EG$Q3'(0&=9,&W$VWV25#IKX[IZFH U1S(,2R.N FB0W^\0=!XIYY$P#T [5TK;(5Q* '"3-.21N2d MYC#A9='@ DJL2 * P!$+4B1K1*$H!E^A_(Z)/%'H!z M4B4*%:JH%Y2#>32+4B9*UN & B?H")2@B_9(,/HV\>4&[:#,$0" T"T#'4?Hy M0:J.AN-#RZLH;>T"Z90V&3VZ!.#B"'x MJD$TRD:0U,;\EG#4EJU(+B $,IWV"0!"K[!4&^TS (3>?11Z/P JC"S)P'KPw M%@^S"71@!T@ ;0#F !.P, (4D8$H&2NP39% -_VFX50( M#0!$AJ"VS&B"&v MT T$R3$1RA4 . !VH&], V 3PI?#9F!>#s M^.[>%,A]!N;%]+WC]^PXW0"8>,S/^4$_Z4?]MITMXQ6DX,P0@C.#",X,(S@Sr MOF+]48(S@PG.#"X2PE+Rp M!^_N0HHP0I2<#(=?!0 D(+ .5BYE6!'K85*LOF/A!(#':IK0 #4PK80UM;I6o M%) "1!C_":T;8+26UE%#;TYK864'AS6Q+E8 X%IA*T.0K2+, P"GRX$"?"MMn M1:W$5;4R!-:*7)?-:PUBS+7PT(K06@.D*W!E,L(UM1K7UJI=E2L_D*W3=;@>m MUML*!B8KD^E'_V -@25^L 4R %CR!PQ OQH>?P (_&L \ <90,#Z@T9@8#6 l M@74$(FP,/%< $ =&:P9*<]2H.!"P_8 ,:%@[X5Q3 #RB!?Y4 _" &k M^%<*P ]*097K!\ R?C7 < /VH!_%0!'RK\2 'X _QK > '=<"_&@!SXU\7j M #\8!_Z5 ?"#<.!?&X _R '^%0+P@W3@7R, /T '*_8>73O_&@+X@1KPKR" i M'\@!_TKQ6(!_%0'] /XUQ'0#[J ?R4!_8 +^-<2T ^P@'\U ?V "OC7$S Hh M_"L9X >#X,/R Q_@7UE /S !_C4%\ -9X%]50#]@!/YU!?2#:!!H^P$T\*]Fg M %#ZUS/@#RJ ?T4#_D "^-(= /W(!_'0+]X WX5R+0#SQLX7$"_J *^-1P+]V 7\0#_SK&N 'A,"_2@%_( _\*V&PKWCK'_37PE,%_(&Qa M+3Q68%'XUROP#Q2 ?\4"_D#9%I[UH 3\ZWHX DKW'R"!IIL$_*L6<'G^=0OXz M W7@7]O=D"&1^T 6()F-)0$V%A@@/][@Y= %0U$CIE\LXKJ*H. :#GY0<0L/y MF;VY #--H UVP\ZK&FUNJ&*EBS=_66J&NGY?:!,K !;4,"-%."X((R"P'(O@Y@(F1?M$&7u M@%+<"5SZ0!-!WX4W?:OO]54 V1=Q, #N2ZJ^+\YX.^.7*.D#"H!D#"L H(@"t M@")N7_/D;M"9.S4=52X?F(/\RQN]@?F"!X@2 8@;SR( DA4 D#P"P"8T8$K3s M:OR%($"4AJ'4%)82) X, ;F!X7EU5P 3$$ :J1PW8W%5?L(@"$0#WQ'!X@#r MB&9$[C1FD0_D@+HC6YT2'*Q(:K" ;8"BZ[_R$?M*'K2Q?=/C1&C #YB/V80)q M+.SVHGF\":6&()Q@;CIJ2E)'<%&%!_3X X.PF>[%%ZX#FRE>C.'-A :8#!@Np M/&9 #9/APG,&W'#\9 8BRE&0@W%(;/+=/Y '1ZX X$DF9\6<@"R(3VH@L.#)NI"[AA&@,QY4TIL;7V!IK8R"'BBD%.S!((>#((8!RO"=Cj ML3H>"$9@,\':73P#[C$-N,?A=1?;@'XQR@S(V+C'_3B+EY#WL$%: 7T8i M(L/B]3F1M\]F:@'WF-X(XTZYB\' /0X#]U@,W&,'.X9!\3(6R:78&D_C:ER2h ML_%)#G*4PAT8)!EPY Z 2S['$GD3_\?-U(9W<1S>Q6EX%XMA86R)0_L?.g MV!07Y(.,DNDD/3!(.^#($8"I_.2J,D'H"#!@,T6 >]P&[O$; ,E#N1F/9+.\f MC=.R_31(0\X!_@@'_@">@D/+@"e M0N#(&8##G$=TY ^8 '\,$_3(*$0I+>588C1ZH!Z87[+5B!<>/& ]_X 84 #Md M6@.(D=H0 +EY'X0- M";!YP!Z,U*!@'TYG*E +(F'NL(X& S_8![K!EV<5/8c MQ2IB%ZNW7:P5J+,;5LYL$6]M)A]PCWO /;[,N_@&W&,><(]WP#W6 ?XQQY++)/64*S&*D] a M_LCV>)<-Z&&#DO\!>-8,9D /JP.#1 &.7 +PS\4$0*OFULB:5V*W\KW<0 @0z M(WB0 PI/E@4 *=KP\ ,.H']U!B@0:X* #D@QIQ9]L2&L 4E8 G\ Z5V!FI"y M!J@)2>HLW INP2O:ZEPZ15P)!.C2UFFB7W22=E5R8 %?-ID&!CB! .B4WV ?x M,&!U! \<\$"X:F4K'Z1&KB2@/$M'F(-@6DP' #(=+_.!-=A*>.E'#(0;V*8Kw M, &P/C" < *!8#'2 )6BY?Z [0Z31- ,ACV6JUA[HCR .QH)S#= 6FHN)Rv MZ?6(,0-$Qt M>D?3:!M- W#TPM/1P:)'_VAN(:2)=$TX $QHFS4L>H#'FM)\ITK+YBOMs MU"Z9L""1\D!37KMIP@07$?A1E<1'!"DR "=: /R % H 0(!UQq MP 0Z3;E18JE32<&*L/K+WHY0VM>Q[/SN SZ035&!?J,#"8"=OJQLZ@JVJ0*@p MV3:;(6136K!-*0#/!J>*!EKL$WSA3;XIMD4&VQ3)O!-OVF5n M@P?I;I?Q@I>)?^PF43 /1X!]Y@$W.,2<(]-P#T^ ?+5< ]EDP&X5OM.$B!"HJ/l M-8[&1_DLG^1)(7^R0&?&%!M:?S*Y"7@J"''.NI2>:M?04;Y-*\A!32@ Y(<>k M1%\^T 1-DN1Q '63$*Q2]2GD]@$N &P@A"$@+( #OX8(8"1.&!&\@,08)I$j M0',9< A !" ""6< P#=#N-Y20\)9$]/$OA& A,L=\#L)#([=2(34-S]@WQR i M3/I+'D"] 8#S3L,!CU)VJ@@VE'[W@0S>-<$ D!\F<+R3=^]AWCI2>S]O2AF]h M(4 M][86WMS;^^MO\7W\(1>YAM]ZV_V30 DG"$XX?9;?@\X0L#"[S=O% ])=*'L!HCHZ4#2IL;&LP.5I/%1\6U]QHR OTTP;6P!=7"+P1#$E%&&7 A$@&ACR"E !#BM"F (2 ,8[#M 0"EBc MWX&###X$">?X@!O*(&EX<5-@[) P@.)!LW$,-&GU](7-#/"SH4#N@F:2Y!802 :;QYy M_.%S$#K^(,UA0X-@!127/"DJE"&,CQZD2X8X@#C@ .)X XB3T3?:JI[BF6Z)x M"VZ13M)-.DHOYY*'H[$QG8$(8"<1^@?, *?K=(NG# (C(>@]3H.-72=G((<:w M#[&2E\Q@C>N,H2YY\&\H6^JGZ?($\D%.JM!=TM3A?CD2"%"8D!! CS2HO1K4v M0NX#!_#5B:8T>)G.<]CP@N\H /K1X,B.O$ *1 ")2-<;9P Y J8#H%D^@SZ8YR@1W(T UX'CKKU<0-[t M?98;'KGN .BZ%)CE2S"OS_+!WLMIN:FQY8A=E2. Q:XCZ3BWSI60'?](]D9!s MV2U[#X>?O+VSTQZI 8;H^@0H/(@F40,.X:YXS:5;;^20XV_&]C8.>V@[$8KIr M)>.D3W:-KMLQNV^OI@4@N+OUX0X N@%4<%+('0!P=[K>R L +F'L1.*Q3_?(q M7MU1>F['<9?=?-:!YMTC\2_=U)%+/1^P _NNV?\J?L=Q^CV3_I^EK@_4@'T?p M3-"@?4(O82RW'/R)Y.T,H1^(@P#A#ZR!/\ &_D ;6.:=/H$L@32FDQ<:4X@ o M#0V:-:,##5L"O%K8+JX TK%U;2_I\7T&)6Y8-"P@#C. .$SC9"NPC- .P, Vn M'PA0 (G/\V&##++@/9<,^9PE@(.$7IL%0+SX P*=CG>%@LX2B &4WS!3WB8Pm M()L@Y?_!/< T. L:C!H(5G^+##HP!6U-#_UKGL@ ,L(]@ 9TVB<-+]<8E"0Hl MLT '._/:98L3\.8C%P"X!Z2@SD.PE4V4T$&*(GB?)IMJ@YE= 'HV/QA9=2, k MVP2*J*^!T@]7\SYOEY>-OQ#0 . ,"P-]X F& ;R! "W@".(,$=! AD-F,j MF4N//Q]J]P*+=#<)#%-$DPC;X4L=!5V0ZEDA/NC1@T/7PY]A(P_B#SQ82/&'i M'=QX8)&B"E:W .D01QY ''@ <1A2R7#V&AW'YWJBY=*K_;7/]A"'V]OZC6:Bh MP\*T-XC0 GTQD-&f M2R6#]CYO 2^4981U8 K6.%NJW@E:$@S%HJ@.B*8ZZ B0(-JL)'/@X)%7';#Ye MR?!V?OJ200X&$ +P/R 1Z"N@(C -PA@,*!7J!0D8&W)P])/^$\L!I:*SVH"?d M80XPDAQ@@@A:\H DD:3#H#X#F0:%AP/( $2S:3C!)C0&U, 0W'P-I" X@8,/c M:13^3=J!?T (]+ ^,$@HX,@% YM*@ T=;(!,'[:=PMQ7S*P?Eb M25!V( Z\!P H6[1EA'10Z[^JQP 9N2<+0K!\';C* 9JZ=O*N*Q6 )@J'A(&Xa M>0!*0 @,0^LV5G]93:A*HNAB@VO(+Q%.<.U?EK=?2%NEM+JD<;\G_?V]7R)Lz M .(?_&N""4#^-B''2X2"L?N!?_,7_BB ^?^KFI "K+_S!P K0/L+__03_8L_y MP_'^->$%D'^) /.?XI3_S- _=, ]6\#U/_W"?_)7R+@ /6? ]3_#E#_/$#]x MHQKZ#Q (' RZ0D4LW(\RJ #%IU6BUX4$/8JEW) MAPENM&DR@1") 9u M\VAr include modula2.uaj 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