# This is a shell archive.  Remove anything before this line,
# then unpack it by saving it in a file and typing "sh file".
#
# Wrapped by Carlton Doe <carlton@iiug.org> on Wed Jun  2 17:24:43 1999
#
# This archive contains:
#	READER.C	WRITER.C	
#

LANG=""; export LANG
PATH=/bin:/usr/bin:/usr/sbin:/usr/ccs/bin:$PATH; export PATH


rm -f /tmp/uud$$
(echo "begin 666 /tmp/uud$$\n#;VL*n#6%@x\n \nend" | uudecode) >/dev/null 2>&1
if [ X"`cat /tmp/uud$$ 2>&1`" = Xok ]
then
	unpacker=uudecode
else
	echo Compiling unpacker for non-ascii files
	pwd=`pwd`; cd /tmp
	cat >unpack$$.c <<'EOF'
#include <stdio.h>
#define C (*p++ - ' ' & 077)
main()
{
	int n;
	char buf[128], *p, a,b;

	scanf("begin %o ", &n);
	gets(buf);

	if (freopen(buf, "w", stdout) == NULL) {
		perror(buf);
		exit(1);
	}

	while (gets(p=buf) && (n=C)) {
		while (n>0) {
			a = C;
			if (n-- > 0) putchar(a << 2 | (b=C) >> 4);
			if (n-- > 0) putchar(b << 4 | (a=C) >> 2);
			if (n-- > 0) putchar(a << 6 | C);
		}
	}
	exit(0);
}
EOF
	cc -o unpack$$ unpack$$.c
	rm unpack$$.c
	cd $pwd
	unpacker=/tmp/unpack$$
fi
rm -f /tmp/uud$$

