Date: 19 Mar 90 Message No: 028 To: TeX implementors and distributors From: Barbara Beeton Subject: Updates to TeX.WEB, MF.WEB, GFtoDVI, et al. New versions of TeX.WEB, MF.WEB and other updates have been installed at labrea, as Dan Kolkowitz has reported. For the benefit of those who may not be able to ftp these files easily, this message contains some of the more important details: New files at labrea since 3 January 91 Changes to the errata list (ERRATA.SIX) Addenda to TeX82.BUG as of 13 March 91 Addenda to MF84.BUG as of 13 March 91 Differences between TeX.WEB 3.1 and 3.14 (as of 18 March 1991) Differences between TeX.WEB 3.0 and 3.1 (as of 21 September 1990) Differences between MF.WEB 2.0 and MF.WEB 2.7 (as of 13 March 1991) Cosmetic change, GFTODVI.WEB, ver 3.0 Differences in TeX.WEB are provided in two parts since the details of the update from version 3.0 to 3.1 was never reported in one of these messages. In fact, both TeX.WEB and MF.WEB have been updated twice, with only one version change, since the previous update. The most recent changes were, as Don Knuth says in the prose at the top, only cosmetic; cosmetic changes do not usually appear in the bug listings, but should generally be made to the main WEB files anyhow in order to keep in synch. This is the last time that it will be possible to provide the difference listings in this form. These difference listings were prepared with a TOPS-20 utility, and the Math Society's DEC-20 is being unplugged and de-installed tomorrow. We now have a couple of Unix workstations, and the Unix differencing utility seems to be the best replacement (as soon as I learn how to use it). Although the VAX/VMS DIFF utility does a good job of identifying differences, it adds a line number to each difference line, often resulting in lines of more than 80 characters in length; not a robust format for sending in e-mail across random network gateways. As usual, there have been a number of updates to this mailing list since the last time I sent a message directly, so if everyone receiving this message could please acknowledge it, that will help keep the list in good shape. ######################################################################## New files at labrea.stanford.edu since 3 Jan 91 /tex: -rw-r--r-- 1 468 fsuser 52165 Mar 13 17:03 DIFFS.Mar91 -rw-r--r-- 1 468 fsuser 0 Mar 13 17:24 tex.log /tex/OLD.pre-Mar91: total 7 drwxr-xr-x 2 468 fsuser 512 Mar 13 17:14 cweb drwxr-xr-x 2 468 fsuser 512 Mar 13 17:19 errata drwxr-xr-x 6 468 fsuser 512 Mar 13 17:14 local drwxr-xr-x 2 468 fsuser 512 Mar 13 17:18 mf drwxr-xr-x 2 468 fsuser 512 Mar 13 17:16 mfware drwxr-xr-x 2 468 fsuser 512 Mar 13 17:18 tex drwxr-xr-x 2 468 fsuser 512 Mar 13 17:14 tugboat /tex/bibtex: -rw-rw-r-- 1 weening ftp 27577 Mar 15 15:45 btxmac.tex /tex/errata: -rw-rw-rw- 1 468 fsuser 15838 Mar 15 21:40 errata.six -rw-r--r-- 1 468 fsuser 2528 Mar 13 17:05 errata.tex -rw-r--r-- 1 468 fsuser 79228 Mar 13 17:05 mf84.bug -rw-r--r-- 1 468 fsuser 295236 Mar 13 17:05 tex82.bug /tex/latex: -rw-rw-r-- 1 root ftp 15834 Jan 14 18:58 addendum.tex -r--r--r-- 1 root fsuser 40243 Feb 8 21:02 latex.bug -r--r--r-- 1 root fsuser 286412 Feb 8 21:02 latex.tex -r--r--r-- 1 root fsuser 48458 Feb 8 21:02 lplain.tex -r--r--r-- 1 root fsuser 48804 Feb 8 21:03 splain.tex /tex/local/cm: -rw-rw-rw- 1 468 fsuser 3561 Mar 15 21:44 ccmic9.mf -rw-rw-rw- 1 468 fsuser 217 Mar 15 21:44 odigs.mf /tex/local/lib: -rw-r--r-- 1 468 fsuser 3133 Mar 13 17:08 art.mf -rw-rw-r-- 1 468 fsuser 33699 Mar 13 17:09 gkpmac.tex -rw-r--r-- 1 468 fsuser 1581 Mar 13 17:09 list.tex -rw-r--r-- 1 468 fsuser 2179 Mar 13 17:09 llist.tex -rw-r--r-- 1 468 fsuser 263 Mar 13 17:09 oneone.mf -rw-r--r-- 1 468 fsuser 8240 Mar 13 17:09 picmac.tex /tex/local/mf: -rw-r--r-- 1 468 fsuser 691 Mar 13 17:09 plain.log /tex/local:/tex/local/mfware: -rw-r--r-- 1 468 fsuser 28547 Mar 13 17:10 gftodvi.ch /tex/local/tex: -rw-r--r-- 1 468 fsuser 53657 Mar 13 17:10 initex.ch /tex/mf: -rw-r--r-- 1 468 fsuser 916840 Mar 13 17:06 mf.web -rw-r--r-- 1 468 fsuser 938679 Mar 13 17:06 mfbook.tex -rw-r--r-- 1 468 fsuser 18238 Mar 5 23:56 trapman.tex /tex/mfware: -rw-r--r-- 1 468 fsuser 186545 Mar 13 17:06 gftodvi.web /tex/tex: -rw-r--r-- 1 468 fsuser 1025435 Mar 18 21:20 tex.web -rw-r--r-- 1 468 fsuser 1381907 Mar 13 17:07 texbook.tex -rw-r--r-- 1 468 fsuser 2438 Mar 13 17:07 trip.fot -rw-r--r-- 1 468 fsuser 182701 Mar 13 17:07 trip.log -rw-r--r-- 1 468 fsuser 18025 Mar 13 17:07 trip.typ -rw-r--r-- 1 468 fsuser 12930 Mar 13 17:08 tripin.log /tex/tugboat: -rw-r--r-- 1 468 fsuser 30903 Mar 11 19:44 guidepro.tex -rw-r--r-- 1 468 fsuser 14810 Mar 11 19:44 ltugboat.sty -rw-r--r-- 1 468 fsuser 3785 Mar 11 19:44 ltugproc.sty -rw-r--r-- 1 468 fsuser 25567 Mar 11 19:44 tugboat.com -rw-r--r-- 1 468 fsuser 66791 Mar 11 19:44 tugboat.sty -rw-r--r-- 1 468 fsuser 8901 Mar 11 19:44 tugproc.sty ######################################################################## Addenda to TeX82.BUG as of 13 March 91 ------------- Note: When making change 376, I forgot to delete the redundant code in module 883, and I should also have changed the name of that module. These cosmetic changes (and some changes to the comments) were made in version 3.14; but TeX 3.14 is functionally equivalent to TeX 3.1 and only a tiny bit faster. ------------- 393. The absolutely final change (to be made after my death) @x module 2 @d banner=='This is TeX, Version 3.14' {printed when \TeX\ starts} @y @d banner=='This is TeX, Version $\pi$' {printed when \TeX\ starts} @z My last will and testament for TeX is that no further changes be made under any circumstances. Improved systems should not be called simply `TeX'; that name, unqualified, should refer only to the program for which I have taken personal responsibility. -- Don Knuth ######################################################################## Addenda to MF84.BUG as of 13 March 91 ------------- 557. The absolutely final change (to be made after my death) @x module 2 @d banner=='This is METAFONT, Version 2.7' {printed when \MF\ starts} @y @d banner=='This is METAFONT, Version $e$' {printed when \MF\ starts} @z My last will and testament for METAFONT is that no further changes be made under any circumstances. Improved systems should not be called simply `METAFONT'; that name, unqualified, should refer only to the program for which I have taken personal responsibility. -- Don Knuth ######################################################################## Changes to the errata list (ERRATA.SIX) [ This is NOT a difference list. ] \def\rhead{Bugs in {\tensl Computers \& Typesetting, 1990}} ... \noindent This is a list of all corrections made to {\sl Computers \& Typesetting}, Volumes A,~C, and E\null, between 30 September 1989 (when the revisions for \TeX\ Version 3.0 and \MF\ Version 2.0 were made) and December 31, 1990. ... \bugonpage A137, lines 2 and 3 from the bottom (11/9/90) {\eightssi \rightline{and you shouldn't even be reading this manual,} \rightline{which is undoubtedly all English to you.} } \bugonpage A141, line 15 from the bottom (10/18/90) \tenpoint\noindent Thus if you type `|$1\over2$|' (in a text) you get $1\over2$, namely style $S$ over style~$S'$;\cutpar ... \bugonpage C11, replacement for second quotation at bottom of page (9/27/90) \begingroup \eightpoint \let\tt=\ninett \baselineskip 10pt \parfillskip \z@ \interlinepenalty 10000 \leftskip \z@ plus 40pc minus \parindent \let\rm=\eightss \let\sl=\eightssi \everypar{\sl} \def\par{\ifhmode\/\endgraf\fi}\obeylines To anyone who has lived in a modern American city (except Boston) at least one of the underlying ideas of ^{Descartes}' analytic geometry will seem ridiculously evident. Yet, as remarked, it took mathematicians all of two thousand years to arrive at this simple thing. \author ERIC TEMPLE ^{BELL}, {\sl Mathematics: Queen and Servant of % Science\/} (1951) % p123 \endgroup \bugonpage C262, lines 19--21 (11/9/90) \ninepoint\noindent for commonly occurring idioms. For example, `{\bf stop} |"hello"|' displays `|hello|' on the terminal and waits until \ is typed. \beginlines |def |^|upto|| = step 1 until enddef; def |^|downto|| = step -1 until enddef;| \endgroup ... \bugonpage C329, line 325 (12/29/90) \ninepoint\noindent which can be used to specify a nonstandard file area or directory name for the gray\cutpar ... \bugonpage C347, left column (9/27/90) \eightpoint\noindent Bell, Eric Temple, 11. \bugonpage C349, left column (9/27/90) \eightpoint\noindent Descartes, Ren\'e, 6, 11, 19. \bugonpage C356, right column (9/27/90) \eightpoint\noindent [remove the entry for Rex Stout.] \bugonpage C358, right column (9/27/90) \eightpoint\noindent [remove the entry for Nero Wolfe.] ######################################################################## Differences between TeX.WEB 3.1 and 3.14 (as of 18 March 1991) ;COMPARISON OF TX:TEX-31.WEB.1 AND TX:TEX-314.WEB.1 ;OPTIONS ARE /E /3 **** FILE TX:TEX-31.WEB.1, 1-43 (2896) % A reward of $327.68 will be paid to the first finder of any remaining bug, **** FILE TX:TEX-314.WEB.1, 1-42 (2894) % Version 3.14 was a cosmetic change for new Volume B (February 1991). % A reward of $327.68 will be paid to the first finder of any remaining bug, *************** **** FILE TX:TEX-31.WEB.1, 1-183 (10169) @d banner=='This is TeX, Version 3.1' {printed when \TeX\ starts} @ Different \PASCAL s have slightly different conventions, and the present **** FILE TX:TEX-314.WEB.1, 1-184 (10241) @d banner=='This is TeX, Version 3.14' {printed when \TeX\ starts} @ Different \PASCAL s have slightly different conventions, and the present *************** **** FILE TX:TEX-31.WEB.1, 1-1008 (48300) (If the \PASCAL\ compiler does not support non-local |@!goto|, the @^system dependencies@> **** FILE TX:TEX-314.WEB.1, 1-1009 (48373) (If the \PASCAL\ compiler does not support non-local |@!goto|\unskip, the @^system dependencies@> *************** **** FILE TX:TEX-31.WEB.1, 1-4856 (215250) {that's |text(font_id_base+equiv(n))|} end **** FILE TX:TEX-314.WEB.1, 1-4857 (215330) {that's |font_id_text(equiv(n))|} end *************** **** FILE TX:TEX-31.WEB.1, 1-8209 (361639) if (cur_cs=0)and@| **** FILE TX:TEX-314.WEB.1, 1-8210 (361714) @^recursion@> if (cur_cs=0)and@| *************** **** FILE TX:TEX-31.WEB.1, 1-9674 (418737) @p procedure conditional; **** FILE TX:TEX-314.WEB.1, 1-9675 (418825) @^recursion@> @p procedure conditional; *************** **** FILE TX:TEX-31.WEB.1, 1-14080 (611160) The box returned by |clean_box| is ``clean'' in the **** FILE TX:TEX-314.WEB.1, 1-14082 (611263) @^recursion@> The box returned by |clean_box| is ``clean'' in the *************** **** FILE TX:TEX-31.WEB.1, 1-14175 (615068) The second pass eliminates all noads and inserts the correct glue and **** FILE TX:TEX-314.WEB.1, 1-14178 (615186) @^recursion@> The second pass eliminates all noads and inserts the correct glue and *************** **** FILE TX:TEX-31.WEB.1, 1-14760 (639342) cur_style:=save_style; @; **** FILE TX:TEX-314.WEB.1, 1-14765 (639477) @^recursion@> cur_style:=save_style; @; *************** **** FILE TX:TEX-31.WEB.1, 1-15438 (669367) but we clear |aux| to zero just to be tidy. @p @t\4@>@@t@>@/ **** FILE TX:TEX-314.WEB.1, 1-15444 (669517) but we clear them to zero just to be tidy. @p @t\4@>@@t@>@/ *************** **** FILE TX:TEX-31.WEB.1, 1-17263 (749496) @; if post_break(q)<>null then @; **** FILE TX:TEX-314.WEB.1, 1-17269 (749645) @; if post_break(q)<>null then @; *************** **** FILE TX:TEX-31.WEB.1, 1-17277 (749957) if not is_char_node(s) then if next_break(cur_p)<>null then if cur_break(next_break(cur_p))=s then s:=r; r:=link(s); link(s):=null; **** FILE TX:TEX-314.WEB.1, 1-17283 (750062) r:=link(s); link(s):=null; *************** **** FILE TX:TEX-31.WEB.1, 1-17624 (764945) hyphen can be considerably more complex than that. For example, suppose that \.{abcdef} is a word in a font for which the only ligatures are \.{b\!c}, \.{c\!d}, \.{d\!e}, and \.{e\!f}. If this word is to permit hyphenation between \.b and \.c, the two patterns with and without hyphenation are **** FILE TX:TEX-314.WEB.1, 1-17628 (764937) hyphen can be considerably more complex than that. Suppose \.{abcdef} is a word in a font for which the only ligatures are \.{b\!c}, \.{c\!d}, \.{d\!e}, and \.{e\!f}. If this word permits hyphenation between \.b and \.c, the two patterns with and without hyphenation are *************** **** FILE TX:TEX-31.WEB.1, 1-19977 (866921) hyphenation. Again we have an implied ``cursor`` between characters |cur_l| and |cur_r|. The main difference is that the |lig_stack| can now **** FILE TX:TEX-314.WEB.1, 1-19981 (866890) hyphenation. Again we have an implied ``cursor'' between characters |cur_l| and |cur_r|. The main difference is that the |lig_stack| can now *************** **** FILE TX:TEX-31.WEB.1, 1-21590 (929845) begin get_token; {|get_x_token| would fail on \.{\\ifmmode}!} if (cur_cmd=math_shift)and(mode>0) then @ **** FILE TX:TEX-314.WEB.1, 1-21594 (929814) begin get_token; {|get_x_token| would fail on \.{\\ifmmode}\thinspace!} if (cur_cmd=math_shift)and(mode>0) then @ *************** **** FILE TX:TEX-31.WEB.1, 1-22413 (960656) by making its width zero. @= **** FILE TX:TEX-314.WEB.1, 1-22417 (960635) by causing its width to be zero. @= *************** **** FILE TX:TEX-31.WEB.1, 1-23152 (987557) |info(par_shape_ptr)| can hold any positive~|n| such |get_node(2*n+1)| doesn't overflow the memory capacity. **** FILE TX:TEX-314.WEB.1, 1-23156 (987543) |info(par_shape_ptr)| can hold any positive~|n| for which |get_node(2*n+1)| doesn't overflow the memory capacity. *************** **** FILE TX:TEX-31.WEB.1, 1-23239 (990682) if scan_keyword("at") then @ @.at@> **** FILE TX:TEX-314.WEB.1, 1-23243 (990673) if scan_keyword("at") then @ @.at@> *************** **** FILE TX:TEX-31.WEB.1, 1-23254 (991149) @ @= begin scan_normal_dimen; s:=cur_val; **** FILE TX:TEX-314.WEB.1, 1-23258 (991144) @ @= begin scan_normal_dimen; s:=cur_val; *************** **** FILE TX:TEX-31.WEB.1, 1-23484 (998722) @= **** FILE TX:TEX-314.WEB.1, 1-23487 (998719) @^data structure assumptions@> @= *************** **** FILE TX:TEX-31.WEB.1, 1-24036 (1017828) init for k:=0 to 255 do trie_used[k]:=min_quarterword;@+tini k:=256; while j>0 do begin undump(0)(k-1)(k); undump(1)(j)(x);@+init trie_used[k]:=qi(x);@+tini j:=j-x; op_start[k]:=qo(j); **** FILE TX:TEX-314.WEB.1, 1-24041 (1017859) init for k:=0 to 255 do trie_used[k]:=min_quarterword;@+tini@;@/ k:=256; while j>0 do begin undump(0)(k-1)(k); undump(1)(j)(x);@+init trie_used[k]:=qi(x);@+tini@;@/ j:=j-x; op_start[k]:=qo(j); *************** **** FILE TX:TEX-31.WEB.1, 1-24175 (1023526) This program doesn't bother to close the input files that may still be open. **** FILE TX:TEX-314.WEB.1, 1-24179 (1023563) @^recursion@> This program doesn't bother to close the input files that may still be open. *************** ######################################################################## Differences between TeX.WEB 3.0 and 3.1 (as of 21 September 1990) ;COMPARISON OF TX:TEX-30.WEB.1 AND TX:TEX-31.WEB.1 ;OPTIONS ARE /E /3 **** FILE TX:TEX-30.WEB.1, 1-42 (2816) % A reward of $327.68 will be paid to the first finder of any remaining bug, **** FILE TX:TEX-31.WEB.1, 1-41 (2814) % Version 3.1 fixed nullfont, disabled \write{\the\prevgraf} (September 1990). % A reward of $327.68 will be paid to the first finder of any remaining bug, *************** **** FILE TX:TEX-30.WEB.1, 1-68 (4055) \def\drop{\kern-.1667em\lower.5ex\hbox{E}\kern-.125em} % middle of TeX \catcode`E=13 \uppercase{\def E{e}} \def\\#1{\hbox{\let E=\drop\it#1\/\kern.05em}} % italic type for identifiers \outer\def\N#1. \[#2]#3.{\MN#1.\vfil\eject % begin starred section **** FILE TX:TEX-31.WEB.1, 1-69 (4135) \outer\def\N#1. \[#2]#3.{\MN#1.\vfil\eject % begin starred section *************** **** FILE TX:TEX-30.WEB.1, 1-186 (10278) @d banner=='This is TeX, Version 3.0' {printed when \TeX\ starts} @ Different \PASCAL s have slightly different conventions, and the present **** FILE TX:TEX-31.WEB.1, 1-183 (10169) @d banner=='This is TeX, Version 3.1' {printed when \TeX\ starts} @ Different \PASCAL s have slightly different conventions, and the present *************** **** FILE TX:TEX-30.WEB.1, 1-8472 (372855) begin nest[nest_ptr]:=cur_list; p:=nest_ptr; while abs(nest[p].mode_field)<>vmode do decr(p); scanned_result(nest[p].pg_field)(int_val); end @ @= **** FILE TX:TEX-31.WEB.1, 1-8469 (372746) if mode=0 then scanned_result(0)(int_val) {|prev_graf=0| within \.{\\write}} else begin nest[nest_ptr]:=cur_list; p:=nest_ptr; while abs(nest[p].mode_field)<>vmode do decr(p); scanned_result(nest[p].pg_field)(int_val); end @ @= *************** **** FILE TX:TEX-30.WEB.1, 1-10358 (446031) begin if input_ln(cur_file,false) then do_nothing; firm_up_the_line; **** FILE TX:TEX-31.WEB.1, 1-10356 (446011) begin line:=1; if input_ln(cur_file,false) then do_nothing; firm_up_the_line; *************** **** FILE TX:TEX-30.WEB.1, 1-10362 (446183) first:=limit+1; loc:=start; line:=1; end **** FILE TX:TEX-31.WEB.1, 1-10361 (446173) first:=limit+1; loc:=start; end *************** **** FILE TX:TEX-30.WEB.1, 1-10737 (464779) font_bc[null_font]:=1; font_ec[null_font]:=0; **** FILE TX:TEX-31.WEB.1, 1-10736 (464760) bchar_label[null_font]:=non_address; font_bchar[null_font]:=non_char; font_false_bchar[null_font]:=non_char; font_bc[null_font]:=1; font_ec[null_font]:=0; *************** **** FILE TX:TEX-30.WEB.1, 1-11673 (506824) if at all. Like |nop| commands and \\{xxx} commands, font definitions can appear before the first |bop|, or between an |eop| and a |bop|. **** FILE TX:TEX-31.WEB.1, 1-11674 (506916) if at all. Like |nop| commands, font definitions can appear before the first |bop|, or between an |eop| and a |bop|. *************** **** FILE TX:TEX-30.WEB.1, 1-18295 (794479) is |trie_op_ptr|. If the table overflows, the excess ops are ignored. Statistics printed during a dump make it possible for users to tell if this has happened. @= **** FILE TX:TEX-31.WEB.1, 1-18296 (794550) is |trie_op_ptr|. @= *************** **** FILE TX:TEX-30.WEB.1, 1-24730 (1045367) {disable \.{\\prevdepth}, \.{\\spacefactor}, \.{\\lastskip}} cur_cs:=write_loc; q:=scan_toks(false,true); {expand macros, etc.} **** FILE TX:TEX-31.WEB.1, 1-24729 (1045294) {disable \.{\\prevdepth}, \.{\\spacefactor}, \.{\\lastskip}, \.{\\prevgraf}} cur_cs:=write_loc; q:=scan_toks(false,true); {expand macros, etc.} *************** ######################################################################## Differences between MF.WEB 2.0 and MF.WEB 2.7 (as of 13 March 1991) ;COMPARISON OF TX:MF-20.WEB.1 AND TX:MF-27.WEB.1 ;OPTIONS ARE /E /3 **** FILE TX:MF-20.WEB.1, 1-22 (1390) % A few "harmless" optimizations have been made without changing versions. % A reward of $81.92 will be paid to the first finder of any remaining bug, % except bugs introduced after August 1989. **** FILE TX:MF-27.WEB.1, 1-22 (1390) % Version 2.7 made consistent with TeX version 3.1 (September 1990). % A few "harmless" optimizations have been made without changing versions. % A reward of $163.84 will be paid to the first finder of any remaining bug, % except bugs introduced after August 1989. *************** **** FILE TX:MF-20.WEB.1, 1-153 (8073) @d banner=='This is METAFONT, Version 2.0' {printed when \MF\ starts} @ Different \PASCAL s have slightly different conventions, and the present **** FILE TX:MF-27.WEB.1, 1-154 (8144) @d banner=='This is METAFONT, Version 2.7' {printed when \MF\ starts} @ Different \PASCAL s have slightly different conventions, and the present *************** **** FILE TX:MF-20.WEB.1, 1-2995 (123730) fractions. Using the recurrence $x_n=(x_{n-55}-x_{n-31})\bmod 2^{28}$, we generate batches of 55 new $x_n$'s at a time by calling |new_randoms|. **** FILE TX:MF-27.WEB.1, 1-2996 (123801) fractions. Using the recurrence $x_n=(x_{n-55}-x_{n-24})\bmod 2^{28}$, we generate batches of 55 new $x_n$'s at a time by calling |new_randoms|. *************** **** FILE TX:MF-20.WEB.1, 1-3005 (124184) and then it will fetch |randoms[j_random]|. @d next_random==if j_random=0 then new_randoms **** FILE TX:MF-27.WEB.1, 1-3006 (124255) and then it will fetch |randoms[j_random]|. The |next_random| macro actually accesses the numbers backwards; blocks of 55~$x$'s are essentially being ``flipped.'' But that doesn't make them less random. @d next_random==if j_random=0 then new_randoms *************** **** FILE TX:MF-20.WEB.1, 1-11094 (468472) numerators and denominators is to generalize the Stern-Peirce tree [cf.~{\sl The Art of Computer Programming\/ \bf2}, exercise 4.5.3--40] @^Peirce, Charles Santiago Sanders@> @^Stern, Moriz Abraham@> to a ``Stern-Peirce wreath'' as follows: Begin with four nodes arranged in a circle, containing the respective directions **** FILE TX:MF-27.WEB.1, 1-11097 (468704) numerators and denominators is to generalize the Stern-Brocot tree [cf.~{\sl Concrete Mathematics}, section 4.5] @^Brocot, Achille@> @^Stern, Moriz Abraham@> to a ``Stern-Brocot wreath'' as follows: Begin with four nodes arranged in a circle, containing the respective directions *************** **** FILE TX:MF-20.WEB.1, 1-15894 (663124) pack_file_name(cur_name,MF_area,cur_ext); if a_open_in(cur_file) then goto done; end_file_reading; {remove the level that didn't work} **** FILE TX:MF-27.WEB.1, 1-15897 (663314) if cur_area="" then begin pack_file_name(cur_name,MF_area,cur_ext); if a_open_in(cur_file) then goto done; end; end_file_reading; {remove the level that didn't work} *************** **** FILE TX:MF-20.WEB.1, 1-15919 (664150) begin if not input_ln(cur_file,false) then do_nothing; firm_up_the_line; buffer[limit]:="%"; first:=limit+1; loc:=start; line:=1; end **** FILE TX:MF-27.WEB.1, 1-15924 (664383) begin line:=1; if input_ln(cur_file,false) then do_nothing; firm_up_the_line; buffer[limit]:="%"; first:=limit+1; loc:=start; end *************** ######################################################################## Cosmetic change, GFTODVI.WEB, ver 3.0 ;COMPARISON OF TX:GFTODVI.WEB AND TX:GFTODVI.WEB.1 ;OPTIONS ARE /3 **** FILE TX:GFTODVI.WEB, 1-2553 (117187) if a |"/"| was removed at the end of the file name; this user that the user will have a chance to issue special instructions online just before **** FILE TX:GFTODVI.WEB, 1-2553 (117187) if a |"/"| was removed at the end of the file name; this means that the user will have a chance to issue special instructions online just before *************** ######################################################################## %%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % Character code reference %%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % Upper case letters: ABCDEFGHIJKLMNOPQRSTUVWXYZ % Lower case letters: abcdefghijklmnopqrstuvwxyz % Digits: 0123456789 % Square, curly, angle braces, parentheses: [] {} <> () % Backslash, slash, vertical bar: \ / | % Punctuation: . ? ! , : ; % Underscore, hyphen, equals sign: _ - = % Quotes--right left double: ' ` " %"at", "number" "dollar", "percent", "and": @ # $ % & % "hat", "star", "plus", "tilde": ^ * + ~ % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%% [ end of message 028 ] -------