[comp.binaries.atari.st] v01i096: stdcat -- Disk Catalogging System part01/04

koreth@ssyx.UUCP (06/03/88)

Submitted-by: uunet!resrch.molienergy.bc.ca!moliman!Robert.J.Silliker (Robert J. Silliker)
Posting-number: Volume 1, Issue 96
Archive-name: stdcat/part01

STDCAT is a simple disk catalog program that uses a gem interface.
It will work on either mono or color systems (Med Rez color).
Part 1 of 4.

table
 !"#$%&'()*+,-./0123456789:;<=>?
@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_
begin 644 stdcat30.arc
M&@A35$1#050N1$]#    @ \  (@0KYBSTIL@   ,(" 1>*&B!20A*EXT4!!Pz
MH(H$D!(D7-B0($0"4Z@0&1*$2@(K,US N#B1H4"+ @,6$),'8H&2%1\*%/)&y
M#(@I:=BP2;.FC!R2"DTZA"@Q:,R+0>#(R0D"! X6(&+DP($#*,63,HM>=6@0x
M8="%6Y.XH2/G#9DZ8^BD>>-FJT$&8!4DR+BQ(X@T<T"$ 3$G31LX;,J ((-Ww
M#8@Q8>B$8?/F# BEC>6$:>.B*14T@MU,%GPG3%XR/M/8*4-F80(S9=N J"$#v
M1D80*#*FT.N&# @BA4%PI+*X,>RZ5%)4!I&$#H@[.=D<?R/',%O39=+0P2P'u
M1!NV;T P/_R&<?4Y>>;0*=,F+XHFI$%(*:.'NW?A<1-<%@SYC&35:#R#H',Gt
M._+:;]PQQW!/N,%9&@#><5=>=<R1'AW9C<&68@B:MM=.XFEGQGZ8#9:;'=W5s
MT489>2'(H6"(*<;8&</-I]UT/AV'(!D!FH8A'7G!R-U898R5UQL;ZCA&'7+(r
MT:-QA,VQ1HL=-A@C7GKI%"!IID$(@AAE"2C8=&75<08:($0'8W7_T:A@@P@Zq
M)B9U)_*U$VC5B1&&''.8MMV<60X8WWQ&ZM7GB&[4H1T<:K&58W9S,&><CDD:p
M)B&/8\F8X)5YF*;9B%"1D5@94/6EAV#;T9$''(*%4=N@A;IQ* AFS,AJ3B2"o
M@*8;9YB&'!NV(28'&7- %089MIEJ6QUP:#J>ATKVJA>P>G'7!J"+9K=7HQ:Rn
M8>2O>=SE1ILI]G:&KZ>VJIE.V8Z1'ZU;=@@B&R)FMIF=&TY;F M[-NE@=8AMm
MJQ2"QKU1QZ(=/CJ>CQIRFYBWVFT+HVEPS+E88,KMRV-U<"C*)'U+C>6O<?E>l
M*5BB<HQG&TN6;I;IIIVF\:EVU8E*ZL4.\J4HJFNIZN?'930LV7BFH?:&:HSBk
M!5@8V8+<+Z$U#V@9=:7V^0;2ANZ7'8)CL N:A?N%(49@!0M\I'D2BZP7P(+Uj
M:!N0;8:]<0HL5-FAL9S29IN.GI9QL:SW'F8J7V4$EA9MY?XL!H*)U4RO J;Qi
MV;1@;> U1M]LF.IO7H *^G2JA^H @I$.DBVIF0R_T1?F<O.E,HF=EF%<$/]Fh
MYT09=T (1Z9"1U[NP2N:)E[AXJ4QAK+"(CMTMG3M!L).C2M&>O"=N\><GHA'g
MWQ!Z@=)LJ%N0P"4]) @8 :MU/=9Q%0(&)1!?0Z_?8=I<BH7<K($*=KOBW:"9f
M$48=;!AWJ6!FA!HP[HU9WZV4(P;!%*\C+C >6[A%)"-%B@Q+&<W= M6& E8'e
M2.MK5%X&Z#&^10L$,!A.%OREMVTY<#,&4U%CVB:7!-P!,]O* PGG$(;1W.6#d
MC8+*K!RCHRG44#!!H%SXK.>&PYFF(4\@55M:F,0>T29,>,"+6FBE-Q6R:&D?c
M4TQMYF2;5G'-07Z#D!PRF :$02E)PTM/\'3D)'SMS5RF.D.ZZ),8-*QO.UXLb
ME7$&.)PD;.@)2U@0W\+X(!@^,3'C^0L=!)B<#K;A5UO*SM.<*"0 7I$X0?J?a
M%=<')0D5B5AB@Y'"[!4C#A;P,:DAU(/>L+XA/,$)5$B"$ZI0!);I)@A.&$(1z
MF-"F26YKDCLS7%/\V*8VK@^,94A+7EP)2UG2\D2C%$P;9:03OG$F/WOTS/KZy
M5X=3F:B25F12)_V%JPY*Z"^!.=89YB0G.1HQ>D<4B ]'L[YYSK&*"+-2H^XFx
M/]^8\F,_+$T+=\C (AT)GRL"P?Y*QT$C/=)$OCR<^>32$'N"( A3J.</4YC/w
M[#0*;VEZ'^P0ZIO]568^ZYOF/U'Y,U5V\4X*'6D_';/0X+'E<>L[DD_2T[$Iv
M!,$*M=P.1W*YRS99-(B#\DGAV/+.!#1D"(QQ4"NC>L^9]G%#UR%,JU*4-!#Du
MQX8%=.(CK]9"*X$SGX9D8]Y6"AE%KE('Q]QH ?O7IS)$<8K?.@Q5932=C?&Et
MAB'=3KX>QX;U"6FOP%QJ$9M2H,?I572"&2<Z53?'E.8-2G(:@V',VJ'='>N%s
M.VW63 7IAC<<K4=-;4@4ZB"=]17AKC?1B/&"9R0Z$$EA_L%F&4;S'<Q4$T$@r
MZHEMI"/1!! SJVG8JF+S\E7!A'5;8XTD1Q,JRA-9MI2-/&5;72HUS=$0K&6@q
M:]GNFB:HV+6U+41.7__U5SL$UHUN(&R;XL#:TP:3J7$)" *LD ;8C<\@!#B?p
M/&?&$A XX5T4';#["DR$3<43(P0FWND>/(4(@X *HRK#^H)03;3!*&:5(V)>o
MC,:M"7VM8$%3TOJ\%JDR!6@X5S"DT4+*8)3=Y'2VQ#"IM@FK'&'S9J9K7.2Jn
M0U<.)69L9$F#&/YUH&J>TFA4:F&!:WHJEY4J+WN90QW$T +[^ L.[]0O;E1Lm
M$O()1, $\%YMUJ?F8+V*:WCL#IRT-=W&W&V:^;HN"%1@RQ_H98,Y(8.N>"6Ul
M5YUJ+WF\&Y\'N+Y'TL%<@.,;?7OD6+3!43)I\0F6J]PA/W/0T>9:GZG*E1],k
MCZ<Z)LIRFKA6L=$)\\*DA&_"V%"I%LZ!5&-(;K;8(A@^+W!-,>H+:%#<(1&Xj
MP-CQ24 1CN""!$A$:V-P@0ILTP)J*J<_S3&-0%00!A5$>]H@J#8'G? $*BPGi
MV]%SJD"" *P-,TM>2BJTCLQ&;!19<H(CI59ZLRN8,XB&DATR$!Z0E!L*6O!Nh
M];F/M==WK>%&$UEKR,NZVJ50% ;OG("A[(X&AB-.:FQSD[DJ"&0H*#ET4SOLg
M19O"JPO!I\EL1*(>P^/F ++^_J@Z3K(._M22<9*> 7H/KD*Q'-Q"H</MB>?Mf
M'14_^DU->@OA9;'/9%:,&<WZ6# 3'U'%M;[ %&\V.SK*NKM@WD(/!ZR!!]WGe
M,#,Y]EC-*3.F;1,-R>YLM3XI+]L-979XJVLC&T<Z@@2DU%(Z]&-YG<YGG5]<d
M%@_/!!-@"#^#EKO=?$YH%1K>AFFZO<.Y-"A!:3&)NN[<(G0N.2(]BDIW3.6/c
M=+$^O7W6M7;V#&)PF%*'(=-T8A5,5S^6U K$"B&B>P*&4/I[BGWKH(H7Q.^\b
M5G[_6;B&S<[0''MX$T'PWR X01!.4+KJRAD$Q]\?(YV,]="T*CUS90Z*2A]2a
M'9F4\?J%0L8666:#% #-\N?78(CN[!@[,6SMYW0)1356<T]'MT9^<67KHS/]z
MPG:HQ"\;XWL$D'^14C?KXW_Z,G\!N'EF%%\%*'<XAC:(]CW:U$(,6&\/J#'_y
M(H$4R#$FYB,7:$@ 2$6)YQL$6 ?#MA>*L37)MW%?4UR7 24WDA=E<'M@\E%Kx
MU"$-8WH&%R.'EV=2QC_^<BKXE6X-,6:& 04Q @5A($?K$X0E@F4I:!QSH%Z0w
M-AU'QD&(D7-L06L)(Q@?!2'KHUWSEQX+M!=+:#>=EQ<=TQGB(1B,@2,%TS"Dv
M@FIF8%A, V2E91R/Y ;9DD<WIWNXHFD)TRS[A&85MF#9<F!T5U$6UF \XWB9u
M:!P%AA.?0F$6IF,:UD(<IAQF1R*,,T27TU4D)B0O*(@B"'$")(-U2 8P)F.*t
M0F/9 HIQ8XJ@4AVJR&.!X6-']GI](61SHGLM\V.(M!1+]EG.!V4"Y6Q39G%5s
MEF%_UBQ:QF5>1BPL.'\^MSXM6&>7% 0>8D:?43M$HT:<)DWWLF)[@TQ_HR.2r
M@2X%HT&%1H?\DAXH4#_WDS^<A&75I$'"@45X$R,=(QXNIR-JPUZ)(6J.N!\)q
M*'(468>HEA>+N",&DFESPXO\DB;C1T"E(@:*HD9F<&KBB 8SHQ8C$H')YB)Ap
M$R-MT"!D2"P5$S)PE6Z0,  P@ <P0 0)4&U#@"=I8'KK85MRL$00091&&01)o
M"0),@"#\4P91-I5%"0-#<)5&P!RJ809<*5#:-@ X  /N(2*JDI8V8 /'HY5Sn
MD  H8 ,T,)<&@F5]XB1DD +PQSU-X#C_=696*!!$$%X':1Q7,",!4B<M- 6Jm
MTR8NIB!ULVFVT6K2T569]76#H9@[=TRJ@U= =Y@$P#I6DCZR\X5HX'EBF%4?l
M8X9@@H9[9$CFDDS"96UZT3J.YCL/$WL)4(;2<88=(CN?$R"R4AM.V"'7X23Bk
M-&(_E!<^TP;K\U7M%R$[H5F5J".5&9 9XQB QUF1! >[*%9OX%Y4-)UO>)P*j
M(IXO0AT2N)16=!/* YG.-F;#<W4*)2(6](^%H2SNQY\Q@C8L,1X,XB!DP$)Ui
M%W ">D$;4J"QTDU^"14!6D$#NB&0V'V8L3Y-Z*"2""<E\G!6A8FR91=9F3SVh
MF0#X:3LC]C,]J"/((QW+53#B(6B)\4Y;<00]HE2%)10&<0#Q@8$C1T*M0B?&g
M87(/EW"3<4ATD$B$(DC156B^9%UR89 [YW/9=T!4D$ =<0(B!WCY$I*GQ$WUf
M&$VF,4T[F2' AG,QHR,A=B1+$2LBD#XB8$LBT$1N4*=6LJ:F,0;7<BQ[ 3]8e
MNAU3NC=)AU<^QY%O YH(*1=Y)$AC$EE_]R-*1!I0T7#: BZV@4:V0QI-106(d
MTC?)9!Q[,20&]4"Y436^XQP/MU":!W'L:1HHT""_N9T=$A@OB8)SX*=<Z08-c
M"6LH<HL_XH"FZD#TEP!,IY"=$1["TZD.UR8?Q6)[Y)@*,JM:]IMV\G!+\24-b
M*'>\VB._ZB)O.A9QFA<B8'2;(@)0(0+ QRXC(@(6<BHB 'G/<B1UVH;9@FV&a
MH5ZS>7:G2G!*\JFA6E7"6C#R8B1IP1S90IN"Q*GS^*Q>UZ>WR)YZM:JV"H=Iz
M@+!BE ?/>1Q$,Z2"TC&@\3CU:!J$H;$*ZU7])1ER8"Z[IGQJ!P)5T*8!0U47y
M]'#1>HNV0JV%5ENW)6]*:"3N-3G'LUM]TU3N*"YG4XB*I9MPY(]"@G:H&F_Nx
MB81K5J49.ZHIJR./ZH?'XQG&0:8.UT>DVJ3D 0>KPA@I4EF.2H+Z:9S201Z(w
M]S:I.K&5B:-"<05SX@9I ID-81 (4"]0HJ3XH1]BVJO[02)BTXS5Q*_[T1^#v
M$4$?$QZ)!#W&91SYH2PR>0=&*P=0\5R)^X?/NA<*ET.5J&JTPC771T]R 1Y_u
MJ!HVM2U[46J;.B]-,;-2.(ER@ 5#>1<;0G*/$3FX!46/$V7ZI2,TP);]H[MSt
MF3RGNWSY-1->XK<" 6#QH:4@ !(B05IQMP:E=0?#VUR1MF0_!QNT>0(;]&-)s
M\%=I$"PL^2]N XA@"WZ:5C._.@4RB3^V ;Q)(B&\%6D9YQF .)E:Y[TO%A\Sr
M41,WIA,\X1/:1@ Q, ,PD ,W$!4P< /3<5&L>Q%3@';9(@0)I* "L92:H2G9q
M.P/F)@-'( -I^<!0(),&HCEW"0,TD (M4 ,X0 ,M, -QB0,+ 1H(4U1$0T%4p
M+E!21P   )J>  "'$,ZRH=7]\P  #& T  "PBMM 'EP&TM & )*#)?D:$MC$o
M;V   $I: 2!A1L23B #0<7J18V Y(#]X $#B) B7)TH K?'G L@WD"?!V #1n
M @ #:!HI  7  5HNDT , +((0 0 :8V$\?H':0#-("\ O&@@Y$Q*C"V_5:S*m
M8$0S  $N\ .1!ZW:%R@ L$""!@ @)T<!$* %Y1')@?7H_ 7 3M&/D@#6L<,[l
MT XCQ@#J0&-<U1:51U\!0,ZCP(F5?^@@$[!U!L  <CWXH/W'[FN P>UT0#[$k
MC0MFE0$@L\!W&4G;  :<^49K01H2-__4#0<0S\KP !IH/-<@HVO7X__@'4;;j
M <+V !T<?._ 8+R"KML!M,.1OIV-]C3:5_=:$KHOUU\%P% I 5!;YD+\H%E>i
MA7CPQ#L \- #$/^XXQIDBQAQ&0PN- B,:@2<@05VRB'787+8H?/5>6= I@@=h
M!P)  86@P?*;!@J8P<)W&E  &0AR7&8&!]:=T>.(--J8UR("I,@ B^Y<"  "g
M&G+HI(<ACMB5B2@BN&*%Z+B(5HTRTMA97CCJR*./9**GD@)>0E@D@D=6F*1Jf
M$)0F  DLP@,&6L;\4"$^D"7 PF4+LH9?A?; )EM>B&#1UYT!R-/CCV?J^8\]e
M:AK)*#7[J1@,2.Q((J"D_$"&!Q18/!(H/YD6L"E:&P#P:87^B$JJJ0SZ@QT^d
MDE*:EP/,V,8H(K?F"AFOOJ)%A[!Y<6#'98R2P:(]6D)'@1GB[0E9!U(PB\&Sc
MT<)H1GG6YM6!/LRBY0*W+TY;[3]\YN6!*-JBNV6,X+(+V0>*E L /L$2"AD%b
M%!0+ #GR0A?C0&PH\5\\0+PQ$!A3+ S$E'FU8<%ED)% 3%:0I<%'J3,  Q@>a
M,"#&\#A ! $2/>[, $]# P"G3IIY14!';_^QDV=],$*V@3:^,@"9"Y  8 8!z
M0B#'SIT < $&%F!8 8MJ"I3FCPU3JUC:/U)D78'54&1MP=92JW:!U;YDC8'5y
M_&2M =I9;V"U$5ES8+4B67=@-09.@$2 !$@J*< 9XM47'&11Y/L(Q0-%.&&%x
M[)@! #]4=&7H;+4] AD"@&2JF1=.U!&Z9_^(,0,___PS$#N8G)[ZEA2XKKK!w
M0BQ,1.T#Q8,$[LQ-O+ /IZ.UI3*XV\=[/$(<ST3Q!A#_7SUX,*].\1=0<[P2v
MP7> E@'4! _#]M(4;P$TO-<CA\H#%30",ML3L]PJZ#QG@#:0!4)!7[(/9(\Pu
MO,O#BQ!'@<YD\D((/80L=T[ CJV0L\!_-#!6>3F$'5($@0,2!A.I68T_P' Et
M!Z(L".X 30QX(3P 2(&!#' # !3@P#:@1C4"F%0&!\"N#,:0']BQPW)8%R+(s
M,(($1L(/8E@'F3E0H%1?(0!D[ "!RQP0.-!0 A#,8('WS0PWD"D$/XHE "A r
MQ@T(@,P"[($=,:2'B'EQ! 9L,X,0PF%[R&CC/U08  LX0XYT8!4 Y"B'U4F"q
M 6T1P/:@808%!&\ VV,&&! 0/$$"AQG/R0 "(FF 2!(@D@)((N, <*(44:!'p
ML\$%$G%S1DQ YA&"*-5R6*&&^J&@5*LBC*=6\IL,"& Y[9!!2@+P#\A(@ Q&o
M6B4M7 E+3LT2D\_I )IXP$M? I--0CC%+@<TD$/@PC;M80]BW ,?^>RREWE1n
M! =29$B126L\WJE/>,93'G4NLYGA'">"RCFO58HC2) I 25L QD&R.)!>6D!m
M+RZ#SO$4CCOMY Z:>/:E@2C"&.3,9GO>L\WX;%.7/!.20R$Z3US*X#D<$ !Dl
M.""#OB13 <NQ!RM&6M+;   &D)F )PBJD@[$E -.1)WJ"(,(_*B$!9=#% #Zk
M$LU=YB:"UWQ$I@( !@)XS@F@$YT5!@+(UTGK#!S 9S@!0-",F@@+EZGJ[&"$j
M59HYE*N88>A7PYJ'UUWP#+N3)C.I"0!K8G.(IAP2-"Y35&8>M9I)10]>BWC$i
MM*XNKXTCE^8(* :HCFZJ+W7!DNXD $N4\HM@*)< 3 $9)NB"LIR 3!/005E)h
M0 8*** L(B"#!&]0U@^0J8('*$L'R/P #Y15PR9WHUDN;%*@FG7"T(I&62(\g
M!P-T?0$[2D59&4!F!N2@+ K,A!;(H( :S 6  "PP7*,AP'.450!E]6.RKO!Hf
M8<GSBDIP$-2!(&*HCP"#!X+'@-P%B)3K;2\ WKLHM/ BI:PP*P"(]0B09M*Ke
MN^K5XLI$)B AN'%K\@FC:IL7-5"#46K0TY)N6JX :$'#8<R+3#NLA)(!1@Y8d
M+9\<J+L"_?(WOO/5Z8E]"H 6;_-0[H4OHYQ:G_&E^#?CHZX*7*SC&%MU?#0>c
M\HTA\V*F^<+$::'&C]UB/?4"P 5$7I219U<]&F-YR4+M+P#P )DRN'8@;C Qb
M3Z?,4^H"%<PYUG+^>$KC-P\D-DS6\4!22P(PB*!HJEE UF P!J>J) ;0  ((a
M5 , 5KA#!(SVDS1>IIEH+-6Q4AW("$ R#0?<60>;'L@T!,(<*(0: -,P0>YPz
M<>II>, M[FBU4]*BC59+-@ '($"K9; Z"+3:!JMS1*M]X!9ZM%H(6])%JXW@y
M%GRT6@E;XD>K=3"0=<"CU4[8'CM:+87M6:/54X4."UJM!;=\F].2(PPE,.V9x
M@2Q''N[[CSR$\6Y@O/L^V]3FG2EZ9XO>69?,_ = !Y((1Z2( YGB0"P[9<%Yw
MXQ('N+0!+J7SGURF!]X7%\;%@7'Q^P1\DP4_N$>_"1D-J,(V:LXE-"IN QD,v
M41)(",8@*B( : 3AB<K<(21SIHP=(F.'.^-..KES4/ D%#SO%#@6\Q)R!'%@u
M.:V0 C$?L7!)6) =/?]-=Y+I@&0RX*1G9,89E7%&9)PQ3Q\O$=,-[G2P![SDt
M)R^PO.,]$(?+V][RQO>=]:T>?JO'W^H!."\'#H"F$T7G.\SZZGZ>LZ"#9^C@s
M*3IYS/--PAL^JP\&@,VZ.B_(;%YS424=/BBTI&Y-"RU 4"!V<(@<?=P*!"I$r
M4UP, /L5_B N!*B][+6K^Q]X)^"69_OA_].*N^0E$*^DNC%?]8]0Y64#OBC5q
MJ71/%P#0/O;5SSWVZR* %T@63; "E:3T(2E<I1TRE_>^[=^>%Y/;1OW+!$ !p
MM#J0$O##I!4'N/SI#P 3T #_=>=Q>L%__D=4"\,$_/=Y:F8/P% T+X(" K))o
MHX)$KF(R2N ST?<(%A0/2L H)299"- M!Q, /*!ZR,%Z_^!ZR($/O3=[+:@7n
M+R@ O?=[@[=T!"=\3T=\RC!U5<=\SC<0T"=]#+(6VV=]U%<7VK="U==]WR<Im
M_B!^%4)^>_)-((>#\$=R[1=W5Z@2\Z=6>6%_ (AT7]&%G9<7!2AWJX-V ^B%l
M W&&S$-V;*AY-Z-4B $]#K@E)A"!:C<0$X@9%;@]ZH"!(&-.!A"(>;$#]  9k
M/8 "[ 99I!>"Z9)N:J!F\(8$P! ($1$ K3(%0/!$&H "E$AOEVA,%M0.,$ Cj
M$(@8#,A_($ ,=Y4[2H"*Z;&*F1<"-B!F=/"((IAN9J!F[ !)HZA'G.B))N"+i
M/1>,LE2*+D C>5B'>"!@K?B*,L.,Z0$] F:+?=&([*)^#@!_+-475PB"<&<;h
M)MA\V*&"[/*"UV=[N!>#,PABP7=P&B8!H"*(M-)\1VB$19B$*,5]X>A 4)B"g
MY0=B57APC3@0;;0DVU-E7^$!6;9@7]$!#TE=(#"15O8!#SDH2Y*1-@@ %H,Qf
MH0=9"8D X$-=,6"17P$#**D2,["2 " #'(D6(/:0V@@/?741H42.*_@5"P!Be
MD'&&3",'M^*->6$'G- 79Q"+XI@7%6 *EW$&7[>"D%$!6% JNAB)46DO>6$!d
MH&"5(+B+6=DN Y$! *!*.ZD2X+)A9OA_2E4A_' &!L B_F &A'"3?U57285)c
M4UF5H/=8[G8./J$"*H0 **!"#( #U8 #[:!=,% !T- &>L&).  ,,- 3-0>9b
M!B"9@, $W_ ]VH@-M8< MZ>/2S*:22B:<2&#@^E[4,<OR($-D $(ID!!V($-a
MA*=%_!22[(($@$D @KDD/5 %-029,:0/C?F8D0D$IU*9VH6<F:F<M1(LI#18z
M:40-?<&9(/ YC[6;#%2.#<0/#G985.))NGB"Z<8&5PD[WX(^ " /OM "2, Ny
M\I6>!K.>G&(,\"F?<<D#J0,&. ![[ (#$ "@^  -2!@M&6  ;. !! H#J4F@x
M!FI]"(H ;+"?#V-HJ5.3O!F8L5>8 " !V $/6_$OVF!2*_@"0I,7%%"B?B%9w
M%L"-(0J/U#D0CB '%,29GJF;WL";#P  0N *K*$P^@,,9^ %]X8=WO"-I@)#v
M_T .V,$.2/JD2+I)%L $*0(X]=$J4@ $T8 <X""ER+&C2C.E>P@ 57JE8/!Tu
M2J-^D[2F($BE5HH@$L #B"$/P.!RPA@$W! $/E"G I@ EY47C\ +HP0 3[ <t
MK@ !RU$/H947(T -$;5-IV@ /W  D"$">& ;@B6>@DJHCR"D ," 1\,H7 !Es
M6@H$W( 2JDB9%KAR6P*!=!6$CX #/EHAYJ #%L@TQ@ #!6")Y0 (Z(-K,@ "r
M<$"2(! 7(M "#((.,6$&" !"_V .^8D.W@<:O.JKP)J)!S"LQ:H5<6$!UPH,q
MOQJLVTJL) D7'QJNXZJM, D#),FK6RH@B*H%(-50=C&;"*(!7W&HO\$!*/4\p
MC:IID#I/[3&IE7JIF:I4!: ES$$$A?0#!0 94^ /ER$%1< -O]$JO H+1 "9o
M_V #F+ P)48 W8(";( $G)"Q+V4 KOI(H1D#0,"8/(,"14,$JZ*) /"R,5M)n
M;KHD3\JF<'JEG D \*"-7WH.!^"C0!H:>:$Q6?$=A9@QA& ;RMI\,5&D0(<=m
MX*"D-A2M(:*U7^NE02NGIFI"7(H<XA"V__"ER!$_8ENF9RJG:1HB;$JW;PJWl
M<?JA=+IX>(JS4Z"G?#I$:@BH,PH @UJH_#H0KJ!#  L9CQJI=[:,E&JI>8&Ik
MFDH?G#H0A_NI0,H/HSH0DE"V6YJJ0E $8* "/S"YU?J# ! "I- 7 +H6<>$!j
M5<L/S2H 8" !%HNQ>K2Q+V(";< ,%NN[>,@&0@ #+/L;!L ,.BNS>%@T17"Si
MK=*\/ L:==NV0(NW0OL- +"UNNF:#K1ZY_AZL3>:Z[A[_#B:JFE[W@&"\>ATh
MY><S:@ H#((K;NDSC$"_S2>7EHB)>B2] -"RRQLH_I"/YYM]^<B$MA=^;CE^g
M WFWZ(>#!QE92Z(D!P"5CW@A[ (%0-!4CSC!C]B_QH0$0"!%9W E/HN,G5)Uf
M'BR.(3D0Y;E"%?J(+;Q"-9E!%) =/; P3O /CH(<]- #@SDINM<#4)".L=<#e
MW)>"18R$^)C$=6$ X8L<VJ$2$+!)A" /V?C".6N8 AJ:,  (M7<D#SJ8,,M[d
M7MR.9ARS24C&I(D 9VP VCAZ7QF)8*!F\< $)RP_VK&4 T%@8)!Z^<?'2BJ=c
M '  /KF6)LHNB?S'"A8\%\$<3, TDUC'\V(&I6HXRK#'+Y*6(>;(OB+("C4=b
M*3H0)+7(YG?(C=Q_;-DO:@G*&E@1%P$<.ZB;^K##L)B""P@,)?L&/!#"=[JJa
MDO" ,9<5(/ :='4']@ "&)FS*F$:U)K,A,#,I5*[3?6C^.B6&_B!*<BP''@&z
M@,>!LKBJ_(>-:-B>>B<M/@,T?2E5*8C+,J/+SM@M)N#+P(RG   ]PXR'Q9RSy
MR P9RLS,QOS, Q#- #W-'U#-0WC-G0L"VDR(ZL B^A MA0C.4#LS/-.,(W.-x
MMWC..B-@/Y.;V\D/N,P<2M!\&<1+_D##: ;/G^A >*P$1<- >B@K@PB+3$,&w
M+HT",+VJ=P@=L"J!LR(@,0T--!VK&;C-3--G("!?60, 9^ (61, 9P +63,Xv
M>*,: W &*P42'T G;NG-2F#1%CC.0UK.'7UO_!?2[4PZ)*T:*@W/A;B_(,@Tu
M;N#2)M#3@#C3 .FC9=J'3U2(.8W7>IW/>/#3&I"'?FW3?@AEA6C4?6V/@:T.t
M2PT&3>T!3QW54UW55WT&66T:7-TW P$";=)\%*T.9 V(U.B,' V A.%X/?-\s
M[#S')W4KA;R"'K5$1_D(9P "-.)OT/%14ID74_"ZCV &^]F?AC80VFB[L?<&r
M/D!Z"@ +AOD&-$!Z7P<, ST0!<TQ>1'0'R #W]?/Q^S= W$'"*W0S;=(+<!Hq
M!=U\C]+;#>PJ5KS*1&(DS2W=U.T3;Z #($#0Z"#> T;>__S=RQS>WR<)ADG@p
MY@T Z$W-CV#-2-.Y\>W0S?<I*@&H?@P ]\TF$[RAOCF8$- 3 8 $@) U$%!(o
MP9.T^<P)BQ0\V=GB, X8GC#C^8P+-EX/RI#CS)#CWI#CX)#C\O 57P>9_PH8n
MH."X [M^&]D3E?0\R) Q$$!.B^H,/] 32E2Y>?D\]V29CJL"KZ@>RRA9U>(3m
M"&L;V*F=F;9'[J"0==0];:X Q&$-P4.2A!$[LKPZ%I"0]448&C #G(()JP,"l
MD-$(;/#AYW 1/@""Q[%",'  :?NE2O('T* :4" @CJL)MJ%[5. *CDY"+]#Hk
M"O#HRJ$D#X#ICJKIC\#IGC[JH"[JCZXD'X#JFJ;J0WL77,R;BL[HL??HYH $j
MDJX:LTY7(Z#JK/[I * #L'X I:X:/T#K %#LFQY[G8[LRM[K!R#K* /MTOX(i
MMX[H <  B[XDOZD *% %C]Z_%:$ E?Y2DYGNE[CN)-SN,#"9*L (.(KK?KD2h
MB<X OTF8ACGN$+!($/!T@* #P# %1P !TT(/2G $;^  3:4#%0$"CZ[P4F0&g
M])#OB#X (;XD+B!9#, #DC6@![#=5:$ #8[>I<+,T$!"50$#(- $5= (80P"f
M)^_,,*/RT@SADH7S9_!=F6D$&?]9"##S-0\#)&3Q0Y_Q\("=P #N'Z\ )M  e
MSOK?$F'90G $N2L%1Z "D.D!57_U*@$)!  &HWX ^XT ;6 .(-  V*GO[HPJd
M)F-<XIJM:+&M2@ +)$GV64\$> P$9^ !@<^)V,J>\K#,W=H"=2$"ZZT!>&SWc
MZYKWW$J2C \ 'I#-S0?"=7_X[+KW?7_T97_V0!#X@U_XJ7?WB*_X)!D$Z- 4b
M((   1'YGD_YY@H KH_YL=_<+1![\$TF%@Z>.>N6X  (Q8_AVF7?$28TNLD/a
MO;]"O]\5P2\@P5_\QT_?IJ'\^,W%8VR^W:_&/J&^W=^^"_S*'+[\$SS&U;>.z
M7X>$ZN^/(J]AX&?^G60E<RS$2U)#OG_+AHG2*N0 4\S(*G%@F0L C, 7;?T9y
MO]Z;D$$%=J ")0P(SKH?_:E=$J $GLXD1A":2H *37$&/  95& 'M=NL$C"Bx
M>4$%_F"5_/D/C"(.H8FN(K"Z]7,_C[ ")]@4UZP1(B $&N$!0@"9&B $D,DCw
M&G$>&N$ Q0/YQV,$KO&D7V$#2^0$L LY(E A]/ " 2 ">_("=ZG,(M#,Y9W,v
M![X",2L!%@X/(E A]/ " 2 ">_("=ZG,(M#,Y9W,!UXT&B$!*Q"S%O 5+[!$u
M3G 951L_.:,)7Z$!2^0$V*02D_0?KD *7R%<1>D$?1$HYJ $R&$.;*  *?0/t
MWQ"MZ<8,2H <YM &()HSN#"BQW<_\:6H_^$*K#"BQW<_B[,P5( $88^HLH"Hs
MKE!F]& DZ08(._ BWZ,!.[ PS,8!2N#I3"(#M*_Z[/H"[DI7:  !5MGYJL^Nr
M(= ()#G[JRH%_\& M2^L(= () D9.0 !U2HB*J$!2^0$*/?,\E6M(J(2&K!$q
M3O!^#0 9:  !5LF?_Y#FVB@/P#SYJ.8 +="MY@C$V$%&N-UZJPL9A@ "GB0Ip
M]) K#YR"\0U*>6$(:G"EDD(/N?+  JD2"& Y]XLHX$!!\K^ZL^$!MA$HCM)@o
M%4(/N?+ *8@>%2(/J\MDA.!)DD(/N?+ *1C?U#4 D&$(:G"E+"(/X(X1ABDYn
MP+'U'/3H)\&>KF .>S\09H"[".#U#' $UM?V#' $UM<&W\6?_T!9QLGHJL]Im
M#F#Q)"D#!U .0<">KF .(0 ($/!2!_!!(.$*VA #GF[GC_Y!(($.J&")T( (l
M6?'H'P02Z$ +E@@-B) 5C_Y!(($.]@8,T( (6?'H'P02Z ",T( (6?'H)\&>k
MKF .+_ ]=&4(($">!_!!(($.J/ #W_-2!_!!(($.M/ #W_-2!_!!(($.'/<]j
M+W4 'P02Z"!VW^/7\;U)AJ &:*I='K#U8 "*!W 2[.D*YK#W W$&X'H 'P02i
MKJ -,/ ] +#V9H"[".#U#' $UM<&TL  1V!];?!=_/D/C"(.*20\#)!NQGD h
M'P02Z( */_ ]+W4 'P02Z$ +/_ ]+W4 'P02Z,!QW_-2!_!!(($.8O<]V(\ g
M7?'H)\&>KF .+_ ]=(4(X$!!\O_H)\&>KF .+_ ]='4('F ;,G  XQ $["D2f
M,0 ($.#77?'H'P02Z( */_ ]+W4 'P02Z$ +/_ ]+W4 'P02Z,!QW_-2!_!!e
M(($.8O<]?OWH'P02(O$#W_-2!W 2[.D*YO "WT-7B$ (Y'D 'P02(@$#WP, d
M3!-= \$-*:1=/I%NX4,FC_Y!(($.J/ #W_-2!_!!(($.M/ #W_-2!_!!(($.c
M'/<]+W4 'P02Z"!VW^/7C_Y!("$2/_ ]+W4 )\&>KF .+_ ]=(4(A$">!_!!b
M(($.J/ #W_-2!_!!(($.M/ #W_-2!_!!(($.'/<]+W4 'P02Z"!VW^/7\?T5a
M P 9AJ &5_KH)\&>KF .0@ +,'P 'P02KJ -(^16GO/MNOF$'0E<GSJ89D !z
MQT57M"J$#I2[QT57.. ,0NA 2L! D D <N"$D$$#\'+<MU.F.N #?/4?]" "y
MD(&(FX0&L,!YZEPS<ZC6F<?68% >'0E<F!%^*N$#2^0$S%4>'0E<;0U9NNZCx
M7 \X!U#[PBH$?&]"1\  1S  Y] &Z#!G]" "_?,__\& QV,$Q0/YY1,]RCL]w
MMG,]Q^,[N;,[OP/)PS-G^_.(6 49.7!+_^$*MO(;R%4_]Q-?7?<;R 49/F )v
M2+3A.N #&),7/" 'BLB(A[CQW"OW;JUF], .I0$ H) :5#$ _!"LR!7[;)%Lu
M(1"SQMM@*M$ D)$"O& ;0;\?_;DEKD%=#0 9*< +MD' #!"S,9)5*B$ U-4 t
MD)$"O(!R_/D/3!-=,I!" +  #F0&*G!<R;5<O*VO*B$ U-4 D)$"O(!R_/D/s
M3 ,+UWR"A*<#/L!7##2?L%+[POH"[DI7:  !I7)", TK#,N ;6 -A =<AJ7.r
M-3.' J: ;GD&]*@2 D!=#0 9*< +Y)AW:\W.0 ?2[/Q4WYLT 5JGO% : ##-q
M(AX7)7[BJJ$#U!*:$*"H)ZX:07 &OP< &;!$3G 9&>\$D ( %P 9*< +MA'Tp
M^]&?VA5_ 4!=%P 9*< +ML$ ;&P&^JH2 D!=%P 9*< +*,>?_\ HV  &!M _o
MO*!F]" "I0$ JF Y[JL2/;!$3M 7!*P$# 29 , (3B@JB' 9;!%M(3"8 &"\n
M#:82#P 9*< +MA'T^]&?:&$'KD%=#P 9*< +ML$ ,9L 9J #^4%=#P 9*< +m
M*%>GO' &]*@2 D!=%P 9*< +FBIOO+ ?_8D6))#2[)(T*6@Y[JL2/+!$3M 7l
M!*P$#,0&&I :5#$ ^L"FA-<#TB PEL []" "?P$<&U/V U O3Z@20+!$3F Dk
M#+ 49&$&/) TZ\T"+()#JL^N+^"NK@(KD"$#4F ;09\:5#$ ^@ &#'!"S9="j
M W .S1>\8&  J4$5 V"<47@&$,"F8ZB(TH!-X:<2/K!$3N"5['(&]*@2 D!=i
M#P 9*< +*%>GO' &]*@2 D!=%P 9*< +*!>%9B !_<,+D)$#^O','LR?O:2;h
MV #B2>- 8  !<@FMW'"\ W%", TKE@@+,#\ (M &XJ $K5X: " )\/<"93\ g
M'@"/*@$$2^0$1L( 2U$5'@"7^]&?:J![Q]H458L-S?JL(<0-^8D-U8H-+U#Vf
M R "\*@20+!$3F D#+ 452$"<+D?_8D"NJ<"=<&@L8>N'K#*,R "M@&7^Z'<e
MGI/F$ZP$K>ZLX*6XNJ<$J(#YWZ)[,0#7 ( !BZ1[0E 7&*![$! 7)7[B<&(&d
M%*![2H *35%(N@< W < & !_+U#V Y!5[JL20+!$3F D#+ 45<$!9N "N@<!c
M<5'B)PXG.Z)[Z"H"JSP#(F ;<+D?_:D!8)#<_Y"[NG?YKW8P_Z %3Z6;MO(;b
MR+4<ZK 8QW<_YZP.[  "]7$!!0KS Z"2=(4&CD!45I9)*N$ D)$"O& ;9W#Va
M P$'-)9)*N$ D)$"O& ;!)Q"UN= 9J #<T8/(K <ZK 8>:%<I;(CRZ$.4/H;z
MR%4_][-8 X&(8&  O$,/(I ?^?$5#@ 9*< +(NW._/,?#(@=]$#DJ^P#^M 7y
M#!"S#' &&G!<V#\ BB@-*,>?_T!9HJD2U4L/?P$<Q% _0$!.9X "P8I<L<\6x
MO18",6N\5I8 UH5=2L6?_\ HQ@ 95& '5:L,S?I=_/D/C (+U4IV*N$!J^P#w
M^M 7@2(,#!"S'G &/J $R"$,9T "U;J#>4$%_J!*OX%<7S$ BB@-Q1( XD4!v
MU;J#>4$%_F"5S\PH5+#+4O ?#%C[PAH"0*H,QHH<Q(,*NH\<Q(,*38$=5JX2u
M(K#*/J /?<$ ,2L"9Z#LOX%<7S$ BB@-MA$Q0[K+M2^L0L#W6E$A.Y@75. /t
MS"4'$% APG'BC'8&,)475& '50L/S?I=_/D/3",+V.$,U5JTQW<_JXX<RA "s
M5 S[R*$,2@P &O /R "@RJ#$1/$/QH =/X<<Q@"@/5<7'K#*-J .*>( 5N,)r
MP8I<L<\6Q18",6N\5E;* '!=I<( ,;L R U>-) T_T ,\UDA[J/Z[/H"[DI7q
M:  !I7)"_T ,+$(,#,N ;6 -^Y&AW_O\+(0/3.,.D$$%=E"[S?I=_/D/3".Bp
M#:P26;7A/J /?<$ ,6LW)K"ZD$$%_J!*OX%<7S$ BB@-*,>?_\ TL!"[0H *o
MNG^"0H *L+^"(-#0)P@!<5'B)PXG9L $M>< 4P %L>N@ ( !@F,&)J!^$L"-n
ML5M](K#*-J .*>( <+D?_<D$L>N@ ( !2D+5N(L#8& !M2<!4P %L>N@ ( !m
M2D+5N L"L9O[M!N?+/C_ BHY_\  M0<X*0X _Z ?SZR-J/ 5&;!$3G 9[1X$l
M\OH?KZ"HR"$-L8FO2O@?KX !V($*]7,_!=:=R($*V"$-LR$$1@*72L! SIH:k
M5#$ _  &9( =J#!U9@"B__$*)( =J% _]U-@R($*V"$-; H9.2 &1F(Y&^X#j
MRF ;IR)%;@ !;$IX/2 -MJ$$)^@P_T R]ZN;_L"FD.$#EE JEK/A/J ,MD' i
M4N0&R?T/+>Q $\P[]+ 87#QG], .<[8_$ZR1".!B++#%^XX>(.AB++#%VVDKh
MB:X5(L^F]7,_+6K^R%<JQ 8& J#PCWX&='( G!B:$/ ] - !#/(/)IXU7 "5g
M$% A_V#B6:,#9F -H7F\;Z1^$,"FL:D,X+CA.0 .I?+M7)RFH0D!B@H(T*X#f
M#G 9H0D!@" %GG[T(I[BW##!$"!9"6#B61,&;8 !$"!9"6#B6:,';L  $"!9e
M"6#B@):S304!DI4 ( R"</45%0 9.8 "-*4BD)$#*$!3 , W>9$#$N)2&0 9d
M.2 A+G4!D)$#$K)@D*$#W, L2/ 5%0 9.2 A+J51 ) #$N)2?),7.8 "- 4 c
M&0 9.8 "- 4 %P 9.8 "-%5=>:$#W "2V[G2('@&**$2)  9.8 "EP&J#/@&b
M*I T#I2F<OE!(.$*N/ #WT-7.8 "%8M"*A0!+<0-.O$5)  9.2 AB\- :2J7a
M'P02KH +/_ ]=)4#$O(()^1 *:1Y+<0-X*X5(C]UQ/;H @X!?PL+0= &$J!^z
M#,"F]7,_\04#I <!17,$ZJY=Q%:I7U&1&[X#S ".(L^FL:D,U\F]<M]N   &y
M#!":4N#I"  !GMX I.< 4_#_&8\.H2D$$*"-K@"J#/@&(C"+>(<6R+4<KP #x
MV.$*L8FO Q80QT5+ _$*J8<<KA";^.H3*0<#\;H2R.$*TX$&D+$#8$#E+X(&w
M_%<"R"#2:PZJ#.@P . 'M*_Z[/H"[DI7R%<J9H "R_$*F9P[1!"OM#00KY! v
MOW$ GWRO*2+QU]WYJL^N+^"N+U7W\4I+ _$*9/ <!_#)]YHB$D\!R_$*0OD;u
M!_#) & _87@ HAF'^B32[JP*M*_ZG\_W4&T#M*_Z['K[2@P &E#8\2#Y>"^Lt
MMZ_$1+'>") T#I0T%\[ YO@?KV (V*$*L8FO/I%R+A"O*X$<JC =/@ 9.P &s
M5/XB/B!@)8 ,(NW.F%+7",.>KT *^<D/3",([/D*M)"?_, T=,">KT ,^<D/r
include stdcat30.uab