echo x - READER.C '[non-ascii]'
$unpacker <<'@eof'
begin 666 READER.C
M+RH-"B J(%!R;V=R86T@=&\@9&\@9&ES:R!R96%D<R!F;W(@<&5R9F]R;6%NX
M8V4@;65A<W5R96UE;G1S#0H@*B!5<V%G93H@<F5A9&5R(%LM8B!B=69S:7IEX
M72!;+6X@;FQO;W!S72!;+6T@;6EN72!;+4T@;6%X70T*("H@(" @(" @(%LMX
M=ET@6RUS('-E961\/7-E<7QF:6QE72!F:6QE#0H@*B!4:&4@=&AR964@<F5AX
M9"!M;V1E<R!A<F4Z#0H@*B @+7,@<V5E9" @+2UD;R!R86YD;VT@<F5A9',LX
M('-E960@=&AE(&=E;F5R871O<B!U<VEN9R!S965D#0H@*B @+7,@/7-E<2 @X
M+2UD;R!S97%U96YT:6%L(')E861S#0H@*B @+7,@9FEL92 @+2UR96%D(&9IX
M;&4@=&\@9V5T(&)U9F9E<B!N=6UB97)S('1O(')E860-"B J(%1H92!D969AX
M=6QT(&ES(')A;F1O;2!R96%D<R!W:71H('-E960@;V8@,"X-"B J+PT*#0HCX
M:6YC;'5D92 \<W1D:6\N:#X-"@T*:6YT(&)U9G-I>F4@/2 R,#0X.R @(" @X
M+RH@<F5A9"!B=69F97(@<VEZ92 J+PT*;&]N9R!N;&]O<',@/2 Q,# P.R @X
M(" @+RH@;G5M8F5R(&]F(')E861S("HO#0IL;VYG(&UI;B ](# [(" @(" @X
M(" @(" O*B!M:6YI;75M(&)U9F9E<B!O9F9S970@=&\@<F5A9" J+PT*;&]NX
M9R!M87@@/2 U,3(P,#L@(" @(" @+RH@;6%X:6UU;2!B=69F97(@;V9F<V5TX
M('1O(')E860@*B\-"F-H87(@*F9I;&4[(" @(" @(" @(" @("\J(&9I;&4@X
M=&\@<F5A9"!F<F]M("HO#0II;G0@=F5R8F]S93L@(" @(" @(" @(" O*B!IX
M9B!S970L('!R:6YT(&)U9F9E<B!N=6UB97)S(&)E:6YG(')E860@*B\-"FENX
M="!S97%U96YT:6%L.R @(" @(" @("\J(&EF('-E="P@9&\@<V5Q=65N=&EAX
M;"!R96%D<R J+PT*1DE,12 J<V9I;&4[(" @(" @(" @(" @+RH@:68@<V5TX
M+"!F:6QE('-F:6QE('1O(&=E="!B=69F97(@;G5M8F5R<R J+PT*:6YT('-EX
M960[(" @(" @(" @(" @(" @+RH@;W1H97)W:7-E('5S92!S965D('1O(&1OX
M(')A;F1O;2!R96%D<R J+PT*#0IE>'1E<FX@;&]N9R!A=&]L*"D[#0H-"G9OX
M:60-"G!E<G)O<E]E>&ET*',I#0H@(" @8VAA<B J<SL-"GL-"B @("!P97)RX
M;W(H<RD[#0H@(" @97AI="@R*3L-"GT-"@T*=F]I9 T*=7-A9V4H*0T*>PT*X
M(" @(&9P<FEN=&8H<W1D97)R+ T*(" @(")U<V%G93H@<F5A9&5R(%LM8B!BX
M=69S:7IE72!;+6X@;FQO;W!S72!;+6T@;6EN72!;+4T@;6%X72!;+79=(%LMX
M<R!S965D?#US97%\9FEL95T@9FEL95QN(BD[#0H@(" @97AI="@Q*3L-"GT-X
M"@T*;&]N9PT*<V-A;&5D7V%T;VPH<RD-"B @("!C:&%R("IS.PT*>PT*(" @X
M(&EN="!S;#L-"B @("!L;VYG(&X[#0H-"B @("!N(#T@871O;"AS*3L-"B @X
M("!S;" ]('-T<FQE;BAS*3L-"B @("!I9B H<VPI#0H@(" @(" @('L-"B @X
M(" @(" @<W=I=&-H("AS6W-L+3%=*0T*(" @(" @(" @(" @>PT*(" @(" @X
M(" @(" @8V%S92 G8B<Z#0H@(" @(" @(" @(" @(" @;B J/2 U,3([#0H@X
M(" @(" @(" @(" @(" @8G)E86L[#0H@(" @(" @(" @("!C87-E("=K)SH-X
M"B @(" @(" @(" @(" @("!N("H](#$P,C0[#0H@(" @(" @(" @(" @(" @X
M8G)E86L[#0H@(" @(" @(" @("!]#0H@(" @(" @('T-"B @("!R971U<FX@X
M;CL-"GT-"@T*=F]I9 T*9V5T87)G<RAA<F=C+"!A<F=V*0T*(" @(&-H87(@X
M*BIA<F=V.PT*>PT*(" @(&5X=&5R;B!C:&%R("IO<'1A<F<[#0H@(" @97ATX
M97)N(&EN="!O<'1I;F0[#0H@(" @:6YT(&D[#0H-"B @("!W:&EL92 H*&D@X
M/2!G971O<'0H87)G8RP@87)G=BP@(F(Z;CIM.DTZ=G,Z(BDI("$]("TQ*0T*X
M(" @(" @("![#0H@(" @(" @('-W:71C:" H:2D-"B @(" @(" @(" @('L-X
M"B @(" @(" @(" @(&-A<V4@)V@G.@T*(" @(" @(" @(" @8V%S92 G/R<ZX
M#0H@(" @(" @(" @(" @(" @=7-A9V4H*3L-"B @(" @(" @(" @(" @("!BX
M<F5A:SL-"B @(" @(" @(" @(&-A<V4@)V(G.@T*(" @(" @(" @(" @(" @X
M(&)U9G-I>F4@/2!S8V%L961?871O;"AO<'1A<F<I.PT*(" @(" @(" @(" @X
M(" @(&)R96%K.PT*(" @(" @(" @(" @8V%S92 G;B<Z#0H@(" @(" @(" @X
M(" @(" @;FQO;W!S(#T@871O;"AO<'1A<F<I.PT*(" @(" @(" @(" @(" @X
M(&)R96%K.PT*(" @(" @(" @(" @8V%S92 G;2<Z#0H@(" @(" @(" @(" @X
M(" @;6EN(#T@871O;"AO<'1A<F<I.PT*(" @(" @(" @(" @(" @(&)R96%KX
M.PT*(" @(" @(" @(" @8V%S92 G32<Z#0H@(" @(" @(" @(" @(" @;6%XX
M(#T@871O;"AO<'1A<F<I.PT*(" @(" @(" @(" @(" @(&)R96%K.PT*(" @X
M(" @(" @(" @8V%S92 G=B<Z#0H@(" @(" @(" @(" @(" @=F5R8F]S92 ]X
M(#$[#0H@(" @(" @(" @(" @(" @8G)E86L[#0H@(" @(" @(" @("!C87-EX
M("=S)SH-"B @(" @(" @(" @(" @("!I9B H<V5Q=65N=&EA;"!\?"!S9FELX
M92D-"B @(" @(" @(" @(" @(" @(" @=7-A9V4H*3L-"B @(" @(" @(" @X
M(" @("!I9B H<W1R8VUP*&]P=&%R9RP@(CUS97$B*2 ]/2 P*0T*(" @(" @X
M(" @(" @(" @(" @("!S97%U96YT:6%L(#T@,3L-"B @(" @(" @(" @(" @X
M("!E;'-E(&EF("AS9FEL92 ](&9O<&5N*&]P=&%R9RP@(G(B*2D-"B @(" @X
M(" @(" @(" @(" @(" @.PT*(" @(" @(" @(" @(" @(&5L<V4-"B @(" @X
M(" @(" @(" @(" @(" @<V5E9" ](&%T;VDH;W!T87)G*3L-"B @(" @(" @X
M(" @(" @("!B<F5A:SL-"B @(" @(" @(" @('T-"B @(" @(" @?0T*#0H@X
M(" @:68@*&]P=&EN9" A/2 H87)G8RTQ*2D-"B @(" @(" @=7-A9V4H*3L-X
M"B @("!F:6QE(#T@87)G=EMO<'1I;F1=.PT*?0T*#0IM86EN*&%R9V,L(&%RX
M9W8I#0H@(" @8VAA<B J*F%R9W8[#0I[#0H@(" @;&]N9R!I+"!N.PT*(" @X
M(&EN="!F9#L-"B @("!C:&%R("IB=68L("IM86QL;V,H*3L-"@T*(" @(&=EX
M=&%R9W,H87)G8RP@87)G=BD[#0H-"B @("!I9B H*&9D(#T@;W!E;BAF:6QEX
M+" P*2D@/" P*0T*(" @(" @("!P97)R;W)?97AI="@B;W!E;B(I.PT*#0H@X
M(" @:68@*"AB=68@/2!M86QL;V,H8G5F<VEZ92DI(#T](# I#0H@(" @(" @X
M('!E<G)O<E]E>&ET*")M86QL;V,B*3L-"@T*(" @(&EF("@A<V5Q=65N=&EAX
M;" F)B A<V9I;&4I#0H@(" @(" @('-R86YD*'-E960I.PT*#0H@(" @;B ]X
M(&UI;CL-"B @("!F;W(@*&D@/2 P.R!I(#P@;FQO;W!S.R!I*RLI#0H@(" @X
M(" @('L-"B @(" @(" @:6YT(&YR96%D.PT*#0H@(" @(" @("\J#0H@(" @X
M(" @(" J($1O(&$@<F5A9 T*(" @(" @(" @*B\-"B @(" @(" @:68@*'9EX
M<F)O<V4I#0H@(" @(" @(" @("!P<FEN=&8H(B5L9%QN(BP@;BD[#0H-"B @X
M(" @(" @:68@*&QS965K*&9D+" H;&]N9RD@;B J(&)U9G-I>F4L(# I(#P@X
M,"D-"B @(" @(" @(" @('!E<G)O<E]E>&ET*")L<V5E:R(I.PT*#0H@(" @X
M(" @(&YR96%D(#T@<F5A9"AF9"P@8G5F+"!B=69S:7IE*3L-"@T*(" @(" @X
M("!I9B H;G)E860@/" P*0T*(" @(" @(" @(" @<&5R<F]R7V5X:70H(G)EX
M860B*3L-"B @(" @(" @:68@*&YR96%D("$](&)U9G-I>F4I#0H@(" @(" @X
M(" @("!P97)R;W)?97AI="@B<VAO<G0@<F5A9"(I.PT*#0H@(" @(" @("\JX
M#0H@(" @(" @(" J($1E=&5R;6EN92!N97AT(&)U9F9E<B!T;R!R96%D#0H@X
M(" @(" @(" J+PT*(" @(" @("!I9B H<V5Q=65N=&EA;"D-"B @(" @(" @X
M(" @('L-"B @(" @(" @(" @(&X@/2 H;BLQ*2 E(&UA>#L-"B @(" @(" @X
M(" @(&EF("AN(#T](# I#0H@(" @(" @(" @(" @(" @;B ](&UI;CL-"B @X
M(" @(" @(" @('T-"B @(" @(" @96QS92!I9B H<V9I;&4I#0H@(" @(" @X
M(" @("![#0H@(" @(" @(" @("!I9B H9G-C86YF*'-F:6QE+" B)61<;B(LX
M("9N*2 A/2 Q*0T*(" @(" @(" @(" @(" @(&)R96%K.PT*(" @(" @(" @X
M(" @?0T*(" @(" @("!E;'-E#0H@(" @(" @(" @("![#0H@(" @(" @(" @X
M("!N(#T@<F%N9"@I("4@;6%X("L@;6EN.PT*(" @(" @(" @(" @?0T*(" @X
:(" @("!]#0H@(" @<F5T=7)N(# [#0I]#0H*                        X
                                                             X
end
@eof

chmod 666 READER.C

echo x - WRITER.C '[non-ascii]'
$unpacker <<'@eof'
begin 666 WRITER.C
M+RH-"B J(%!R;V=R86T@=&\@9&\@9&ES:R!W<FET97,@9F]R('!E<F9O<FUAX
M;F-E(&UE87-U<F5M96YT<PT*("H@57-A9V4Z('=R:71E<B!;+6(@8G5F<VEZX
M95T@6RUN(&YL;V]P<UT@6RUM(&UI;ET@6RU-(&UA>%T-"B J(" @(" @("!;X
M+79=(%LM<R!S965D?#US97%\9FEL95T@9FEL90T*("H@5&AE('1H<F5E('=RX
M:71E(&UO9&5S(&%R93H-"B J(" M<R!S965D(" M+61O(')A;F1O;2!W<FETX
M97,L('-E960@=&AE(&=E;F5R871O<B!U<VEN9R!S965D#0H@*B @+7,@/7-EX
M<2 @+2UD;R!S97%U96YT:6%L('=R:71E<PT*("H@("US(&9I;&4@("TM=W)IX
M=&4@9FEL92!T;R!G970@8G5F9F5R(&YU;6)E<G,@=&\@=W)I=&4-"B J(%1HX
M92!D969A=6QT(&ES(')A;F1O;2!W<FET97,@=VET:"!S965D(&]F(# N#0H@X
M*B\-"@T*(VEN8VQU9&4@/'-T9&EO+F@^#0H-"FEN="!B=69S:7IE(#T@,C TX
M.#L@(" @("\J('=R:71E(&)U9F9E<B!S:7IE("HO#0IL;VYG(&YL;V]P<R ]X
M(#$P,# [(" @(" O*B!N=6UB97(@;V8@=W)I=&5S("HO#0IL;VYG(&UI;B ]X
M(# [(" @(" @(" @(" O*B!M:6YI;75M(&)U9F9E<B!O9F9S970@=&\@=W)IX
M=&4@*B\-"FQO;F<@;6%X(#T@-3$R,# [(" @(" @("\J(&UA>&EM=6T@8G5FX
M9F5R(&]F9G-E="!T;R!W<FET92 J+PT*8VAA<B J9FEL93L@(" @(" @(" @X
M(" @+RH@9FEL92!T;R!W<FET92!F<F]M("HO#0II;G0@=F5R8F]S93L@(" @X
M(" @(" @(" O*B!I9B!S970L('!R:6YT(&)U9F9E<B!N=6UB97)S(&)E:6YGX
M('=R:71T96X@*B\-"FEN="!S97%U96YT:6%L.R @(" @(" @("\J(&EF('-EX
M="P@9&\@<V5Q=65N=&EA;"!W<FET97,@*B\-"D9)3$4@*G-F:6QE.R @(" @X
M(" @(" @("\J(&EF('-E="P@9FEL92!S9FEL92!T;R!G970@8G5F9F5R(&YUX
M;6)E<G,@*B\-"FEN="!S965D.R @(" @(" @(" @(" @("\J(&]T:&5R=VESX
M92!U<V4@<V5E9"!T;R!D;R!R86YD;VT@=W)I=&5S("HO#0H-"F5X=&5R;B!LX
M;VYG(&%T;VPH*3L-"@T*=F]I9 T*<&5R<F]R7V5X:70H<RD-"B @("!C:&%RX
M("IS.PT*>PT*(" @('!E<G)O<BAS*3L-"B @("!E>&ET*#(I.PT*?0T*#0IVX
M;VED#0IU<V%G92@I#0I[#0H@(" @9G!R:6YT9BAS=&1E<G(L#0H@(" @(G5SX
M86=E.B!W<FET97(@6RUB(&)U9G-I>F5=(%LM;B!N;&]O<'-=(%LM;2!M:6Y=X
M(%LM32!M87A=(%LM=ET@6RUS('-E961\/7-E<7QF:6QE72!F:6QE7&XB*3L-X
M"B @("!E>&ET*#$I.PT*?0T*#0IL;VYG#0IS8V%L961?871O;"AS*0T*(" @X
M(&-H87(@*G,[#0I[#0H@(" @:6YT('-L.PT*(" @(&QO;F<@;CL-"@T*(" @X
M(&X@/2!A=&]L*',I.PT*(" @('-L(#T@<W1R;&5N*',I.PT*(" @(&EF("ASX
M;"D-"B @(" @(" @>PT*(" @(" @("!S=VET8V@@*'-;<VPM,5TI#0H@(" @X
M(" @(" @("![#0H@(" @(" @(" @("!C87-E("=B)SH-"B @(" @(" @(" @X
M(" @("!N("H](#4Q,CL-"B @(" @(" @(" @(" @("!B<F5A:SL-"B @(" @X
M(" @(" @(&-A<V4@)VLG.@T*(" @(" @(" @(" @(" @(&X@*CT@,3 R-#L-X
M"B @(" @(" @(" @(" @("!B<F5A:SL-"B @(" @(" @(" @('T-"B @(" @X
M(" @?0T*(" @(')E='5R;B!N.PT*?0T*#0IV;VED#0IG971A<F=S*&%R9V,LX
M(&%R9W8I#0H@(" @8VAA<B J*F%R9W8[#0I[#0H@(" @97AT97)N(&-H87(@X
M*F]P=&%R9SL-"B @("!E>'1E<FX@:6YT(&]P=&EN9#L-"B @("!I;G0@:3L-X
M"@T*(" @('=H:6QE("@H:2 ](&=E=&]P="AA<F=C+"!A<F=V+" B8CIN.FTZX
M33IV<SHB*2D@(3T@+3$I#0H@(" @(" @('L-"B @(" @(" @<W=I=&-H("AIX
M*0T*(" @(" @(" @(" @>PT*(" @(" @(" @(" @8V%S92 G:"<Z#0H@(" @X
M(" @(" @("!C87-E("<_)SH-"B @(" @(" @(" @(" @("!U<V%G92@I.PT*X
M(" @(" @(" @(" @(" @(&)R96%K.PT*(" @(" @(" @(" @8V%S92 G8B<ZX
M#0H@(" @(" @(" @(" @(" @8G5F<VEZ92 ]('-C86QE9%]A=&]L*&]P=&%RX
M9RD[#0H@(" @(" @(" @(" @(" @8G)E86L[#0H@(" @(" @(" @("!C87-EX
M("=N)SH-"B @(" @(" @(" @(" @("!N;&]O<',@/2!A=&]L*&]P=&%R9RD[X
M#0H@(" @(" @(" @(" @(" @8G)E86L[#0H@(" @(" @(" @("!C87-E("=MX
M)SH-"B @(" @(" @(" @(" @("!M:6X@/2!A=&]L*&]P=&%R9RD[#0H@(" @X
M(" @(" @(" @(" @8G)E86L[#0H@(" @(" @(" @("!C87-E("=-)SH-"B @X
M(" @(" @(" @(" @("!M87@@/2!A=&]L*&]P=&%R9RD[#0H@(" @(" @(" @X
M(" @(" @8G)E86L[#0H@(" @(" @(" @("!C87-E("=V)SH-"B @(" @(" @X
M(" @(" @("!V97)B;W-E(#T@,3L-"B @(" @(" @(" @(" @("!B<F5A:SL-X
M"B @(" @(" @(" @(&-A<V4@)W,G.@T*(" @(" @(" @(" @(" @(&EF("ASX
M97%U96YT:6%L('Q\('-F:6QE*0T*(" @(" @(" @(" @(" @(" @("!U<V%GX
M92@I.PT*(" @(" @(" @(" @(" @(&EF("AS=')C;7 H;W!T87)G+" B/7-EX
M<2(I(#T](# I#0H@(" @(" @(" @(" @(" @(" @('-E<75E;G1I86P@/2 QX
M.PT*(" @(" @(" @(" @(" @(&5L<V4@:68@*'-F:6QE(#T@9F]P96XH;W!TX
M87)G+" B<B(I*0T*(" @(" @(" @(" @(" @(" @(" [#0H@(" @(" @(" @X
M(" @(" @96QS90T*(" @(" @(" @(" @(" @(" @("!S965D(#T@871O:2AOX
M<'1A<F<I.PT*(" @(" @(" @(" @(" @(&)R96%K.PT*(" @(" @(" @(" @X
M?0T*(" @(" @("!]#0H-"B @("!I9B H;W!T:6YD("$]("AA<F=C+3$I*0T*X
M(" @(" @("!U<V%G92@I.PT*(" @(&9I;&4@/2!A<F=V6V]P=&EN9%T[#0I]X
M#0H-"FUA:6XH87)G8RP@87)G=BD-"B @("!C:&%R("HJ87)G=CL-"GL-"B @X
M("!L;VYG(&DL(&X[#0H@(" @:6YT(&9D.PT*(" @(&-H87(@*F)U9BP@*FUAX
M;&QO8R@I.PT*#0H@(" @9V5T87)G<RAA<F=C+"!A<F=V*3L-"@T*(" @(&EFX
M("@H9F0@/2!O<&5N*&9I;&4L(#$I*2 \(# I#0H@(" @(" @('!E<G)O<E]EX
M>&ET*")O<&5N(BD[#0H-"B @("!I9B H*&)U9B ](&UA;&QO8RAB=69S:7IEX
M*2D@/3T@,"D-"B @(" @(" @<&5R<F]R7V5X:70H(FUA;&QO8R(I.PT*#0H@X
M(" @:68@*"%S97%U96YT:6%L("8F("%S9FEL92D-"B @(" @(" @<W)A;F0HX
M<V5E9"D[#0H-"B @("!N(#T@;6EN.PT*(" @(&9O<B H:2 ](# [(&D@/"!NX
M;&]O<',[(&DK*RD-"B @(" @(" @>PT*(" @(" @("!I;G0@;G=R:71E.PT*X
M#0H@(" @(" @("\J#0H@(" @(" @(" J($1O(&$@=W)I=&4-"B @(" @(" @X
M("HO#0H@(" @(" @(&EF("AV97)B;W-E*0T*(" @(" @(" @(" @<')I;G1FX
M*"(E;&1<;B(L(&XI.PT*#0H@(" @(" @(&EF("AL<V5E:RAF9"P@*&QO;F<IX
M(&X@*B!B=69S:7IE+" P*2 \(# I#0H@(" @(" @(" @("!P97)R;W)?97AIX
M="@B;'-E96LB*3L-"@T*(" @(" @("!N=W)I=&4@/2!W<FET92AF9"P@8G5FX
M+"!B=69S:7IE*3L-"@T*(" @(" @("!I9B H;G=R:71E(#P@,"D-"B @(" @X
M(" @(" @('!E<G)O<E]E>&ET*")W<FET92(I.PT*(" @(" @("!I9B H;G=RX
M:71E("$](&)U9G-I>F4I#0H@(" @(" @(" @("!P97)R;W)?97AI="@B<VAOX
M<G0@=W)I=&4B*3L-"@T*(" @(" @(" O*@T*(" @(" @(" @*B!$971E<FUIX
M;F4@;F5X="!B=69F97(@=&\@=W)I=&4-"B @(" @(" @("HO#0H@(" @(" @X
M(&EF("AS97%U96YT:6%L*0T*(" @(" @(" @(" @>PT*(" @(" @(" @(" @X
M;B ]("AN*S$I("4@;6%X.PT*(" @(" @(" @(" @:68@*&X@/3T@,"D-"B @X
M(" @(" @(" @(" @("!N(#T@;6EN.PT*(" @(" @(" @(" @?0T*(" @(" @X
M("!E;'-E(&EF("AS9FEL92D-"B @(" @(" @(" @('L-"B @(" @(" @(" @X
M(&EF("AF<V-A;F8H<V9I;&4L("(E9%QN(BP@)FXI("$](#$I#0H@(" @(" @X
M(" @(" @(" @8G)E86L[#0H@(" @(" @(" @("!]#0H@(" @(" @(&5L<V4-X
M"B @(" @(" @(" @('L-"B @(" @(" @(" @(&X@/2!R86YD*"D@)2!M87@@X
M*R!M:6X[#0H@(" @(" @(" @("!]#0H@(" @(" @('T-"B @("!R971U<FX@X
',#L-"GT-"@H@                                                X
                                                             X
end
@eof

chmod 666 WRITER.C

rm -f /tmp/unpack$$
exit 0