[comp.binaries.ibm.pc] v01i089: jsdown, intelligent substitute for CD

W8SDZ@WSMR-SIMTEL20.ARMY.MIL (Keith Petersen) (02/09/89)

Posting-number: Volume 01 Issue 089
Originally-from: James Shoffit <james@vaxb.acs.unt.edu>
Submitted-by: Keith Petersen <W8SDZ@WSMR-SIMTEL20.ARMY.MIL>
Archive-name: jsdown2/jsdown2.uue

DOWN is a substitute for CD, which allows a great deal of flexibility
and ease of use.  The two major enhancements over the MS-DOS CD command
are abbreviations and the ability to use VMS and UNIX directory
specifiers.

An example of the abbreviations would be if I wanted to go to my
\COMM\DOWNLD directory, I could merely type DOWN \CO\DO.  Basically,
it searches first for CO* and finds the \COMM directory and then
further searches for \COMM\DO* and finds \COMM\DOWNLD and then changes
directory to it.

You could also say DOWN [CO.DO] (VMS style; you can even leave off the
trailing bracket) or DOWN /CO/DO (Unix style).

This program is very much public domain.

James Shoffit                  BitNet: JAMES@UNTVAX  (POSTMAST@UNTVAX)
Vax Programmer/Operator        THENET: NTVAXB::JAMES  (NTVAXB::POSTMASTER)
Postmaster for UNTVAX.BITNET   Inter : james@vaxb.acs.unt.edu
University of North Texas      SPAN  : UTSPAN::UTADNX::NTVAXB::JAMES
Denton, Texas  76203           AT&T  : 1 (817) 565-4161

[
The program seems to work well as documented.  Get a help screen with
"DOWN ?".

Minor not-really-a-bug-but-a-misfeature report:  If you were thinking
that typing "down" alone will either ask you where you want to go
(VAX/VMS "set default"), move you home (UNIX "cd"), or show you where
you are (MS-DOS "cd"), you may be surprised to find that it will
actually move you to the first subdirectory that it finds in the
current directory.  This is a side-effect of the program's attempt to
fill in a directory name if you specify any matching substring,
including the null string.

Checksums obtained with the 4.3BSD "sum" or System V "sum -r" command.

checksum     size (bytes)  file (between BEGIN--cut and END--cut lines)
   44981        19076      part01

checksum     size (bytes)  file
   61672        13824      jsdown2.arc

-- R.D.
]

