Path: utzoo!utgpu!news-server.csri.toronto.edu!mailrus!hellgate.utah.edu!helios.ee.lbl.gov!ucsd!pacbell.com!pacbell!well!jax From: jax@well.sf.ca.us (Jack J. Woehr) Newsgroups: comp.lang.forth Subject: BASIS12 9 of 35 Message-ID: <19383@well.sf.ca.us> X-Local-Date: 3 Aug 90 22:23:58 PDT Date: 4 Aug 90 05:23:58 GMT References: <19377@well.sf.ca.us> Organization: Whole Earth 'Lectronic Link, Sausalito, CA Lines: 246 This is the BASIS12 document produced by the Melbourne, FL meeting of the X3J14 Technical Committee. It will be superseded by the work of the TC in Vancouver, at the meeting beginning August 21, 1990. Remember, this is a preliminary document only. It exists only as a BASIS for making proposals. ANS Standard Forth has yet to be proposed. Please treat this distribution with discretion so that the TC will continue to be willing to share their work in an online format. This is an ARC file, uuencoded, of the original MS Word [TM] format document. You will have great difficulty reading this as an ASCII file. BASIS12 was prepared by documentation secretary Len Zettel. It was lightly edited for formatting by Dennis Ruffer of FORTH, Inc., and uploaded to GEnie in ARC form. Jack Woehr (jax@well) uuencoded it and takes responsibility for any errors thus introduced. For an official printed copy of BASIS12, send $10.00 (plus overseas postage, if any) to: ANS ASC X3/X3J14 Technical Committee 111 N. Sepulveda Blvd., Suite 300 Manhattan Beach, CA 90266 ------------------------------------------------------------------------- #! /bin/sh # This is a shell archive, meaning: # 1. Remove everything above the #! /bin/sh line. # 2. Save the resulting text in a file. # 3. Execute the file with /bin/sh (not csh) to create: # xai # This archive created: Fri Aug 3 22:04:35 1990 export PATH; PATH=/bin:/usr/bin:$PATH if test -f 'xai' then echo shar: "will not over-write existing file 'xai'" else cat << \SHAR_EOF > 'xai' MW0%R*T),[R<+?Z=7+@=M`..8<[W',OQ%'<]ZP MGM2+FB,:SUN=U!'F:TXQF(%$;!#*)U>7HF'F1/"%EL&T>2"%\(W`F&S$8.(B MHW;FC^1)E0=C#71LW<'-'K)='BYXGVHK1GVW/1PE[@DH2[T:K;$B(!6CO!3D MZ/>B/?W3=^OIH,X35.XC5B[1N$M-B#,:3LX8.9%)QZ)3C"'1C6->0L[2`/6T MARN$T@6."'QS4%O.TD6537'JF&3E&O^B!O\W5>`$MD4$+3`%5"`%C'4$*%_H M\*%(O+F_+MUR/'M+(-=`E0X3!J_8T)CS4!"A**_R5C.W'M]`'#86>[5BE@KR M&:\D6F+P2/`$3$`$/Y]]AJY(5/_E.(>X#815O@$JG@L'EK7T78_Q*Q'S/&'P M46_V#;_VO1YS7K.I9(%^R;FEK;X7?3^57/[R7[^>!O]80C#UPE3U""R_A$'W M``392?BFC:]0,`_V>Z\`04`$'1$XYRT`+5#SCA76CC4%*#\%E0]%Q.KU>0_V MEDJV"R':2Y``C9,`CGUY4L@8FP%-T['[S-/6+9#6OH\XP$]LEV==I^%5;4S\ MOJZE=&"^(]3\+Y$`L]X8PY]NQI_]7#Q"RW^*W'\&WG^:TM\?,A3^Q?_KY"]/ M(Y'^"2"3*.590P__U[]&R+5CYT\%]H__'A=$947]_#_^"V$$)M\"+-X$@),% M]E]-],$:F+D7_#_^"V$$)M\"+-X$@`/6S/_[U40?K(&9>]'^U,__X[\0OF7_ MJ.)9_#_^"^%;YT\%]H\JGM7^U,__X[\0-ND\/6__^2E!9S`^>]G=?VC]X[\0 M-ND\/7_^5&#_^2E!9S`^>PGLPC;][_^'UC_^"V$$5<`$V?+[9E`7NWK=:?`D M7[(0R<]4L/_[%YP1U2_^\K\0R<]44W#^5&#_%YP10516U,__XS\708`%+6#V M9)``24P60D)&C2+OK]M`'8'_'E=&4DH?Z[TX=0D(?Q&R>(W!_#_^<_'*@`/63-41;'W^5&#_ MK(&9>Q&R>(W![4_]_#_^"Q$X5%`%4A"K.B^=2]`"T\D$'0'[#0^`:!_T1[+R MO7ZS$GQV7`)A@GBHTVOR)-\"@#-;)__[\UW?,TB,!&$&)H@Q;#KFS`.B"!$0*)AH2=%`P0T7 M,6;4@)&@B)0@4XHT38"Q"!8J((8\D:)5`0H08EJ$(8.1YMJV(.J`:($11`H0 M6VQ@S-&E:1(S<0/.`7%F8QB=-`N"!*%GYAL6(.:4H5.335T7:5R(R3EG!\$W MC!V7!,%Q#)J7@.6.>>-&\I@Z*RF"P.SBK8"-<^K6<D*L-MTRL2# M!0_2?NU10!DWE`7"@1V9CN$VGLT!1QECI&$&2X>EP9H+(&`TQ60$&31;9OKQ M-X=_'`'X&4)O"$09':#%-Z$+.N%!V85R+!?@@`4>N),8QJEU'DUU,(@1%1)6 M>"*&8;0A6&00PE@98LN!(`032T!&11)"0#;"DDW6Y`9)/B3AA(T""$B@@6F\ M2)2(=CQ41QF#"60DDB`\R:245%K)9H0'04=F71O148<<;G@)`I0N;&%4%PT* M$`0<&+'Q98[XS9309#-M***._?W'X!8WR$`#H%<8--"C;NRWXW\_EH&'1'5< M.!)DN(&X$9P(I>@3I"AF&!F+7+:TTH)-X2A?9@F]45B/GI5:)';:<>?=C[@Q MU%H:8K!Q4$\TG5%'1R#II%Q(K'I81F%#H<8JL MRP9)<]1A!D:-"BG3@;QA*V+-,=54YF!DL':001MA&<1Y.2GHQD,8Y0'9Q,86 M\2-QJQI&1AC-QCDE:7BTS%).6.JZJKZ#S9'P09+AM_)]E$'[$]4"%%G0P59Z M)P449%$!F1C\*?;A&W757,?-$;T7UY1DIB$'V,Z2MK-]!+\TD,@7%KF:3&E+ MR`9K(M&D)<1%L@V"&V]0)A-&PN&AJIK&V42MD:K-]!,]/\'@0KCSX"&):&<">>1<]JV>J4A0"( M,.$$3"$^@M)+:-*\A-4$+:,;PQJP)`2B:*E%>=!;OUB%M>YH[7^@6HT#>0+! M/3$),AA;'6A&%Y)&240V(`I>?8@"MG7EQPWA6@FV\@`AX.VM:-23@_6`DT#Y MQ:I'6&H"%:8#E1G]M'$*>8`9'G2P@%/R8&K" M\<%L(#&`HF!!EM,<0*YFT@:!'$:0A'R-)+WUS!Z5P0>>215,YKBRE@V';B=K MP1WS1!*!0.MCAG0(1!*-F#^A>I2[;G(>DKYAE/.P`4T`,$4 MXJ7!SH"@!BYXZ0Q`8%$[X:D_8=`@%:.2`RQ"08NS3$`3JO*5L.`2!.1!BXS@ MLH*!#+,IM+'H[M)`$<\`;US^*1<3YR.1R1%L)IW!$FV(`+"6@-@U`I6!JR/!TA,Z5E=JG54.@_F8<0[2J]V];R)G%*AY^QZV#F$;B9E@%89(//5S,S4)N0#`104\BL- M*59S#1,H1NH@')E1)JZ3F^L8"FM6O"HR#1!#"]Q4M1,SB8@V*%11*).@P`]Q MTYLZ05\_3Y!0/)T`67X%+$E\DK[[L`JL*0K)'@=3U1&9QK#&!0$-SX"E3)GW M!+3IKAMV\-V#;62K^Y3AWK!UL#`0RCZ0&UY'EYM>YAQ41'T44%"(2@, M`FFN21J)&9:Y#)X%DV=J,TP&18(LE#-=YWDS0R[U-D>JT'E3NYP5DH*\V$Q3 M@$(0KD2I&6"DE57,00V8ZATG$*$%1D@"$[2VE:5Z!2Q)7G)4ZQ`#GB#WKR0Q M8QUD$!"?,$4!3]--E1GJ&M@`%H-OJ*FC)'2@RFW$#*AUP^Y(TI;4SH1G"L:+ M#6[`%[00I^.\;SYXI?!N)L-LZ/G#X9*@QA0Q0@J"/>X+]21N>Y;WS764Y M<-F,&2L.'#'&,2)S<\9(#SBL.GB># M`./L-LO/.8[0C]-)Y!7%L&006F6(2H@A&*.)QR$#+A$R5B%D6#5E8,[P[B7` M""NX>2G'+LW7G M7FKAA3[,0&W\W_M>:ULGG,[1B$A8V!(!;0X$1Y(PQ$,"/MD.,"("WPH&,LYE M,TS:P,QM;Z$%7?B8W-X7!O`)H+RK$E$&8R;I@\BD0!^#R.UQ9R;EKX3Y^"*# M&NQGT$(+3V^@%I6RZ/8F$:E?:=P?C._LN'J0!390]:+-I2'M&2;V$3F55!-F M@!BL,CE]A`<<@GL'PU#^L5%XYF>RQ01!,`1%,`6G-2(1YE9YL%Z5H2_!Q!,. M*`"4!D@7]'C(520"$E36UA1&X!.BTB/NQ#%W5P;/(B)PP!(^Q6R\-1-TY4-.%%8AT2=Z(0`HM7`8<2!O^,29[!!BE-ACH6!?K&!H*\8TT,!5?!P,]4(Z. MT0(T."UL,'CHYHEH!X]!,8^F9X]L]W:SMY']F!G_6`8!^6\',Y$ND4/`J)#6 M\77DJ`">5Y`"H(X2P8X7Z8ZD5Q?[:!>@V'%&MQY?%I+R.)(D(@<`V8M5=C`T M*3,:(0,*>45?YP-$<',@(D_M^(D?21+T*`"@^)%?5D^#\5R9D32-YRQT^%\` MXTG+2#L:IA.E`U>.]#Q<]1!TTW^`P2EPV2@,(0>&Q$1RX!DBTCQW)34NT9=_ M*9`_$F$M$1/WAQ&V2!NX.$Z4!(9ZN2U\"1.)^6^WTVO*U2I;(AD-LQ&+$C=_ M9#079)9ADY:AR98)]Y:825&22`.P]'5`<'-P1@>FD95HYV[P=H]"V9&'!W)O M-Y"L$B9L,";]L4[#]CLS4A._Z8C&5'"=!A8H!IL!C06#D)H3MIX$[/V$8Z^4G85BI&&1W09^G92H'0'X7!KQEB4)G64UW*MN)]0>:,U$`;>*04MH!T8 M\03WXD5F%P12``)-4`1-,!99,&595A?"T4WUY&56"&RVHJ,YJ$/4Q=P@&&F0RMF$$*N"%1^&8@2(JFGF:@\-#:D]B.GYA=YF:IP M&C-ZBER7RJ?#H:D'TZ@C1D\R5FS94:TP4`-]IZMLZAG8A@,U(`8_!Z9(1A880:XR9Z[# M903J:B7N.HGF2A+RBJ5/P$54*@97NJY%4!=>FJ]B2J9F&E69FJ;K\:I?UE,8 M)2(;@1RLX2W:*J[%41)]=*@0F+!+&AG!-(8@2!-!08"J*C58PK'ULZGNJLRBFN"Z92!1OX'@8!JQ"DJ]9R@1;.@20*B$+,1.3NFJ5 M*@#G`WS">FJ!PIXB>"%@^%>$)2))9#T1"[.)(2$RT3E3 M8TC;.[%G.#6L]C[,4CD^(1=,V1&EXY2LTB/K@CM,-+,3@6%!$38`-R/1FK:! MXJW7ZK;;FKP;"`+>2K?B>HI_F[=`R[=^2[CO>JZ!:P3L*@`+?+CZRJ_;:;C_ MFKA014L7![EC*KF4>Q:62Z=PH;GXJ`"<"P>>:T'':['**[H\@;M^&B@M'$@9 MI1.KZRVNVQJP&R=U.KN[T2ZV.VD$)<.ZVQ',ZYQP4;PU/,"YN[Q%,C.^FR40 M(KPME+#/NSEX`$F&5)EP:+U,$X;KHD0',;X#X1,05FG8Y4EJ_"/>=+[*H;_K M^R-!(0?O>Y"12AR[01GU2\`U$2;(13EQ0AD<>U!SVK\"H+8`W+91K,1R^ZWA M:K<0;*\,K*X./`0+C*Y`2\$!:\&7C+?Q.J].<*,VX)U38"4]NHQY`J3F*:1" M=WBA6*0;.J`=>G4H^JD0(:(M>@8OJBY+Y\K^,Q@(>J/;)J]4L&,]*CZP#&6R MC)ZVW!0N'3%N5,'`[%K,:+<',PQ2A#0R'[^%0,OP)_4F1,_X2Q[2CS8FW"L M*Y!5=E`L%P:70R#^(J/JPA+-*)`SH)U&L,I.T*!OHLP[QF7[Q@PH5TL<1H,I3&_XZ+(F$,RT`(403`Q_2:FN#L\C59A<%I\=1"M M1C`@?5`BGXCT>^@X'N.X'(;F M!!DU/1/,"P)U3N@R&M=*S1K:?(=DTK6;`AK`,P<$M:?YC7]H4"J083=X(R7= MG*LN+N#IBLZ1OAC,*#=T0!1).&#Q6VAW$E0ZB]\I4A#"L1)3/3:1JL>,OG7_ M["VS;H&!X@2MPR\SDSY7]G,>_>)LX('&?%%X8MG(J:F;C>F=O3&U/M(THX0K MQ6J1)"5$T6PMX&C)5>>,1#9@++V\:"#'>>XS+BW%NB&0#N3XR:?RR!MV@CT8 MH3T,5U3E_JF[`WRT M`Q-%0AL(W4?8\O,=;EP#9!@Z<4&TD;$)KKQTHZB>83<]CYI?:Q&CLTA-T?7^ M96=BG6=ZM1B>I_'5X@(BT!1OU$D3*QG>QQ(!XQ,]KP/ON$O">4K$^650$!3: MJSDK1HW6R+MU6-QKX(T-/P-?UZ`W)Z'O;*&TC*%THJ'4'.D1==LTZHS;#.MN M9J.SF0.;9P1J"`54@`0WAUD%P9M[OQ[M]67M->>"Q(V!Z2W(.29P#3,DINDC M4HUO<(W,D?B"OOC?.!7)3`12\`10L/H*`0>N/\OYEO(*8%'$(1L45-L2$I+! M[UG9B'O%S_B26`,.]W5$4`7-C_%9-R#1_Y7$21-?1@1U8#9QBE#''P,TYQ7I M[WEET`)X0(>3'\^5GYZ87_U(2AH="W6-DG*L^')3.OY>UVU*5@10(.`7CVY* MEDN`IJEFQ)5-(9:%3Q\&5#?9SA#+.$YV0Y;4>&5[)!-RXR(D.'M7IL#'WW=? MIV05^,$)0`0L('I*EDOM948,VQ2S]0:FB(IVTUZ`-I:@D3Q'"ZS+6#]L(#YE MH-9Y@"7L2:F&AA&OYK(^-1"RIE>DAB7L.7^4:F@8\6HNZU,;%A!DAB7411HY4<9WC=I)DVH;D776TVB/]MN``6@=.C.W\YE' M"ZP,11\&1`>&\5[%A59X<0,QP!>0X8RS=V5[)!-RXR(D.'M7IL#'GVU?IV0V!\+A@4M1 M91XI[&=3_U[`:1=X<0,Q0'`*P)[L.QB%T=R-QS)D3?8,C/FT1;''XY?9R55"<+A@4M191YM M8?GK81YM466R1H\#T`(PT0(+4!Z_:?GKH3]51H\#T`(PT0(+4!Z_:?GKH3_$ M4&5?9@1\5/@MZ)>G83Z>05+UQ&&MG2@XPXC\^&+FT19`&+6D74=H"(*-"AGY M!>[[!6,S\J0'!;48(;4>)3P&/K]D@"K@3MR2"4?BY$D@@DC[13,G.33"\R/0 MI3`1,Z(ZL0.H`NX#\:2M\Y\`D\;@/A#$(/K440,8L:#I)DM6H1TWAW"(\1#G M9DN4[_=T8A<+X/Z[E``H<-(G&!)?ADS*I/<``;N[T2ZV.VD*MH"0`Z(+""-, MDE`I(B4(DP8*AKQI`R<-FS!TTKQQ`V).F39AW&0<,V<'1(D4+98!88;-&XQI MW)QI`>=-3#H@W-1I(Z8,08)AYH`(`X)-&CH^P[!QL>6&C!M=(!;!4V9,G8P; M.WX,.7*.#HA0+HY923`K'30K7:1QT?)E1ID@:M[L2"?,F#4[7$"DDJ?B&*60 M!.0!4<:-G#8Z%B002-`@0H4,'6XI0J1+TZ=1%=QP$:-&8!H) M$#J!*,),"S8MW(A($+@(%BH'F3P)0@4BBH,Z!L8`T2+P0!D@4D"4@SR-T,4Y M,=:1H[3HFS-AY!Q%TP;$&S/"]8HF;5J`C=2ZC[!V[?+,[-JW<^_NK>"WD>!R MAA<7<#SY\N;/H06"&$&M%`,,UF&GW5G=?1<>1*.5%A@.Z#T1F!00T28`0O/Y M!IQPQ!G'G'\*J.6"%&_4X089.X!86$QG*":@"'*DN*)B;]R1W6%NE(%=1G:L M%),9,1V5AP@#U<%&&2R`<$8:=L!XG'@1UF`##.A5,042&3:1@!"Z#;&$A_N1 M"(5/C3TF(V,JCH$51PY.$80511`C1!5&U";%%&MRI&)0@:5Q!D>`\6>B&"[= M-6`=9@3F4TE4DF=##*DU\4(33Q#!FA$M--'"%$P$L66GF;XGP!!/2%&$AV0, MYX9^QKF!G!LSD$@$E&F0L5*K`P[V:I-/1@D7=&T%)D<9A\51QQL9E2%23K6& M=!ATQX(4DZX$R>H""($EX08<5PUU8XIT@(O3''4IFMT9.SE+AU#9K32'H#V2 ML6U@07!4!AYCP?$F"/LZ]RYBX+T*PF:=(2:4'CZ]<:\`5`AX[!Q*XN0<8A0M MV8:[,&W4@JY$UDLPP-OYA-BWX:[;[K-&E2$4N?/JZAUXU(9TQDH.$N6&QSW^ M".6N*2):!DW'CN&<1AS=Y*-/3-E@96@17UQHCO#"$9A1?_T+1XUG4-?&Q@9N,Z;U1MP)$6'8UXM$-P+7V!*!`B_&2QKB/S1 MFA,-R7$KP`**^R`%"%/X\+<4/AQDJ=\@[+!`8'M_`7A.KB)7IN$I@,!X8'QC M/L4504`!`A%2/.&ZYIR#T'>FGPLN>JRUEA[8Z0*DCCOLLF>^N0#!J2#\WX&' M#BWAA^=40W+`.PY"$RJ`0+GEE^).._(@*.]Y\SG-6NOHB)<.O/BJL^XZ\;-# M**D,E0:!Q7HM@(2'J1SRYN%](!I1F>30N^74ZF+0Z5H9,&(R!^5'7(=A3J1* MX[1*)6$U"FA-_F+"/]WXKSX?>J``151`!1!086LJBLL<51;P/%!:4Y(?!6^0 M&B<4X0B\654&7=,S!G:P0R`$X`,'B!SE*&`*=1`#':CC)A"9H4;=85B-G(2K M80D(;HT2@$^<-988CJA ME&X+-KA!#+JP@-_,L8[)20`*QC"1BAA%)D:<0AY$$@8\1&:,CW,!)`8``AO& M1Y(#@,@4RH"3.L#!.H'Y)"%%4B,VQ"4[8=@84N0@E#MLYV2ZP@-A'C:5JERE M;`*Z@V/(()2>T.$.90@,1R`)P4JB43Q!$,,;@D0+93>HV3CWI8Q%8RST]>:U\#@J<;X-7))L%PE?QT M@S\'!%#O<`0Z1N$G3F#PL$T:QY*X29/8.!D&B[R,(PW5YV/Z^2;QT%$H%R/0 M1=PPEL.(83#0(:0<'#6'FJQ(2BA%)D=,M*]^O:E%`4,73L$3$XIE,9II<%=' MX&`7(<'+#BV]B-#*.11U+A!=,CI6K%SVEA@M*4AL:*=4\)!*."PI,K5#516< M0(4#**#1 MC54.265*Y"+KXL@%0%*UN.%M*LO@`XB8"`K9\4B+E.O;E8;T*,BZ)E&*VM4F MT!9/!*%(=RK'B,C%W->FX MJ_VP"SR2G3&@I23[70LA4W*1?]D8QW38@7%"(N00CW@C)3[QR():2(MT;*EK SHAR_EOF fi exit 0 # End of shell archive