Path: utzoo!utgpu!jarvis.csri.toronto.edu!rutgers!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: v07i058: anamod2 -- Shareware Modula-2 compiler  part25/28
Keywords: arc, uuencode
Message-ID: <34359@grapevine.uucp>
Date: 25 Sep 89 02:47:49 GMT
Sender: news@grapevine.EBay
Lines: 504
Approved: koreth%panarthea.ebay@sun.com

Submitted-by: madsen@admin1.usask.ca (Jorgen Madsen)
Posting-number: Volume 7, Issue 58
Archive-name: anamod2/part25

table
 !"#$%&'()*+,-./0123456789:;<=>?
@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_
begin 644 ANA_M2_5.ARC
M&@A%34%#4RY(3%  3T, -FSD 4,&*\B('C!8X;*1HH4$FP!0@0;:4J8EF)X\B4X;X +&F3!X0<.2D>2.GYLV<:=R< 3'S#9V>38OF8>DEx
MR,N8,^W>E5JTJ57JR 8 IBw
M"Y2I1-QT 0&IP)2#;]BT)?/FCIN!35KP&-R4!Y(G38H(%%+F3-2H4]^8 6$Fv
M#9LR@+5P+GP81!4XBQL_9MNV#AS,+882_NF$B, B;L@,7MWZ]5\%+2 =41GPu
M8XP4()H\L9+$R1$05) 4 3&DBI0I3Z0\]V+DI1&F=\+(43X&C?PP8^B4:0IIt
M0.;VD!#PGASQS0?"'4R1,= 21L$1AG+R(73''( )\9(0^*U1('WVR8&??DUEs
MUX*% 6(XAH;R*8?@? /)M].':=A11@B >06"$0BIM1P(;$151DO?!7B$53>%r
MP:./@(T' G+*J7:D&S\F )@3+SE1!AYQ]0@E<%0&B&-:<3GIH(=G> @'&H!!q
M\1(4/<=#"RY!T@ 1%96A'U)MOOE&G/7=E]]^@!$Q&P^')DJ%:"]Qo
M^MJG4&()0JD>GBH'8$.L"JFD5 SU:$?[Q67D' Z. 9L"F5V:Z0*R>KI34F["n
M*=:*9*B4F:J:1DOKE7%A"]@2C#DP!!MOE(4"&9WJAYU-('#4Y&I:+OLG=0(-m
M*D,8V&DGQ7BM*LHH"([^.BFCEOY+A7E.#-5?$L3*82P(4-Y1+V,-\$!%$$((l
M&P09=LRD[%BUQD5'&&)@9!,<@"G!6 (0ZR0Q51278;&/5"4'0E3LZBBB%U/'$RT_ P1$(*$0E,QW8U0M8T) D0#0(;9J6%@AB>'K'1F[ j
M)-\:4.L4%U12B<@#LOB5(89\/F W$WUUR#$'4]JV@#4"0[P!QU%=+U4VO&NXi
MUI88=9AA!JI)8P&"THP9L+48;,R$=KUBR3>JSF/DO?>NT$F'[T@<_?/%I'1\Y"+,/N.'.;F@4DUIAM/7\[6ANG_SR,NJ]4U3BTUX]&[DW92\UL]88QA*Y-X=N)DP28N3G$Q8%*:1L*DB $.O4Je
M+6S(0TH4@#_]#25YM8/>_\Q & ;F)4P&S!M'1K; GO#HA"J+X%0F6,$60.&"d
M;LC@!N\5J'RA@ ;8^1<4F, 0V/5-"D);'APR-[+RM45J)TN@6)S4&KV9+ ].c
M(T,+HA)#U!R(>/_3"5J2HQ+&*( .6"R#%KD(0=2XX"5WD@GNVMBV.X!Q24'1b
M7F:\@$00*)&).['C54 0ASKL)P]O!$$0.C*VI@@2#3K@RG=N);**)* _;^S/a
ME8@W%OG)X2C"BPH=6!("H;5IB7&32YL<.) L,(8 IP0DP6X%IJ@8DB4_$-H1z
M/$6S'CEP1X+#7D<2T*4!N.$FL8S;^.+BJ#$6SPVW+!V@!(6"&F!G"$& 0A(Vy
MQH0D:&%@CJ*"%(+@A"E X0E3,"*S6E"%!%0!"E"0%#8C=: $]6T("1@"GXA7x
MOC3H(9 )&H@7J)  *GBH(\(K"ZX^U+R^,2$!Z&KD&/("T/D 1G)>>&A$]S/1w
MLA0N+1>=7#M]X[3;491KI3$<8**0@"C4P2H[*5F\U/))%F#D)E<)0UR,*Z#M=X#ZF)$O(\ 0I9&!@Y5:4=[E0J=D"+q
M5;MV@H(KI,%IV/GH95IRA02@97 H]=KA;A+;KC+.<9#S@BM!D 7-S>U$R]W)p
M?1_7E+<>D+ *V"64/"29/-A4@$DIH!I5"$!:#LZ+A"'NF]JFVYW-(9(*>.5Uo
M7M*$L]'LL%2E$MNF4M9DR8UN< %;2MW@!B\*]L"$>:N\M/?*0HD7NCN+"PH>n
M.;DK8(U6[=LX O,X0*DC\1MD)!<-!=DL&4(:D36;PJDVU1JXJ!?3SB40Y[0GNM**@B+JFI(FY" l
MCRF'N.P"']BJO)]R9:8)KS0T",Z KKFU!='+NNOD(-V?K6%:T0-N-"06L$=.k
M#VV\DZYT^6#R!G:I9#N2&L@?XR86%&QY/W=0BG[FD%Z=8H4G,P'?U,2R4%U1j
M2 %7&"<4!D*%O-'D:]@ZD)F@%H8ZV"2HQ1L#)>7@H32<82=MHH.SYZP2[A2Ai
MO8663&7$\B:;>;$Y@03CJ.(BM6(9+LT@>*ZGC*>2(6CG4 ,)@K7?@&V#@*]Gh
MSYP*"9O2JPCOR7>>W(H"BH %AE#A!0N9*CZ'8)^^B@4-E<&(__"=S)&AI0U!g
M3E]AF.26='GJT\9CIWQ)/2J/\L[0QTRUQ0'T0%$9<-Ve
M?;Q8;!!UKDU4R4^,EO7*3/I'IUKOG!N.DI:S=(BAI'NE"H168CKD/6='F00, 60)"; 7#<5""Z50/%c
MLD)TS4&%ER< "81V)R==#!(.X )C"N!2F YPIY4'$5.GZ<,8P  [56U!4/Y5b
M!"H9(3T+H0*E !52(PRD=G%I3EO0PH8ZM,$-VG*#9DXF!H%@OR8HPTBRO BOa
MLN&J#,:6L6?)AGXQB,6!@N-Z"UB:@ %A6^9D8B9A%&5OU6$]LG7R]UEI)Q^]08)H&E/u
MD$\=]VTD$W.;6!DA!0.OI&^?DHDZDHJ=.&J:5B<$<'I]-1;4(BIQ(HLA%0,)t
MX(HOLEA6\6NR*!:AMT>"$2!0,'/Y5AEE(U.^&&*0( (MX05:D #-:(J^,1A[s
MX4@\HXK29(0H$ ,^-@15)4Y/P%4#DX522(4]IRI8Q3U#P'Q.L!X8]4K(07:Fr
M"(OA$HZSZ!^:X09#H6E8,P#+LUK_]$5NV(GPP@,$*2<.B%&RT1]3@ 81A#;^q
MR)"<^$K-$I&9X1 !@HNF>(;T]Y 1R3DAY07%U 2WQI$AQXEEDS4?.129006Op
M1)([89*@=1,0.13\55E:5N=0S& ""%M8B3.% :Gn
MT39&0AFALTPRYD63IQ]DD$@EMG>+AH?'AHA$!2,AXY2MQJ9C20W#L^1IN (C:,RBO=5L>)AK%A]' 2]Ai
MPWGQ8H<)-Y\VLY^-N4&:QD?*(Q/*D8*B=!.\*8@VM1]YX47$(Q:D&5FTI!;Rh
M,P?_Z02M&:&R:4>+Y5CW&5TKF00P$S'9UY[RV:%X&&->=@(=6$ ZQ6]V907]g
MMYY&DH+P$E1% 5>/R$7F%C285H1>68[6Q#U!X%W?005+0Y[F"5X8-3M3$ 9H)9OPDJ8AU26WB)L2ZI9UX21F"CF9D8UM2CP*e
M9&U4L5A\]6W*\9IZIQR;%!<% 1D*P1!G^1S9:1U0I4A#, 1 D4[> 1[B 0)^d
M-D[3QSU9, 6OT@3G&0+]HS-]1TLH)UA)Y4*" Z(/.@<%X[(84.<7(IIQRK-'9[.!:]N3TC<*1LD'IRBI&C<@;_(ZS[F7H.YR%M$%+Xb
M- 4G,S/"&:'$*E@1IBQS,#HXD1R-]J@($:D-$5)$0#LYX30ZPZX)L1 -(9\"a
M]%]K4":?HQPH4 5.D 2/.05$0 ,N( .0J$,KB4]%@ ><9*_N>I:5>H35M01%z
MX$I"$(6,XA#;95U-L!#%,:GK])M"@*1ND:!%XJK%RA@(D!DVPBEGF :'J7IYy
MP8S?ZYP6_605N( 8HJQ6\HY]R27#%&E(_ )PSZUA&*UAB\*]C821^L4YXx
M];#P9VTOHJ='A0+DFBZKA3E'08)/"X/8,:ZDM0Q T6P8M +3)@1IST EZ(^H!)[8+6AHQ\M +LM4"]]D !77- #\*Q_^>Z@[80:9HW Y!IU42DTQ@'-L58]+L[B-FV+GB0*T\ZW&q
M!7\)XD5:\;2[$U20$5(I4,*"@U)H,1\J;!0L;" NC! A500),+V?LL)OT,+Xp
MP*A\G7,. .Q6R>U0[_ :79P A("]M<'TK0\,Io
MW#97?&A.[+O82[U9W )N<+Q [%=.3#%PAA4Q-:#YZ3LQ,!8R<'P9[$-[K#KQn
M- 1)D#\@@+&ENAY',!#ZE$#;!Z>/"+VZZBG.-A9A_!HRTA9B@A#FNEI2(8E5m
MP!D#X;-SIS>I6P9.HU. *50RECOJ-C:)FGAE(TJET6CK4@9F4&W/"@*="41]l
MPP-V:!IT(!"1?,K)*D R!;TY%1ZXTJUQBk
M^Z]EN[[9$CLJ 1H(14U!0U,N2T59 $]# ,L*   F$A-)3^ L%0  # D2$"ECj
M)DP=-G1 +"F3!X20-&[(0#PS!X29-W) -$DS1LZ;(FW"C*DXPP4.,0E0P(CQi
M0H:,%SANI&B@(& /2"AHT@3A)0@(2 .:O+%3!@2=-R#FT DC)^$;,R#80"P*h
M:4&1*4- ^ 0:!(Y'.&\JHI"J-.F;-D7'G T9<.G#Z-KR#DHI3ED,%,9*X1C'IU@R!3ADT9PC\EF.X-e
M=*!QY!?E!.>;>S=<+T7F'GES%$29B"">1IWZ$X+I[$"EE/&R; %)L=@A1UF@&GY<46&'6&\9]=DE5UVW1%S!2$&1D[5c
MX114=* QT6$-F$8A4-L9A508X[E1!F9(S.78&'G]1]QS5$6 61)S<>994T:%b
M(<8+4QS7HQA)'06'A#PID6-GGYTF10M,&,&"46A\!P)$Q+F1$"058+;$7$NDa
MP<9KT4WW4VE8*>0BEO8UU)T9=;PWGQN8,3&7>F;(L1X:5!8U1T=E6 F) Z;9z
M"103;]Q1&&QA> 9"=9@UL>2."0WQ9)1GFB:I@GR=P<8;=[W6QAO$8>:$?G7Uy
M)]U_?J6XWD]6I7DJB=PAY1Y?H@UXQH!PH('9$W,] 8>5D(& HAAL-+B&JS\Qx
M@!D4J/)W%XQFMBJ5BH%#E&L:NLOEZ7123-BD580.^w
M!HER:;(+E!%BOC9&'7+HJ24(YJ+;*V92S!4D4X#UA==TAYF79L% '2Q'P@WRv
MI2<;S%$Q5S43%@9V Y"IA@8\"+I!=5W%G&L&$DI%8;;/%U$;]&I8'680>8t
MUC105< Q;$:Q.0KI=59$6Y3(PK4JVAFO5F5:VD#M9]?"K#;T]GJ870%FOB#Hs
M&2Y]/U5@FM] #?$&' T)G@;AW:T!N!AUF&%&89AE,5<6RBH,HT4>M0&"Y&-2r
M;OFBD'2=)A9S%8%'&?LBYT88:/$U==68::&VYS&VK?>Y<6N;INX1A\&?:Z^9q
M?KEAQH)7!AZKZ027:9G-I7B<"557$42!@_MX?:F;YL=<5;@1DAS+[MOO=PDIp
MC_GT:7J1X #;=1<2'8"->[F#/R5@6@A.*]IJOOL_o
MU?D) DS#@]UU1RE,V5!?*K<\!,;O2V!S@QC8M)"&Y.DL%HE3T@@("0*8Q@<6n
M1(K*R+7!T\G!@UGQ@J$&H!X!SJF $4D4K$SC H\EY'QKP"%/-C4 YS00!)X"m
ME6M ,"KB_$1X6?F!;XZ3,"04@0G0,H.8BM(=]]T0?CF<%0^_0[NT\,M?[>,@l
MZE27E=",YB<$"-(1F9)$-/($8@.06,),T#V,W?$.+XA#'0K3D!::1@YUN)"&k
MYN)$Y$RK=]2IC!*]8+(!#"$P;H!;4@!E)8_K*26MA0AS9T9I-T"V3+Q@0"%>$A>P:\PW 212<_>@%Q38QE4: @i
M&(&I"P34(YXP/4),8R(SB,J$C/1XPCHM+A"7:1!#45"T!H;\I %>8!T TQ,Gh
M$,0 -FNIV)7J@Z(Y1%(-H,(,ZWI@,#0(L4-N- Q& !:6 1(.*/$$ 1#F H4Tg
M# L$1'A"QVZGSS+*\8SDY$GK=L8444HD-,F:3#)_4H"(CL W8H)7#9=')4ABf
M5*,6B>G[0@H#2DH3-F]D'Q#)($1(&""B*'"1]^H3DI8)U)X^I5%X$)J1.R23e
M:Q%-P4CYTE2//#5G$;BRDd
M7F!,$]. TC TQ(SC*4OJ(JK7*5@5?WQ"T5F)JLSN'.NC3ZT>4%PW5I9YI @Oc
MBQFL(HJ:*2R%1RA2D3(Y"AZOO$%C<]A16M?*.N8$$F7# H]E708SF=',9CC3b
M&<]\IM:(HF< KH.=AHK2U3=$=G[X H\8C?.3"$1T?GK,*3%WV$H73:B);+ 6J!XD^6&95TK;@B(:(3Iy
MPI_N(+28S_LF8R/++0[C9J7%@@0#(EIB 'NX2@#3DQT>A[( WR&R@#R"D%#$x
M7="A\*3+,FI$ JW;WV!:(0UE4"9W(PO-*\05.3P>HXF&P]<@v
M'Y5UT-33'&Q3E"LD,[*LBYA>(B,"%XB@>5SE8_\BFF@S.\J;,]UI?[4Y!33$u
MM<(V?F=$M>F>9,G!I'PUI$K1J@":/&%G#8D3<3("A2%D= HZV D/@L $*OB@t
M!1U# O94929((& *2$B"$8#& R/$ (8M $&S8P #'^B:U[YN0<&$_:]+%MLJs
MKXL=<47BD5?=,]K4EMX4SE*4.$D2/*2U3*X5;@OBW8(+)R#A>"9XU9B%@OKP(-XPY$%)Y^"#MT"\#"W@q
M;K_#/5R ]U@\\785PDFN[P27@0P+SV=$'L[R=4Ip
MQVO>@N*V8 LQ: $-8- %FN=[W"TS=TWK (*ETX0XZ%3GOK'TH03 X2"O^3!9o
M-*@^!H\P(A_:IV-M3!,T8"_D8"9#0,0('DR?5GT-TA@-Q>SD(GWZ#&U_N[?Wn
M,G,BG./Y!/D/N=H*10 Q!? $1"$=j
M=T9&\?%R 8(T2K-/2O$Q?"$>$$$IXX)0;3!]4I %4"!_0Q!4W?91!41,ZN0=i
M[R$'\4$8$5@?L+<:93 EQ $?\J& A*,GO4<3+W,$2: 9!#!YZ@4N!\$4WH$'h
M7K$>!'0_^1-*^Y043088F+=YR48%1? "0Y %0> $+W"#1> $5! $+Y %7\0$g
M3W %+R $3% %42@%14 $+W $:)B%8\@$,+,$":!'%1$=X.(1LH9/GW)&=^ Af
MA/$"8Y '#?("(0$W2/8">5 ;A+&"$]-YB#&F%]V9$R8] :^B(@!&(8-'$3'4 37I  0? >!I41^V-#8@"6Q &+: '7? HGL@&?#&"R&,L;- K/A)T(_$67)  5! &a
M[01BQS0>\((\>2 ]&@A%34%#4RY20P  3T, &@4  ",2W6#CH[D*   ,.T! z
M&B"EC)@T;LB 6%,FSQP7#13LB!APX!4T9=R :)-FC)PW1=J$&3,'1)J29?"4y
M&5.'3AF%:>B 8//FS9J29M[( 1$F(8@Z<\J4I(/F) @S:=B4 4'G#0@Y!A&2x
MH2AP ,,\(,B40>HF9IHW;DKV5!A49ATX&T=^? @"Q)0R2\N().D"#1NT8T'(w
M'?GPZE&=3#%2':C53)@Z;&0>3(CP#%L03=[,D?G&3&"A2Z$N)M-8+%000=E8v
M3@F'3<\P3>7D80%"3,O! _*\J0,:S6PV"MV\<7GY+QN:=QKKH#CX (\Y:'PH%>"51@\X9L[?W<271ITS/:C28$t
M50BVM_DV(A.R0;BT:>^])(& 0GPFE40&6$L%1Y1>4D8(+;25A&5AL8(4@>DJQYUYS!,(GWTO%C:=1&-F9YU-Wr
M!X*'D']$H<9B@DFQT=I2U67T$HD@)*%1&3%AM-,8\97! H0Q\.23&3* 0*5&q
M-A[YTWQ,.36'1V\\-QY3=SC%XW2J INUT%0+?L$!E1U? =4"?"$*]( 13N 84!UA%66&2PJ9$4-$n
ML<[JUYD?_=:"&RG1T<)9 CD ;! @!(1<&L>^5)41R\(JE:QOT-H0"-3B82VOm
M2T$R ;!B=/M3L> B>Y0,S)[K[+K0ILG&M-6VT*-&D#  K!#V?ANN0@,9P:^Yl
M":&K+E;M6KNJ0!$ .X:]Q#JL;Z3]5OPOQ@6[9H899>P$2<=.#-&PL?I&/$/)k
M9%CL%ZIEN-3"QI#\Z@01,^-MT#S.J'$VS4/0"X,h
MK&'^*4L-9D2'Y6"O&T<=':T!N-\R#0ZL&H>++*ZRI(.6.4_/Y?7XZEWKO316g
M>?2TAD 8 -M"[C2+6X5WK%_T4%D+FT.R + DV#L$&SM!PAO0OX7P %>T%^MPTI.Y* ][BWPd
M>PX4R/Z<< )[R2$-9T"#3+;WD3L4$&7N:L%^J,4Y8*' 7@=37P]_R*Z"P:N(c
M3L !Z,251!ZRSWA\TZ#]S"!$_G ,6#>8HD)NF,,=KL^'6$PA"&Q5!ES-9@Y=b
M)&+0@%4"D.'EC$QDHQMU]<0Y.J$&8OS)'9>81NN]+W[SJ]_]AABO&=H@D.@Sa
M(R$QZ)\N#! 6\ (6V!"11F$)E.C):4%%4/5YV5>6 (Qy
M86FD-3#1/'#(0PN:^16$1< +,K,7-;W$Q.2Y(948\$(6IFE,$.3A55F:C$[*x
M=K8W1*0M79I#:?Z&.JCL,FJ.NF<3@Z@RECU( 6W18Z[@N*J(A$"#;8@(&@A%w
M34%#4RY43U, 3T, /^4  &D18X:E*0)/ 0 ,8#0 "%"!%P  *>@=M*   "0'v
M2_(Y)+")W\$  )2T D#"# HA>086?"(Q ! *+W(,Y,'J!P\ 2)P$X?)$": Uu
M_EP ^5:2)1@;(%H 8 !M(X6B #A R[62E0% %P&( ""MD3!>_R -R!GD!8 7t
M#82<<9E1YC>+6AF,:#8P"M"0 =R^0 & !1(T   Y80J G#HHCU(.3()+<( Bs
MUGZH#" D)M]TM/8>)(=+LE9>5!Z1!2 9P#IB3JS\\X+DW ,"2."R@('$S3]Pr
MG?/! ]S9AXW6KSL?$('E46=5,H2XMB?\'[WB\'KP&?C/7W%]Q;W!6#P5!-PIq
MKB( 23I]8 A_U@=BUPZ@@W+F_,  &" "AHM__)  *P<(A!L "D# 00   @0Dp
M@,"R7 MF#.2 >_#)1Y]]^.G''P1T!0"@>@!@X>9%;+,]0J$' 8&!@0C+!<""#3*\A $(l
MRUW6&3FZ. &->@'8$Z:"9#:X7W__!;@<$&; 0*=6 =RY8HMZ-NE59Q^ TAL#k
MVP709HCZ8,J*$J[I8P8-J0W$ AJPROH(KMT%4-UUV6W'0;+?A1? >-MUL.F8j
M+[X  W^XP<;7+RX AJ W9V@A;1)0T075!23Z>2X@=P& 1XX[]JB 6$*!"Y@h
MW2+1!@#$\B6;N$=BF_&V,(V, :" \9KA%<  D^C!%W>J@,:<\<4+%O[2"H  g
M9I 0K*)JB$PRS(\NFJ@H*ZZH)R_YSGH9_!^T!J^X$[JO6>(3OHCc
M( U4!!/O0@C !0 " M<&ZI!W@;38 4#7U1LH#X#OOO'UB 0^9/0].V= T%D3b
M[*C/OA!&Z/!2 # X@,WZ\8\I_0,? ;29   0,0"0@@'W@<$!VX  " (@!P=\a
M@P(LV((#%@@ BN#!_X10!!S\SP?OP0<8P," (]S-#!1@ !'^\8\S$$ )1; Az
MA/[JS/OBUT( P* -!BAC#MY B3*VX R."&(PB-'$ ,("+B& P0>]x
M(<*!^ ]K0B""TT##E]2M[B"&L",>]6@"''JA9HF200'*$00E!,$+P1!&HF 1w
M!#,@((CE $(3P4" /P8 #"YP(Q5A0  ='D0.).SA/PS%RC;%\G\P>(D"@E$,v
M:!P!$@!(8A.50(0V$""(8#A0 >H61"( @92YI&$75<,,,+;O(&,!P ,N L:/F#K.5)U@YX, 4@H#4#7@6 !C*PG!EM@* PX$Q"%PJ3H%0 GNB-U0))N?D0G "<#L3?QF4!+(6H\) 52/o
M !3 A49H9&AF0(8%0&UNLT19 MX5 [LP@ ;$]5 %7\&?0[L/:P%7P/GZ8Z!MBm
M>!]03'1DI[2@/R9ZGP!8 ;@0!!U!YO\P907'0I:YLGVN;9<#l
M@C.HX;4P.!^ AP(+O"B #5! L(*9U5P&! $=0P$B0P<,3J$EP R/8E:"^R.?k
M0%@$ 4@ @M .0$6QO(!( >C,%4"P70#T@;$HR!Y=:GM; >3N#!20+ (DRX#.j
M. ,-F@4 #RTX L9Z0,?;@^YR? R$,RB@,\_P0?S 4%V)#EFB1>;+%*+T"#+>i
MY\8(J)\%4S!1F5JP"XP% 91Y/.4?,T#(G<$&*S+#V8%X]C"@/8!KI;4#.&"Vh
M1L+B!A:I-U_0O@0 ! 6!7O9J!8;ZE0 4$P\HP" %" C% E(>VH^%X&D @)K#g
MCR45#7H: '1%S6GL$!Y@*(MGO@ #"TD66@!L&%H+J* *+#6#*FCMY5\);2A@6EO1%A=K_!VMM8/;6]2?!WKSD;[0=0.a
M=I8[O:AX >+_V%Z:OZ(0/THX ALL$$!G'JS6!VF %0X) #: @0NO54+!0M4]*=-'-?!:T.0U,Q'$'X0?)s
M]\5JY!WU,N'Y"^#^1UG9\%84W1X5_B(6 !P P2'BDq
M\'V1=XB7]TDT=Q""D(9,L(;3!0'$95R/, -RJ 1T.!!VB(=Z2$HJ,#+'9(6!p
MB'=5-GI"00"H2(;@L(A#T8A\\8B1^'FZIWZF9W^LU7O0-H55B!^@J(4 $ 'Vo
M<$@!8 *80@#6Y88'D7Q)]D/GV!GJ6&8].IWCXn
M86#/YX.PI8<7EF%Y!1,<]@\>ECP!Z7@%R0 :AI"WI9#;46 :8(I8LWGDQX=@m
MP $8B8QBB(@%\@]JT(Y\(7CK" $F&7B#!X\!)%.=,8]G0 Y_.(S!!P3WX0_Rl
M0(T+=(D#,8/8F!':^(G%EX4NR!<00 KB* 68 @,K"0 H"8_L.$+H")4M&3\Qk
M28_V: ;X"' !G8 '?)Y Z2"%\T(\.=@9HT) 41I 8!I$'&6H4"0 )< :3j
M)V)':'X5]I 1*9="4V A%CD5!GX:.10<&9AZ>7W).))P\)3ON&4J297NJ'PNi
M"984Q1V)XFZ5Y."B), X _&P)/L9W_X1X1]=1HJ #C\$TA@P -!h
MT Y#X0$PL!U(< C.L!S_H -IY$(?9@"*L!R"Y@!E! )H5$9_$$_S-$]!A%QSg
M^ 8"P$(\4 !20 2L! NA9P:\P$J1=E!-5W<$ 'S]AYC8X0%TD0&Y606O=P1Nf
M,)[[Y0+"%U8'T(U'>1 48 B$AP9<]EH2D)Y($ @!% S!$#^\.%%\Z(?R]WI5e
M1HB&&)*7AP[,B #,N(/GMX21TX2GB8D%18.;>&GD"3@@]EKH.5;KV9[OZ0/Qd
M.9_$UX*7>1 3T(6"@ $:J#,DH<(BFG V'H,6C]!D9$0FH@3c
M6J%*2(D9"H0;^I,=2GL4IICBMQTVBI=,:GZ3B&T#T0+>8'42IYKBF7B6)P$Cb
MUZ7J\'4K=* 6Z@-YB1V0EU6%::$C)I;2F*78P7ER^GDN9*=-6HT<*FEH]P^Pa
M4!H#P %'XP(D8')5Z0'.D!GQ@QNPP$^=<0$"X"]!X Z$6E@_! $= " '0VAD*F;:EC^\:F $*JL2JJ/8*JH2E X  R#R@\Mw
ML"3PH8((H$ ,]"A\(P6N !\08!!-8!_P8; (:Q M + V0P #R[#\X+#\D+  v
MX 46B[$:BP42RP?\<08$V[ 'F[$&T7@%>[(:ZP0ABQ$NU;$L:Q!>$++@A(&?u
MY&4RB[!D A^DMJ\-=6=4F:A,T%&/H%(P908R(#:&X0(& "OVX"\M0"7\H 0Gt
M"T6):@5J>A!\\)0Q8 /.4X:K" !BD+3($U'PT1FZH ?^,ET=" 9$@'HO$&8's
M(0(*$(V"*5NEES<+1K$18FJ9-BV<,*YW,U4;\&O!1@_VEU>]AS7/B@^JQZ$8%F& # I*JB2J^$!@:'5H@!-Q1L  N(0#-*  !FX*##RP!Tp
M8+S(FQ'*R[P2,11\ +W D+S)N[S"6[T,  #8F[QK>#"=X:B0"A/*2JE\8:F8o
MJJFP(*N=BJCQ^G8!L .M"@"E2@&HVKWI6+R(< 8FP+]#\;S_>Y$-T+S7^[_4n
MFX[@BP@?! >PZ@O2RC]@0 $@D*T"  N-8 8*\ ,3T!D;H "9P07FBJY$8PX"m
MS #^VR8S< P#L0&*>,#>2\ L[,)<(@,IG, U3$XIW, [K"P6$,$33*L',@&Xl
MJJO[U:LEC%K#:@!UQ#L^PCL"@N<^JZ@2K_V2Z_VFJK]Q!g
M"[:/,%VJF%]#(P@/-1")J@U&2P(KI0!GX  O<&5\L0(<$+:UZP+HL+4"\'\#f
M\0)/&X'O,@5T40':4P%JLAS*&V%3&H8^58(@&3DCAH/H,HD4FM!7NM#;X7[8e
M4:?O,HD., +*X%-"H +;(P4B70&!BQTKD+P$L )J,%4(L%1TR7XLC35#L0,Md
M_2"UG%5:8VJ/*ZV88@/>BANJP#1"G2,%Q":  )?E<'H.KH'P0A-PZZJ$ $&P5I#<1\9T#AM8 YB;=;Rb
M 0V(X!4_0 &5>JF"0@!D[3COH0]FW9>BPB;H8-8M@ 3P$1 [F[&A\G=S)V9Da
M9K'^4=!L@@V=406^\!R^"JRH!4YB4#AO@)U_;=9"<)"&C=CI<9$KB["-?4^/z
M?1!C%HE\,]F#K;R6S1>87:[GFJZC69IM2=/GLSWO(@ H\ _]8&H@T-(0L )0y
MX%!6<]*#RQ]XPWZ(VP!F0 ]'\P+IMG;KQJ$O,:CTT*\3E=A((-X,8!S]"A\'x
MI-BN@0\.BP_^P;#T  L0H$,.0$H.*R2N00_^H:[R3=MKHKS<=TH0@+&238:Pw
ML&^#NG]_]3AI=A"@4(%\D0DTT!OL"@B%)01'8*J4W03456H2,M@$HLD\L$!4v
MT @)KX@1MX@@BB[\H3M"#[04L;LZ#C04QS@<4>^(IOB8X+@$@u
M3MD,9  RCA%2T AE% 9ML$$NI ?OZ0D$EN*.H#:"I@$ :V6=X0BBL&4O"@#9t
MQ&Y1FG_\P" ( . <NYHT?$+6/,+6)30$NMA@N<%E\\>922[56"Q^CS,D,s
M@+;\T!F=X :]T7N'JH(QQ079C6\',0H\T!NSVU)( !9'8;C*Fr
M #*D'0>JFGA&IONJM7A*O'NM<>^R#G>SRQ C$/I* L,G3o
MV3H'$$I&=^?:DLOC[NV7&RC<'NJQ$>[=ONJE_@BGON+V,^KK'O"P_D-2< 1Vn
MM!P#4 :E:+KXJJ_Y!P_B21;_X1H@#Q=*MC,-T!EV*X-E+J;G8*0^I0)0D$S!A@ GO6E]"&PMY0ZE=FIKl
M: ;BX(QU>[?)5E":^,A#W]"M!@@ W50#;>1F@-""2:463?3F]] ;O1T3??9[k
MFO88[0H:73$GZ=)"#@CYOC8,8FCi
M9_ET,?$>*=\MU]8 -U@@ 2%" LUA1UGP .="PNNP%@X+'XC\[T6h
M"GI3198C(P%QKZ4C8P&F!@8&4-UF0 O6N/4B$O(O,?+=;_(ZD/+VPO*[YO(Xg
M@"]G,/-&FS8Y/^ =&?6AMFOPS_.=00(L /2"&IY^Q0&M.5&E9N,!7F\F[QC;210@ FE<0#"#QG[K ?2(E+Q(C7?'BC9S0>=@0+TX#P-F-UFQQ%I0$6 0(:8!$@H $6 0(DU'') CZ-,A#K$ ; $ 0Nx
M970A0 0:,!M*1@ :8!$N,$\,4 3GA0W9S0Q6/_ @XQJGPQq
M#1M-I^AH7MKYQ?L2Ym
M+U(AJ*=>+U(J@(C2(E*D+RTB-88<+"TBI:>,#*4@X/%"CS5+#P8D(/^H5LCRl
MSV%4QDS[I0#8CPW[AKK\#P \\/\(@ +7L6D:@ 15A096?[F9^\V;"P)[.! $k
M@ )4D+3B %\-1 ]DH6U\<5(IA?. P,&GXKD'H0WJ$P5[]@CJG/,H0;< , _Zj
M^2^F2R&V0%.:1K)@03X1CA+ 3YH=0%QY53)6T7[+ Y(4%52\^T$WP!(4%4E\^V!$@3L("^Dg
M1@**4 (J#0(,0%#?S?\!P #_G^:?-O_3A0+RSV%4]CG930[;UFWPJ&N\)F@Vf
M(  ==-P6(+=T"P!2$(/_8C7@IU*PL!%DB Y5,U59LS4Y?2\CO11X768FZZ)-AZG;]IP!#!W0*  9^:GY"0!<7d
M68FZZ)-A"H67MN4'X070O8LP!N"H@/0C0(4U@"PP AM@@*1XKE-#P**Q0AF@ ^La
MAATC0)L4^_7WDT@0A(< R/8!'3V?1".HB%N)@2*GZ=MZ2[x
M%P"SQ_\!L(@9Q8v
M$P+)GY' R/Q70Z' & +/WR# R/S4[\X]SQ?SH)__PBQ* $QF  JOA0)XH?JNu
M4*(8D)O6[WHH4%4W= 1$^E5>CRYC: 8HG(]T$5:+L59M]5KDD0&;QP0318UVt
M=0@5GTREA@%JDJO3>?U.;P;ND/2Y"SI"09_1(!09  ;8r
MPRPEB@&YZ7I@8 &EA@$ 8@%"H9Z#  U#<,33>?U.;P;FD/1F6"$1]UH6 *"#q
M  U#$ U"D0%]&_8"#?JU;0:NE= 6VEP$L/A8*I#-10 2#885O9E84X)S7_=Yp
MBS4S0P@/+JYC"K& "[_!+;#0 GE1GN#PA8n
M"Q\"Z?WU0K4#%JC])ZJ-#FMP-QAZ>NL )X ?T5;7X[@!?4WU5"m
MD3Y"H>74P7YE13G^L '50J( >@BNAP3'\ @6(0"OQ0$ :@A38 2<< 2OA0)Xl
MP35%@-]%@ )4  (6JGT,8 9WR"PH@!>1VCRYC2/6;QP03]5K:@P$  DQ+0A[FZ0K:HYZ   U+0AX9\(>1(!09d
M0(UV5;AV=8S  3B* +DPPE* $Q8"Q1(!08  :-QRPH@!=<4\D$@ )44/%Va
M-(6$6'[H,H9F@,+BQP03]5K:@P$  @U+0A[FZ0K:HYZ  $Q+0AX9\(?1(!09z
M0(UV5;AV=R#Q_-10 EF!]\H]%\TUP$P-$@H"*^q
M'SD:P[G[+03 ).@FI9_4<[+ *]ET4;+Q 0@6 *"#p
M  U#T%8&) \((@\I@A]5$ 2?X4"#^@ TU"02V.!!K-71 IP!/&&\BB@ ]\'3QLT%+@A]MP !_n
M")T[X /C=30PT#&5XERQ7Y#!W0*\(2AD2%U1[_H(F#1!9/(AP*'AQOVT!D\H 3>UO*Al
MA9V+H89UMKF=L05,   @MXN3GR$*K:6]TA],JR(R1F-9GYK-EB&&BAK#T1D\k
MH 3GKFO,9  40@BNV&-NVQE;P 0  ')VV)H9@D*- P:!IIW3YP%D <\'L06Jj
MD!DOH6N\9@"Q^6L:#@8F,)L&"0<2R9ODRQ=;H J9\1*ZQFL&P&45#P(J@AWPi
MD?.H8(T>C\WV4!H'X/7H(F#1Q>7(AP)FB1OVT!D\H 2]T42ZQFL%  9B0!9Ah
M+@5[=E'#@4*-$YMVM)W73\N5[ *S.13/ @f
MCRX"%EU92L&<7-1PHU#BQ:4?;e
M>?VT7,DN,)M#\2QP !.&P R\R0!&  !.C@$,8 0 (.420*S M!QA  W+$02Sd
M.101  AP   5#P(J@AWPD?.X8(VPD7_XT%#^;_G,H@1EBK5P 0.#KLCB' "Xc
M (86JGUF>A!X@(>61Z=OZ@K29P%LD&/,L@-QI_8931=^:G[ %'?RL0+;80!@b
M$,#,L@-X0?VE3_=OZ@K A!>@!@PKL!WP/Q#+Q2PFH(\%JCRYCN/XFL 98 P/9J@!2y
M  3R$0T'BP]4_%K:9Z8JH *+\%H[@!?4CXPI]%HV0!>@-@S - @KL!WP_X'Ex
MARYC.)+"GZU>CRYC.)*%!10%-^AN-"RWLZ10R9H58\$$KDRQ$ *-P!_X111/YP/DRQSUW3WDS]CL1AK=3^J@+?U"[S 1&A%"TR$1@6'QG8]-U'>X00]s
M]W-<\F_\CS70X@2<(BU*X 4J\"D6E ",10*J&FZ6D!G0@@/0 !H *? @9\1SDX( 5XA .SB1]HC3 ' 2TX )T[  1Mo
MP VHVW2\O#[3\X0?BC7]]_"3 0@R%7$40C@B*@$?IXLB%\ZG=!"$=1V#*P:En
MM@'E8O4 $ 0_4Z]",>T#]@_O(#2C&^@]SQ="@&Q@8 &E-NT#9MQ69O4 , 29m
M5:]",>T<5M_VSQ=*H ^] 3?L!S=RA?V:T!E$0 B=40124'%V6S>=T3^A> 0(l
MD!G),@6D $S?XPU_MQA%@,Y\T02J@+?U"[S M/W8B(R HSW3CFK3I;(3Y:-R7,FMi
M/U$EJIZ'@ 3'\ @6(0!H[J-[: "N]XM8DW<-V+FC+UMCR)5HKJ<42OE.N@%Hh
M3MS-\:0!,'O\/P#("#@^2J& 4Z(8D)OX?02_5HAHKGT,H.P!Q"G2H@0<^RD g
MT-P = "<(BU*P+&?(@!0\ _W$#:!?! _X >]0<$:,)L&J1YR2;Y\\0.6D!E2f
M8 3$JIWXT09S CC:PP%&A"2L A=*P+%P,", ,HF<"SC:TP%&A"2L A=*P+%Pe
M,", (M&B P:1YO%"/P#("#@^2J& 4Z(8D)L4(@L!Q"G2H@0<^RD T-P = "1:(B6+UMC> 8?0:L:,)L&J1YR2;Y\\0.6c
MD!E28 3$JIWXT0;>\&N=3Q<<8$1(PBIPH00<"P8!:@$ .@C2, 1V% 0C\P\T$&D>+_0#4/H3a
M@Q>J[PK:@P$ 8HO6HPWC*@7SI0V_5HBOI7T,8 ;JX%A30 H4K ,^8 !28 2Sz
M69LP  (!08D)L40@H!Q"G2H@0<^RDP  $]UD"&T/N_w
M[PIF<)$,  L;P0#4E2Q30 HRL!@[  13$ 2<9'AA$\@'\0-^T!L4K %!P X&v
MJ1YR2;Y\\0.6D!E28 3$"@M5I0!M\*6] P8!Q"G2H@0<^RD"  7&'4"<(BU*u
MP+&? @#-'0 H0 45+P%"@0$!:@%"H9Z#( U#8$=!,#+_H 38#TXT@%<>+_0#t
MD#65O.L!Q"G2H@0<^RD T-P = "<(BU*P+&?(@!0\ _[$$"<(BU*P+&?$@-Ps
M,15#$T"<(BU*P+&?$@-XM%[VR"G2H@1B8"8%J0 93JLOG=;J(05&0*S0N0- r
MT ;N4/'C5+\\,#+_  ?J?S^J@+?URP91!Q=VZU@;$&M\@3^1YO%"_U<:#KP!q
MQ"G2H@1>H *?DEBP6&4RT'\.,"F P$SQ&4"<(BU*( 8\ Q9S#!,JH/(5/T[Up
MRP-M@ K6B,M]-0#CN1A30 J>\'1 @ 3'\ @EL0."= 3>\'2EO1A30 K = 12o
M  2V^,+>8(M =U^+L0'> (J+403HS!<_X =X:WX^R@ 4K &S:9#J(9?DRQ<_n
M8 F9(05&0*S:B1]M\*6] P:.)0+WM1A%H V<(BU*P+&?4I *H+$D$&D>C\WXm
M4'?";[HO4I P@@AI!\.4) P@@@J]2(_0!><^W1\X+M+\@- 2&AZX:K_l
MLB0P  &W10!"0P TLX8&I \O @,0<%L5Y/8TLX8&A$!__3<>%,!+,F("\"+2k
M5ZP6O"0CAHQ+(GT/#@"Z$#;>V 2JH&]__3<'U,ZQ( .+L0.3MR0%V=3!g
M( V(T/N!0$4O(@!0T!P1ARE=9?&+L0.3MR0%V=3 0-$=CJN*B@8D.+R.A!][*J/( 5X9 ,8T V]?[7+J"*Pc
ML @-2&C$ DQ\B '=T/N+8 ;X(!:$=CJN^B]+(@!0T!SVQP..[ _^4!HPB.8%^SCBUPa
MH00<^RDQ0)P3%3;]?! _X >1Z&6^'SEM8D( T -A31W%;@ FA#"D9$)W\P,$z
M$&Z6D!EHC@(!]E527V<-2A8J$&Z6D!FH]P,$$&Z6D!E]E"9P$0,ZT!K^X ]$y
M#1"B#Q,UWJ\ ,$$&Z6D!D_v
M0 #A9@F9H:KA9@F9806-9[I!P XD0]=IPT)S?$^6D!E28 2>"B#Q,UWJH*KAu
M9@F9\0,$$&Z6D!D_0 #A9@F9805&$ 3L %9J?A!G( :J&FZ6D!E28 1&%P.Yt
M;UAW%L@'\0.6D!E28 2>"B#Q,UWJ<"J Q0Y@1==IPT)S?$^6D!E28 2>"B#Qs
M,UWJH*KA9@F9(06T>F<$$&Z6D!E28 3$"IT[  1MH YX!9Y"CS6Z+]V&B_WTr
M@+I-![#0&0)"X$Y_")TA8 -G( (]-U'>(00]]W-<8@/$-E&$1@:'=N@  0/$q
M-E&$1@9>G-1Q8N6?/R%G?N0 $& '#R>Y  !HH@K+HQ\\ !P D8?A#CY.( &@p
M\@@A1X^ 0HY\Q*!C (8B!)A1<+(A&I5@E AQ8Q",!(P 0-3+_X3=T4ET=8K@,PL_WP$WX6PZNVk
M,EUB%!8DG4LT GKHZ)6F&:(& P,6'P!$G"&+?P"0<08 _\!!H!EG($/@&P?^j
M8P>!(# $H 80:"#+3$$$PR(3#432(Ii
M)M(,_+P80%M,? -"2G 1-%== /A4GU[W'76:#2#")AL")")A(HHJ6#"Z\A</BDF"' Bf
M0 0@+:297$9L4DJ:"Z&^<,";D\GIZF'I$./"!Q8I<4B>>TXV:W??@?K:"P"0e
MR<"@Q-)*S%D?0/,?#)*V29JEF'Z#Y5M:%L1/H(,&DB,9:!K$+:'?'AHN/[SMd
M:="?%V7D@K0K+?4//]WFJ("SQ4:K:KQ,T4LN  H]U2 O.? "F: 8$C%>,." "\"U"W"E1;30$(+80.2T0!Y&Z& ;@%w
MTOT&*E1A0@-FH).TIEL"!4*O"APVA1 6T=\K H+5 ;t
M >;5&B8J@@2+.($20E<"GN3(<48 @P/(I( @J&,R$0#$9:1@!!@8 !9@:H,Zs
M4AB"*3(@A3$ T]J(R! C@B*%/N"=H[)V+S#!0FT(>(-$1 (#/D(#3)+BH0^!r
M^+*RT?&& 3 #"'I&@""L8S+00$3+)@D GWD1DXA  1# (  ,=$,&![!DK((Aq
M#42 H &P"(09W#&N; "#E*:4 1]5>2Q6NA*6LDR,$D'PQ$F 8 IMI*(25;> p
MUED$##@@P1("%0TU *R0 ./EH#(I2A PP :A0L(P1#*(EI$R R5 I39]^9H0?;^@0_5***)^  ![Q  BT64n
M#:')E!%/$LJ[L3D4!A!U(Z@(^CV&;/ ,;YPH#/0(BR.\@6TBU>,A7Q.#-*&4m
MH IU6T/-0(*,N@VA(ZU;24^*4]Y98*4(:&G=$-H"*!!4":X@Z(K^(0\2R @E+G0A5^M".@51EBO*PJL*L-E,@#C<@%(S+!K!Y\8UK7g
MRK807G6$)1QB$1GB A[PD1-',..@8/&D-Q" !:'JF!EX,-:N7) DA\&"*5+Df
MF2]-Y@PRRTAZ ; %501&1?J5B&K$L<'7J,89%"0K27"C36#<%0BO1((QH&$(e
M45J8 6>  1@X  '"10IE7>GPAQVY7P!@0@J-:"\7AR>-JUG90 )I@ "FMR7A!"(F1(L.Y,7--/!a
M#*AA'7&HA"HC0!*6#?3D@N : "@#FUU\\HL/6TF]*E8 4Y;!F+NHU\<.-LN2z
include ANA_M2_5.uab