texlive[54189] Master/texmf-dist/tex/generic/genmisc: noinfo license

commits+karl at tug.org commits+karl at tug.org
Mon Mar 9 00:11:14 CET 2020


Revision: 54189
          http://tug.org/svn/texlive?view=revision&revision=54189
Author:   karl
Date:     2020-03-09 00:11:13 +0100 (Mon, 09 Mar 2020)
Log Message:
-----------
noinfo license on these genmisc files

Removed Paths:
-------------
    trunk/Master/texmf-dist/tex/generic/genmisc/anti.tex
    trunk/Master/texmf-dist/tex/generic/genmisc/apldef.tex
    trunk/Master/texmf-dist/tex/generic/genmisc/arabic.tex
    trunk/Master/texmf-dist/tex/generic/genmisc/backgrnd.tex
    trunk/Master/texmf-dist/tex/generic/genmisc/balancedquotes.sty
    trunk/Master/texmf-dist/tex/generic/genmisc/chessmin.tex

Deleted: trunk/Master/texmf-dist/tex/generic/genmisc/anti.tex
===================================================================
--- trunk/Master/texmf-dist/tex/generic/genmisc/anti.tex	2020-03-08 22:52:11 UTC (rev 54188)
+++ trunk/Master/texmf-dist/tex/generic/genmisc/anti.tex	2020-03-08 23:11:13 UTC (rev 54189)
@@ -1,19 +0,0 @@
-     
-%%%%%%%%%%%%%%%%%%%%%%%%% CUT HERE %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% \anti -- Definition.
-% Produce a superscripted antiparticle: #1 with an overbar and a super-
-% script #2.  Looks better than \overline{{#1}^{#2}} (bar does not extend over
-% superscript) or {\overline {#1}}^{#2} (superscript does not stick up above
-% bar; in fact, superscript is at same height as for the charge conjugate,
-% {#1}^{#2}).  If you want subscripts too, you'll have to modify
-% this definition to take a third argument.  Math mode is assumed.
-% Macro by Rich Holmes (rich at suhep.bitnet), 1/88
-%
-\def\anti#1#2{\vbox{\ialign{##\crcr
-    \hrulefill$\smash{\phantom{\scriptstyle#2}}$\crcr % the right length bar
-    \noalign{\kern-1pt\nointerlineskip\vskip 0.25ex}  % the right spacing
-    $\hfil{#1}^{#2}\hfil$\crcr}}}                     % the right text
-%%%%%%%%%%%%%%%%%%%%%%%% CUT HERE %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-\def\Kzerobar{\anti{K}{0}}
-\def\Dstarbar{\anti{D}{*}} % et cetera
-%%%%%%%%%%%%%%%%%%%%%%%% CUT HERE %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

Deleted: trunk/Master/texmf-dist/tex/generic/genmisc/apldef.tex
===================================================================
--- trunk/Master/texmf-dist/tex/generic/genmisc/apldef.tex	2020-03-08 22:52:11 UTC (rev 54188)
+++ trunk/Master/texmf-dist/tex/generic/genmisc/apldef.tex	2020-03-08 23:11:13 UTC (rev 54189)
@@ -1,106 +0,0 @@
-%		apldef.tex
-%
-%	Aarno Hohti/Okko Kanerva
-%	University of Helsinki
-%	Department of Mathematics
-%	Hallituskatu 15
-%	SF--00100 Helsinki
-%	Finland
-%
-%	Bitnet:  HOHTI at FINFUN
-%
-%===============================================================
-% This file contains the definitions of the 2-letter control
-% sequences for using cmapl10.
-% cmapl10 was described in TUGboat 8 #3, November 1987.
-%===============================================================
-%
-\def\RO{{\apl\char'014}}               % rho
-\def\IO{{\apl\char'015}}               % iota
-\def\BX{\lower.1ex\hbox{\apl\char'001}}               % quad box (window etc.)
-\def\CE{{\apl\char'035}}               % ceiling
-\def\FL{{\apl\char'034}}               % floor
-\def\DE{{\apl\char'031}}               % decode
-\def\EN{{\apl\char'030}}               % encode
-\def\DL{{\apl\char'002}}               % del
-\def\LD{{\apl\char'003}}               % delta
-\def\NT{{\apl\char'026}}               % not
-\def\LO{{\apl\char'017}}               % circle
-\def\GO{{\apl\char'036}}               % arrow right
-\def\OR{{\apl\char'010}}               % logical or
-\def\DM{{\apl\char'011}}               % diamond
-\def\LE{{\apl\char'012}}               % less than or equal
-\def\GE{{\apl\char'013}}               % greater than or equal
-\def\AB{{\apl\char'174}}               % stile
-\def\LB{{\apl\char'173}}               % left brace
-\def\RB{{\apl\char'175}}               % right brace
-\def\DA{{\apl\char'037}}               % arrow down
-\def\UA{{\apl\char'136}}               % arrow up
-\def\EP{{\apl\char'006}}               % epsilon
-\def\NE{{\apl\char'027}}               % not equal
-\def\BL{{\apl\char'134}}               % backslash
-\def\RU{{\apl\char'022}}               % right U
-\def\LU{{\apl\char'023}}               % left U
-\def\DU{{\apl\char'021}}               % down U
-\def\UU{{\apl\char'020}}               % up U
-\def\LK{{\apl\char'033}}               % left tack
-\def\RK{{\apl\char'032}}               % right tack
-\def\US{{\apl\char'024}}               % underscore
-\def\NG{{\apl\char'025}}               % high minus
-\def\DD{{\apl\char'007}}               % dieresis
-\def\AM{{\apl\char'004}}               % alpha
-\def\OM{{\apl\char'005}}               % omega
-\def\SO{\raise.3ex\hbox{{\apl\char'016}}}  % small circle
-%
-% This macro is used for overstriking two characters
-\newskip\charwidth
-\def\overstrike#1#2{\setbox1=\hbox{#1}\charwidth=\wd1
-           #1\hskip-\charwidth#2}
-%
-\def\TR{\overstrike{\LO}{\BL}}                              % transpose
-\def\RV{\overstrike{\LO}{\AB}}                              % reverse
-\def\CR{\overstrike{\LO}{-}}                                % column reverse
-\def\GD{\overstrike{\DL}{\AB}}                              % grade down
-\def\GU{\overstrike{\LD}{\AB}}                              % grade up
-\def\FM{\overstrike{\raise.1ex\hbox{{\apl\char'016}}}{\EN}} % format
-\def\XQ{\overstrike{\raise.1ex\hbox{{\apl\char'016}}}{\DE}} % execute
-\def\SS{\overstrike{\RU}{\US}}                              % subset
-\def\CO{\overstrike{\LU}{\US}}                              % contains
-\def\CB{\overstrike{\BL}{-}}                                % column backslash
-\def\CS{\overstrike{/}{-}}                                  % column slash
-\def\IB{\overstrike{\EN}{\DE}}                              % I-beam
-\def\DQ{\overstrike{{\apl\char'045}}{\BX}}                  % divide quad
-\def\QQ{\overstrike{{\apl '}}{\BX}}                         % quote quad
-\def\PD{\overstrike{\DL}{\NT}}                              % protected del
-\def\NR{\overstrike{\OR}{\NT}}                              % nor
-\def\NN{\overstrike{{\apl\char'046}}{\NT}}                  % nand
-\def\LG{\overstrike{{\apl *}}{\LO}}                         % logarithm
-% underscored letters
-\def\ZA{\overstrike{{\apl A}}{\US}}
-\def\ZB{\overstrike{{\apl B}}{\US}}
-\def\ZC{\overstrike{{\apl C}}{\US}}
-\def\ZD{\overstrike{{\apl D}}{\US}}
-\def\ZE{\overstrike{{\apl E}}{\US}}
-\def\ZF{\overstrike{{\apl F}}{\US}}
-\def\ZG{\overstrike{{\apl G}}{\US}}
-\def\ZH{\overstrike{{\apl H}}{\US}}
-\def\ZI{\overstrike{{\apl I}}{\US}}
-\def\ZJ{\overstrike{{\apl J}}{\US}}
-\def\ZK{\overstrike{{\apl K}}{\US}}
-\def\ZL{\overstrike{{\apl L}}{\US}}
-\def\ZM{\overstrike{{\apl M}}{\US}}
-\def\ZN{\overstrike{{\apl N}}{\US}}
-\def\ZO{\overstrike{{\apl O}}{\US}}
-\def\ZP{\overstrike{{\apl P}}{\US}}
-\def\ZQ{\overstrike{{\apl Q}}{\US}}
-\def\ZR{\overstrike{{\apl R}}{\US}}
-\def\ZS{\overstrike{{\apl S}}{\US}}
-\def\ZT{\overstrike{{\apl T}}{\US}}
-\def\ZU{\overstrike{{\apl U}}{\US}}
-\def\ZV{\overstrike{{\apl V}}{\US}}
-\def\ZX{\overstrike{{\apl X}}{\US}}
-\def\ZY{\overstrike{{\apl Y}}{\US}}
-\def\ZW{\overstrike{{\apl W}}{\US}}
-\def\ZZ{\overstrike{{\apl Z}}{\US}}
-
-\endinput

Deleted: trunk/Master/texmf-dist/tex/generic/genmisc/arabic.tex
===================================================================
--- trunk/Master/texmf-dist/tex/generic/genmisc/arabic.tex	2020-03-08 22:52:11 UTC (rev 54188)
+++ trunk/Master/texmf-dist/tex/generic/genmisc/arabic.tex	2020-03-08 23:11:13 UTC (rev 54189)
@@ -1,55 +0,0 @@
-%--------------------------------------------
-% Ole Michael Selberg, October 5, 1995
-% TeX macros to make a Roman number Arabic
-%
-% Syntax: \arabicnumeral <Roman number >
-%--------------------------------------------
-\catcode`@=11
-\newcount\r at mancount \newcount\current \newcount\previous
-\def\@valueofcurrent{%
-   \ifx\next i\global\current=1 \else
-     \ifx\next v\global\current=5 \else
-      \ifx\next x\global\current=10 \else
-       \ifx\next l\global\current=50 \else
-        \ifx\next c\global\current=100 \else
-         \ifx\next d\global\current=500 \else
-          \ifx\next m\global\current=1000 \else 
-           \global\r at mancount=-100000
-            \immediate\write16{Line \the\inputlineno: non-Roman digit!}
-   \fi\fi\fi\fi\fi\fi\fi}
-\def\stop{\stop}
-\def\arabicnumeral #1 {\r at mancount=0 \current=0 \previous=10000 
-              \fr at mroman#1\stop}
-\def\fr at mroman {\afterassignment\@testchar\let\next}
-\def\@testchar{%
-    \ifx\next\stop 
-          \ifnum\r at mancount<0 (Wrong Roman numeral: ???)
-               \else
-                   \the\r at mancount 
-          \fi 
-          \let\next\relax
-       \else \@valueofcurrent
-                   \advance\r at mancount by\current       
-                   \ifnum\previous<\current
-                         \multiply\previous by2
-                         \advance\r at mancount by -\previous
-                   \fi
-           \let\next\fr at mroman
-   \fi  
-   \previous=\current  
-   \next}
-\catcode`@=12
-\endinput
-
-
----------------------------------------------------------------------------
-Ole Michael Selberg,
-Institutt for oesteuropeiske og orientalske studier 
-Universitetet i Oslo
-Pb. 1030 Blindern 
-N-0315 Oslo
-
-Phone: (47) 22 85 67 94
-Fax:   (47) 22 85 41 40
-
-

Deleted: trunk/Master/texmf-dist/tex/generic/genmisc/backgrnd.tex
===================================================================
--- trunk/Master/texmf-dist/tex/generic/genmisc/backgrnd.tex	2020-03-08 22:52:11 UTC (rev 54188)
+++ trunk/Master/texmf-dist/tex/generic/genmisc/backgrnd.tex	2020-03-08 23:11:13 UTC (rev 54189)
@@ -1,319 +0,0 @@
-%%% backgrnd.sty = background.sty
-%%% Experimental version 24 march 1996
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%%%
-%%%   This macro file aims at implementing marking of text,
-%%%   either by a grey background or by a changeebar
-%%%   using TeX's own resources only,
-%%%   (i.e., without resorting to any pstricks).
-%%%   Grey background uses a shade font defined using MetaFont
-%%% The macros seem to work satisfactory under plain TeX,
-%%%   however, I have also tried (rudimentarily) to integrate them with
-%%%   LaTeX, too. It seems to work with (simple) LaTeX 2.09, at least.
-%%%
-%%% commands :
-%%%     \RuleOn  and \RuleOff  : changebar
-%%%     \RuleON                : backs up to mark current line, too
-%%%     \RuleStyle { ( dimension )          % width of rule
-%%%                                         % rule offset on pages
-%%%                  [ # dimension |        %      with even pagenumbers
-%%%                    # dimension ] }      %      with odd pagenumbers
-%%%                                         % # is either < : left margin
-%%%                                         %          or > : right margin
-%%%     e.g.: default values are set by
-%%%           \RuleStyle { (2pt)[<18pt|>18pt] }
-%%%
-%%%
-%%%     \ShadeON               ( backs up to mark current line, too ) and
-%%%     \ShadeOn and \ShadeOff : grey background, requires shade.sty
-%%%                              therefore, by default,
-    \let\ifUseGrey\iffalse     % grey background will not be installed
-%%%                              - and will be replaced by rules
-%%%                              if grey background is required then
-%%%                              remove comment signs %%% from next line :
-%%% \let\ifUseGrey\iftrue
-%%%
-%%%            (At present) it is not possible to use both commands
-%%%            in the same document !
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%%%  Peter Schmitt                                  %%%
-%%%  Institut f\"ur Mathematik, Universit\"at Wien  %%%
-%%%  Strudlhofgasse 4, A-1090 Wien, Austria         %%%
-%%%  email: schmitt at awirap.bitnet                   %%%
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
-\catcode`\: 11                                  % make internal macros private
-\countdef\int: 255                              % scratch registers
-\dimendef\dim: 0
-\skipdef\skip: 0
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%%%   commands and options   %%%
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
-\def \RuleOn {\bg:ini \bg:rule
-              \RuleStyle { (2pt)[<18pt|>18pt] }
-              \bg:commands \RuleOn \RuleON \RuleOff
-              \RuleOn
-             }
-\def \RuleStyle #1{\set:hsize #1(\bg:hsize)\\%
-                   \set:offsets #1[*|*]\iftrue]\iffalse\\%
-                  }
-
-\def \bg:rule   {\leaders\vrule width\bg:hsize\vskip}
-\def \bg:empty  {\vskip}
-\let \bg:offset \relax
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%%%   interface tools   %%%
-%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
-\def\bg:commands #1#2#3{\def #1{\bg:option {\vbox{}\pos:on}}
-                        \def #2{\bg:option {\nobreak\vskip-\baselineskip
-                                \vbox{}\pos:on
-                                \nobreak\vskip\baselineskip }
-                               }
-                        \def #3{\bg:option {\vbox{}\pos:off}}
-                       }
-\def \bg:ini {\output{\bg:output}     % should be followed by desired \bg:style
-              \zero:pos
-              \global\let \bg:skip \bg:empty
-              \let \bg:style
-             }
-\def\bg:option #1{\ifvmode #1\else \vadjust{#1}\fi }
-
-\def \set:hsize  #1(#2)#3\\{\edef\bg:hsize{#2}}
-\def \set:offsets #1[#2#3|#4#5]#6]#7#8\\{#7
-     \def\bg:shift{}
-     \set:offset #2#3
-     \set:offset #4#5
-     \expandafter \set:shifts \bg:shift
-                                         \fi }
-\def\set:offset #1#2 {\setbox0\hbox{\dim: #2\bg:offset\xdef\bg:offset{\the\dim:}}
-                      \dim:\bg:offset
-                      \expandafter\expandafter\expandafter
-                          \set:shift \csname bg:#1\endcsname
-                     }
-\def\set:shift #1#2{\dim: \bg:offset \advance\dim: #2%
-                    \edef\bg:shift {\bg:shift {#1\the\dim:}}
-                   }
-\expandafter\def \csname bg:<\endcsname {\moveleft \bg:hsize}
-\expandafter\def \csname bg:>\endcsname {\moveright \hsize}
-\def \set:shifts #1#2{\def\bg:shift{\ifodd\pageno #2\else #1\fi}}
-
-%%% not used :
-\def\bg:err #1{\errmessage {%
-               Warning ! Background mode \noexpand#1 already active ! }
-              }
-%%% saving position without eject yields not always correct result
-%%% \def\bg:on  {\switch:to \bg:style } \def\bg:off {\switch:to \bg:empty }
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%%%   grey background   %%%
-%%%%%%%%%%%%%%%%%%%%%%%%%%%
-\ifUseGrey
-
-\def\ShadeOn {\bg:ini \bg:grey
-              \let\bg:shift\relax
-              \let\bg:hsize\hsize
-              \setbox\grey:line
-                 \vbox{\shade{\line:{\vphantom{\grey:\char0}\hfil}}}
-              \bg:commands \ShadeOn \ShadeON \ShadeOff
-              \ShadeOn
-             }
-\csname newbox\endcsname\grey:line         % allow \newbox in conditional text
-\def\bg:grey {\leaders\copy\grey:line\vskip}
-\let\line:\line
-\input shade
-
-\else
-  \def\ShadeOn{\RuleOn} \def\ShadeOff{\RuleOff} \def\ShadeON{\RuleON}
-  \fi
-%%%%%%%%%%%%%%%%%%%%%%%%%%
-%%%   output routine   %%%
-%%%%%%%%%%%%%%%%%%%%%%%%%%
-
-   \newbox \bg:page
- \newdimen \v:size
-  \newskip \v:pos
- \newcount \true:penalty
-  \chardef \the:page 255
-
-\def\option: #1{\advance\int: -1
-                \edef#1{\penalty\the\int: }
-                \expandafter\def\csname\the\int:\endcsname
-               } \int: -12345
-\def\bg:output{\expandafter\ifx\csname\the\outputpenalty\endcsname\relax
-                     \global\true:penalty\outputpenalty
-                     \expandafter\bg:pagecontents
-               \else \expandafter\expandafter
-                     \csname\the\outputpenalty\endcsname
-               \fi }
-\option: \pos:on  {\bg:switch \bg:style }
-\option: \pos:off {\bg:switch \bg:empty }
-\option:  \bg:top {\save:pos \add:bg\bg:empty\v:skip{}
-                   \repeat:page \unvbox\the:page }
-\option:  \bg:bot {\save:pos \repeat:page \unvbox\the:page }
-\option:  \fg:end {\save:pos \add:bg\bg:empty{}\v:skip \bg:makepage }
-
-\def \bg:switch #1{\setbox\the:page
-                          \vbox{\unvbox\the:page \setbox0\lastbox }
-                   \ifdim \pagetotal=\topskip
-                          \global\let \bg:skip #1
-                          \unvbox\the:page
-                    \else \switch:to #1
-                          \repeat:page\repeat:inserts \unvbox\the:page
-                      \fi
-                  }
-\def\switch:to #1{\save:pos
-                  \add:bg \bg:skip{}\v:skip
-                  \global\let \bg:skip #1}
-\def\bg:pagecontents {\switch:to \bg:skip
-                      \setbox\the:page \vbox
-                          {\vbox{}\bg:top \unvbox\the:page \bg:bot }
-                      \zero:pos \repeat:page
-                      \pagecontents \fg:end
-                     }
-\def\bg:makepage {\global\v:size\vsize \advance\v:size \dp\the:page
-                  \def\pagecontents{%
-                        \bg:shift
-                        \vbox to0pt{\vbox to\v:size{\unvbox\bg:page}\vss}
-                        \unvbox\the:page }
-                  \outputpenalty\true:penalty
-                  \plainoutput
-                  \zero:pos \reset:inserts
-                 }
-
-%%%%%%%%%%%%%%%%%
-%%%   tools   %%%
-%%%%%%%%%%%%%%%%%
-
-\def\repeat:page {\vbox{}\nobreak\kern-\topskip }
-\def\add:bg #1#2#3{\let\bg:vskip #1
-                   \global\setbox\bg:page \vbox{#2\unvbox\bg:page#3}
-                  }
-
-\newdimen \v:fil
-\newdimen \v:fill
-\newdimen \v:filll
-\def\zero:pos {\global   \v:pos 0pt
-               \global   \v:fil 0pt
-               \global  \v:fill 0pt
-               \global \v:filll 0pt
-              }
-\def\save:pos {\skip: -\v:pos                            % save -last:pos
-               \global         \v:pos \pagetotal
-               \global\advance \v:pos \pagedepth
-                      \ifnum \pagedepth=0 \advance\v:pos \dp\the:page \fi
-               \global\advance \v:pos 0ptplus\pagestretch minus\pageshrink
-               \save:skip
-              }
-\def\save:pos {\skip: -\v:pos                            % save -last:pos
-               \global         \v:pos \pagetotal
-               \global\advance \v:pos \pagedepth
-                      \ifnum \pagedepth=0 \advance\v:pos \dp\the:page \fi
-               \global\advance \v:pos 0ptplus\pagestretch minus\pageshrink
-               \save:skip
-               \global\skip\ins:size \vsize
-                      \global\advance\skip\ins:size -\pagegoal
-                      \global\advance\skip\ins:size -\ins:skip
-              }
-\def\save:skip {\advance\skip:\v:pos                     % v:pos - last:pos
-                \let\bg:vskip\relax
-                \edef\v:skip{\bg:vskip\the\skip:}
-                \fil:skip l \fil:skip ll \fil:skip lll
-               }
-\def\fil:skip #1 {\set:fil {\csname v:fi#1\endcsname}
-                           {\csname pagefi#1stretch\endcsname}
-                  \edef\v:skip{\v:skip \bg:vskip0ptplus\the:pt \dim: fi#1 }
-                 }
-\def\set:fil #1#2{\dim: -#1
-                  \advance \dim: #2
-                  \global #1 #2
-                 }
-\def\the:pt {\expandafter\PT:\the}
-                     {  \catcode`p 12 \catcode`t 12
-\gdef\PT: #1pt{#1}   }% \catcode`p 11 \catcode`t 11
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%%%   insert handling   %%%
-%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
-\newcount\ins:
-\newinsert\ins:size
-\newdimen\ins:skip
-
-\let\do:insert \insert
-\def\inserts:{}
-\def\insert {\afterassignment\adjust:pos\ins:}
-\def\adjust:pos {\csname ins:\the\ins:\endcsname\csname iftrue\endcsname
-                 \add:plus \ins: \add:minus \ins:
-                 \advance\ins:skip\skip\ins:
-                 \let\temp:\relax
-                 \edef\inserts:{\inserts: \temp:{\the\ins:}}
-                 \fi
-                 \global\expandafter\let\csname ins:\the\ins:\endcsname \iffalse
-                 \do:insert\ins: }
-\def\repeat:inserts{\def\temp:##1{\do:insert##1{}}\inserts: }
-\def\reset:inserts{%
-    \def\temp: ##1{\global\expandafter\let\csname ins:##1\endcsname \relax }
-    \inserts: \gdef\inserts:{}\global\ins:skip 0pt }
-
-%%%   tools for insert handling   %%%
-
-    \catcode `L12 \catcode `N12 \catcode `S12 \catcode `U12 \lowercase{
-\def\plus: #1LUS #2 #3\\{#2}
-\def\Plus: #1{\expandafter\plus:\the#1 LUS 0.0pt \\}
-\def\minus: #1NUS #2 #3\\{#2}
-\def\Minus: #1{\expandafter\minus:\the#1 NUS 0.0pt \\}
-    } \catcode `L11 \catcode `N11 \catcode `S11 \catcode `U11
-
-\def\set:int {\afterassignment\set:frac\int: }
-\def\set:frac #1{\afterassignment\csname\count0 }
-\def\adv:pos #1{\global\advance#1\the\int:.\the\count0 pt }
-\def   \pt:p {\adv:pos {\v:pos 0ptplus}}
-\def   \pt:m {\adv:pos {\v:pos 0ptminus}}
-\def  \fil:p {\adv:pos \v:fil }
-\def \fill:p {\adv:pos \v:fill }
-\def\filll:p {\adv:pos \v:filll }
-
-\def\add:plus  #1{{\expandafter\set:int \Plus: {\skip#1}:p\endcsname }}
-\def\add:minus #1{{\expandafter\set:int \Minus:{\skip#1}:m\endcsname }}
-
-%%%%%%%%%%%%%%%%%%%%%%%%
-%%%   LaTeX extras   %%%
-%%%%%%%%%%%%%%%%%%%%%%%%
-
-\catcode`@ 11
-\ifx \@outputbox\undefined \endinput \catcode`@12 \catcode`: 12 \fi
-
-\newtoks\latex:output \latex:output \output
-\newdimen\v:ht                             % possibly \textheight could be used
-
-\def\bg:@makecol {\switch:to \bg:skip
-                  \setbox\the:page \vbox
-                      {\vbox{}\bg:top \unvbox\the:page \bg:bot }
-                  \@makecol
-                  \global\v:ht\ht\@outputbox \global\v:size\v:ht
-                              \global\advance\v:size\dp\@outputbox
-                  \zero:pos \outputpenalty\true:penalty
-                  \repeat:page \unvbox\@outputbox \fg:end
-                 }
-\def\bg:@makepage {\setbox\@outputbox \vbox to \v:ht {%
-                       \bg:shift
-                       \vbox to0pt{\vbox to\v:size{\unvbox\bg:page}\vss}
-                       \unvbox\the:page }
-                   \outputpenalty\true:penalty
-                   \let\@makecol\relax \the\latex:output
-                   \zero:pos \reset:inserts
-                  }
-\let \bg:makepage \bg:@makepage
-\let \bg:pagecontents \bg:@makecol
-\def \line: {\hbox to\textwidth}
-\let \pageno \c at page
-
-\catcode`@ 12 \catcode`: 12
-
-\endinput %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%%%   end : background.sty  [ 0.3 ]   %%%
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

Deleted: trunk/Master/texmf-dist/tex/generic/genmisc/balancedquotes.sty
===================================================================
--- trunk/Master/texmf-dist/tex/generic/genmisc/balancedquotes.sty	2020-03-08 22:52:11 UTC (rev 54188)
+++ trunk/Master/texmf-dist/tex/generic/genmisc/balancedquotes.sty	2020-03-08 23:11:13 UTC (rev 54189)
@@ -1,418 +0,0 @@
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%% file name: balancedquotes.sty (for plain TeX and LaTeX)
-%% Ole Michael Selberg, 25.8.1994
-%% E-mail: O.M.Selberg at easteur-orient.uio.no
-%%-------------------------------------------------------------------
-%% Description:
-%%   This file contains macros that simplify the management of quotes.
-%%   The input:                    
-%%                             "...*....*..." 
-%%   will be typeset as:
-%%                            <<...<...>...>>     (default)
-%%
-%%   (or as:                       
-%%                           ,,...,...'...''         
-%%   etc., depending on your choices.).
-%%
-%%   TeX keeps track of whether full quotes (written as ") and half
-%%   quotes (written as *) are balanced, When a quote has been omitted,
-%%   as in:
-%%         --- text "text in quotes more text "text in quotes" ---
-%%   an error message is written to the screen, and a mark is put in 
-%%   the margin to the left of the line in which a final full or half  
-%%   quote followed by a letter was discovered.
-%%   
-%%   The macros can be used both with plain TeX and LaTeX. You can test
-%%   them and learn how to use the commands by running the test file 
-%%   which is included in this file, after \endinput. 
-%%   Just copy all the stuff after \endinput to a new file,
-%%   which you should name balancedquotestest.tex, and then delete it 
-%%   from this file.
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-\catcode`\@=11 \catcode`\_=11 \newif\ifapostrophe \newlinechar=`^^J
-%
-\def\definequotes #1#2#3#4{%
-     \def\bquote_char{#1}\def\equote_char{#2}%
-     \def\bhquote_char{#3}\def\ehquote_char{#4}}
-%     
-\def\setquotes{\futurelet\test_token\CheckForOptArg}
-\def\CheckForOptArg{\ifx\test_token[
-    \let\next\OptArgPresent
-       \else \let\next\OptArgAbsent \fi \next}
-\def\OptArgPresent[#1]#2{\csname #2#1q\endcsname}
-\def\OptArgAbsent #1{\csname #1q\endcsname}
-  %---------------------------------------
-  % Norwegian:
-  %
-\def\Nq{% Output: <<...<...>...>>
-     \def\bquote_char {\char"13 }\def\equote_char {\char"14 }%
-     \def\bhquote_char {\char"0E}\def\ehquote_char {\char"0F}%
-     }
-\def\NCq{% Output: ,,...,...'...''
-     \def\bquote_char {\char"12 \apostrophe_check}%
-                             \def\equote_char {\char"11 }%
-     \def\bhquote_char {\char"0D}\def\ehquote_char {\char"27}%
-     \apostrophetrue}
-\let\NGq=\Nq \let\norwegianquotes=\Nq \let\norwegianguillemetsq=\Nq
-\let\norwegiancommasq=\NCq
-  %-----------------------------------------    
-  % German:
-  %
-\def\DGq{% Output: >>...>...<...<<
-     \def\bquote_char {\char"14 }\def\equote_char {\char"13 }%
-     \def\bhquote_char {\char"0F}\def\ehquote_char {\char"0E}%
-     }
-\def\DCq{% Output: ,,...,...`...``
-     \def\bquote_char{\char"12  \apostrophe_check}%
-                             \def\equote_char {\char"10 }%
-     \def\bhquote_char {\char"0D}\def\ehquote_char {\char"60}%
-     \apostrophetrue}
-\let\Dq=\DCq \let\germanquotes=\DCq \let\germanguillemetsq=\DGq
-\let\germancommasq=\DCq 
-  %------------------------------------------
-  % French:
-  %
-\def\Fq{% Output: <<...<<...>>...>>
-     \def\bquote_char {\char"13\ }%
-                       \def\equote_char {\thinspace\char"14 }%
-     \def\bhquote_char {\char"13\thinspace }%
-                       \def\ehquote_char { \char"14 }%
-     }
-\def\FCq{\message{French doesn't use comma quotes!
-        I shall choose guillemets instead.}}
-\let\frenchquotes=\Fq \let\FGq=\Fq \let\frenchguillemetsq=\Fq
-\let\frenchcommasq=\FCq
-  %------------------------------------------
-  % English:
-  %
-\def\GBq{% Output: `...``...''...'
-     \def\bquote_char {\char"60 }\def\equote_char {\char"27 }%
-     \def\bhquote_char {\char"10 }\def\ehquote_char {\char"11 }%
-     }
-\def\USq{% Output: ``...`...'...''
-     \def\bquote_char {\char"10 }\def\equote_char {\char"11 }%
-     \def\bhquote_char {\char"60 }\def\ehquote_char {\char"27 }%
-     }
-\def\EQM{\message{English doesn't use guillmets!
-        I shall choose normal English quotes instead.}}     
-\let\USquotes=\USq  \let\GBquotes=\GBq \let\USCq=\USq \let\GBCq=\GBq
-\def\GBguillemetsq{\EQM\GBq} \def\USguillemetsq{\EQM\USq}
-\let\englishquotes=\USq \let\englishcommasq=\USq \let\Eq=\USq \let\ECq=\USq
-\let\englishguillemetsq=\USguillemetsq
-%------------------------------------------- 
-\def\bquote{\global\advance\quotecount by1 \bquote_char}%
-\def\equote{\penalty 10000 {\equote_char }\global\advance\quotecount by1 }% 
-\def\bhquote{\bhquote_char \global\advance\hquotecount by1 }%
-\def\ehquote{\penalty 10000 \ehquote_char \global\advance\hquotecount by1 }%
-
-\newcount\quoteflag \newcount\quotecount 
-\newcount\hquoteflag  \newcount\hquotecount
-\def\hex{"} \let\star=* 
-\catcode`\"=\active \catcode`\*=\active
-\def"{\begingroup\ifnum\quoteflag=0
-         \aftergroup\bquote\global\quoteflag=1
-       \else \equote\global\quoteflag=0 
-	   \aftergroup\equote_check \fi \endgroup}
-\def*{\begingroup\ifmmode \else\ifnum\hquoteflag=0 \bhquote\global\hquoteflag=1
-       \else \ehquote\global\hquoteflag=0 
-	   \aftergroup\ehquote_check \fi \fi \endgroup}
-\def\equote_check{\futurelet\next\equote_test}
-\def\ehquote_check{\futurelet\next\ehquote_test}
-\def\equote_test{\ifcat\noexpand\next a%
-	     \immediate\write16{^^J--->> Final full quote followed by a
-          letter!!}\equote_warning\fi}
-\def\ehquote_test{\ifcat\noexpand\next a%
-	     \immediate\write16{^^J--->  Final half quote followed by a
-          letter!!}\ehquote_warning\fi}
-\def\quotesnumbertest{\ifodd\quotecount\immediate\write16{!! Odd number
-                 of full quotes.}\fi
-     \ifodd\hquotecount\immediate\write16{!! Odd number
-	             of half quotes.}\fi}
-\def\apostrophe_check{\futurelet\next\apostrophe_test}
-\def\apostrophe_test{\if\next j\thinspace\fi}
-
-\def\l_note{\strut\vadjust{\kern-\dp\strutbox
-                   \vtop to 0pt{%
-				       \vss\llap{{\box0}\ 
-					       \quad}}
-	 \dimen0=-\prevdepth\advance\dimen0by\dp\strutbox
-     \penalty0\kern\dimen0
-}}
-\def\equote_warning{{\setbox0=\hbox{\equote_char\thinspace !\quad}\l_note}}
-\def\ehquote_warning{{\setbox0=\hbox{\ehquote_char\thinspace !\quad}\l_note}}
-%
-%\catcode`\@=12 \catcode`\_=8
-\Nq
-\endinput
-
-% Copy this to a new file:
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%% file name: balancedquotestest.tex
-%% Ole Michael Selberg, 25.8.1994
-%% E-mail: O.M.Selberg at easteur-orient.uio.no
-%%-------------------------------------------------------------------
-%% Description:
-%%   This file inputs the file balancedquotes.sty and tests 
-%%   the quote macros defined there.
-%%   It works with both plain TeX and LaTeX.
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-\newif\ifLaTeX
-  % Is this LaTeX?
-\ifx\protect\undefined \else \LaTeXtrue \fi
- % We presuppose Cork-encoding:
-\def\"{\accent4}\def\\{$\backslash$}\def\<{$\lbrace$}
-\def\>{$\rbrace$}
-\overfullrule=0pt
-
-
-\ifLaTeX
-   \documentstyle [balancedquotes] {article}
-   \begin{document}
-\else \input balancedquotes.sty
-\fi
-
-\message{^^JType the name of a font with Cork encoding,
-    ^^Je.g. dcr10:}
-\read16 to \dvifontname
-\font\dvifont=\dvifontname at 10pt
-\message{^^J}
-\dvifont
-
-\hsize=10cm
-\hoffset=2cm
-\parindent=0pt
-
-\hyphenation{Af-ten-pos-ten}        
-\centerline{Test of {\tt balancedquotes.sty}\hfill
-     Date:\enspace \the\month/\the\day/\the\year} 
-
-\vglue 1cm
-%\Nq
-\definequotes{\char19}{\char20}{\char14}{\char15}
-    
-\moveleft 10pt\vbox{\bf The command {\tt \\Nq} (\dvifont Norwegian: "...*...*..."):}
-\smallskip
-"Det er sant," sa han, "jeg har nettopp avbestilt *Aftenposten*!"
-
-"Har du det?" svarte hun forbauset. "Hvorfor spurte du ikke meg f{\o}rst?"
-
-\medskip
-{\leftskip20pt
-Equivalent commands:
-\smallskip
-\tt
-\\norwegianquotes ({\dvifont This is the default for Norwegian.})
-
-\\NGq
-
-\\setquotes \<norwegian\> 
- 
-\\setquotes \<N\>
-
-\\setquotes [guillemets]\<norwegian\> 
-
-\\setquotes [G]\<N\>
-
-\\norwegianguillemetsq
-
-\\definequotes \<\\char19\>\<\\char20\>\<\\char14\>\<\\char15\>
-
-}
-
-\bigskip
-
-\setquotes [commas]{norwegian}
-
-
-\moveleft 10pt\vbox{\bf The command {\tt \\NCq} \dvifont (Norwegian: "...*...*..."):} 
-\smallskip
-"Det er sant," sa han, "jeg har nettopp avbestilt *Aftenposten*!"
-
-"Har du det?" svarte hun forbauset. "Hvorfor spurte du ikke meg f{\o}rst?"
-\medskip
-
-{\leftskip20pt
-Equivalent commands:
-\tt
-\smallskip
-
-\\setquotes [commas]\<norwegian\> 
- 
-\\setquotes [C]\<N\>
-
-\\norwegiancommasq 
-
-\\definequotes \<\\char18\>\<\\char17\>\<\\char13\>\<\\char39\>
-
-}
-\bigskip
-\Dq
-
-\moveleft 10pt\vbox{\bf The command {\tt \\Dq} \dvifont (German: "...*...*..."):} 
-\smallskip
-Goethe schrieb: "Wielands *Oberon* wird als ein Meisterst\"uck angesehen."
-
-\medskip
-{\leftskip20pt
-Equivalent commands:
-\smallskip
-\tt
-
-\\germanquotes ({\dvifont This is the default for German})
-
-\\DCq
-
-\\setquotes [commas]\<german\> 
- 
-\\setquotes [C]\<D\>
-
-\\germancommasq
-
-\\definequotes \<\\char18\>\<\\char17\>\<\\char13\>\<\\char39\>
-
-}
-
-\bigskip
-\DGq
-
-\moveleft 10pt\vbox{\bf The command {\tt \\DGq} \dvifont (German: "...*...*..."):} 
-\smallskip
-Goethe schrieb: "Wielands *Oberon* wird als ein Meisterst\"uck angesehen."
-
-\medskip
-{\leftskip20pt
-Equivalent commands:
-\smallskip
-\tt
-
-\\setquotes [guillemets]\<german\> 
- 
-\\setquotes [G]\<D\>
-
-\\germanguillmetsq
-
-\\definequotes \<\\char20\>\<\\char19\>\<\\char15\>\<\\char14\>
-
-}
-
-\ifLaTeX \else\filbreak\fi
-
-\USq
-
-\moveleft 10pt\vbox{\bf The command {\tt \\USq} \dvifont  (US English: "...*...*..."):} 
-\smallskip
-Goethe wrote: "Wieland's *Oberon* is considered a masterpiece."
-
-\medskip
-{\leftskip20pt
-Equivalent commands:
-\smallskip
-\tt
-
-\\setquotes \<US\>
-
-\\setquotes [commas]\<US\> 
- 
-\\setquotes [C]\<US\>
-
-\\UScommasq
-
-\\definequotes \<\\char16\>\<\\char17\>\<\\char96\>\<\\char39\>
-
-\\setquotes [guillmets]\<US\> {\dvifont etc.\  will generate an error message
-and call} \\USq
-
-}
-
-\bigskip
-\GBq
-
-\moveleft 10pt\vbox{\bf The command {\tt \\GBq} \dvifont (GB English: "...*...*..."):}
-\smallskip
-Goethe wrote: "Wieland's *Oberon* is considered a masterpiece."
-
-\medskip
-{\leftskip20pt
-Equivalent commands:
-\smallskip
-\tt
-
-\\setquotes \<GB\>
-
-\\setquotes [commas]\<GB\> 
- 
-\\setquotes [C]\<GB\>
-
-\\GBcommasq
-
-\\definequotes \<\\char96\>\<\\char39\>\<\\char16\>\<\\char17\>
-
-\\setquotes [guillmets]\<GB\> {\dvifont etc.\  will generate an error message
-and call} \\GBq
-
-}
-
-
-\bigskip
-\Fq
-
-\moveleft 10pt\vbox{\bf The command {\tt \\Fq} \dvifont  (French: "...*...*..."):} 
-\smallskip
-On dit couramment {\it nic nie wiem\/} "je ne sais rien".
-
-\medskip
-{\leftskip20pt
-Equivalent commands:
-\smallskip
-\tt
-
-\\frenchquotes {\dvifont This is the default.}
-\\setquotes \<GB\>
-
-\\setquotes [guillemets]\<F\> 
- 
-\\setquotes [G]\<F\>
-
-\\frenchguillemetsq
-
-\\definequotes \<\\char19\ \>\<\\ \\char20\>\<\\char19\ \>\<\\ \\char20\>
-
-\\setquotes [commas]\<french\> {\dvifont etc.\  will generate an error message
-and call} \\Fq
-
-}
-
-\bigskip
-
-\NCq
-
-\moveleft 10pt\vbox{\bf Test of error detection when quotes are unbalanced:}
-\smallskip
-"Det er sant," sa han, "jeg har nettopp avbestilt *Aftenposten*!"
-
-"Har du det? svarte hun forbauset. "Hvorfor spurte du ikke meg f{\o}rst?"
-
-
-\bigskip
-
-
-\moveleft 10pt\vbox{\bf Test of {\tt \\hex} og {\tt \\star}}
-\smallskip
-The command {\tt \\hex} is used instead of {\tt
-\\char\hex22} whenever {\tt \\char\hex22} does not denote
-a quote sign. For instance, we can write: {\tt
-\\char\hex41} in order to get an `A'. Here we
-test that the macro {\tt \\hex} works as it should: `{\tt
-\\char\\hex4F\\char\\hex4B}'
-is output as `\char\hex4F\char\hex4B'. 
-
-\smallskip 
-Instead of {\char \hex2A} we write {\tt \\star}.
-
-\def\slutt{\end{document}}
-{\ifLaTeX
-  \aftergroup\slutt
-\fi}
-
-\bye
-

Deleted: trunk/Master/texmf-dist/tex/generic/genmisc/chessmin.tex
===================================================================
--- trunk/Master/texmf-dist/tex/generic/genmisc/chessmin.tex	2020-03-08 22:52:11 UTC (rev 54188)
+++ trunk/Master/texmf-dist/tex/generic/genmisc/chessmin.tex	2020-03-08 23:11:13 UTC (rev 54189)
@@ -1,171 +0,0 @@
-%   These are two TeX macros which may be useful for writing about
-% chess.  \bore creates a chess diagram from Forsyth notation, with
-% Z used as a terminator.  For example,
-% 
-%   $$\bore r1bqkbnr pppp1ppp 2n5 1B2p3 4P3 5N2 PPPP1PPP RNBQK2R Z$$
-%
-% shows the Ruy Lopez after white's third move.
-%
-% \VAR (number) (moves separated by spaces) Z may be used to write
-% a variation.  The macro inserts the move numbers, starting with 
-% (number).  For example,
-%
-%     Continuing from the diagram above, \VAR 3 \dots{} a6 Ba4 Nf6 O--O
-%     Be7 Re1 b5 Bb3 O-O c3 d5 Z is the Marshall gambit.
-%
-%  Note the \dots{} to indicate that Black made the first move.
-%
-%  The diagrams created by \bore have pieces made up of a small number
-% of rectangles.  Much nicer diagrams and more powerful macros were
-% created by Piet Tutelaers, available  by anonymous ftp
-% at sol.cs.ruu.nl (131.211.80.5).  However, the ones offered here
-% do not require additional fonts, and may be easier to use.
-%
-%   I authorize circulation of these macros by ftp sites and similar
-% nonprofit media.  Improvements are welcome.  An earlier version of
-% the macros (with letters for pieces) was done several years ago, 
-% with substantial modifications by Steve Cochran.
-%
-%   Charles Blair  (ceblair at ux1.cso.uiuc.edu)
-%    macros start below--- you may cut here --------------------------
-%
-% \fun is the fundamental length unit for the diagrams.  If you
-% replace 1.2pt by something else, the scale is changed.
-% The box rf is not used, except to provide something with which to
-% refer to \fun.
-%
-\newdimen\fun \dimen\fun=1.2pt
-\newbox\rf \setbox\rf=\vbox to \dimen\fun{
-\hrule height \dimen\fun width \dimen\fun}
-%
-\def\oil{\offinterlineskip} % I needed to use this in all my vboxes
-%
-%   Black pieces are made from solid boxes of specified height and
-% width (the \filbox macro).  For White pieces, \filbox is replaced by a
-% macro (\blbox) which draws the lines around the border of such a box.
-%   (the white knight is an exception to this)
-% The macro \tbo is defined as \blbox or \filbox as needed.
-%
-\def\filbox#1#2{\vbox{\oil \hrule height #1\ht\rf width #2\ht\rf}}
-%
-\newdimen\adjust 
-\def\blbox#1#2{\dimen\adjust=#1\ht\rf \advance\dimen\adjust by-0.4\ht\rf
-\vbox{\oil \hrule height 0.2\ht\rf width #2\wd\rf
-\hbox to #2\wd\rf{\vrule height \dimen\adjust width 0.2\wd\rf\hfil
-\vrule height \dimen\adjust width 0.2\wd\rf}
-\hrule height 0.2\ht\rf width #2\wd\rf}}
-%
-%  Each piece is 12 units wide.  \scen produces an hbox with this width
-%  and either a \blbox or a \filbox in the center.
-%
-\def\scen#1#2{\hbox to 12\wd\rf{\hfil\tbo{#1}{#2}\hfil}}
-%
-%  Definitions (color independent) of each piece
-%
-\def\pawn{\vbox{\oil \scen{2.5}{4}\scen{3}{8}\scen{4.5}{4}\scen{3}{10}}}
-%
-\def\bishop{\vbox{\oil \scen{2}{2.5}\scen{3}{8}\scen{4}{10}%
-\scen{3}{6}\scen{1.5}{12}}}
-%
-\def\rook{\vbox{\oil
-\hbox to 12\wd\rf{\tbo2{2.5}\hfil\tbo2{2.5}\hfil\tbo2{2.5}}
-\scen{3}{12}\scen{5.5}{7}\scen{3}{12}}}
-%
-\def\queen{\vbox{\oil \hbox to 12\wd\rf{\tbo{6}{2}\hfil\tbo{8}{2}%
-\hfil\tbo{8}{2}\hfil\tbo{6}{2}}\scen{4}{10}}}
-%
-\def\king{\vbox{\oil%  Next 4 lines are the cross part (improvement wanted)
-\hbox to 12\wd\rf{\rlap%
-{\hbox to 12\wd\rf{\hfil\vrule height 3\ht\rf width 0.2\wd\rf\hfil}}%
-\hfil\raise 1.5\ht\rf%
-\hbox{\vrule width 3\ht\rf height 0.2\ht\rf}\hfil}
-\hbox to 12\wd\rf{\tbo{6}{4.5}\hfil\tbo{6}{4.5}}
-\scen{4}{10}}}
-%
-\def\knight{\vbox{\oil \hbox{\hskip 7\wd\rf\tbo{1}{1}}
-\hbox{\hskip2\wd\rf\tbo{2.5}{7}}\hbox{\hskip 2\wd\rf
-\vbox to  3\ht\rf{\tbo{1}{1.5}\vfil}\hskip3\wd\rf\tbo{3}{2.5}}
-\hbox{\hskip 3.4\wd\rf\tbo{4}{5.6}}
-\tbo{2.5}{12}}}
-%
-%    Creation of the boxes for the pieces
-%
-\newbox\WP \def\tbo#1#2{\blbox{#1}{#2}} \setbox\WP=\pawn
-\newbox\BP \def\tbo#1#2{\filbox{#1}{#2}} \setbox\BP=\pawn
-\newbox\WB \def\tbo#1#2{\blbox{#1}{#2}} \setbox\WB=\bishop
-\newbox\BB \def\tbo#1#2{\filbox{#1}{#2}} \setbox\BB=\bishop
-\newbox\WR \def\tbo#1#2{\blbox{#1}{#2}} \setbox\WR=\rook
-\newbox\BR \def\tbo#1#2{\filbox{#1}{#2}} \setbox\BR=\rook
-\newbox\WQ \def\tbo#1#2{\blbox{#1}{#2}} \setbox\WQ=\queen
-\newbox\BQ \def\tbo#1#2{\filbox{#1}{#2}} \setbox\BQ=\queen
-\newbox\WK \def\tbo#1#2{\blbox{#1}{#2}} \setbox\WK=\king
-\newbox\BK \def\tbo#1#2{\filbox{#1}{#2}} \setbox\BK=\king
-\newbox\BN \def\tbo#1#2{\filbox{#1}{#2}} \setbox\BN=\knight
-%
-%  The exceptional white knight (a lot of work to avoid a line at neck!)
-%
-\newbox\WN \def\tbo#1#2{\blbox{#1}{#2}} \setbox\WN=
-\vbox{\oil \hbox{\hskip 7\wd\rf\tbo{1}{1}}
-\hbox{\hskip2\wd\rf\vrule height 2.5\ht\rf width 0.2\ht\rf
-\vbox to 2.5\ht\rf{\hrule height 0.2\ht\rf width 6.6\wd\rf\vfil
-\hrule height 0.2\ht\rf width 4.5\wd\rf}%
-\vrule height 2.5\ht\rf width 0.2\wd\rf}
-\hbox{\hskip 2\wd\rf
-\vbox to  3\ht\rf{\tbo{1}{1.5}\vfil}\hskip3\wd\rf
-\hbox to 2.5\wd\rf{\vrule height 3\ht\rf width 0.2\wd\rf\hfil
-\vrule height 3\ht\rf width 0.2\wd\rf}}
-\hbox{\hskip 3.4\wd\rf\tbo{4}{5.6}}
-\tbo{2.5}{12}}
-%
-%   \ver is the line used for square boundaries on the board
-%   \nver is thinner line used to shade dark squares (if no piece on them)
-%   \hor draws horizontal lines for each rank
-%
-\def\ver{\vrule height 15\ht\rf width 0.4\wd\rf}
-\def\nver{\vrule height 15\ht\rf width 0.1\wd\rf}
-\def\hor{\hrule height 0.4\wd\rf width 120\wd\rf}
-%
- \newcount\color \newcount\blanks
-\def\blanksquare{\ifodd\color \hbox to 15\wd\rf{\hfil\nver%
-\hfil\nver\hfil\ver}\else\hbox to 15\wd\rf{\hfil\ver}\fi
-\advance\color by 1}
-%
-% Each piece is centered inside a 15-unit square
-%
-\def\cen#1{\hbox to 15\wd\rf{\hfil\vbox to 15\ht\rf{\vfil\copy#1\vfil}%
-\hfil\ver}}
-%
-% This processes the characters specifying a row of the diagram.  It
-% is patterned after the \length example at the end of chapter 20
-% of The TeXbook
-\def\nextchar#1{\let\nex=\nextchar%
-\ifcat7#1%
-\blanks=#1\loop\ifnum\blanks>0 \blanksquare%
-\advance\blanks by -1\repeat\else
-\advance\color by 1%
-\ifx#1P\cen{\WP}\else\ifx#1p\cen{\BP}\else%
-\ifx#1N\cen{\WN}\else\ifx#1n\cen{\BN}\else%
-\ifx#1B\cen{\WB}\else\ifx#1b\cen{\BB}\else%
-\ifx#1Q\cen{\WQ}\else\ifx#1q\cen{\BQ}\else%
-\ifx#1R\cen{\WR}\else\ifx#1r\cen{\BR}%
-\else\ifx#1K\cen{\WK}\else\ifx#1k\cen{\BK}\else\let\nex=\relax%
-\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\nex}
-%
-%  \bore carries out preliminary steps for making the diagram.
-%  \rgc reads in a string of non-blank characters, checks that the
-%  first character is not the terminator Z, gives the string to \nextchar,
-%  and then processes the next string.  (again patterned after \length)
-%
-\def\bore#1Z{\color=1\vbox{\oil \hor\rgc#1 Z }}
-\def\rgc#1#2 {\advance\color by 1\let\nx=\rgc\ifx#1Z\let\nx=\relax
-\else\hbox{\ver\nextchar#1#2Z}\hor\fi\nx}
-%
-%  This macro prints a variation.  It is supposed to use the ideas of
-% \length and seems to work, but there is something I don't understand:
-%  if the {} following the \else is deleted, something goes wrong.  Why?
-%
-\newcount\move \newcount\iswhite
-\def\VAR#1 #2Z{\move=#1\iswhite=1\listem #2 Z }
-\def\listem#1#2 {\ifx#1Z\let\nx=\relax\else{}%
-\ifodd\iswhite{} \number\move~#1#2\else%
-~#1#2\advance\move by 1\fi\advance\iswhite by 1\let\nx=\listem\fi\nx}



More information about the tex-live-commits mailing list.