[comp.binaries.ibm.pc] TENEX - converts DEC10 data to bytes, w/C source

dan@rna.rockefeller.edu (Dan Ts'o) (09/18/88)

I had just spent a few hours downloading MSDOS stuff from SIMTEL20.
Back on my PC, I realized that while I had remembered to transfer
everything in binary mode (in FTP), that I had neglected to account for
(is it called ?) TENEX mode (since SIMTEL20 is a 36-bit machine). I
decided it would be faster to write a C program to convert the 36-bit
data into good ol' 8-bit bytes, than re-upload every.  So here is the
program. I used MSC 5.0.  The program will convert both binary (from
each 36-bit word, generate 4x8-bit bytes) and text (from each 36-bit
word, generate 5x7-bit (with zero parity) ASCII bytes).  I hope this
wheel hasn't been reinvented too many times...

					Cheers,
					Dan Ts'o
					tso@rockefeller.edu
					dan@rna.rockefeller.edu
					...cmcl2!rna!dan
					212-570-7671
					Dept Neurbiology
					The Rockefeller University
					1230 York Ave.
					NY, NY  10021

[
Includes C source suitable for Microsoft C 5.0, binary, and a manual.
The program will convert TENEX 36-bit files into a standard 8-bit byte
stream by discarding every 9th nibble or convert TENEX 7-bit ASCII to
standard 8-bit byte ASCII by discarding every 36th bit.

Written by Daniel Ts'o, dan@rna.rockefeller.edu,  dated 7 September 1988.

Uudecode normally or feed to the comp.binaries.ibm.pc "combine" script.

checksum     size (bytes)  file
   42731        19060      this uuencoded posting
   10051        13814      tenex.arc

-- R.D.
]

part 1/1
BEGIN--cut here--cut here
begin 644 tenex.arc
M&@A414Y%6"Y#``,```2^B`H``"<1[&3<D;T3```,+U0T4`!"!0@J19P4P0)B
MS!LW=LK(H0.B1<.'$2>"H%/&31D\(&;8:"$F#44S:=B4F0,BC1LZ;T#,H1/&
M#9DP<LB`P$'2Y,"""<3DX2B3CIPR8=J`$`J"3)HY8W`Z=7,&1)F,>4#DH(,&
MA)LT8L2H!($"S1LX9<S48<,FJTF6>B2^2>'BIXH$0=C,B>D0HD2*"!4RO-&3
M8I`I0Y(DV1AS9LV;.7<67CJT#(C#B1<+M9O`*52I+JM>E9A5)->E)NL2%+@Z
MP14Y)CFZH0R"2,TT9=@<G'/B#8NF-8'(<1/&A9PW8]:DS:U2CHLR9.K\SO'B
MQ@L<..QRKC(GS)DR.C9V_`AB2XLM=/B(Z=*E_'D[?.*P+X]2Y1P7D`9TT=ZZ
M!9T$0V#T%P@UX'%#288AIAA9,]2P0@P(@@!'&,F%ED)++\7$4X1"$37344EQ
M1A*``FI$@PHX<.@23EFA,(,,*]`0X8054G6A2S!)QF%E18'8QD`)Y(<"$6F%
ML19%3U4D1@HBVI$`%+"]).%Q9QPU!TL/%46&1'*(&$<"4=2!&QUM-95;&42Y
M\5!<QZ%&QQS\`96$&2#49QE.9]311D=O@H"396>D$9$;OW%51E9_7N371-"!
M(()+$K)!81DB_%;''*%QE@!';<#QAAPLUIF292+(]I$+='0J@FIRTFFGGW+D
MN>=++"7:QE.84O5;7QE1---4C&GY1AT4H5`?1W*`T,8;6](5YUT!=CHJ"'>8
MU%43B!'H`@P@9(DM$4],H<.S"20PAFZFXN'"&"!PP0987,R!)IYVN/"&&&J`
M\,*[;JRAKQ-/%$%NCFC)<2M%U;)!1E21?32A&Y@^Q*H*+PPTT`@NG5O'EB#P
M\&L:;[B`A@\6*S#"EBAYE`!"34!A1!),%)%`J>.IFRH<(I0<T,EIN51&`E(D
M%$03,N<7$`A3O+$G"%4XD006)[!$QD,G4(1&&!&!<!1Q>Z)P(<4E8VP&R@E\
M&^[%*/L,=!%!$-'$$T3(+((<8N1L<MHJ7R%%$BS#+?<==5^<,1L;6\:#&6.\
MQ(;())L\>.$=@\SXQ;G)BW;/*@?=]MMQSRR'W3RG_+/>?!?!^=^@=^24&26/
M<76R*JBY)==E[#`0CB#888:D5?4``@RV*X!['+M[!X+OP-\N)1W%]_Y[\`.U
M$89+*(S!@AU,*N`Z3@6I8$?P>P!Y5*`S280ADBR8$7P"+\=<4!IC_Z;"&V.O
MOWVR8-5AQA9"5&'$%$G00A?L][INB4%__/,?``4(/04D@$[(6Y_L.I(4R_C.
M>^N3%QT.:`84?(Q0+>%@"C*()@YZD`Y3(]9O[J6_$0+I#FB85O5`X`,0Q``$
M)C!![K80@RYL`0;MZ8'O3M""$UPH?`XT5PM:L+X$V&$%*VCB'*I%!]>1Q0X_
M]&$/CP@D<X5!7B`X@1U.,"X'YD=WO(/B^O(C!A"MH8E1`>,)XD!&(.6'>&F,
MHAT'T$:DO+&+<;1,U>IHQ@$P+X]KY*,;X?A%08J!D$$R9/..][P]]C$,?TPB
MRHS$!CJ4,9)F@$.4F'?"+<E!#K\100GFH(-5AD<(8=#)6>@`,C=PP0V5\@JS
M*+@G^6$OD1\Q"0I:$`,7)K$/0$*F`@0WMK24;0K@F@*0X$<6#2YK2\8:E9I*
MZ9(4_.8)7Q!"$IP0!"EDX4)"K$@,NL@'/L@$3=<L0S95LLU?#8L.W@0!.,5)
M3G.BTW?$Y&(20SG*#OZ*2ZET)0B&4!,U^0J>N^S6;#[VAEOF<H*T,V:Y@DD'
M%!1S?<H<@>K@5[($4'.8+6`7#Y"7O8WB09AX,(-$N`E">ZK0431-@0A2H-'*
M60:)Y8*A#,>P1(%&\HEZ+.1)5>"]XPVQB#C4(1:!R,,@LA0$0(4$`6(ZTP_^
MQJ9T2&5.=[I&`IP+*4<Y94X3J<Q(^A2K=B1`'=S`KS6@@&4N@UD1-*K5DZ(`
M?CKQG1G.TA$4>.\WFG.;WWCJ5!`XH0I,8()1(5$`@N+(H"A$J*,4JE"&NJ%J
MW4*++7')`CL:`*,5]"5?*ZM&.Q;@DID,$@':JM6W^I5^@:T38=UP5]/E-6:_
M(5W?XL93UZ;SL9&=;&5%>=E2:E:5K`1!9VL"VMU:M+1F/.TN:?<;O+9OKVMD
M;5*#]-I%QI6V!+`MG5#`53G\-7[=@J_W_OD[Y2*.#6^0UWO)L-K[YE>>N%WM
M2>=:5\-B;[(&L.Q+,&M*5)H6NN&9[F<I0F"7K.&ZID5M+POR2].:H;79A6UX
M:5N`DVZM@KUMV7=5BV`%D_*@I\1ND`P`8>E&U[.@/?&>,)Q=#9=!M6M,,(AG
M+&+7HI>V`VAK`MK:5HX:"P0_4"<(P@,#8RIS(.W=[PKAF]&!?/=]]?.R7@N"
MV^#=KR"T`]\TUXM&[QCU@<Q=L'-CO-GHKO*BVTVM5RJH49.N]Y!NWJ.+&?Q<
MLG`$#Q2)9PHLVF>?"CK.+\XLG45`EI(01PY9432C0;IF0S>OI0DX"AWJ,)R-
M9!FP6R;#;S*Z/D<G4=2DGHT83@U?W*Z:S\&[L@)F+5/WHCJ^JM[SGK+W914`
M-GC%+O-`SAR["JK9@>-["K+.UY+$A;5;UEYUMAN2AEWYIB$--*FU*9D\!R)'
M2A$$DAO&G6X'.H228T@#O,F]OL$F"P4[V,&;3YJ&<:^TOG!5ZGJK)V_??:>*
M^V5L.HOP!"-,E@`G/3=%:ECE@)-WT'-&99VIC(<2X"$\5\#)5W0%@KE.*`U'
MT<E(J>(5L(C%,I!ZU2JOJ\O9Z=DAMQYV>.%`K#%4[]L!+BMZBUQ()+\UJQ!G
MMPW+RB[?Q=L'/J`!6[NHY*/OL=_HKF0AF\YM$\`@!C=HHI)/"L5U2\D'OLO!
M9`=@=HJT.Y(G95<(D!=5$(0`CX$V(P$P#F.-UQ@&'?\X"$(^G-"L>DUR:7E8
MQN(9AFU))V8XCE)D/@>:^WA7.2\#7P?0%UJZH0ZUHWH7R;X"B=/0=S)8^[OY
MX/1$\ASA.`?VYD_:Z^.X-\`MU2K1(_GNM^?']&]?<A==S?N8L+XA/."!U),)
M)#/L[E)H0$'0!Z)K.M`ZV+86MN;%[#YCAUD!R?X^L],\$*!&NWSXDQ+6KRUQ
M;;]D5]V^R*["O7YZ`PGX6D]`V^WO[I@XO>`-P7\/]"EDD6_[ME[U]V\5EU4#
MX%?Q1DD'YW.`I7"^PW`.9W%]M5ZF1W'V!6F$-FD*!7@>!W(B9W@8XA"=HA)$
ML7)5T2$P-QN49WEYMF&QQVJN]7H^%WO3IW=#9UY%MT=6IW</:`+(,P,W$'9Q
M57^^@X1""&]I`'5,&$E*5G5Z\5-79VU+E$A<1W!0MWXI8`(Q(':CMUYE-VYH
M%Q(VL';[YWL-N%YR1W<Y9'=X=P:YMW<>F'$)%5V$-W)G<'ANP"8Q$2&-)Q6-
M$GE*(RIC,7.D57.\]&/:MWF=YQ*@)X9)1'H;N(2J9WRMMT<X^'.I-GOK57N?
M(GUC4UQZMWOYT7OY]WM*5V[E0H66LW6:B'P\@`*$(7$:U5;.1SAS$'T[J&MB
M0S9!0TY$,Q`Z)D]A\!M+LFP%I`+)6!!B\&RA5@;D,VVXHSXE17N45&#/N"2@
M!FNEAHW0AB:Q5G)T96$H$`961CDV05(*`!H(5$5.15@N1$]#```$OHX$```G
M$7MIKQ&4!@``#`F2@$`3A@P(-77FT`$Q!TX9-PO#@#!3YL[`-W7DS`%1!PZ;
M-P73N#D#HLD4(D^F,*13QXR9B7+>M`$Q)4D3*D68R(#AHH$"(6'&K`'QQ@V(
M-GE`0!G"`H1`.67"L$FCIXQ!.@07WD&3ADT9IP,+@H#:IDP;,66@7GT#@HZ<
M,&[F4)0#HHR=M'FPBCSC4R0(,2+#R$G:Y@V9KRC\&J$")453K&$6"B1HT$V9
M,U['T+':EFW0,1@A3GQ#-_'&-`O'2/5J\$<*GSB=%,%RU##B.2+'?*UY,^=.
M$&DV2IQAHP7@A6V"<K6<P@78PV/2'#:(&L0=C&P,HIT81F%:GW38WI&#^JO$
M(2#@Q#SS=F9X$*#=W)6S$.M7XL:KDXDL4>3[,V\81A0;)X"`0WX+B9%7&7.P
M`!Y!1D'50D<?B6477LY-P18::7T57%L<IK=>>\X)E!!G)J%7@PL\.?427'D4
M]95E5LWADT2`N2%84J#!D909I)5T4DI-)7$"&VP<%497()I%E&4E7N00B!]N
M548921(TAQLG)'BE&SY!)=)=$'$6'EO)N9$4'6F4-8<+D`S@DT\)0%+`$!RF
MU2"==A(!%PA4S''"&WP60,<<;P`1DU!E4(1D6BY854>A^[FAJ(XN++I&HUAZ
M)4>D9$RJ0)T%P#G`&&V,P88,(<BA8PB5%BI###*T4,,-,+1P@PTWQ%`H$67`
ML9`3960$V!L?G9%'H52$*,4;C#KJ*0A5N)'&?+C1L>RH=M(Z`PP@9$':4$'<
MU1.W!3B115/J@@!"###`,*M/+ZC@$P@J`%J$;+3%-]]"+<!7U+]M/50&'B#@
M=]Q$73$('$1L*037?G(8=.!Q]ZJ0@(*;K015&#,I"`(9P:E6\5YUS9=4#EB!
M8*T88G@%`@IHO.&0&74@F11J&U454W,9)Q`$&X@*+%]:"\4V&P@W(`A"$%,,
MD81`[TGL!L46.\WQ5U!++9""09,\A\DDCY0R7@G;T/)QY^(;]!7DT;&942+[
M:2V6@`KZ1E.57AI&IM!N*BVDDC:5PPLWO(`##AD'7<4<89Q1A@X%6X;P%BUL
M00<?8G31!0B8;V$''W%X#KH9#;\99Q>-*X!O`BW0D<`0`R,-0@UXW+!PUU//
M/$,-*\2P,!Q!K;%7"@^_=W%U6WL<51M!&S=[[?2!0(,*."R<XXZ^R[`"#<,7
M?WSR;"V?X(+.@\SG`"@`:T88.2_TH7&ON:YQ"W8D``5YHJGW!GL,VDA15G(8
M.<@A>G%(0!3JD(8RT($-23F,5SKFAJ+XC"W'L9']@I:$EZ!.9H(Y0QW*`A'A
M0`4$9[C60Q[#H:0(YBO^0AIG1.`7CP2E#")H2D+V$K0$;*8-<"`-]S[X%1',
M[6`NH`,01=`VC76082"4@PA)>"@0O/`HP<'-2)H2P^HII&R=(2!&%H*"#VZ&
M+H4Y#-`V:+_I`;%AUD$-&H2D(A8]24@HF8(.6O>Z!*BJ<D@<`PBX,!4Q<&$.
M#@RA'5SP!C&H`00OF(H;AO(")SRA"'S4V'L<(H<V5.<.72$#V>J"!^+%)0U%
M:>(+?`(:"%1%3D58+D5810``!+Z')@``)Q']9`?7,RX```Q-M,P`@`$``0`@
M`!`#\._?@0$`$(SP0:0````>`$`:$```!`!P!#RQ"$`;25(@!6C\IW%<E47L
M<"$@@.[)@2M65MA;Y,7`H@.C0!UH9,A?/RBX2`2`@JY*@T'$"!#%MP\IBZ7H
MC#R-NFX-)``\?7X1`.A'BSIE_CDA,,B(`0%A%WU0="0`IAYB`-`ATB..WAD]
MZ.BET<..WA%A_]WX9T,H+E4"D-+`^BH!5`2X&C)-80"J@'48_AD0`F"=!-%$
M2C,0;:2T@6,&6F\<Y(=`@#]?<0$`!`74"KM,?6PE`(2.!-V\0<T`CH[%<"!U
M.#!V["LRKLE,GU@F9@!71Z;)"GA6R[8V`#\#TL$#@(N;]:M(E3*]$0"J`::D
MQ!/[G",WN\CH;+&5`+C8$UEB-Z"C#0)0$9"($?XL`$P=)B`XW0&XZ&,==NB8
MPR`Q"!BQ@#UUI+<->PVE<XU&[#DP`%(2O(C.)Q\Z:(@^_4A8AP.X</#BA;B8
M,,`ZPWQEH2TX_F.'/^C$`H!].E*A)).V'#`>DOV@PXJ5^R&(SC$,>"8A'1!8
MV!B&.J2WQS]&]J08+E#(^%6848WY@)F.:9$>%O\L8@0!Y.F8WA7_M/567#\`
MTD,+=*3GP#^`]-%1H^D4\`\NY+RW5%)8)60?ITPAL8!GZ^SRU0K`,%6;9UY\
ML4@Y710)P$OLS``,.AB(YP-I>KV@)`)`PO'B=5@]PR6#/K2F5P&XX#'D`+@8
M,BR'M7#)5K(7T1'!KTH:H"1-5]3'7:S<VN&M'32IM$X[M.+"``#HS$(`3CJM
M\$\B=NB#ZH/\/&C/@Q':\T<?/`'ZA`!X1%#P3PXM@HTB!ZA`SCH+?/75M^A`
M[)F_T"6QP#]_I$<.0W8`NR20EDR+U0E<*I#8P7A(H`B$<3W0<#:(')#.+"QV
M.R4Z1=28SB@L^M*1G_;$0L`T^*R#@$Y(E_```/S^8X0^M.F3`!\P''/U18*F
M\T6A%&6;7A4-E0P%D,RHS%0LG1&C0#H\L`G`$8/\(P`?/OC)3P(TNPDS!#/[
M4_/-.:^SFKD_!V-M6/8<80`(=63@M3\7V9L./OX8:00_2D\##N#^I*-.YR0;
MT-QV`K3Z:JQ?M?LN.F\,0*\]]N*K+S#\^@OPB.BE`PA87AB,<)G%,WR`PQ!+
MO(X"%Z.+#A%Q"\!Q'1Z#G)X[))OL#Y`&$"`95N'HY[+@",L<N$\V+X^SSKWT
MS/B2Z(C68#JML&B,$?<`X,L!8#%"T@[`-(HY`6F+<`;32M"1JETM:R3@PPN\
MI@^P32@]5B!;:O22'B:D#5AGP@4/Q$<LII1!/PA(!PWLAC>'\,UOI'O9\0IW
M./<E;G'G8E(=XD8`R$F.<AVX7.;^H1[4^6T1SP!$.@Y@CVR(CG3IZ,;WS(4.
M;G"I=:Z"E:S2L0.5T`(&S0@!#P0P!P$T`P2_8`-<;*"2%=PC$)B#@!P&X`N/
MZ,,1UP@$,5R1@'W,`0(6^``Z/I``6S%%'@G(#!/"&`AR?,\&B3"!$P``21,H
M`2S&"!TXD&"#42`!``.X1R+8"`!&#&,%WKC'-FBAA##:@!$>^`4`+'``?OR"
M#@7(!2P2L()GV&H>J@@D.G@P2T%6(`'HX,,_9M`.QH"#(3;P!C2Y`:\=Z(,I
MXV"/&AV!#5Q`Q`:P80(`>'$?=(@"`>C`0R)9LC8+B!,`7PSC*(+!'@#4((R)
M\$#^&&&`5P#``1_030ETD8T"A#&0BW"`)P0P#A<XP@"RK)`-6`"`8A@`%`)@
MA#9FL`T;_,,#G"!C`0*9CCD@P`86)45&M;&+;WXTI(%\:$032M%QV,`1P9C!
M/TR@*+VP(!?O\@4H`#`/4]!A`;D`F:WDX8K*K:,<!O#``3ZPB'O\`AD`8`4F
M(L$*?P"##@%`@BK$<8]`[N(@@#@%5G^A&R*$40X*L(<P`(%+0#P"JT!80A[.
MX0M4".`7?C6G__P*6`%D#`##H)4O/%&`7S`6'7T8[%\A@P[!K&,`BH7,+RAK
M!O]IEK)L@%<R#C"F49FG#@7P&J``D(NI[<(B]C@$5@-`!P+0P@=A'((XY($.
M`/K)MHL,04(7.HX#[$(E+Q6`!XIA@?P)-(P?`(0/U)&M!G@`%.NHJ`78`<\2
M0'<8.[C''!3PA"<LH@'CL,<_HK$.>8!7O`X8Q#MZ6(`%%$$`=)#'/SJP#G<,
M`P!96`0W5H`-N.[``^N10P_'\8]PV"H=:O#'(PP@#P#H0B4XL``]Z9`"F0+`
M!`^E*#]'9JM,Y&(W.F5J4_=QA",DP@?B8&U#F'J/:"PB&K_HB"\"`0!'Q#*K
M/``!'?;!@P30X1X\:``=WJ"`KZ[A"$Y@19#I,$PCDR/)=.!"D^F`!1Z(@`XD
MX`$7&B6$=9!C!LD(@I3'K`\OUW8`[)W&(H(1C71,(!JH"$`=E+&.`$09RRO8
M\@G<K`LQDWD=M4KSFNG0YB\3`,[KV,:<ZWSG/-=!&NNX1"!?3,T!7,/31XC&
M.3P-"''X8P7B6`0Q1B%-APU@'[2$Y`^&,(1BV"#&I(BR*II<!WWLF)(^EN5E
M;:4**0N9R$9&<@-*E(Y%`(#7Z2$$)1,QZR$LXAJJ^+.0L5%D.E`#RVO8\AG<
M;`)##T`59D:SF@W=:#H8`!9<`.8ZH@'O.@-S#@6`A0C070PC'.(:^E;%$_[]
M9R6[8,LJ<+,KS(WN1*^;S6Y^=[S136\NV%L5<VA$P(E$[$`>`X"B-4`AOMH=
M!``@'</@QTXK3"M[&(`>#*D#`XSQ<H;HHA[PU$`8:6%>*Q"@$-+`92X^0@LG
MA!$7$PA`&6WUNL3"9!#L@`!.%H&N7S3$'M0;!+,C`0"L&Z`XZ4$$`*R`#DH,
MP#.+P(<BB'``3#@L&N,8`#;@O@C9!N!!^B"[/CXD@+6WG2G-F("8@,&'*61-
M+T@!P5(:801X,&4=%F@0X^7!+X<!X@_^&#,$<"&"Q3>>*8^(/%<&H!9^X$(!
M`%B;'52>+W2P0_0&8+SCT8$(MNQG3`.P^C^,03VP',-U6J05U`5`=@],8!'P
M&)%Q,C@_FFCB0P;P0M-1)7TMQN[I[#``3AB/@*I)3PVL0S[W57\NFE!"`?9)
M^[?TOIT>_CZ+L)L53*:.+J\/PMU>+PYF&M*J^'L=OP8`"$PP.8@F@`80`'[G
M=L@0#>`P`'0&#FD7",=`#`$`""6P#U['`'7P`/90`'JF`&0G!4^R'^M@`$9"
M!`Y"``GX=G$W=PQV"\80`/]06YC`%",@>-R1"$0@`!+R!Q4P)OD&`I?U%;``
M`0A`/<>P@Q>Q#H+P#TP`%]*A@A%##OTG*[1B!;H!(/]``6A7/(EP!`0P)A@`
M"$]@``A`%VW'@G('=\=P"#$(`)\A7,5#AN&#A@K(@`[(@,A7`,5P=V!X#(00
M@T>3//.P""B8"`=P#$>@$@#@!?$G?-E'?P9@?_A'/<71``8(`IGQ#\`7*UZG
M9^U@@&1!!@;P#ONR@VF7"'[`#UZ'`'4P`2OH@FN87H=`@;05!HO``RO`!SV$
M@D"0""K(=FXGBRY8=S&(!#K(@__@!Q1`*+65@$R!#A)@'_RR#G,AC'CG,+&%
M54+V`+B@$E"`*E``!5.`#FX0`9>Q"%R@@G^2,^G`#%U'/01`*:L``'!T%=@#
MC>C0"EQX>U^5'H_`$`;`!0*0A`0`"@6P@@O8@`^8C=A@#+48``%P#`00"JGE
MAAU1D#OX#PCX)Z*`D.M0![D!ATP1"3AH/2@X)D=@@`CPB\&8AL3(AA@)ATDH
M`!RICNQ(`#F3@`ZYC0A!!RWPC:DGCN2(#K4``9>Q#AQ@@`208[X'!8PG/OH(
M#^B8@Y^3`ZM(*8W@#S-#`!+3B5:(??-B!51'`/:R=@9``@,P1G4`!*WXBK$(
M=[,86[9(!R>P"&9YB)\C(7ZP`6OSC,((>E5I`#OP.71P`)FH>X:8@C5Y$8OP
M?DU'*P4#"&=@`,\0*[1"?P1`=H!0*/M!=OM@>P)`&P8``'7``DP)"*1X#PJ)
MAP^8=L90"!0(`'QX=X=(`,=0"()8&BIP,0,YB@8P#ZW)D'J(#[%IB[GYAG#A
M%CK(F$K8B%^`F=A'?&4Y(GS0`#E@`\9P'DQ$"+.U@;!Q8@F`(IS8=%^A"-X)
M`"4P/``3"'Y0FH!0!XA)"ECU!XKCGJ4)'1,`"(R`58!`&YA#)KH!!-47*^$Y
M2Z71"\A1H$['#E>P"#ZW".\I5;1@!6'T!>D``0$@F3Y'"T$01NG`$?(7$_R0
M>NCP#$_B`SZ@$K7U#Q:PHIEAHO'3=$*I0O=@!3-@#[E`&C)`#OS`"C(`#N*P
M#X!`#U5`!PV`#L1P*=^!#I;`'AWA!0U:!<$&`&@V9XO0;/F0!(LP40"@?`C@
M",;`5$705/I0!)<`!"1@./T0#>4P`,SU`5?P"^.)#@\@`:[R#(O0#P.`#XG@
M`L\D58[@#3F:!.,P`8'``SLP!+BDB@!0!$7`"KLV(?H@#NV0"),42%T0F3!A
M!5<@51!*`+Z`+JVP`\)`)D!@"73``)=@*TGU#TQ55>NP#I;P!04J#"J1F1BS
M#/\P)A0@"8N@#ZXZ8ZY08TEP7/`$!!?Z.K@*`'(P`4RG17.`#TQ1$%C0='-P
M`.C@`.29"4W7H^C0$<,@"@NA`.10!R,@7?0T`'+0`%XV!^X*`G*0;P6P#@?P
M%3PP`78@`+`P`;L`!`)P#9@P"B<V#(I`#.MP#Y`H=60930"`*J.`2Z-@!_4:
ME%00&?]``^@0!!70(`^"#Z6U-AJ;/PVR#B60L>AP#N+"@Q/2`8-@#*-)3'3@
M`8L0A64A`G50#"BK#"L[)N.PB6"Y`LFP"#Y`L>O00WT@`$'P,77@ITX@#Y,&
M#@4`CNB@"P^P,7OY5<_`:@$D#Z-`341KM`_0)ORP"`6`B&W!#W"1M$SK#CS!
M#Q^WA!)@)!Y`L8NPB!-;`%>`#F1PM5U2M/7U#W5P#M0'?V')#E"G`)+H-?;@
MF&NQ#A'P%8!@:`\PN2]`!PHPN3J`2TZP`\Y0!^R@N75P`;\%!#M@#'1@,])S
M`"L+EI,[9IG+`Y=;`**;`(M@#"OP)[\((1A3`/B`=B`[@\H0"HWZ.;AP!9&Q
MMVN`@V%X0>DP".R1!<F+#EG`O&-"!Z\+E)I+!RA@N70P`GN;"R?Y(,U[5*`W
M@BQ+!TD`M(;[%7N+!"<Y`!`"!$S1"/&U'W@W)MU`*">#+DQ!!#AH`/+K#TQ!
M#_=KEA#"%*TQ>'5P"U:#.ZD2(/<`O!]#*5E0*'[0N,Q&`1A<HG1@NUY0MHMX
MM%\1"A3+%%6`OH7+J8C['UAX$$P!`?<+%\E'(NM4GM870,[)B(,`N'IANQ[0
MJ'?P&0YB`Q0[2KA$?>8YHE`WEM5I#W0``^MP`A>S0C6`#C\PC74"#'W@`'@)
M,&8+C'[B#XE0`(O`MH+;#8M`!W#!!\I8!],`EM?'#F19?UE'!QW0BG1P`3-(
M$V,P(*II`/>P+PYRB#OHB(>;N/2'`&$!,7<1!GJA`CT@!WK1`#UP!WIA`2NL
M1?:R/_H0`+G0$8I@!?JP#F@4``/@R9_Q#E]!IP&P#O3P%?=P#"I1!S\0",^@
M$H%P#M\C"YWI%F%1%GI1`PN0#'00`X[<`RN@%]F`%WHA`8%AFA3PF*D``!/2
M`+@,`$"P#M)`S=:<Q,FP#L?P%=D,".L`#(A`RIAJ>J2P%/Q+$R5POP;PL1+2
M!^G!!O\P,_J`"-0C&@3I)_BP"`N9A^#@+RH`##QA#X@0D9B0C&V(#!WQL+Q3
MR.R(#_R\/,8`EIE9QX#RF_>H9VY)/1JH`\-)T&EG#[(ID750`@:)D,<ID<F9
MD8U)%@-8D`?)+%$:G;("1Y/A;G!$!'JF!&])!"7]FOB`TK98!R\0"#X``P&`
MD';9T@E)/0.+!P7PTA.IFQD9R$1:TS.]#I]P*L!0A1M-=9UA'G3@!1]=!R0=
MF.A@!W22OBM`=H?PN_M1U,7YT@`0TYDST<U9A3Q-6P;PTWKV`F0'!78M`*!@
MU21``$=H`.OP"^3,BPA9!Q:@CQ<0UV-R`&2'`HE=A7.,"V(0`.C0!O(@B40!
M"OXP"HI@QD:``*.`"*Y-`*/`":EE`(1`$K`A""21#AY`%CQ0`I2"#Q-I`)C@
M@1(]"I90`*,@"<P-",Q-"<SM!\S-!\RM!\RM"<S]%;=M"`60$(#`!P$``W7`
M`T8`&]X-`Z4Q`Y.[`G70`**QW+!AW4LH`I(;9._=P\MMFA4@&M:]#C9C`-J]
M#@DPN6<1#:+!W4:@"`10@[1S13J"#EC("`7`%.#`0\C7PQ0.`'VP&B9(FZ%`
MX?>`#:-`X9/K`N@J&M1M!%AXW$QA"Q@.#SU\W!RN`+!QW!WQ#PY`W0Q^%ZU!
M!S[0`Y-$!T'0`VC@4ST06H?9`W`0R24(&]*M$CTLW<LRN7"`6I/+!'40`$8P
MN::Y`;Y=W-+=$>O@#5!>`!^Q#M9PYB:W#L[0XXE@")[@#SU0!'JA`#UP!,O2
M`UA@F@D@&LX]"'+N#R"P"(/>`F,``#U0`0!@!^F!"J`$#)/@`O]P"F)`NAX@
MVW(1"KR-M@8@VP(0H@'@F]`-&]I]$:=GHAFPLNF07;G1YO#@F]A]XP5P$(!N
M*09`W5,^M8>YZQ!0!UUC`%3^))\^M;CP$4RA#>B+"SI@HBGC&8/@`K)-`,=N
MHO1$*HE0[>N@"6+-%.;PRI7@':51#Q=C"W..#L7P&8;P%;O.0;=[0/ZPDCU0
MY3U0`G50#X^Y`L8`!;?K`4P1#F?''57EY92B#?W0P[QMFIL*4@40.9-#!U/`
MODV'`!?P%1;@`!>`\1B/`14_2QS_\1?`\7A@`:1@`<$$\@`0\A?`"!8`\OH0
M>3Z0VWHA>#Z0\'50)@SO\)0S"T=K!.M0"27,VW+,Q.R``3A!&P2@`"T:@+H2
MY;WN`]+]ZQ:P")ENQLN#O+UC!?XP",5.`.N@`CT,W7JA,%7_$_PB1*7A`'2K
MZ0>0"5F_]<4^FCYPZDCJ-PL`(;CT6^L@`!#K"&9L`ZT=]A91!V#O!YC3!R2`
M]`HPNL9``"U@!$>D]2,^"-(``/>@#6_O-<1=&JEE!/AP$8R'#NJ'+OP[1?R`
M#IM`)\A"W7H1`GN;!'&=4,>]`LB`J?2P#@7P%8T/`Y`?#!X##']0#[:?4,[=
MVK57S(?)`V'`!P,`""P``D:PDGW`$G7PO#X@]G5``:&PW`M@`-9]5+3Q^:@E
M[GLOCN8TFOLQ]`N+$^C]W4^"UA1@-``0"K+]L8S@!5@3]^G`=;X^NE3/]HN`
M]9Z?"*3,]=.^#A6P]E;?.YY___D/ZOW?``!]]_J0_;C@!9]A&:OHY[A0!M;C
M^?>O#P`-H?KP(/"0"%8@#SJ1G=1-!QP@^_6J]@KA!?!@-?#`4S^@%Q5@!)[K
M!Q"P+E]A!,3@!?!@-?#`4S]@FH7H`Q2^`EOO`]QMFC>!#@BPLLRG#TJ"#]0K
M+IWA`]RM%S>!#NV`OAH]G?1_MA#2PZR_0[1>FHSAW(QQW-_"&*T])2Z*".B/
M?K5Q!NZ&]$=0.3U\ZG4PC3Y`XT?%&*WMHHJ`_G)/]]/H`S1>!Q\#^)9B`8Z`
M_J-9[`@`&WY_$=M?7]Y?`'3`P2=C`5^!_NG;'60^`-V.#@P0`"QL!3TL\W4P
M`U1OV_\`,P[0E8NP&`=0>\ZC]M!DVQA##3(>%=`!++A=`(CLFT+_B--Y]#$_
M^%R*+L!39OUM`[;-&-Z-^C(>%=#1T;G][GPY]0S_#S"S#:#@W8OP`PXAV\[#
M#3TL\_+Y6P%@`$)ON)`H`(O<PS)?!U"@E(QAV\10/";@R$S1`S(>%=#1T;EM
M-3UD#$XP)AU`];;]#S!##<10/"8`,51OVXOP`PXAV\XC#3TL\_+I)P@0``8@
M](8+B8K;L*V]+Y^3C3Y`X60G`ZSSL2N`#RNP*C[`W:8YACQP%C2?WC*G54R!
M"UN_'VKQNSZ0WD?U,7Y@)3[`W7J1`4BO%]YR->B0%SWL]WKA+9]3VBG*W:9I
M`GOK"UN_'TC_PX=7(NB``RGJ]S],&R5:(N@`!"03T,;@[^@`#UO/'3W,W97<
M_@FQMX;/*NV;HON-2[BPS)>%"PG!%!^P]?LA*[B@WDPQ`5N_'SWL][]^`3WL
MW'K1'7U.PNR!!R9:#P>_'XG,#DYL+I?3$9.K`AOX_V;\`UP/ZCZ/!/=]%J_!
MNU9C+Y,+`WQ0`Y.;`W\``SG@`]1=!PLPN>3]&@:0W@#0XT@4#>$0#0#_#-$`
M\,@P".D``XN0#UW.`S!@W9.+E>$PQO?P#FE7,-1VN^H_G5;@"VJD"(\K`%_1
MY3++`#J@@?8@[@RJQ#D,B<3G"TJ14&-D?W6``:<H`/P\S[?)>P?0)QG==+?[
ML@BP`\%0!]F@Q,$'$P5S8-LI!]T!``F0#Q1S6V]UU;)U$>G@#_$`B3U4/`>V
MG?.J&PGP]??PVKM!!TA`&ZA'!QIPI='@'4+P5DMP#T:@`+7L(FXQ`5:``'F`
M`KIA`?FP#I"D]947#=\H!&$DOP8P`5:``'G0`(O@!(9C!:8'`$(01NN`#1#J
M$TYPAD:@`+0@!&]%NVH%`/V0#I<0#Y`(%\5S8-LI!P:0#[J1`.N@!3Z)7P7P
M8'80#XO@!(QL!09`"S\01G-@6PFP#C[@DW1U`VF%5?O@J64+M?H@T.-0`K2`
MB3RP^+1[5P;!"CI`#'20`3R@`?)I5UCU&04@VT<@#NN0[\)@J^E0`O$P"/E`
M6XC)`TH_J^;@D\6!`6T51O<@#`E1!PG0"!E$"S_P5M0`"PJP#BRP/RS1"!E$
M"S_P5L,P)AE`&PA`6Q_PJC?F'4(01J&\&W[P#TI_`+#0`!`*V98`H9!-"8#@
M!_^P^-NP#G4$B8Q</`>VG7*`(0"0`/F0#J4`#SXI9`OPC4)PI='P5NO@DW3E
M!A`:50=@*P##+_PP=?JP")1G!@'M!`@P#E0`"PK`5'6@!.A@#P/0`Y!N!T@P
M?`*F"W#8`RA`1@.@"\.#:HM`#<%*2XO@!`@@94K/`#NP#W20`6-%#^@P`J41
M!K#0`#NP#R6"*P"@"K"@`%;##^LP#NC0`*4A#JVR#E6P#D7P8%I@#N08!4BT
M`LHP#LAC6\H:`NW*Y1%"<EFP!=>J#\-P&7-@6PFP#A[@D\6Q`,'\`QI0(DW#
M`/F@&QQ0@F.<NV5K!OC0*NEP#.^P"$Z``,6,6G.6#KOP#A!J`+2@K"$P![:5
M`&:F(^#@D\7A,MI0%AI0(DWS#/F@&QRP#LD@F<6S`-M06V3H#P'`PIZZ"W(P
MFC]@FBD@5;A@$35!`*A58NM``FJZVG(@`!$K`)9`D1WQLKA)!/[P/:.$!W"Q
M%HR`#8YP*^4@`+;*PM>V"-[`"-C@"`A=&\,*JZ[0"'70)^_YJC06#2N0#X=@
M.']R#V_(QJ20!/96"A.0#/-`"HM0B/H0*R-Z;8O@#6:]"/[`"-C@",`PK+!:
MK#96&X^99VQ,"DE@;Z4P`<DP#Z2P"(6H#]))QU<P"P&P"$[`R'\R`](P"/FP
M^`'@K>^Y,P<AF<5S8-O9!^BX#P#`!PS@D\6!TZ4A`-$:*V`!#0-@`),D!S60
M`P;P27-0`@4P-5`0#=@0"P,P#>C`"-E`];*T`LO@@(XP#`[#2F&$!7(``20`
M#TC@20!0"8O@`I,4`!8P2</PF.G`".0`B6/I"TIA+^M0`5]!B0M`=IRP#IY1
M'`&`-\:``-DY1G-@#H^IT6(I`_^`"(;O)SZ!#/M3HM4<GQ!0S=#!1`:0"611
M!P2P/_P`"*&JEC9."ST01G,`S;6<`/=`3[25'J$``/F0#LW0#I,P9R5`F_->
M`'60`+=U=``0`>N`#OO3#P'05F$D5W1%`(#@!/S@EI\#=NE0#0%D`-6,7QV0
M"A#QP6A&"\H:`ND@2[<51J&J&T,01NMP!E]A#Y\3G^EQ"@"0"K6<'I\@8WT2
M#=\H!&%T#]G0"!E$"S\01F-2`8#@!_^@`1MX#]EP8]\H!&&$9K2@K"%PI=&@
M&T(01NN`!KIO!/T`%DZ`3BB!J0A@#[PKG_?@%K7<_.%@.!W*`V$T!^EQ`.TP
M"?;`N_)Y#VY1RS!P6V$T,VDY``I`,QW:`V^E#9-@#T;0#WI&`??PVI."B<D0
M`*'J'4/P5K]@#Y\#'3T0JKHQ!&$T9S*0#`RD%P(0"Q!P#VYA<HT"",D``@>V
MG7!U6T='$.E0#/Z@`$[`#X"0#`&`"'<%%L/PK>',#:&P"Y8/#2.04\F`"O'9
M_,D0`,.0!:&P'CM`#'-@`"M`#"/>8+:R#OJ0#LX``$'`:(`0#EN?#^XP!U`[
MQ/S0"HO@#WE&!T*`!#L0#'-0`8L`#0,`#ZV09W1``P,@#%,+%J)$!/ZP#N:P
M"/ZPJ@.0#XG`!*<6#,A8KP4P`/G@#TQ@.,:@48P0#3L0#;AD`K`$"-;S!P(P
M#"9`<X8@``+0`]]#!R6P"/XP`/#0"GF67XO@#TBP`\$P![VP"-`P`/#0"GE&
M!^(P`,(PM6`A2D3@#^M@#G>+`&-"`-RT#A1@`O[@`(:`7Q'`"-C`"->P`\>`
M2R#F`6Z\"#>P#KRP"'=@`+:"#FH``*>+I$H!!$"`">C@!97L#TW`)!RP+);@
M!$ZP#IG`"-C`"-&P`\%06R8P"H``%P?PA0)08L,0!8M0!/Z09XU"^TD0!$&@
M"R!C`CM@`8(@`.@2#>IP[W.6RG)0`0,@#.UZ#](P`L*@[^CP+G6``/<@#=&@
M#G50#K:2!<,@!5&`#AV@%T:_"(8##P,@#TGH#]^3"'?@$]:P`M>@!(E0!?Z`
M!5F@!<,P!5`P`]+@`5(@!4CQ'08@2&4@+@RB#__P`5JP!6R\`-+P7Y)Y#8O@
M#8R`#8Z`T.@BH08PK+!:K-&P`OE05+BT`<#0`0VQ"(6H#[$RHM?&"-C@"`A=
M&\,*J\4:#4D0"<$:*R.*$Z!:&V:]"-^P"$Z``./``*RP9><F#O@@`\``3(LP
M#!K=J5?`,^G`!R/ZH+6QMZ?P#_2+#O*@#UL@*%M@KTS!!OO0((8+B2#@J6;-
M"-#@",`P=%8*#(W@!^`P#ZO`"ELVS0&-#+!0@>%P`-(`#K$P`-/P#@@P!."P
M#N=0EJQPLGI!N@&-#+!0@>%P`-(`#K$P`-/P#B(P!.!`!^;0"$3P#[;:=(O@
M!"[S)Q#J$WZ``)]:2Y.P98*7#XOO``L@#7F@`+#0`JJ@2I1O^=I059(P`](P
M)@)P#_$P"?<0#Y)P"--``##``SFPKP1P`JJP",*P`,-0!^(@VT_`"M[-S__0
M"$"]`\<@!_*`!;;:="/JJ6=M<G6``[\P21#J$W^"!/*)#E/@K">P#DC0I9X`
M`$B@+>%5]SOX(`Q`=LWN!7,``R]+`'#D"0`P!V$H#3NTB9FP#AVP"-HP",/P
M`-&P#;$P`-.P#K2`!&^5#I(`C(EPL:/D"58*#`=@JTVW"$[``%65`T^XJB]+
M`'#D":8I#_FP#C^P"-HP`!P@!SFP"-.`4^&U0SG@`9\T!R8P",/P`-&P#>S%
M7NP57G60``.0#:$@2P3F",#`2F_5`.%5!PYB`9\D"8?00]'P7Y"``$TP!2`@
M!77@!BU`!6G0!F4``DR0!F(@!V$@!WD``BT``D/P!G"0!W*0!F>`!G0``B@P
M!BD``C&0`SAP`\_?!&DP!G+P!G/P!F9`!R`P!&\@!W"0$9"P`--0F@"@1AK!
M!).TJ%]@!$G`!$7P!4G@!$;P!!JA`11@CQLAD1I1`>8``&HT!!J1`+"`>I#@
M`EP``%P``*(`<J+`NAIQ``+0$9!@`&^A$;@-$9#P%@<!"7@0T2H!"73`"QVQ
M$18@``*``0V0``RP$0>``!9@`?\@`0T@`3:I`C\``"X``"[@`AHQ`"C@!G7`
M!FR0`@"``FY0!VS`!BGPL"T``B.@$1.0$)!``*[@`*[@`*[@`*[@`*[`K9!@
M`5P0`B4P!SI0`G.@`R`@!&%`!B#P!G!`!VGP!FZ`>NHY!SH``D,0!F[@!F]`
M!R`P!V5`!VWP!F10!B#P!FX``G-`!V20!DQV$2@P!W1`!FG@!BD``"@P!W1`
M!FG@!BF@%V7@!F6`!RY`!VW0Y'*0%^HY!SH``B4P!SH``D,0!FYP`G0``F\`
M!V7@!JAW!WFA%V7@!F6`!RY`!VW0Y'10!FY0!GC@`G30!DU>`G.@`R!0`G.@
M`R`P!&'@!B=`!R#P!G!0!FZ`>B4P!SH``B4P!SH``D,0!FYP`G1`.6[`!FG@
M!N&F%V7@!F6`!RY`!VW0Y"4P!SH``B4P!SH``D,0!FYP`G0@KV7@!F'0!F6`
M>B4P!SH``B4P!Q<!`BA`!V6`!W0``FWP!F10!BF`>B"``F*0!FX0!G*0!R#0
M!F]`!F60`JA7`G.@`R```WA0`GB@`R!P!6$@!VZ0!FYP!L]?!VX`!V&0!G)0
M!F0``F7@!F20!FYP!B#@!FD@!F+`!F4``FG@!B!@!FG`!F4``B4P7NHY!SH`
M`C"`!R6`!SH``E<0!G+@!FG@!F?P_&[P!FZ@!V4@!V\``FZ0!F(@!FQ0!B!`
M!FDP!V,0!G)`!F5`!B!@!G+P!FT``F:0!FQ0!B!0`N.EGG.@`R```WA0`GB@
M`R!P!6$@!VZ0!FYP!L^?!FXP!F_0!G#`!F5`!V4``F7@!F20!FYP!B`@!GE`
M!V4``FG@!B!@!FG`!F4``B4P7NHY!SH``E<0!G+@!FG@!F?P_&[P!FZ@!V4@
M!V\``F*0!G0``F20!G,P!F$@!V10!F0``F8@!V_0!B!@!FG`!F4``B4P7A?!
M`SS@!$TP!4>@HB8G!38``S"``PV@`"T``F[P!G0``F7@!F]0!V>`!B`P!W`0
M!F-0!B!@!F\@!R`0!G)P!G70!F7@!G0`KZBW$5)@`S"P$0V@`"T``G-`!V$P
M!FL``F]@!V4@!V;`!F]P!PV`>A`A!38``S`P`PV@`"T``FG@!G10!F=0!G(`
M`F20!G:0!F10!B`@!GD``C#0`*@WGE)@`S```SG0``K0`B#@!F]`!R!0!F[P
M!G5P!F@``G,`!V$P!F4``F;P!G(``F7@!G:0!G+P!F[0!F7@!DB*>B7:`*C'
M$G)0!V[`*&G0!F4``F4@!W+P!G*0$"HA!38``S`@`PV@`"T``F;`!F\0!G20
M!FYP!B``!V^0!FY`!R#@!F]`!R#`!F\0!F10!F30`*C7$5)@`S```S'0``K0
L`B#@!G7`!FP``G#P!FG@!G10!G(``F$P!W.0!F?@!FU0!FZ`I*C')@,`&@#0
`
end
END--cut here--cut here