[comp.sys.cbm] Forth In Geos - here it is! part 1 of 3

anderson@ncrcce.StPaul.NCR.COM (Joel Peter Anderson) (10/25/89)

This is the uuencoded version of geosforth by Nicholas Vrtis.
Accompanying this file are two text documents that make up the
user documentation.  I have chosen to 'un-geosize' the text
to make it readable/usable/printable on any system.  (I thought
that if you are [probably] acquiring this binary where you cannot
use it [work/school] that you might as well be able to study the
documentation.)

A couple of notes:

    1)I find that I have disk problems IF AND ONLY IF
	I enter Forth from a 'mini' desktop.  If I enter
	from the 'real' desktop program it works fine. (this
	may be my fault; I use a bootable copy of Geos that
	bypasses the normal boot process)

    2)This file must a) be uudecoded b)transferred as a 
	binary image to your Commodore. c) converted from
	'normal' CBM format to Geos using the utility I
	uploaded recently to the Net.












----------------------Cut HERE------------------------
begin 644 geoforth.prg
M@PH&1T5/4T9/4E1(H*"@H*"@H H3  99!QT/*2  4T51(&9O<FUA='1E9"!'
M14]3(&9I;&4@5C$N,   B0!F "   .   0." $U)3E5400              
MUH>-UH?(F!AE H4"D +F V!#H*"@H*"@H P  0=9!QT) M$ 4P"#%Q%024Q&
M34%.+D53H*"@H*"@%PD!"%D)% 4=*@!"3$%35$52)U,@0T].5D525$52(%8R
M+C4&60,1!@$4                                                
M                                       #%;____^   .[NX.JJ@.[
MJX.**(.[NX.   .##@.!"@.!"@.#K@.X 2.@ Z.SN3NBL2NBH2NCH2N   /_
M______^#!@  !$ B @1G96]S1D]25$@@5C$N,        $YI8VAO;&%S($HN
M(%9R=&ES                                                    
M         &9I9T9/4E1((&9O<B!'14]3#2AC*2!.:6-H;VQA<R!*+B!6<G1I
M<R Q.3@Y#55S97(@4W5P<&]R=&5D                                
M                  ($6*D C:&$C:*$A3R%.H4[((K!((W!(*C!!0T!    
M S\!QP4. 1@ & ,H ; %  $P # #$ &8!DL 1AAG96]S1D]25$@@5C$N," ;
M*&,I(#$Y.#D62P!5&$YI8VAO;&%S($HN(%9R=&ES%DL 7S4X-C,@4&EN971R
M964@4RY%+A9+ &E+96YT=V]O9"P@34D@-#DU,#@62P!X57-E<B!3=7!P;W)T
M960@+2!396YD("0Q,"!&96462P"'$E!R97-S(&%N>2!K97D@=&\@<W1A<G0;
M ""GPJKP^CBMJPOMMPN% JVL"^VX"X4#K;<+A02MN N%!2"'P:D C9F$C9J$
MK)\+A *LH N$ Z _D0*($/M,EA0V(@E?'P! (D BX1,   H ^P#_ /\ [@#[
M /\ ^P#C /T _P#_ /\ ^P#M_P3_ /^#;&GT  !-!;'[2.;[T +F_+'[YOO0
M N;\RLJ=8U]HG6)?H &Q^X5RB+'[A7$8I?MI H7[D +F_$QP (1C;&GT106)
M!;'[2)CPR:D!+*D""HTE!;UB7YES .C(S"4%T/.@ &"'97AE8W5TY8 %M 6]
M8E^%<;UC7X5RZ.A,< "&8G)A;F/HJ 7.!1BQ^V7[2,BQ^V7\A?QHA?M,:06'
M,&)R86YCZ,,%[07HZ+U@7QUA7_#7&*7[:0*%^Y "YOQ,9P6&*&QO;W"IX040
M!HXF!;K^ 0'0 _X" 1B] P'] 0&]! '] @&N)@4*D)]H:&AH3/<%AR@K;&]O
M<*D%!D(&Z.B.)@6]85](2+U@7[KHZ!A] 0&= 0%H?0(!G0(!:!"Y&+T! ?T#
M ;T" ?T$ 4PI!H0H9&^I-@9\!KUE7TB]9%](O6-?2+UB7TCHZ.CH3&<%@>ES
M!J,)A61I9VGTDP:C!CB]9%_I,# :R0HP!SCI!\D*, _=8E\0"IUD7ZD!2)A,
M8 682.CH3& %ABAF:6YDJ9D&UP8@D@6.)@6@ +%S474I/] QR+%S474*T">0
M]JXF!<K*RLH8F&D%97.=9%^@ )B=8U]E=)UE7[%SG6)?J0%,)0FP!<BQ<Q#[
MR+%SJLBQ<X5TAG,%<]"QKB8%J0!,)0F'96YC;&]SY<P&0 <@D@6*..D(JH1W
MT ?(T 3F=N9WL77%<_#SF)UF7Z5WG6=?F)UD7Z5WG65?L770%YC=9E_0'*5W
MW6=?T!7^9%_0$/YE7] +R- $YG;F=\5ST-&8G6)?I7>=8U],9P6$96UI]#0'
MI@>@#+']A1C(L?V%&: .L?V%!;UB7XXF!2!%P: ,I1B1_<BE&9']KB8%3(X&
M@VME^9T'V0>.)@4@I\*J\/JN)@5,)0F"8_+1!^\'CB8%(/@'3,$@H RE-9']
MR*4VD?V@#ABQ_64IQ32P Y']8$S>((5C;6]VY>@''@BI R"4!<1ST ?&=! #
M3&<%L7>1=<C0[N9XYG9,(PB"=:H4"$,(O61?A7.]95^%=)B=9%^=95^@$!YD
M7SYE7SYB7SYC7Y 9&*5S?61?G61?I71]95^=95^I 'UB7YUB7XC0UDQG!8)U
MKSP(B@B\9E^]9%^=9E^8"IUD7[QG7[UE7YUG7Y@JG65?J1"%<SYF7SYG7SB]
M9E_]8E^HO6=?_6-?D >=9U^8G69?/F1?/F5?QG/0V4R.!H-A;N2#"-P(O6)?
M/61?2+UC7SUE7TS'!H)O\M0(\PB]8E\=9%](O6-?'65?3,<&@WAO\NP(2 P)
MO6)?761?2+UC7UUE7TS'!H-S<, #"20)BDBI $Q>!8-S<*$<"3,)KNP+3&<%
M@W)PH2L)00F*HO^:JDQG!8([\SD)4 EHA?MHA?Q,9P6%;&5A=N5)"6,)BDBZ
MO0(!G00!O0,!G04!:*I,9P6"/O)9"7X)O6-?2+UB7TA,C@:"<KYW"9 )RLIH
MG6)?:)UC7TQG!8'RB0FC"8XF!;J] 0%(O0(!KB8%3%X%@C"]G0F[";UB7QUC
M7] !R)CHZ$PE"8(PO+0)T0F]8U\P[1#L@:O*"=X)&+UB7WUD7YUD7[UC7WUE
M7YUE7TR.!H5M:6YU\]@)_@DXF/UB7YUB7YC]8U^=8U],9P6$;W9E\O0)&0J]
M9%](O65?3%X%A&1R;_ 0"HX&A'-W8? C"C4*O61?2+UB7YUD7[QE7[UC7YUE
M7YA,8 6#9'7P+ I4"KUB7TB]8U],7@6"*Z%,"F4*()(%&+%S9761<\BQ<V5V
MD7-,9P6&=&]G9VSE7@J$"B"2!;%U17.1=4QG!8' >0J6"B"/!;%S2,BQ<TQ>
M!8)CP) *J0H@CP6Q<TPE"8&AH@JW"B"2!:5UD7/(I7:1<TQG!8)CH;$*S0H@
MD@6E=9%S3&<%P;K&"N\*IPYC#GP,E IN#+4*?1(H#W</I?Q(I?M(&*5Q:0*%
M^YAE<H7\3&<%P;O7"N\*SPX$#TX)/ \:#TX)B&-O;G-T86[T! OO"GT2/ \^
M#7</H *Q<4C(L7%,7@6(=F%R:6%B;.46"^\*(0MW#QBE<6D"2)AE<DQ>!81U
M<V7R-@OO"B$+=P^@ ABQ<67]2*D 9?Y,7@6!L%,+*PL  (&Q;PLK"P$ @;)W
M"RL+ @"!LW\+*PL# ()B[(<+*PL@ ()UX8\+*PO)7H5L:6UI])@+*PO)7H5F
M:7)S]*$+*PO!3H)L[:T+*PO!3H1R;W?SN0LK"\@ A&-O;//""RL+0 &%8B]B
M=>;-"RL+  2#=&_SV LK"YT ARMO<FEG:>[D"^\*2P4 !-P)3@F#=&GB[@M@
M"P( A7=I9'3H @Q@"P0 A69E;F/E# Q@"P8 @F3P& Q@"P@ B'9O8RUL:6[K
M) Q@"PH @V]U]"T,8 L, (-R;_<\#& +#@"":>Y&#& +$ "$<')E]E ,8 L2
M (=C;VYT97CT60Q@"Q0 AV-U<G)E;O1D#& +%@"%<W1A=.5R#& +& "$8F%S
MY8 ,8 L: (-D<.R,#& +' "#9FSDEPQ@"QX @V-S\*$,8 L@ (9S;W5R8^6K
M#& +(@"#:&SDM0Q@"R0 @W)SX<(,8 LF (-S8_+,#& +*@"#=7/EU@Q@"RP 
M@UYL[N ,8 LN ((QJ^H,[PI["]P)3@F",JOT#.\*@PO<"4X)@C&M 0WO"GL+
M7PU."81H97+E#@WO"BD,E I."85A;&QO]!L-[PHI#&,*3@F!K"H-[PHB#;4*
M@PLR#4X)@F.L.@WO"B(-RPI["S(-3@F!K4H-[PK\"=P)3@F!O5L-[PI?#;D)
M3@F"=;QG#>\*7PW/"4X)@;QS#88-()(%.*5UY7.E=N5T4 ))@! !R)A,)0F!
MOH -[PHS"H0-3@F#<F_TG0WO"GP),PJ."3,*3@F%<W!A8^6I#>\*E ND!TX)
MA"UD=?"[#>\*4@KK!00 4@I."8AT<F%V97)SY<L-[PHS"A<*W F'!7\7"J<*
MA WK!?'_,PHJ"DX)AFQA=&5S]-X-[PI\#)0*E I."8-L9N$$#N\*AP4$7PU.
M"8-C9N$7#N\*@PM?#4X)@VYFX28.[PJ'!05?#4L%___I#4X)@W!FX30.[PI[
M"^D-AP4%W E."80A8W/P20[O"B()L0RU"DX)AC]E<G)O\EP.[PHS"NL%"  C
M$LP%!  J"DX)A3]C;VWP;0[O"H@,E JY"8<%$78.3@F%/V5X9>.(#N\*B R4
M"H<%$G8.3@F&/W!A:7+SGP[O"E\-AP43=@Y."80_8W/PM [O"B()L0R4"E\-
MAP44=@Y."8@_;&]A9&ENY\@.[PJ^#)0*N0F'!19V#DX)AV-O;7!I;.7@#N\*
MD Z."5(*!@U\"90*/@U."<';^@[O"G,+B RU"DX)@=T6#^\*AP7 B RU"DX)
MAG-M=61GY20/[PH-#H<%(((*3@F#:&7X,P_O"H<%$),,M0I."8=D96-I;6'L
M1P_O"H<%"I,,M0I."8<H.V-O9&6I6 _O"HX)#0Y/#BP.M0I."8<\8G5I;&3S
M;0_O"G,+(0M."85D;V5SOH4/[PJ."0T.3PZU"G</I?Q(I?M(H *Q<87[R+%Q
MA?P8I7%I!$BE<FD 3%X%A6-O=6[TEP_O"E(*^0PS"J<*3@F$='EPY<D/[PK2
M#>L%(@ 7"MP),PIZ!I<&IPI2"KD)ZP4$ &$)I <.!N[_S 4$ "H*3@F$*"XB
MJ=T/[PJA"=$/4@KY#(X)W E\">0/3@G"+J(0$.\*AP4BB R4"NL%%  $#Q<0
M$A$B#:<*^0PR#<P%"@ 2$2(-T0_D#TX)A7%U97+Y*Q#O"@@,E I+!5< 5QMS
M"U4,M0I."<& 61#O"HX)*@I."<,M+;YU$.\*ZPYS"U4,M0I["]P,8PK<#)0*
M.ADJ"DX)A&9I;.R!$.\*,PI\"1<*RPI2"OD,C@E["U\-' A."85E<F%SY:$0
M[PIS"Z@03@F&8FQA;FOSP!#O"I0+J!!."81H;VSDT!#O"DL%___(#&,*R R4
M"LL*3@F#<&'DX1#O"B(-AP5$W E."81W;W+D^A#O"KX,E KK!0P 8 R4"@8-
MS 4&  @,E I5#)0*W DS"CX'(@V'!2+9$%4,8PH7"E\-? FA"2(-RPK<"2(-
M^0R."1P(3@F(*&YU;6)E<JD+$>\*^0Q2"GP)IPJ3#)0*H0;K!20 ,PJ3#)0*
M00@J"MP)G0R4"OD,ZP4( 'L+G0QC"HX)S 7._XX)3@F&;G5M8F7R5Q'O"G,+
M,PI2"OD,IPJ'!2UK#5(*? G<"4L%__^=#+4*8A%2"J<*E M?#>L%%0!2"J<*
MAP4N7PUS"W8.<PO,!=W_*@J.">L%! #\"4X)A2UF:6[DG!'O"I0+$A$B#6X,
ME J4"M4&4@JY">L%"@ J"B(-#0[5!DX)A65R<F_R\1'O"B(-T0_D#Q<0 B _
M=!4Q"1$43@F#:62N&Q+O"@ 1AP4@AP5?J!!2"D\.'0X7"E\- !$S"AP( !'1
M#X<%']H(4@H $=P)AP6 @@KD#\,-3@F&8W)E873E.!+O"KX+(@V'!:#<"7@-
M@PMV#OD1ZP4/ "H*.@X^$H<%!'05[0<B#5(*IPH4#)0*[13Y##(-*0RG"H<%
M_6L-,@U2"H<%H((*(@U["U\-AP6 @@H-#CX-? R4"K4*(@T&#3X-3@G)6V-O
M;6EP;&7==!+O"OD1N0ES"W8.*@HL#CX-3@G';&ET97)A[. 2[PJ(#)0*ZP4(
M  0/2P4^#4X)AC]S=&%CZ_X2[PHB">H+H0U["W8.3@F%9&5P=.@:$^\*(@GJ
M"S,*7PV#"U(53@F):6YT97)P<F7T,1/O"OD1ZP4> (@,E J$#>L%"@ L#CX-
MS 4& "P.L@4C$\P%"@ B#:41"!,C$\P%U/^):6UM961I873E21/O"@T.AP5 
M@@I."8IV;V-A8G5L87+YA1/O"H\/2P6!H#X-? R4"BP./@TB#3@,E H^#3@,
MM0J?#P8-;@RU"DX)Q69O<G3HG!.K#\D3@: V(@  BV1E9FEN:71I;V[ST1/O
M"FX,E I\#+4*3@G!J.,3[PJ'!2D2$4X)A'%U:?3]$^\*<PN^#+4*&@\_">T'
M81!5$X@,E JY">L%!P 7$ )/2\P%Y_]."85A8F]R] H4[PHQ"6(/<POH'1<0
M+A@@9V5O<T9/4E1((%8Q+C @&RAC*2!.:6-H;VQA<R!*+B!6<G1I<R M(#$Y
M.#G9$_$3M0M@#+4*M0OF#+4*$12$8V]LY#@4EA2M%06-WQ.M%@6-X!.@$*V?
M"X7]K: +A?ZY%061_8@0^*D4A?RI0H7[J6R%<*[L"TQ!"8(KK8T4[PK/">L%
M! #\"4X)@V%B\\@4[PI2"LT43@F#;6GNV13O"A<*%PJA#>L%!  S"BH*3@F#
M;6'XYQ3O"A<*%PJ$#>L%!  S"BH*3@F!JO\4[PI!""H*3@F$+VUOY!<5[PH7
M"GP)? G?%',+H0G?%(@(C@FA"0H)S10S"HX)S10S"DX)@:\C%>\**A4S"BH*
M3@F#;6_D3A7O"BH5*@I."8=M97-S86?E7!7O"A<0"DUE<W-A9V4@(R >&$X)
MA&QO8>1J%>\*50R4"GP)4@K<#+4*.ADJ"GL+O@RU"G,+50RU"E43<PN^#+4*
MC@E5#+4*3@G!IX<5[PKY$;D)<PMV#BH*"!-."89F;W)G9?2\%>\*P!4Z#E(*
M( R4"G@-AP45=@Y\"3@,E JA"1<*> WK!1( V1/Q$Y0*4@HX#+4*S 7H_U(*
MAP4$7PU/#AT.E I2"J$)> WK!?+_%PJ#"U\-M0J4"M(-N0GK!=G_C@DI#+4*
M3@F$8F%CZ] 5[PHB#5\-/@U."<5B96=I[CT6[PJ0#B(->PM."<5E;F1IYDX6
M[PJ0#H,+O0XB#1<*7PTS"K4*3@G$=&AE[F 6[PIH%DX)PF3O?!;O"@0/>@8B
M#8L+3@G$;&]O\(D6[PJ+"[T.! \.!D063@G%*VQO;_":%N\*BPN]#@0/0 9$
M%DX)Q75N=&GLKQ;O"GL+O0X$#^L%1!9."<-E;N3%%N\*S19."<5A9V%I[ML6
M[PI["[T.! _,!4063@G&<F5P96'TYQ;O"GP)? GO%HX)C@F#"U\-:!9."<)I
MYOT6[PH$#^L%(@US"SX-@PM."<1E;'/E&A?O"H,+O0X$#\P%(@US"SX-,PJ#
M"V@6@PM."<5W:&ELY2\7[PH?%P8-3@F&<W!A8V7S4!?O"G,+!172#>L%# !S
M"WH&PPT.!OS_3@F"/*-@%^\* !'(#+4*3@F"([Z!%^\**@K(#)0* !$7"E\-
M3@F$<VEG[I 7[PHS"L\)ZP4' (<%+>@03@F!HZ47[PIS"Y,,E J("#,*AP4)
M%PJ$#>L%!P"'!0?<"8<%,-P)Z!!."8(C\[T7[PK!%U(*N0GK!?C_3@F"+O+F
M%^\*? E2"M\4AA?K%ZP7E1>."1<*7PUI%^0/3@F!KOD7[PIS"_X7PPU."8&_
M&ACO"I0*'AA."85V;&ES]"@8[PKM!VX,E J4"D(,E K4"X<%0%\-H0WK!00 
M[0=2"CX2PPW##4\.'0Z4"E(*N0EE'?$(ZP75_RH*3@F$*V)UYC08[PI+!0($
MW E2"JD+:PWK!08 *@JU"U(*8 R4"E\-3@F-96UP='DM8G5F9F5R\W<8[PJU
M"ZD+%PI?#<@03@F&=7!D873EGACO"F ,E J4"DL% (#Q"& ,E JU"DX)AF)U
M9F9E\KP8[PKF#)0*4@I@#)0*:PWK!08 ?A@J"E(*? E^&"H*Y@RU"J$)E K/
M">L%% "A"6 ,M0JA"90*2P7_?]H('R"A";4*H0E@#+4*C@D&#4X)A6)L;V/K
MVQCO"NX:4@I\">,?N0GK!0X H0G@"Z$)Y!B<&0X;C@DJ"F ,E H&#4X)@W9F
M[C(91PM&;W)T:%-O=7)C90       (MB;&]C:RUW<FETY6(9BQFI_S 1BF)L
M;V-K+7)E8>1[&9X9J0"%>:D#()0%CB8%QG<P!*5X\ 2B"- SI7<@@,**\ XD
M>1 GR0C0(R")PDRV&:5UA0:E=H4'I7.%$*5TA1$D>1 &((_"3.D9((S"BO "
M"4"N)@5,)0F%=F]P9>Z/&?X9((\%CB8%I7.% J5TA0,@=,+@!? #3.D9I7.-
M-AJE=(TW&JDVA12I&H45J0"%%B#MP>  \-%,Z1D   ,5O____X   8   ;__
M^:;:C:32S;___:  #:X'C:@"C:W>[:E2K:G2K:  #:  #;@ #:@ #:0 #9__
M_8   ?___X,' 0  __\  $9O<G1H4V]U<F-E(%8Q+C                  
M              !'14]31D]25$@               "&=F-L;W/E]!G+&HXF
M!:V9A V:A*KP"R!WPJD C9F$C9J$3.D9AC]V;W!E[L :[PI+!9F$IPJY">L%
M" !H&?P9#AM."8<_9&5R<F_RY1KO"M(-ZP44 !<0"T1)4TL@15)23U(@'A@1
M%$X)A79G;W3O!!LT&R"/!8XF!:V9A V:A- $H@?0!:5S((#"3.D9AF5X<&5C
M]"H;61L@D@6.)@68D76%>2"L&R#X!TS!((->9>1.&W4;()(%CB8%H "Q=? %
MR,1SD/>(, :Q=<D@\/?(A'FI )%U(*P;I'G$<[ 'J2"1=<C0]2#X!TS!(*4I
M(,#!H "$=X1X($\=H ZQ_84%..4IC<"$[L"$(/T<I'GP!:  3*H<(*?"JO#Z
MR0W0"W@@GL*I (VTA%A@R1C0"JD J)%UA7E,L1O)"- 5I'CP#B ['2 N'<9X
MI'C$=Y J3-4;R1W0-:1X\/4@.QVD>+%UB)%UR,1Y\ /(T//&>,9Y(/T<I'C$
M=[!R($\=.*5WY7NP JD A7>H3*H<R1[0.Z1XQ'GP@>9XL74@R<$891BF&9 !
MZ.0XT +%-Y 4\!(8I7=E>X5W($\=(/T<I'=,JAR&&848("X=3-4;ZLD@D >J
MI'G$<Y $3-4;B+%UR)%UB,1XT/6*D77F>.9YA'JQ=?!'(,G!&&48IAF0 >CD
M.- "Q3>P%Z1ZL74@ L+F>J1ZQ'C0 R N':1Z3*H<I'K$>+ 7($\=(/T<.*5Z
MY7=*A7L897>%=ZA,JAP@(QU,U1L@+AVE&(4(I1F%":4WA0JE.(4+.*4%Y2EI
M H4&&*4%:0*%!R DP:V^A(48K;^$A1E@I1B-OH2E&8V_A$R;PHBQ=2#)P84"
M.*48Y0*%&+ "QAE@H RQ_848R+']A1E@AS]B=71T;^YM&V<=I3 P%XXF!0F 
M>(4P((;^I3 I?X4P6*XF!:  K06%*8!)@$PE"88_;6]U<^5;'9<=RLJE.YUC
M7Z4ZG6)?I3Q,)0F';6]U<V5O[HP=M!T@D@6.)@6E<X4\I76%.J5VA3L@BL%,
MP2"(;6]U<V5O9N:H'=D=CB8%((W!3,$@@V-L\\P=ZAT@CP6.)@6E<R YP:4S
MA0:E-(4'I36%"*4VA0FE-X4*I3B%"R DP:G^H Z1_2#X!TS!((DM=')A:6QI
M;N?B'2H>((\%O6)?A76]8U^%=J1SB# (L77P^<D@\/7(F$PE"8-P<.P<'E$>
MI2E,)0F#7F/L21[O"H<%0/ ,E J'!0]K#>L%!  3#4X)@UYLX58>[PKP#)0*
MAP5 &Q5@#)0*W D&#4X)@UYV\W(>[PHZ&2H*<POH'8<%$',+>@:7!AX8EP;P
M#+4*>!Y<'B@>Y _M!PX&ZO]."8->9>R-'N\*<PM"#+4*4@KP#+4*'AAX'@ 1
M7!X<"  17!YS&P 1>!Y<'AP(3@F#7FGSOA[O"N08X O($',+Z!V'!1!S"WH&
MEP;$'@X&^O_%&$X)@UYE\^P>[PJ3'F4=*@J5';(=91WK!?S_E1TS"BH*3QY2
M%5(*UQV'!1"$#>L%& !2"OD,3QX;%8,+7PU,#+4*Q![,!<?_*@J'!1!/'AL5
M@PM?#4P,M0KM!\483@F#7FGL$1_O"E(*AP4/>@:7!A,-\ RU"G@>EP;P#+4*
M>!Y<'AP(2P7__T &Y/_P#+4*>!Y<'MD0Q1A."81><VZB;1_O"H<%(A(1(@W1
M#U(*AP40H0WK!0< AP4&$11H&8<%$,@0:!DS"AP(3@F';&]C+6)LZZ@?[PI\
M"6 ,E I2"I0*2P7_?]H(H0E?#>L%$@!^&+D)ZP7H_RH*<PO,!0@ 8 RU"GL+
MC@DJ"DX)@W!U]-D?[PKC'[D)ZP4' (<%!2,2[AI@#)0*E I+!?]_V@A2"F ,
ME JU"N +8 R4"@8-B1D.&TX)@V=E]!D@[PI@#)0*%PKC'^L%%@!@#)0*<PL7
M"K4*Y@RU"F ,M0IS"RH*.ADJ"DX)AVUA8VAI;N52((X@()(%CB8%L769=P#(
MP 30]J9WI'BE>ACP 3BE>2#'((9WA'B%>0AHA7J@ [EW )%UB!#XKB8%3&<%
M;', AG-C<F]L[((@U2".)@4@WB!,P2"E-2D'JKWC(84&2?^%!Z4U*?B% J4W
M*0>JZ+WC(84)2?^%"#BE-^4UA02E..4V2F8$2F8$2F8$I3.%$H4*IBFE+BD$
M\ +HZ(H890J%"Z4$A06F"R \P1BE#&4"A1"E#64VA1&F"B \P1BE#&4"A0RE
M#64VA0T8I0YE H4.I0]E-H4/H "Q$"4&A12Q#"4'!121#)$.&*4,:0B%#) "
MY@T8I0YI"(4.D +F#QBE$&D(A1"0 N81Q@7P";$0D0R1#DQR(;$0)0B%%+$,
M)0D%%)$,D0ZE"^8*Y@O%-+ #3"LAIC2&!Z4N*03P LK*Z(HXY2F%!J4UA0BE
M-H4)I3>%"J4XA0M,),'_?S\?#P<# 0"%9FQU<^C*(.\*J0NU"WH&EP:4"L\)
MZP4. )<&E I+!?]_V@@?(. +!@U !N3_3@F'9&5S:W1O\.PA[PKT(<D:T@Q+
2!2S"C"!."8-N;_ <(N\*3@D"
 
end
----------------------Cut HERE------------------------
-------------------------------------------------------------------------
"We know only the strong will survive, But the meek will inherit.
 So if you've got a coat of arms, oh friend, I suggest we wear it."
					John Mellencamp.
-------------------------------------------------------------------------
  anderson@c10sd3.StPaul.NCR.COM |UUCP: {rosevax, crash}!orbit!pnet51!jpa
     Joel Peter Anderson         |ARPA: crash!orbit!pnet51!jpa@nosc.mil
  NCR Comten / Software engineer |INET: jpa@pnet51.cts.com
-------------------------------------------------------------------------