BEGIN--cut here--cut here
begin 644 jsdown2.arc
M&@A$3U=.,BY$3T,``'<-OQ(``(01.'NCX94I```,("!Y(/+DBA,0+4!,J2-F
M#ITT=.K0*0/"S!LY((80::`@((DJ<\K(.3$'Q)$Z:<B4X>C1BL@Y:=ZX`2'#
M!0R..#M""C'D#9P\<M*<04,'!(HQ*4#$R($#!TM((Y2$:5.FY!0T;\R8@?@T
M1`P9-$!8"<-&9!J*3,*X6:E3(1J1;=2R`$&E#)XP)4'<J`$CQTV=(U#(B$$C
M*8X<,EK$L)'#1LZG"J#4D0/G34C(+2`=R!E0`4&#(-*4#`-B#D.'$"52M(B1
MSEL0!*=D)`)BS)LV<=V0F2M&(@BR<]Z`@"/GC9V452&[IAA&3!HV$/.`H"-<
MY9PQ971/%VY:#)DT<LJ,H1ZT*H@[$+'ZG@-'?!HS>=*X.:/\M9DZ;-B49O@]
M_/B+TKDQ51DN@`""$'BE,099;.0Q%T2AE<3:=%B%=!Y6YZE%AW+"F='@;\75
MH=URX('0GWCD2>>0''6,-]EJQ;5!(46VX:86&2!`MY8+C^FD0!)N.,1@&`_)
MA!DD#'`&R8]!TC%DD3-1%=Z'#+YQ1TEYO%''=K5A91E%=[RU'$87@>#&&T5E
MN>4=&D(F4G$8437''&&<8=Z-+Y0Y!U;HS5?;9.&Y4=2)_\F11X$@)&'&C"#8
M\5),;D"6%6P%'416>&&0(=T=%ZU1$G1K4*1FAH*&5A1U<RTW$QDRG5"4&&B^
M)0=DZ+E&J4%).#$%%3PJ`!F00N9')*01_C9&C7!`MV<9.(HA'1UYP"'?&;<Z
MD>NNOYWZ6FR0$7<;''0@^IFUNE(!0GAQH!3>:!4]5\9<X]94!!9%I"J<&!3)
M-R-D8P":W:#@H0@@HEEH>=YS^N'[VQRAXD@'IR"4@5<>+5#7@EISW"$29.E6
M!65)^++&W'F=3MOHHS*!,.FXQ7I+1HO,]@I9#.(*-RJ;I;Y9IIQTVEG2#THZ
MH"@(HV*L,48B9"'"C#.QC%Y^9J+YGG2COO?;3#ICA`9>3SF`;W8@Q*52:#,M
M5]MMN>&HX[LJ8V2UV=8])""4VW4=IH)H$&WPUHXNW'"U7#H9JMY;LFK>F479
M)5JX!AIQ4==V394LVU;?+%*^9;]6')HF!ERH@U?C*)IIS.ZKDP,UI@VX"RX\
M6!2G^.$87K+2B3"$6H@OC)UV:L6Z\>EE.<J&"TN#4/":"/_&1G`@*(SX>V>)
MOBAI[+FW%;-==T=HBAF6E+M%(I(A\^E#%QWDT2"(X,32J@+^M'YK.>KVG'6,
MS'.=!"JI0$T&$F&SP3@K"LNH4QH^=<X_W`N#&2:"$8F-(6]M,`Y%@.:KTSFN
M-14"$X98%;6B5&\,4_O-<&($+I4MB@10(,$1C$)`LK`I#W/(G@'-UB\Y!&I0
M0>G;C89#I+SIRVS>:@.X4C`7HYEE/EU+&ON$XQK1@*!CJ$D9:[!3D@%61S3)
M"L.S7K,]`'6M:.')41D62+8+@0U"#&R#?(A4E?%UQ@E6HA"1JG4M<VVM)&/`
MU$1P-"X7S*M>A`N;%DU4AK),!#+Q\B.]$%4^@Y5!?@?;$Y?"TP+Y!(L-<QE5
M7%24!B$V"#*!&E"U%%D$+B7RCZ$[EXCH6*[?G"$,\G'CDOJ(RCUIB0TX.M,=
MFD>1+&)'=#,A#1O>L""Z548^>^22LP@W*Q_!H8>I#"55',:=VY2AB7ZRC1L<
MY8:S"`I135"+=$!%$0(N"&I<\1%!2-DVV+"3@&KLIAKU4,YHF0P%=WM@L8`8
ME+@8ZEP2"TZD?-3$DGCK#'*82O?.$Q0Z3,0-*1@?9*10!E^:3",'LQ7+4'!!
M"GWI0L*I@X6&4`0BI.!(LOS1HD8E4HJ0E#8%/1C4%"8_Z03T4`9J9.%:5926
M9J2D+(#,J&P9.T86Q8DRH<BDS!9!AX#@+6R`PWTP.9U.5B4,Q_&31)X#D;/$
MT$>/%`FBF/"&-ZS!5""H`QQ4%LP#"4$V:PD#1M24TB"X(0\O+"+41L6W<E9'
M.$X,24_72IHI9`&.=Y51/O-6AG2QL20:X1"CIJJ?9]I*0%2I2)GZ:*`BW,63
M%-&!DB#P4H4<=C89T0$7JD"%)#!A"EP8E_[@>(>YA"D[89VKP7QJ-HRF[D:N
MDZE^PB"1VPSKG!]BT4`[PS)+3B13)F14;%#[6]T@:@IOL!<(SL#$_TT&,EP8
MPA.:T(385HH)3P@";;IHJ$P:S#:Q`X$:1.K!06(TO$\PKT1]](3V)!1*1TJ`
M_EBV!3+DL`PZZ,(6+(N&+N@O"U5Q'4GDF+B)(>H*Z=%244CSS(12A8%H%9QY
M1D7`Y4!F*W)PJO8\Q[UA%K-TX1,),_]DPW\=4&"&2BD4H.E$*152.M2C0U#\
M-)'\F,QILO+K=,(P.+KF=$,^^HY67E*1&#'*MVC;X0^WEB:#L<H-KC)3&4I'
MP`].K3ZKP8]^V!L@44[(BNW2#D3$5:FP7>Z3/@J)7!]HG@F9K3LK,ME0VP-"
M^&0T;Z11@4S)L"`YD`$R88!#>W1#9L"&2W]"&.-%P,0<J-GI5&4]FQON$Y+=
MB-`,9=AEY$!;$C4.)7%L:%%*V%B?:;'+.441;04#\H#I]L1&VH'$!%CVZ[0I
MZ0'W9:UKDT"%+'`!"D.@PA.>\-J`+(!EJWUVM)^";-JP+B`98!GKN(U1UCT[
M"%,80A"8$!`)B-L%Y]8?$JR4VP>M=&_0#8G\R+(=.+0@>(6\<:&\>B&\\?*5
MRUU2K?)F-D."N`KPJC/L<,G6#XDXD"6V#WB<FM1>=:8)TH$#&A)J(0):)X]I
M4)BW_)O6GN6K)$DSV"9_(P8QA.<X;*P;05]SS%)-:BK..0-*H$4\_0'I-V3X
M#MTR3I'IBH`+2U,)=-3(P%2]I@K6PD+Z7A#U0G82(K_KC!.!(YPJ:4Q\(+"K
M]`))3K$$`0LOL$(39(.7L+4(T25)@HFR2SA^J45YS./M:T2PA:7M4`3$DR]]
M<Y2&P1&A"$-H>1L-=+S:_%V->("T=N)"!WWR*;>!?&!90X*H(+Q2/G-9]>1*
M0L!05;3EM2F+7$&@:\A0P3YOR(^53";73NNGL2BQ`UEL7%TRE*3V.NEUG5=+
M!6USFV4O8.T+H/W\.F^!M2Z@?O*ASUKG;]_ZTM<^K[G/*_%#X@$HJ/RG&86<
M,)QTUTL*PO+X3AH1M&!I"YJ)P@#]D(@D<T*(EW@H4">PI'\741QG5V6W`1ER
M-P5)(4X/D5DWHR%<$D%]HU8B!'#ZH2]J@A%L-AWAD3_PIP!VY3MN(RB7@QI^
MPB)EL4]<1DA3!W8I)F:EDSOX`AE2]W5[5"`H$!SA4Q(KHA9V$E$@X%F2TX+(
MQVOE!F]44`52(`1/4'V@86Y-^(11^'U3Z`)5"(4!,0`\T`(),05C-A<!N#3*
M51+()!PBL(5/(`+'UGO*\WOID@;"5Q:E4GQSD%)/(`?V%DB8DA^;0H'F)!,A
M(0=]$RHP)&1F%6&A=TLX0B=Y<&PLTP)LJ#]3\'5L(%<-HEW<E59K]3#"H8%S
M,!?_)2MR-!-\8S(E%BUL06[>!F_?UHCQ!8G]4V=@^!094"9A-1.0@`#OQ@7C
MIA.YV$#<%!"^6&<N``D$8"!'(1.D5CH_\'ZVMRU/(!L856P[9#C>PSEFAW'<
M42OZ9&!TR(C,DQ7\HB4IQC8LHXV((AD.Q7LF<F!BY%`RAD_I<3;#!%%E9`;%
M(2B2<F^3P4.VLB`M545U1D`HIF+@R'!,]!IF=CV/%F4'5D0C\A8SX2W843JL
M<@<S@0)EHE9)T8$"QSU"-F8*V`9"A8XT=D,C"2":A4%S)(Z.(DO=!ANJ%012
M$'DD$U\71V(-V70WF9-&X%I%(!MLME^=P00Z."R$>"0+H#\T0WDRMW@/:5-G
M4@=#T25R%0;C065O=I`=(A\1&1`.8#;(E!TJ\8C\P6(#$S38U8=\A54CPP5L
MV)+_M$.D09=."(61QV9!=3IF(Q,?\D)<LGY,!P)Z:861YT1EID5*,FS+QX9#
M$#1ZQT%])4+Q1`8M@"G?X2=DP5T-A08RLF5@TBFCZ%%8B08>!PD.0%9F]9)H
M19H@8`0,`@*'`5"R9R$Z((T^PC^)`I!F(DJD\8%"(@=R0RT+)T+VAW];DU!=
MB1'XA`9XTS5)(!N5,2<I5Q9$%$CO\U1R"8):(@8M^&G'238$-&=I=U<1R!9D
MR3+9`5\H.(/U=W]E!!$&M94?)A+!U1M"A"4&4P50\!M=XY<=M'<<:9YEES[T
M>924>3;QA0)Z9QJ2]B5)P6=C<%9E9I)6,Y]1QY;_I#@.\55D&3*;%C;&83)J
MQ1N^X1IS-'$.PV0481="1AJVH1(4B2-),*`I`69%L15"%T:Y$7)EX!,MZ*)[
M1R&!=1%%L532.1\I-0.(<GM.)!H\"E`,`F2,1W5,Z08J6A1ZYZ,ODB@G`#6T
M.&?4"9Q?%F:721K-B2/?P3!6YT0'Y6$M$QX.)1UM<'==TU)E,2=(N21U\4#=
M=$X*06@BNB29\0#Z,P3-R94,Q'HO6)Q=MB5S9#:;`S`(Y)))"`D-(`)<1X90
M1X:%MZB-^IR0&I->1W4BQ']#1BT3<G)H:3*;VJF?FCZAFCY%-X(+T1!"9FL`
MQ1Z$F)VKL3,GJE6$99?2,:ME2(;WUR.=@02+XT4^DAF;,8).4W<7(11K!(@,
M!1$/Q59N!W<-F"T@`$?&F3=U<1=6X22'Y"-5T$WR`Q/08A2Z!`)KH$O!5!+O
M.HXI%AW19:ZVDJYX081T\1H-"!D?AA4X,BD/)(0FPUX$=Q0,4CI34`3F\GA&
M$`15P`14D!1L<J@*T"]M@"\I9DW:18L-%U"7!G\/4+$76P09N[$76P5!(`,Z
ML`5*$`1-4)39)P5/<`12H+-3D'WHIFY,X&`CZ$2YTP;2T7[111KW,1/%QWAK
M$3BL.%8FB01RQ7(#>&*%-$R[-*=3(25S4:^<(@=K8#+Z,@5_1P1GP5T/J!UZ
M5R/.L19CN23M)R%Z@A7&F1VJ*)UY:"!7`";%,1$B)+:CV31#P&XHX+9G`!%D
M`1G8J!UI,1]U@#\>*YWZ9$B!)%B$9`;$Q0:@=C4T9W./E`9L=+<*\(&812`&
M(@0((QT(8D,I@P+U.A9XH!")6`8R$DX"8B<8,4=8U[&081IGX#/)Q*)>NEWC
MR"B(RRC-P57S:G)5L3NJFZ>BFP:38Y<1VW;K^`:'8R7;N4/)";A/54AP8%OL
MN201)&71X[S%@5`*97+5%*6OX1HA&%TBY9TX\A9RA2,#J!N0`2%B0Q$A$21E
MD!3*RRBVU+?!.T)O(+^C>9IF`[H.(6,0<H9_V1G,HS&"-#:DL2Z].A[$DC(J
M6:.AA59;0TWMLJ1M!1/S41;=@C_7Q7?)21HR,`-42Q%Q@0>=5`<R$IA!\;@"
MHA\HS$L+DEEA@+!XP4#2,2F@*RA-K"#>>:&GN4./E'N.`DPME%8/`1WSJG?S
MY1!^5Z70T3<+IV$I=046F2A(+)P@`&U5'"I\Z,8!5#I,.TH&\I8M9S)4,!FP
M`AD[=AW\!J4P,!=Z=P>%VW250K1#:R"WMQH;5Q3Q2BQ&*IC2P5TX:"4SD8;[
MX1T>ZE4WNE!BD"#()1T>PF0XE2BO4W?Q$W9+,B4!%3.6R'=Z!RNI611_+`>P
M$L=X0:@T8!.IA"R&]&,`I<AH4DZO$2:YM[X*\+P$9',H6A(82$`LXQ+]FC(U
M`0-&52QYJD\67'4(>W>E$1?Y48\LZ@:>,A="<!&9J!MQ^XACU@:L=R^K`4MR
M\"&]<08MP(]CEE*1+&9X0,DH,Q/=Z2VE+)[2H3"*[*UG-!.[W,M!,">\*YXR
M-L90UAGFY!L;F3DT\@9C`Q/T!$ZHG+_K^1MH`#)C-A,UE:5@M[!F`!F9.!%=
M:L?)LXL1<:7;=4T@HB4C8FE_J@!#$!Y*![+4JC]2(2=ND15;410)$4[Z8AU"
MP:6AH1*D\7,U=W.H^S%S0050$!;:5,E&XB.PRZVSVX\&\M3X\1#;^X&PJAO3
M,A<JL<]$3"THT(#OEY19N[4RIHP)05:/2Z@S&B0S#2DE<==SMYU'S)_Q1!\^
M(H9_Q\9C5A88@1"P409T'=>)8M6G:4G2\E_$DHW$!,3_LJ7.NB12@!_),:V0
M4`!0F11%X`9J\`9;U$OQZV$I)0-)H5.,-S@0,1=ELA6\TSQ8.1<'C"-*/!R6
MT7G_VTYET`)Q\1RKV0`H\-S1K1_=N7[K4AF4QL+?G#=S>*$B$0*\V1DSD!2#
MC(8;%B+6I3^%4;"74RQGHDHM.`+!?-H_8GGZ]]%2W)4X,D>;J@!5,`5-$`2N
M%1`$H`,&\A5A,1:4?18@4+EL<Q5P(1=TH75ZP1=^`1E"P&Q.8+$(KN`@D+,[
M.P5`,+Q6\':VAP1%\.'FHHPB[@14D.)8(`0ZH`,D7I2_(N-%(`4N;B`BK@8#
M,@=`('QX(`8NP)5Y*"+APBQU`!E3``5!<!"08``BSEI1/N4WSEKJY018<.,R
M3N,VCN,ZJ^,*H`$<`1H(1$]73C(N15A%`%Y>7L06```)$>2M^-<@'0``#$VT
M@`CP`(`H`"L`U"!0@Q2W``"```!0[L!$#A,!),AH(B.-C%8RJLG()V.@C(8R
MKLHX+&.UC.4R`H`(H`!-!31)T$Q!TP7-'S3?#)B89R@`/T8A`3!:R:@FHZR,
MQC)JRR@PH\6,7C/*S6@XH^N,PC,J@,#$`V8!,$CK(>V(M"C2ZDC[(RV1M%;2
M;DD+)JV<M'?2\DEK*.VBM)W2BDI[*FVLM+;2]DH[+^V"`A<Q`S"AN89F)9K3
M:-ZC^9'F5IJ#:3:F^8"!B1->`_@@&X=L,++CR)8DVY/L5;)AR:XEVYAL:[(#
M6`308_F1Y4^67UG.9?F;Y726YUF.;OF_Y3T03!0B'@"<\G7*'RIOJ?RF\JG*
MMRLOKWR$C0`LX$>!_P9^'O@I@=\9^-F!WQ[X%8*?)OA]@I\R^#V#'P<*3!1"
MA0!`@6$5&)Z!H1T8[H%A(AC&@N$N&`Z#X3(80H/A.!BB@V$[&#JPP$0=W`B`
M"#JRH",5.F:AHR`Z'J)C)CJBHF,K.NZBHS<ZHJ,C/#KBHV,_.D;`P$06;`G`
M!E[6X"417B;AY11>BN&E"P`<,Q,`X0"`3P!Q0M)`%8F4@\M,FK0B0)R!L#.3
M<6!,9%P8$S7B"P#_6'`%+A!!H0DL"L3YRRP`>/`H%!EJHLV?;1J@10`0@8(I
M#.2,8D4`QA$`42+L=#$,GGI&`4"?H`["3A2P9-B('Z\XB@NGDBJP@*5D"*#I
MK\%>$0,PDO)1Z:W!)!"G)G>`"JNL%1"1AAQEC$''&W+D`8(3;]`!PA!HA.'&
M&66002LN402`*Z"[!D",'P08<(6BC`K[3Z>?QMDK%(J^XH^PQ&IB;)P)+WS%
M+V)D>L6D`\19QPB`^%`H`'1P\$NRFO[""``..`NM)M)>6^VUV<;9\<=T=#"R
MLO\NVJC*T4ZKR<NWQ@Q`QXB"/``Z$_SSK";ST`G`ML*8I0013USAA`M#/-$$
M""!8(8,+,'"-0@PMW-`"#CBD``(D$PSQ!AQYR)'&&6BH&T,.:(,@AKE*A-%&
M&7.`,`4:;YAA1AIT*+'V#4&PP08(4LQ==^!2`%Z&'';$RT$5<X0!+P@Z<$VU
MU2!L08;<F>O0Q19PA$$'&EW0H`((4+B.!@ACN(O[&V[,D<8<ZA8.`N]E#"\'
M"&V06SP;963.1N#"DP'X&&6X08<+1LQ>1!ACW#Y''6*0\6VXXY8+@AM^%Y^[
M&WH7'X888H!K1QJNQPO"N/>C43P<;Z1A_?!F`('?Q#"W.B`N#RX@PNR@`*[#
MX0$$=T#<[42P!1&P``0BX((%C8?!%XC@?F\``?#"(`=U26\.U/N?&>3PAC:`
M@(7I`H'XP"4N<B%0";,+@AO,)3P1N&"#(O#@!3/XP3:$P5QB*%X=YF`__#&Q
M=7*HGPC!-[X:FF\.<`A7&@Z7.SJD@7=S<,$/9D>$,I@A#'5@@[J@F#XZ7`X$
MOP/!X>0`O"F&KXKE,Y?_<%<'.8#K?S,DGPU=(+@R%(\,;QA#'?YF/==]D7UF
M(!?RE`='-T32!;1:FI^0A;.?62MHH+I9R8X0@)0]JV<N^R2V0DFRB4FBE#QC
MF<^`MDI.:LJ3,&,ESG[1#5B>4I:IS*4M+T9+H8ER8OKPY<I:1BU5&K.5OWB!
M`$RYS%DZ4Y<EL\,T8\E,7()RF+_8Q39_V<UB8G-B!A@`-5'93&$"X)C>K.4[
MH6D$=7+3FNZ$ISGCM+2FQ6E;PQB`"ER@@@?4[G7GBJ$1WE`'-Y#!)RX0@`M<
MT(`DN,$.86!#&LA`.]MA,D^X6($`[@6`0(ET7_W*6<`>-3!)%0P`BJI&/QP%
ML)UI`ABA'`8!4J:))F0,ICH3&,%`55-A0<!7OJB&Q#11@38!8!`^\`)$Z("`
M7QQCIU=`QQ'VH:AY2.P7U\`JQN)$!PET]:O9$"LL?EH'"D!5J@"H0P-BNM14
M.'4=R%"$(=3A#Q)`@`<0H(-;HPH1N=+549JPJYO6(8ZW%K8$9T7L%HYUJS:`
M*@'`H,,#9C81JOZ"&UA%QS'TL8ZJ7C5EZ.B%/J!F%@,0`77%6\#Y8AC)ACYT
M7A:XU2:?R@X+*,((!)`4.2B+".#^-KB:&&Z<4-6"(`"@N/XPAA'6D0%8A`!A
M?E`'8@40`#?]5AW%_<=O_Z$#(_BC#@-(1Q\`(-UU.."W_B@N/*R+7>U>C+MN
M:F]UK_LK^VH"OP#X;GG]08<F<!9D-3CF+]91@'4",\#`A<(O/3"M7\BCP?<,
MYC>'YH.BT>%HC,A'/YT&-0$`()/`("E45Q4`.U"@8[4`@`[D"@I:9`@=$?C'
M,405@*$`],0@+92*V0&&4(QJ!P98U1THL`@?C$H1A<"4**H0`",'``BC&-4Z
MU-#D54$94]@%AJ-^`0*+X:+,DI(%`2#F!W`@%K0&:X&DUK%F`,!"!W.NLR8"
M40`V@V+,$M'4F3NEYFOQ^5I@Z'-<J^HJ3:&C#/WXQ3T,@-H*Y`.@%;`H1C7*
M47:1D'MN/%[H1!``$4C4!1P8@KO<$,,@H+!Z''57NO1W/"8TKPQL\`D7,E`$
M/TK2T^_RWQE`X"T:YM$%FIC(/\L1*"`(X&`4,W/#'@8`=/#C'J+UQXZQ0"H`
MA(+;/9AJ>DU1[6[XHV-4=D$=#+#M`)@8%%3&KILG%NA'H5D3A;Y5HLG*;@-P
MVRSH#D`+TM/NH:S#"O`.@+S'/!%!WSO?FM@WR'"@*'#,=&*-OAA.(>8+<$@L
MX9+:QD][^M-?9'Q80XU3NU\#56X'`+WH8(4^TO&4'ICXP^EP$SI><&X?I)O@
M_NXQ`-9!`I#_:MYD-O/#]2QQ.O3;Y0`P>IL9KG1",UW1=*!XQR]N\@#<<N-`
M];BC0*X)D5_+IY8Z><->NO*G^H#;`JA##`#VU4@<@*=@+^H5R&[V6Z']G:>X
M^\7^C@X,W",=RQ!`#X92AQ7\(A6"U\1DKV79.&%6LP?V+"L$CPYWV*/=F$G'
M)A1OEL;_(AF1GWQE+YO9S7JLLU5=!N=]\?F@AWX-BL<,SH&"#@#T(^#J1D"[
M34QTJ2.]S`ZW.J*Q_G1W<YC*`T]`P0&0CD49G^K)3_/5R:J#BG,]XS<E:L<_
M'N^RC_SO71?TVD'5]G68P<HM,/$B\/%E7_GASQ-#OKV5#U,_B/EB<&9G<J8)
M=&8P>$:`>G9H_0<(@%9UVF=HBA9QBI8>Z9=5\9`/+1<`!2!W=#=F=H=WXK=2
M?'=^)1=X/$5X<5`/Z:`3/?`:.,<!`8`.N;`/UY=_#HAOVP<R$%"!Z%`(^=`J
M$)$.ZQ!U\?8K__<+#;=_#ZAO6%<#B@(,W^=U&B=^P$!^"F=^9U=R:I=RU(<)
MWC8J\0<`\U=_V,6`-IA]..AG;U9GL#"`!6AG!_B&>Z9HB@(&._,+]39H2SB'
MRZ<QC":%Z#`,^/"$7/>!4\AQ53AVY==W)&<I)CAX/X4.2D`/Z2`+^P`K(U8G
M=Y(G]+4O!N`O#H`.\_`TL:(,9D$K@4(!^N('#.`O>H<++>4IH&(,AM`._J`!
MGI@(^)`(AB`/_N")C``,O*@/_J`H["`QH?@*_Z!WZ+`/[%6+_N`$C9`2_\"+
MOL@(T#",_K`(1J``O`@/Q>@+Q^@HH2@(_[`(AN`/_E`"$(%9=3`!SS(*4N6)
M@7`,'@``_H(.+[$.!X".QRB/`;`MRE`AM*(K%"!=[8"+?F``NI@(1B`/P"B,
M1J`/O]);5Q"*-/`/"/D$%4F.Z'`"YVA>[*@1P/".\3B/"UF/]YB/>S!T!L"-
M[`"0`GF*'K`([/!;#.`"HM`"`5`,=H``_-`*4-`*BX`-1(D,1`D-1(D.0DF4
M^-"4C@`,'^`%6-`,`,`)_E(%-KDO$,`/J[`(P_"5P?"5PK`*6/"5QF"6J\`(
MV*"69_D!7:`,K[$%7W``C*`-BW`/P>@(V,`/K*`(R"`#[3`/I"`#P*`*CJ`-
M_S`.=&F7>*F7P,"7_&"8N?`/_R`/KK`(Q[`"QH`$BX`,3Y"73M`/A(F8BCD.
M```)"Z`+H1``B<D(!D`&`[`(Q%``$P``CS$-Z,`(TC``PC`*:#``H\`&`V`"
MH6!B+0``$#`*<#``._9AW0``C.``=N"<!H`'`R`.TND`>C``QO$4`C`#P#`*
M9B"<:B"<;B"<<B"<@B"<A""<FS``>U(#S1`"B>`!AC``L(D(\BD`]&F?'J`(
M^FD`C""?(_"?]^D(`ZH4\DD"".H!DC"@E""?=?"@EC"@F#``'N``'Z`+Z1``
M>U("]:D+\`"B(R"B(:`+OP"B)("B'X`+9.!U4.`!4(`+W(`R4!"*1=!@Z!`+
M!0"CRC*C-7JC#I"CZ!`#/"H*!;`,`"">RF!B,"JCH0@//THR1GH.!>`!Q6`!
M^1FB]?D!6NI;_>FB8:J@N'"B7QJF$8H++9JF6WJAN%`'+AH*2+$`!@`(`T`'
M*;`+IQ"#).!M?'`T+```NV`+,8@!WH:GZ*`#<(@.3^!M2+%SA+H+,0@1R^`"
MBG``"I!9!H`..```0[`.\S`,L4`&W8&;"H`.Q$<`,D`.]A`/!``#4(`.]X@%
MBD`,PP`%MXH.$($%4/`8TH`.Z#`46$`"#Q"K/*`#<E`6!Z`(T$`+!E"?PR`%
M#>5%?P,"E\-"QP,``J0N`$!1%;(/@T`,_A8(Y_`!)74,EC`T_)`#<S``OV"9
M5T`+5%"?-@D(3F`!`8`%6Y`%6N`%7]`%'W``SX`+R```6;`%_`B+39H,,[`-
MK.F:>!D-"S`-V;$"'B";@[`.$.`(L5F<'8,9PT`'#6`"'IM;)A"R`#`,=5``
M)O`/'O`:HQ"HB>``2'&?>$H,'H"=P;@`(SL!XCD*V#D*W3D*\8D+,C!-4&``
M4[`,'BN;*>L#(EL'"V`"QJ$9+^L"KQ$*@4H+3%"?H1"?.Q:?$[$,4$6V=1``
MRQ"VZ74&YT@/-N`(1"``)K`#52``?W``?$`!=5L`<O``=5L%!L`'")"W=5L$
M!'`':HL+R4!]/_"V*P`/<G``@>`/`"``<K"XRD!]+/`/_+`(W'"7-D`,?X``
M-E`,@<$*J@"8@DF8B6F*`/"YH:L-IWL'"C"Z?V``-K`(3T``K*`#P:!-BA`,
MJQN8@TD*KULAH(N[!&`"BE``K0J[LBNZI,L`M8L`BL"JY+"[3V``"Y`,?S``
MN0`1`Q`/*Q`,<C`!0,"]!/"]?1">R;`#P?N2P;`.X7F8G^FZVJ`,XC&]M$NZ
MIHNZS:L(#2"8K-`1!3`'"&"U!2!>P6`/T#``^7`$@*F_T@NZ'G"]S*L(#""8
MSEL!,F`/*Q`-<H`!D`(`WTL'$R`$1G`$46`%5S`/IO`%7I`%3@<$2E`'\2">
M'\"_L0NZHHNZIDNZONN\)4#!R*`#S""\S*``R>!TK6L*=2``.D`,K]N_RTNZ
M!@`+`:`*-J`(1T``JO"D/SR[N'N[J*N[BQ#&JI"_R+N_KZ&5[!`HEZMW^Z(`
M_G+"4,"-!H`$1EH.O^@'#@"*Z-`!R[@H$G/'_O(/=F``#&NDQN`/H3@`_Z#(
M5\#("!"*A+"-Y1"76R+'="P`@["01S$$=NP'>/PHD<*-".#'H;@(X0@`B8S*
M_L+*`V`$!E"C+16*<2#)Z.`*@9S*CQR*+L#)<8G%9DRZ:'P':OP%!*`(SR"8
MACD/J[L,A!D+(*`"RZ`"ST#-K_L:LLN\N7!4XCD/J[`,69R[7QS&BH`-,O`/
M4S$-ZP"8@!`.!\#%T@`.)H```4#&Z6RZ8*R[BG`%!*`"T"`''^`/PM#.[QS/
M\XP,]7S/`9#/^QP`T``,@S`-LJP,=4`/%VS&J'N[6KR[S@S-@EF^BF#-;SR0
M8L@-S+O.V.O.\#P`\DS/]HS/^DP(_0S.0/R_I5N[!##.`,`D!;`*XJ`/KVL6
M_HN[`1P80MT*]P`-(U#4XH`/25W&U/O3`OS44VW42+V_2MW33`W40CT/IW#%
M6.W331W41T74KS#%58W6&#S6`LP/XKD*N``+UX#7@```JW#7J[`*C5`$=+"6
MP(#7+'``:XD,?PT,N>```&#.K,`#3Z!-L/`$K'N\AJD*/2P>Z7R[:]R\B8"X
MNWL$!F`"HVV]:[S`H^T`XHG:1<#:1:``+*T+L7`-I:4+LH#;`Z`+LW`-Z=R\
MBU`$BG?;9=4#NTVR/:#7)#NV`V`&0Q<"4H`.:P``6O#:B7"WL"W;"K`+1X4.
M7``RIWT,Q*W7L!O<Z("N,!<#`'#>+DW$Z`#9=9``Z#"H)D#>SW8-L&L"@?"^
MQNT`_/V^R=UO\7D&*[L+%+`9_2T`R7T`PX`.\?`/NX`1_N(O+YL!"Y!9\#D`
M=3D,<UT,?T``,Y`,B=``>](#"V[<#0`+`O`/!;#@OTT'`D`+/``(?0`#(),`
MC5`%,%"?<K`$B?"C"8``NT``")#BUT`')K`(';`G1%"?N"`&"%"4]B`,@%`'
M$`#CUP!S)0``N)`#1&[D^+W;HTT!C-`$%I`(78`!9ZX!Y,T!AH``9^X!/`R[
M,R`-(\[DN"``0E"?+=#7@Z`-`#`'(@X,=[X(RK`(T*#G`-#G(=`(E=#7N=#7
M3$X+/U"?<W"_#[L#V*`N@##I`*`!'Q:J\K`(T[`"T%"9Y]CD?%Z?>=X!M``$
MTNJD9C'71&P"Q5`%#+#D32#<L'[I(2`'$`#;"O#:Y%T>/6P6]SW;$[$.[F#K
M(8[KNL[K"USILA[L!W"^'X8+9;`9QSX1R=[2&7SKN;[KB]`$U0[KU[ZLQA[;
MX.[>S+OD'3`(^T``=D``M.`#K@X,^XWD=9`!9\MX&.`%,7L%2]X%U<XA)D`,
M?<``_V`.SHT&*[L#VD`'+JL(`8`/PQ`%'F`%CN`%@:P/J(WP%OX/74`!&?YA
M1CL`^R+RBX#P2Z[P#,\`7O`!64#Q=;`,L*`!^3`,`'L`'S#R"/#P`<[@6P[P
M/H"V`U_P!Y_PS3OS#^_<:;"R)H`(`3`$%$\'`;#Q'?_Q(2_T)7_R*;_A+=_T
M,?_T#5_S6>#S=1GT:C[TYB#'GH@.(/`/=7`!Z#`$_\`#HMX`0\`##=#1Z'`#
M>Z\`:3L$Z,`&)A_<17_;;17P<97*+[OF&;YNL(L+$K_RZU`/<K^0Z"`$=K_B
M#8`.8_`/E((.7O`/Z!`)B__>T;[@N_WX2<]XDF_R&%#Y!G#Y4Z_YG+^5GJ\4
MY[4`Z#`+_I"YB,]77:#S&K`.^M#YJ0K(=6`!B^`$!I`$?G#/(-![_R`.^?!;
M"(`.^.`/Z+`")@^[G<\`Z!`%YU4"/HD`(XX.;^`/@$\'#L#W=*``0Q`$1H`(
M!+`#U%\'Z[`"\8`(Z#\)_A"7K[$O"\P:0S</YX\.A[#^[3_]!N"7K;H"R.`'
M"0`0!N"7K;H"4&"!0)?)G[A\6!8A&W>`'RMTC0SF0^?+7Q=E!@!46<1N!K!%
M5@PLD$9G`+H,`(CY0>#!D0<R`_BIBC2/U(>+`@#,D(8NYZ1EC@S`_`4(@`E%
M#62T.S)CV[@$)@#U`'%GP!%Q]Q;=>QIUJAVK6!<=6V&,#H$A2NIX&[:172!V
M13TTL@/(P@=%1A@H`%;'`*T,S4+X`Z8(&@$@B`@8.49`!Q<C1F@="3QG@#$"
M`.8"4HE@D1,#31WNI6-@B`E$`<35.]WAPZ)R%Q%HY/BV*+HJ`!89`33:`R!^
M.NI0X!%&C@`6(%@$*4S+06!`?@0!H%.`U@YT2W+#5H:Y;6T`Z$``H)4#G0WM
M%[O3A@M^P7@=Z$*@YP[`0S$[!AKYJ=N0%8\_QL'R!R8*U20#,*I\,(Q<5M3U
M06`?5#;*)@,,LP@W-BAR!`'$R6$`#WK<<1P(RN0$B0/ZC/#/`/^T>(P_+;X!
M`"05``/`C3=",&,&1>$(``8S4@`:"$1/5TY)3E-4+D5810#;"P``O1!4C(39
MX`T```Q-M(`+<`"`"P`.`'@RX,F4FP$`@```@&HB``X65UG\9;&9Q7(6U5D$
M$&!B@9(`%*",@'(#2A`H9:"\@9('2B,HG:"<@I(+RC8HZZ#L@U(02E,H5Z&$
MA5(72F$HCZ&$AC(<RG0HXZ&TA_*"@(DEO@)0(3:(6"-BH8BM(O:,6#9BXXC5
M([8D"@#X`MR%U"`!D2=7G,AP401+D11_`P\N7`2$DS=T0!AY4\<-&1!IW(`8
M4D>.G#)N(A-)\WD,G3=R\KCH0.0-B#R40=P)$QI$&<^H0;0I,V=.F#.\0?P`
M4:/UZ]BS:R=V`N(TB#EHWMP!089T&=.H\X`(8X;.;=MAQJ#1_<9.&>$@$"PG
M;-A"$C=SZ(1APR8,G31O-`]YTP8.FS+>N:#)1'<E4LX@[(#`$0`>7+&@`U=H
MX@L"=RW8("XE0:$).Q0"8*&#@#!X!2X0G`#%+Y``<$*#FDB3P%V:M"'`70D`
M0\<(OU""0H._*(#0%3$`HZ$B'6KRS`$PWC$C`$%J,H]>'D[$8ALO`J")DA7J
MR",-/P8Y9)'H(&DEEAY2LF*$$G0HBB0G:"*(F%<N"0J;&JJAP%UKGC"GB8WX
M`8X%$:JS)"Q9:)C/H$X8NJ0F#]U%!R>`^,!F%G00``L`ZPC`E"A"#)#CC@Y*
MT:60FA`)8YA)+IGCF9JDB2>;;L))YIYUW@E`GK3V^6>@@Q:JR:%WP9+HKXLV
M"L"CD4Y:Z:69;GJ$IU(ZB,B/$G;X(88`:%A/D61^^$N(#?YC0XHG>*EA-E7&
M66&T,:;;K98.1C+JES`>F6J![#3YY%TCZ0(-`(YHPX@!E*2P"#$%3`!`+`1,
M@PXCT@P@S"B8I#`*)RF8$,I7+0``P2B@I'",`:2DT`T`C#A@BL@&H)*"."@[
MH$H*QAB@3`H"S`#,*)98K(G%GE@LBL6R6$R+Q<ND@`L`-3030B(>V)+"P+@H
M+4#33WN@R]0&\*+T"%A#[0O7P"A-0M@>",,U,4K7@;8Q7".3@@<.?*`+5DN7
MX+0N\`2`RPAZAZ#++WZ3$/@'N)CI`12+X\(-0E`X@,X4`TC^RP")[\@X%(Y#
M+OD/E:,#RP#+`*"S,E\EOF+DZ/B#N9:LUS.`!\58('7>3G]`NP5;XR+`X;N/
M_3?PM:N-B^&Y[PXW+G4<'HHK*2Q@`"PIT)'"+J<$@`X)`(3"2@KHL`#`+K9H
MCT'WU*.C`P"PZ(#.$]U#C\X+X^^B?4G+N*#(`0K8:``Z.`#`$-8QCV'$@@QA
M6I@"T/&5=1!`!N2P1SP(``,HH,,#`,""(H@Q#"AL$!TEP0(4&"8-=*`#(E@@
MP0,HR`,=R$$`!#B`(J!!"P,X;1A2J,Q]=F,;W,@!!`#83F0,T@`?[6,0Q#``
M%@)QC@\`(!#'L`0``,&/',S!4__XQQ5H006G+8(=@'""!0*`A2UD00M>^$(7
M/G"`9^`"&0#(PA;6<0!<_,-TR9C!-OP%,&TL(AH+F`8=#K`"#Q1L$.N`@",(
MEK%(%0``PZ!#`TRP2`L`P`2.A&0="F""?WC````8Q?<2X0#H08UZQ/"`RQ@!
MC`5$<@(Z&X7+1C&S420-%S(0@`.@8(`I+&.1!<.D#QXYC#HLP`0U>^0E_^$"
M4'HO!;1@@M-"D;21)6TBRQB$#ZXIE&50,P7I.,,_%D$/&SB""`(PP0[8\H<#
M\($"ZBR`'!Z@SBH8@`\(:*<ZBT"`.P1@&;A(!@#2\8-QTF,%\)##`0+A#P`(
M0`[_Q(4R!LJ"?_!C$=Q@A#9L0(P_*,`&Q;B#`6RPB"\00!'/D$$[9`",>:A"
M$<N8!REB`0(5+$,%SW!IP)0!RHMR@Z-_($`N(&"ZEJYB&1@%ZD@5<8238D,&
M_XC%`*:Q#D4@`Q#A.`!3I`$.$R`@`*@#0%([B@`;,'6I5R"`"J`AAP_X0QB*
M>&I4IUK5JV9UJUW]*C2`,8AI`,`?RJ@#/91!``#X5*,@O<-'.SK2DIXTI>T8
M0#Q@*M.=^FBL037K$1`05ZA*E:I6Q:I6`\!5$Q`"K#W%*&+)FEBA$K45"RC`
M*L2ACYT6]K`;96U(70N`5MP#&B.0K3CP85O#JC:W?RCK;H?:V^#.MK;:(*QQ
M,XI<Y=Z!M_,XQ4X1,-W5)K>US(5M`5Y1!P$,=[MBY88'@&I=`O!#9ZO`!2RN
M$=\0K0*^JUA%(XI`AU6P,KXZD"TCD'%?8.0B(?-8!2MX\`0[:.H)5E6I3%FJ
MB@\H@[N8_>@BFFJ"1/"3I$<P0(>+P``0(V#$#M#9B$_L804HPT>ZB,4UUH$`
M7<ABQ@/0Q2RN@5D"F&`111!`#V1,!PGTX,:2[,%\)6G-%)@!4R&0`CK6```M
MJ#@1;%GQB!6P"Z*B@PO'$O$Q@CQ?Z?88'4ZLPP#0$0,`F/FG'24`.A)2AP2$
M[Y)CUM0UI&N"0/1!`$1V0)__C&0#-/D,D-P%!2[I9P$@^0##0$<\_K$+C!C@
M"I?N9`868*,!V#(%7X`T1M=;C*#.(!F):,#2>M!H(C<`%@+X1P$:O6,Z"(`6
M/`!$'V!PK`0TH@HP<)H<EI"(`N#B`@;8A00,T.IKT.'''5@:$9R&"S@88!'8
ML(<P`%$'"-#Z&FI&1PD`@(L0*]O00;ZQARG`B"98(!%=P$"[-3!F#E#"`.WV
M@,XL7-@92./4BXBV`(3@M!:$:!#:`,`<"*`S?R]"&8N`1L"71O`0-*(2(<I%
MB`).BQ\X;0XY`X8>=X"-R`!"XP#0`!T&,$!Y+&(:*X!&+K(X\8$[#>`=H`40
M;GBZPHX:J#XN1A48\.,F^)CC'@^!'""P916/F;L`X#>>B^`C3+GCYW$V@=")
MOH@FG)CC.U<Z(8.Q<ER48>I0ESK6@ZKUH1?]ZSD/^PN=7H2TOQGHT![$/@A@
M!P+0P@<W!P:?FUV'#&B3FQCPPB>O\.,N?+T*"C`!,?K`@'^8H\EH@.0.M$$'
M3BHB`/@81A0\8`5'>,$?Q/"#/CKL^$S_HPL4X/3*/YWZU2_"\3^&O.0I[X4/
M9&'S=5@&+#20CV&D\0`?8#T"+#]H1X/;\-M,`0#JD/C%-_[Q/IY\Y2]O@*2E
M`9(F0$0`AK!Y.@1`]*0W/>I5KWS7PU[VGDY:[:^?^^SSWO?&#W7RX;U\<U3A
MBP`!=?+AO7QS5.&+$,3\&$`'XE^="^B&_..A@4Z#(3P:U*&'[L9"!74"#$''
MYE^71=QL$/M#P$2@/@)B7:M#89"/92D`U%%@X(H)CQ@6`*MC0!D!`+C0`!@%
M<UV]*HO8!1PHQ&`#6`W0C?D'2P$Z+__01?((4B1)DRAEK6SY,N;,FC>[Y-S9
M\R>N-$.+'DVZ%!TD`/[J+$`WRY\<C>C4^>NR#):&=?J0*O5CM5Q>"XN<&$CB
MYP`L$.@`_!.73Y$1!.CP^4.WPJ-/`(H#,D`7)6^)8G80S$B&[HV_B'0<,*2C
M8$@0(X@([)!<9]V*>(A63QJLS`"`@`A,&"L`8-V\U'Y6'W(-&T%D`_Q8R2"W
M`IF?!%`NH\ODCS.61<C&'0B/KE'[?.A\,7<.TH-7!#84<P<!_,P`S"JXP'+-
M*@;F8@$`\ZS""@]/V"$`+$\H@HP,[<Q#B@S`J/*!,@@``(HR*=#2PPS2K&,`
M+@#PH$L`J-'E1W0G77@-'1J`)<`L.R)PC`$PF5$=#5!(49,#Z#`!@!98F`!(
M'S``0(<$'C12!0P&?#!;,R%\,(<!1*6P3@22F'!,$3]>8T(B!2QBA`%O%D%`
M%\T!T-5(!*`S@TP.S&;"(AW0`@28<PQ0YFE[DH3.!3)),&@'@^Q#@!T$T.(#
MF&JRJ>!I/@))AP%#PG0&`,/0\H,N9%17@*&ZE%'C8E9Q8]`&'DA1C!5T+M)$
M282"J<4'<ABP0S!TQ"E,F7C^-,L/N;2Z3@&S`)&+K-A!@(XI!OT@IP(ZT<&!
M!U&8<$\9!,"W*P.*C#,IF%D0ZZ4TYM9!P%*,"+/`C@6\6<`Z'.Q@A`)T7)"(
M`T5%4":^^O)KH+]X.C!K0%8I85`(<D9W;KK(R$GGQ@,HLP@TD\(H!***PH1G
MB5TI<@0!/(11+`]ZW"$`"R`H(P``D!``&@``````````````````````````
M````````````````````````````````````````````````````````````
)````````````
`
end
END--cut here--cut here