texlive[46559] Master/texmf-dist: texshade (6feb18)

commits+karl at tug.org commits+karl at tug.org
Wed Feb 7 01:04:04 CET 2018


Revision: 46559
          http://tug.org/svn/texlive?view=revision&revision=46559
Author:   karl
Date:     2018-02-07 01:04:03 +0100 (Wed, 07 Feb 2018)
Log Message:
-----------
texshade (6feb18)

Modified Paths:
--------------
    trunk/Master/texmf-dist/doc/latex/texshade/README
    trunk/Master/texmf-dist/doc/latex/texshade/texshade.pdf
    trunk/Master/texmf-dist/source/latex/texshade/texshade.dtx
    trunk/Master/texmf-dist/tex/latex/texshade/texshade.sty

Modified: trunk/Master/texmf-dist/doc/latex/texshade/README
===================================================================
--- trunk/Master/texmf-dist/doc/latex/texshade/README	2018-02-07 00:03:51 UTC (rev 46558)
+++ trunk/Master/texmf-dist/doc/latex/texshade/README	2018-02-07 00:04:03 UTC (rev 46559)
@@ -1,6 +1,7 @@
-    TeXshade v1.24
+    TeXshade v1.25
     >>
-    >> A LaTeX package for setting nucleotide and peptide alignments.
+    >> A LaTeX package for setting nucleotide and peptide alignments,
+    >> fingerprints, as well as sequence and subfamily logos.
     >>
     >> Setting alignments of nucleotides and peptides for publication 
     >> or presentation purposes  is usually a time consuming two-step 
@@ -26,7 +27,7 @@
     >> ding modes.  TeXshade  combines  highest  flexibility  and the
     >> habitual TeX output quality--with reasonable time expenditure.
     >>
-    Copyright (C)  1999 - 2011  Eric Beitz
+    Copyright (C)  1999 - 2018  Eric Beitz
 
 
 

Modified: trunk/Master/texmf-dist/doc/latex/texshade/texshade.pdf
===================================================================
(Binary files differ)

Modified: trunk/Master/texmf-dist/source/latex/texshade/texshade.dtx
===================================================================
--- trunk/Master/texmf-dist/source/latex/texshade/texshade.dtx	2018-02-07 00:03:51 UTC (rev 46558)
+++ trunk/Master/texmf-dist/source/latex/texshade/texshade.dtx	2018-02-07 00:04:03 UTC (rev 46559)
@@ -10,7 +10,7 @@
 % `README.txt' for further information!
 % 
 %
-% Copyright (C) 1999-2011 Eric Beitz
+% Copyright (C) 1999-2018 Eric Beitz
 % See the file texshade.txt
 % 
 %    \fi
@@ -393,7 +393,16 @@
 %                    Postscript color samples are shown in the manual.
 %                    }
 %
+%    \changes{1.25}{2011-12-01}{%
+%      Corrections:  aligments with many seqs produced wrong calculation
+%                    of threshold shading, corrected. 
+%      Introduction: new feature style |S-S| for disulfide bridges;
+%                    hooks in top feature lines can be drawn down to alignment.
+%                    }
 %
+%
+%
+%
 % \CharacterTable
 %  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
 %   Lower-case    \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
@@ -431,7 +440,7 @@
 %            for further information, updates and on-line documentation 
 %            see my homepage at
 %            \texttt{www.pharmazie.uni-kiel.de/chem/Prof\_Beitz/biotex.html} }}
-%    \date{\small v1.24; 2011/12/01\\[2pt]}
+%    \date{\small v1.25; 2018/01/17\\[2pt]}
 %    \maketitle
 %    \begin{abstract}
 %      Setting alignments of nucleotides and peptides for publication 
@@ -510,6 +519,16 @@
 %    
 %    \subsection{Version History}
 %
+%    \textbf{v1.25  2018/01/17}
+%    \medskip
+%
+%    \emph{Corrections}:  Aligments with many seqs produced wrong calculation
+%    of threshold shading,\footnote{Noted by Kathryn Parker.} corrected; minor bug fixes. 
+%
+%    \emph{Introduction}: A new feature style |S-S| for disulfide bridges is
+%    implemented; hooks in top feature lines can be drawn down to alignment.
+%    \medskip
+%
 %    \textbf{v1.24  2011/12/01}
 %    \medskip
 %
@@ -527,7 +546,7 @@
 %    \emph{Introductions:} 
 %    In diverse mode sequence positions where all residues match do not
 %    contain much information. A new command, 
-%    |\hideallmatchpositions|, \footnote{Requested by Matt Russell.}
+%    |\hideallmatchpositions|,\footnote{Requested by Matt Russell.}
 %    will remove all such positions from the alignment and hence condense
 %    the output considerably.
 %    \medskip
@@ -598,7 +617,6 @@
 %    output.\footnote{Suggestion by Yun He.}
 %    \medskip  
 %
-%    \newpage
 %
 %    \textbf{v1.19 2009/03/09}
 %    \medskip
@@ -887,7 +905,6 @@
 %    |{1,2,3,6,5,4,7}|.
 %    \bigskip
 %    
-%    \newpage
 %
 %    \textbf{v1.3a\&b 2000/7/28 \& 2000/7/30}
 %    \medskip
@@ -969,7 +986,7 @@
 %    length of the sequences. Therefore, the command `|\seqlength|' was
 %    introduced (\ref{seqlines}). (b) With `|\gapcolors|' (also 
 %    \ref{seqlines}) the
-%    color selection for gap symbols is independent from non conserved
+%    color selection for gap symbols is independent from non-conserved
 %    residues. (c) The divisions of the ruler where so far fixed to
 %    10. Now, this value is changeable by `|\rulersteps|' (again 
 %    \ref{seqlines}). (d) `|\hideresidues|' and `|\showresidues|' turn
@@ -1031,79 +1048,10 @@
 %    each \TeX{} system hides its default parameter file in a different
 %    place in the system. 
 %    
-%    In the following, an excerpt from the FAQ-list to \TeXshade{} is added. 
-%    This explains how 
-%    to increase the settings in Oz\TeX{} for the Macintosh, Mik\TeX{} 
-%    for Windows and te\TeX{} for *NIX \TeX{} distributions. Please contribute 
-%    to this list!
 %    
-%    \begin{enumerate}
 %    
-%    \item
 %    
-%    \textbf{Oz\TeX{} 4.0 for the Macintosh:}
-%    
-%    Find the file `OzTeX:TeX:Configs:Default'. This file contains
-%    all memory settings. Look for the section 
-%    `\% TeX parameters' and increase the values that \TeX{} complains
-%    about during the run. You will have to restart Oz\TeX{} before the
-%    changes are active.
-%    
-%    For older versions of Oz\TeX{} the configuration file has the 
-%    same name but the path is somewhat different.
-%    
-%    
-%    \item
-%    
-%    \textbf{te\TeX{} for *NIX:} (contributed by Joerg Daehn)
-%    
-%    Find the file: `/usr/share/texmf/web2c/texmf.cnf' or use 
-%    
-%    |locate texmf.cnf| at the command prompt to find it.
 %
-%    Login as super user. Backup `texmf.cnf' in case you destroy something and
-%    then open the `texmf.cnf' file in your favorite text editor and use its
-%    search function to locate |main_memory|. This variable is set to 384000.
-%    Change this to some higher value, i.e. 4000000 (works fine for me!). The
-%    total amount of memory should not exceed 8000000, so check the other
-%    values in that section. 
-%
-%    Next, you want to change the stack size. Search for |stack_size|. This
-%    will be set to 300. I changed it to 4000 and it works fine.
-%
-%    There might be complains by \TeX{} about further specific parameters such
-%    as |stack_size|. You find all those in the same file.
-%
-%    After this you have to run `texconfig init'.
-%
-%    Logout as root.
-%
-%    After this all should be set for large alignments. Happy \TeX{}ing!
-%
-%    The information on how to achieve this was derived from a mail in the
-%    te\TeX{} mail archive. The original question was posted by Pascal Francq and
-%    answered by Rolf Nieprasch.
-%
-%    
-%    \item
-%    
-%    \textbf{MiK\TeX{} for Windows:}
-%    
-%    The MiK\TeX{} documentation describes very detailed how the memory
-%    settings can be changed. In brief, you must locate the 
-%    configuration file `miktex/config/miktex.ini'. In the [MiKTeX] 
-%    section of this file you find all the parameters you need, e.\,g.\ 
-%    |mem_min|, |mem_max|, |buf_size|, |stack_size| etc.
-%    
-%    It appears, that the standard settings of MiK\TeX{} are bigger 
-%    than that of other \TeX{} installations, so it may not always be necessary 
-%    to increase the values.
-%    
-%    
-%    \end{enumerate}
-%    
-%    
-%
 %    \subsection{System requirements} \label{require}
 %    
 %    \TeXshade{} requires \LaTeXe{} with |color.sty| and |graphics.sty|
@@ -1234,7 +1182,7 @@
 %    \end{verbatim}  
 %    }  
 %    
-%    This goes even furher. You can have \TeXshade{} select positions
+%    This goes even further. You can have \TeXshade{} select positions
 %    based on the 3D coordinates provided by a PDB file, e.\,g.\ show
 %    all residues that are within an 8 \AA{} radius around the
 %    $\alpha$-carbon of the residue at position 81:
@@ -2999,7 +2947,7 @@
 %
 %    \label{Llogocolor}\label{Lclearlogocolors}
 %    Logo colors can be turned to `Black' with the command
-%    |\clearlogocolors[|\meta{color}|}| with the optional parameter
+%    |\clearlogocolors[|\meta{color}|]| with the optional parameter
 %    not set. The optional parameter can be used to set all 
 %    residue colors to \meta{color}, e.g.\ |\clearlogocolors[Blue]|.
 %    User specific logo color sets are defined by using
@@ -3346,7 +3294,7 @@
 %    \medskip
 %
 %    
-%    It is helpful to show a ruler (probably single-stepped, see p.\,\pageref{Lshowruler}) to 
+%    It is helpful to show a ruler (e.g. single-stepped, see p.\,\pageref{Lshowruler}) to 
 %    label the residue positions. 
 %    
 %    The resulting gaps between sequence stretches are marked by a vertical rule, which
@@ -3915,14 +3863,15 @@
 %    |-->|& right arrow \\
 %    |'->|& right arrow with up hook \\
 %    |<-|$\vert$ & left \emph{maps to} arrow \\
-%    |<-o| & left arrow with ball at right end\\
+%    |<-o|& left arrow with ball at right end\\
 %    |<=>|& double arrow, two heads \\
 %    |,-,|& plain bar with down hooks\\
 %    $\vert$|=|$\vert$ & double bar with vertical ends\\
+%    |S-S|& labels disulfide bridges\\
 %    \end{tabular}
 %    \end{center}
 %    
-%    All combinations of the left-end-characters 
+%    Combinations of the left-end-characters 
 %    (|-=<',|$\vert$o), the middle-characters (|-=|),
 %    and the right-end-characters (|-=>',|$\vert$o) are
 %    allowed and produce the desired arrow or bar.
@@ -4427,7 +4376,7 @@
 %    existing file for the output. The great advantage of this method 
 %    is its flexibility. Due to the simple reason that the feature 
 %    file can be edited in the meantime. Thus, the user has the 
-%    ability to change the computer generated file according to his
+%    ability to change the computer-generated file according to his
 %    personal needs. On the other hand, one can force \TeXshade{} to
 %    write a new file every time by the optional argument |[make new]| in the 
 %    include command, e.\,g. |\includePHDsec[make new]{1}{AQP.phd}|.
@@ -6123,6 +6072,7 @@
 %       \> = |{helix[|\meta{helixcolor}|]}|\\
 %       \> = |{box[|\meta{framecolor,boxcolor}|][|\meta{length}|]:|\\
 %               \hspace{8.7cm}\meta{text}|[|\meta{textcolor}|]}|\\
+%       \> = |{S-S}|\\
 %       \> = arrows and bars (|-=<',|$\vert$|o|)(|-=|)(|-=>',|$\vert$|o|)\\
 %       \> = |{translate[|\meta{color}|]}|\\
 %       \> = |{bar[|\meta{min}|,|\meta{max}|]:|\\
@@ -6469,7 +6419,8 @@
 \openin\structurefile = hyperref.sty
 \ifeof\structurefile
  \else
-     \usepackage[dvips,colorlinks]{hyperref}
+%     \usepackage[dvips,colorlinks]{hyperref}
+     \usepackage[pdftex,colorlinks]{hyperref}
  \fi
 \closein\structurefile
 \DisableCrossrefs
@@ -6486,8 +6437,8 @@
 %    \begin{macrocode}
 %<*texshade>
 \NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{texshade}[2011/05/13 LaTeX TeXshade (v1.24)]
-\message{Package `texshade', Version 1.24 of 2011/12/01.}
+\ProvidesPackage{texshade}[2018/01/17 LaTeX TeXshade (v1.25)]
+\message{Package `texshade', Version 1.25 of 2018/01/17.}
 
 \PassOptionsToPackage{dvips}{color}
 \PassOptionsToPackage{dvips}{graphicx}
@@ -6567,6 +6518,7 @@
 \newlength\equal at height \newlength\temp@@length
 \newlength\vspace at legend
 \newlength\hspace at legend
+\newlength\bar at length
 
 \newif\ifletter       \newif\ifnumber
 \newif\ifnewres       \newif\ifall at shade
@@ -9075,7 +9027,7 @@
             \expandafter\xdef\csname hide@@@seq\first@\endcsname{kill}
             \ifnum\first@=\cons at num \xdef\cons at num{0} \fi
             \advance\killseq at count by -1
-            \seq at percent=100 \divide\seq at percent by \killseq at count
+%            \seq at percent=100 \divide\seq at percent by \killseq at count
          \fi
       \fi\fi
       \xdef\first@{\first@@ @}
@@ -9094,7 +9046,7 @@
             \expandafter\xdef\csname hide@@@seq\fourth@\endcsname{kill}
             \ifnum\fourth@=\cons at num \xdef\cons at num{0} \fi
             \advance\killseq at count by -1
-            \seq at percent=100 \divide\seq at percent by \killseq at count
+%            \seq at percent=100 \divide\seq at percent by \killseq at count
          \fi
       \fi\fi
       \killseq@
@@ -9596,22 +9548,33 @@
    \expandafter\xdef\csname stack@\bottop@\seq@\endcsname{\tmpstack}
 }
 \def\getarrow at shape#1#2#3#4&{%
-   \xdef\first@@{#1}\xdef\second@@{#2}\xdef\third@@{#3}
-   \if\first@@ v
-      \if\second@@ =
-      \else \xdef\style@{\first@@ v\third@@#4} \fi
+   \xdef\first@@{#1}\xdef\second@@{#2}\xdef\third@@{#3}\xdef\fourth@@{#4}
+   \ifx\temp@@\y@
+      \if\first@@ ` \xdef\first@@{a} \else
+      \if\first@@ ' \xdef\first@@{a} \else
+      \if\first@@ , \xdef\first@@{b} \else
+      \if\first@@ S \xdef\first@@{c} \xdef\second@@{-}
+      \fi\fi\fi\fi
+      \if\third@@ ` \xdef\third@@{a} \else
+      \if\third@@ ' \xdef\third@@{a} \else
+      \if\third@@ , \xdef\third@@{b} \else
+      \if\third@@ S \xdef\third@@{c} \xdef\second@@{-}
+      \fi\fi\fi\fi
+      \xdef\style@{\first@@ -\third@@\fourth@@}
+   \fi
+   \if\first@@ S
+      \xdef\style@{\first@@ -\third@@\fourth@@}
    \else
    \if\first@@ v
-      \if\second@@ =
-      \else \xdef\style@{\first@@ v\third@@#4} \fi
+      \if\second@@ = 
+      \else \xdef\style@{\first@@ v\third@@\fourth@@} \fi
    \else
-   \if\third@@ v
-      \if\second@@ =
-      \else \xdef\style@{\first@@ v\third@@#4} \fi
+   \if\third@@ S
+      \xdef\style@{\first@@ -\third@@\fourth@@}
    \else
    \if\third@@ v
       \if\second@@ =
-      \else \xdef\style@{\first@@ v\third@@#4} \fi
+      \else \xdef\style@{\first@@ v\third@@\fourth@@} \fi
    \fi\fi\fi\fi
 }
 \def\get at shape#1#2#3{%
@@ -12381,7 +12344,11 @@
          \fi
          \xdef\style@{cons[color]:cons[\f at color][0]}
       \else
-         \xdef\style@{#4} \expandafter\getarrow at shape\temp@
+         \xdef\style@{#4} \xdef\temp@@{n}
+         \expandafter\get at firstfill\temp@
+         \if\second@@ ^ \xdef\second@@{_} \fi
+         \if\second@@ _ \xdef\temp@{\fill at char} \xdef\temp@@{y}\fi
+         \expandafter\getarrow at shape\temp@
       \fi
       \fi
       \fi
@@ -14280,9 +14247,10 @@
        \advance\pos at sum by 1 \fi
   \ifnum\innerloopcount<\seq at count \repeat
 
-  \multiply\pos at sum by \seq at percent
+%  \multiply\pos at sum by \seq at percent
   \expandafter\xdef\csname pos\the\loopcount\endcsname{\the\pos at sum}
-  \expandafter\ifnum\csname pos\the\loopcount\endcsname<\thresh at ld
+%  \expandafter\ifnum\csname pos\the\loopcount\endcsname<\thresh at ld
+  \expandafter\ifnum\csname pos\the\loopcount\endcsname<\thresh at ld@
   \else
     \expandafter\ifnum\csname pos\the\loopcount\endcsname>\m at x
       \xdef\m at x{\csname pos\the\loopcount\endcsname}
@@ -14331,13 +14299,15 @@
   \expandafter\ifnum\csname pos\the\loopcount\endcsname=\seq at count
     \xdef\cons at seq{\the\loopcount} \xdef\match at case{2} \loopcount=1
   \else
-   \multiply\pos at sum by \seq at percent
+%   \multiply\pos at sum by \seq at percent
    \expandafter\xdef\csname pos\the\loopcount\endcsname{\the\pos at sum}
-   \expandafter\ifnum\csname pos\the\loopcount\endcsname<\thresh at ld
+%   \expandafter\ifnum\csname pos\the\loopcount\endcsname<\thresh at ld
+   \expandafter\ifnum\csname pos\the\loopcount\endcsname<\thresh at ld@
    \else
     \expandafter\ifnum\csname pos\the\loopcount\endcsname>\m at x
       \xdef\m at x{\csname pos\the\loopcount\endcsname}
-      \expandafter\ifnum\csname pos\the\loopcount\endcsname<\all at thresh@ld
+%      \expandafter\ifnum\csname pos\the\loopcount\endcsname<\all at thresh@ld
+      \expandafter\ifnum\csname pos\the\loopcount\endcsname<\all at thresh@ld@
          \xdef\cons at seq{\the\loopcount} \xdef\match at case{1}
       \else
          \xdef\cons at seq{\the\loopcount} \xdef\match at case{2}
@@ -17870,7 +17840,7 @@
          \textcolor{\legend at fg}{%
          \ifgerm at n\kern2ex\legend at size{nicht konserviert}%
          \else\ifsp at nish\kern2ex\legend at size{no conservado}%
-         \else\kern2ex\legend at size{non conserved}\fi\fi}
+         \else\kern2ex\legend at size{non-conserved}\fi\fi}
          \newline\hbox{}\noindent%
          \ifsimmode%
          \ifnames@\ifnames at right\else\hbox to \name at width{\hss}\fi\fi
@@ -18359,6 +18329,8 @@
 \def\get at tripletfill#1#2#3#4&{%
    \multiply\temp at count by -1%
    \def\second@@{#1}\def\second@@@{#2}\def\second@@@@{#3}\def\fill at char{#4&}}
+
+
 \def\putfeature at style#1{%
    \residues at size%
    \setbox1=\hbox{\ensuremath{\overrightarrow{\hbox{}}}}%
@@ -18464,6 +18436,7 @@
        \fontseries{\featurestyles at series}%
        \fontshape{\featurestyles at shape}%
        \selectfont%
+       \xdef\last@{bottom}%
        \ifx\bottop@\temp@\xdef\last@{0.35}\else\xdef\last@{0}\fi%
        \kern0.15\box at width%
        \loopcount=0\relax%
@@ -18634,6 +18607,7 @@
         \ifx\bottop@\temp@ \xdef\last@{0.35}\else\xdef\last@{-0.55}\fi%
         \textcolor{\f at color}{%
         \raisebox{\last@\arrow at height}{%
+         \if\first@@ b \xdef\first@@{,}\fi%
          \if\first@@ ,%
             \rule{0.1\arrow at height}{\arrow at height}\kern-0.35\arrow at height%
          \else%
@@ -18645,10 +18619,15 @@
                   \rule[\arrow at height]%
                      {0.1\arrow at height}{\arrow at height}\kern-0.35\arrow at height%
                \else%
+               \if\first@@ '%
+                  \rule[\arrow at height]%
+                     {0.1\arrow at height}{\arrow at height}\kern-0.35\arrow at height%
+               \else%
                   \if\first@@ -%
                      \rule{0pt}{0pt}\kern-0.35\arrow at height%
                   \fi%
                \fi%
+               \fi%
             \fi%
          \fi%
          \if\third@@ v%
@@ -18709,6 +18688,7 @@
                  \xdef\last@{-0.25}\fi\fi\fi\fi%
         \textcolor{\f at color}{%
         \raisebox{\last@\arrow at height}{%
+         \if\first@@ b \xdef\first@@{,}\fi%
          \if\first@@ ,%
             \rule[-0.5\arrow at height]{0.1\arrow at height}{1.5\arrow at height}%
             \kern-0.1\arrow at height%
@@ -18717,7 +18697,8 @@
                \rule[-0.5\arrow at height]{0.1\arrow at height}{2.25\arrow at height}%
                \kern-0.1\arrow at height%
             \else%
-               \if\first@@ `\xdef\first@@{'}\fi%
+               \if\first@@ a \xdef\first@@{'}\fi%
+               \if\first@@ ` \xdef\first@@{'}\fi%
                \if\first@@ '%
                   \rule[0.4\arrow at height]%
                      {0.1\arrow at height}{1.5\arrow at height}%
@@ -18742,6 +18723,7 @@
             \rule[0.37\arrow at height]{\width at tmp}{0.1\arrow at height}%
             \kern-\width at tmp%
             \rule[0.9\arrow at height]{\width at tmp}{0.1\arrow at height}%
+            \if\first@@ b \xdef\first@@{,}\fi%
             \if\third@@ ,%
                \kern-0.05\arrow at height%
                \rule[-0.5\arrow at height]{0.1\arrow at height}{1.5\arrow at height}%
@@ -18750,11 +18732,17 @@
                   \kern-0.05\arrow at height%
                   \rule[-0.5\arrow at height]{0.1\arrow at height}{2.25\arrow at height}%
                \else%
-                  \if\third@@ `\xdef\third@@{'}\fi%
+                  \if\first@@ a \xdef\first@@{'}\fi%
+                  \if\third@@ ` \xdef\third@@{'}\fi%
                   \if\third@@ '%
                      \kern-0.05\arrow at height%
                      \rule[0.4\arrow at height]{0.1\arrow at height}{1.5\arrow at height}%
+                  \else%
+                  \if\third@@ a%
+                     \kern-0.05\arrow at height%
+                     \rule[0.4\arrow at height]{0.1\arrow at height}{1.5\arrow at height}%
                   \fi%
+                  \fi%
                \fi%
             \fi%
          \fi}}%
@@ -18765,10 +18753,26 @@
         \advance\width at tmp by -0.5\temp@@length%
         \if\first@@ o\xdef\first@@{O}\fi%
         \if\third@@ o\xdef\third@@{O}\fi%
+        \xdef\last@{bottom}%
+        \ifx\fe at turep@s\last@%
+           \vspace{-20pt}\message{(((-20pt)))}%
+        \fi%
         \textcolor{\f at color}{%
          \if\first@@ ,%
-         \rule{\temp@@length}{\arrow at height}\kern-\temp@@length%
+           \rule{\temp@@length}{\arrow at height}\kern-\temp@@length%
          \else%
+         \if\first@@ b%
+           \xdef\last@{bottom}%
+           \ifx\fe at turep@s\last@%
+            \rule{\temp@@length}{\arrow at height}\kern-\temp@@length%
+           \else
+            \xdef\shift at feature{y}%
+            \kern-\temp@@length%
+            \rule[-\bar at length]{\temp@@length}{\bar at length}%
+            \kern-\temp@@length%
+            \rule{\temp@@length}{\arrow at height}\kern-\temp@@length%
+           \fi
+         \else%
             \if\first@@ |%
                \rule{\temp@@length}{2\arrow at height}\kern-\temp@@length%
             \else%
@@ -18776,6 +18780,52 @@
                 \raisebox{0.06ex}{\ensuremath{\bullet}}\kern-0.55ex%
                 \rule[\width at tmp]{0.65ex}{\temp@@length}%
               \else%
+              \if\first@@ S%
+                \xdef\last@{bottom}%
+                \ifx\fe at turep@s\last@%
+                   \advance\width at tmp by 0.5\temp@@length%
+                   \kern0.5\box at width%
+                   \kern-2\temp@@length%
+                   \rule[\width at tmp]{\temp@@length}{\arrow at height}%
+                   \advance\width at tmp by -0.5\temp@@length%
+                   \kern-\temp@@length%
+                   \rule[\width at tmp]{0.5\temp@@length}{\temp@@length}%
+                   \rule[\width at tmp]{0.5\box at width}{\temp@@length}%
+                \else%
+                   \kern0.5\box at width%
+                   \kern-2\temp@@length%
+                   \rule{\temp@@length}{\arrow at height}%
+                   \kern-\temp@@length%
+                   \rule[\width at tmp]{0.5\temp@@length}{\temp@@length}%
+                   \rule[\width at tmp]{0.5\box at width}{\temp@@length}%
+                \fi%
+              \else%
+              \if\first@@ c%
+                \xdef\last@{bottom}%
+                \ifx\fe at turep@s\last@%
+                   \advance\width at tmp by 0.5\temp@@length%
+                   \raisebox{\arrow at height}{\rule[\box at height]{0pt}{\bar at length}}%%%%%%%%%%%%%%%%%%%%%%%
+                   \kern0.5\box at width%
+                   \kern-2\temp@@length%
+                   \rule[2\arrow at height]{\temp@@length}{\bar at length}%%%%%%%%%%%%%%%%%%%%%%
+                   \kern-\temp@@length%%%%%%%%%%%%%%%%%%%%%%%%%
+                   \rule[\width at tmp]{\temp@@length}{\arrow at height}%
+                   \advance\width at tmp by -0.5\temp@@length%
+                   \kern-\temp@@length%
+                   \rule[\width at tmp]{0.5\temp@@length}{\temp@@length}%
+                   \rule[\width at tmp]{0.5\box at width}{\temp@@length}%
+                \else%
+                   \xdef\shift at feature{y}%
+                   \kern0.5\box at width%
+                   \kern-2\temp@@length%
+                   \rule[-\bar at length]{\temp@@length}{\bar at length}%
+                   \kern-\temp@@length%
+                   \rule{\temp@@length}{\arrow at height}%
+                   \kern-\temp@@length%
+                   \rule[\width at tmp]{0.5\temp@@length}{\temp@@length}%
+                   \rule[\width at tmp]{0.5\box at width}{\temp@@length}%
+                \fi%
+              \else%
                \if\first@@ <%
                  \raisebox{0.06ex}{\ensuremath{\blacktriangleleft}}\kern-0.35ex%
                \else
@@ -18787,13 +18837,20 @@
                 \fi%
                \fi%
               \fi%
+              \fi%
+              \fi%
             \fi%
          \fi%
+         \fi%
          \loopcount=\second@%
          \if\first@@ <\advance\loopcount by -1\relax\ifnum\loopcount<0 \loopcount=0\fi\fi%
          \if\third@@ >\advance\loopcount by -1\relax\ifnum\loopcount<0 \loopcount=0\fi\fi%
          \if\first@@ O\advance\loopcount by -1\relax\ifnum\loopcount<0 \loopcount=0\fi\fi%
          \if\third@@ O\advance\loopcount by -1\relax\ifnum\loopcount<0 \loopcount=0\fi\fi%
+         \if\first@@ S\advance\loopcount by -1\relax\ifnum\loopcount<0 \loopcount=0\fi\fi%
+         \if\third@@ S\advance\loopcount by -1\relax\ifnum\loopcount<0 \loopcount=0\fi\fi%
+         \if\first@@ c\advance\loopcount by -1\relax\ifnum\loopcount<0 \loopcount=0\fi\fi%
+         \if\third@@ c\advance\loopcount by -1\relax\ifnum\loopcount<0 \loopcount=0\fi\fi%
          \xdef\second@{\the\loopcount}%
          \rule[\width at tmp]{\second@\box at width}{\temp@@length}%
          \setbox1=\hbox{\residues at size{\fill at char}}%
@@ -18804,6 +18861,17 @@
          \if\third@@ ,%
          \kern-\temp@@length\rule{\temp@@length}{\arrow at height}%
          \else%
+         \if\third@@ b%
+           \xdef\last@{bottom}%
+           \ifx\fe at turep@s\last@%
+            \kern-\temp@@length\rule{\temp@@length}{\arrow at height}%
+           \else
+            \xdef\shift at feature{y}%
+            \kern-\temp@@length%
+            \rule[-\bar at length]{\temp@@length}{\bar at length}%
+            \kern-\temp@@length\rule{\temp@@length}{\arrow at height}%
+           \fi
+         \else%
             \if\third@@ |%
                \kern-\temp@@length\rule{\temp@@length}{2\arrow at height}%
             \else%
@@ -18811,6 +18879,31 @@
                 \rule[\width at tmp]{0.65ex}{\temp@@length}%
                 \kern-0.55ex\raisebox{0.06ex}{\ensuremath{\bullet}}%
               \else%
+              \if\third@@ S%
+                \rule[\width at tmp]{0.5\box at width}{\temp@@length}%
+                \rule[\width at tmp]{0.5\temp@@length}{\temp@@length}%
+                \xdef\last@{bottom}%
+                \ifx\fe at turep@s\last@%
+                  \advance\width at tmp by 0.5\temp@@length%
+                  \kern-\temp@@length\rule[\width at tmp]{\temp@@length}{\arrow at height}%
+                \else
+                  \kern-\temp@@length\rule{\temp@@length}{\arrow at height}%
+                \fi%
+              \else%
+              \if\third@@ c%
+                \xdef\shift at feature{y}%
+                \rule[\width at tmp]{0.5\box at width}{\temp@@length}%
+                \xdef\last@{bottom}%
+                \ifx\fe at turep@s\last@%
+                  \kern-\temp@@length%%%%%%%%%%%%%%%%%%%%%%%%%
+                  \rule[2\arrow at height]{\temp@@length}{\bar at length}%%%%%%%%%%%%%%%%%%%%%%
+                  \advance\width at tmp by 0.5\temp@@length%
+                  \kern-\temp@@length\rule[\width at tmp]{\temp@@length}{\arrow at height}%
+                \else
+                  \kern-\temp@@length\rule[-\bar at length]{\temp@@length}{\bar at length}%
+                  \kern-\temp@@length\rule{\temp@@length}{\arrow at height}%
+                \fi%
+              \else%
                \if\third@@ >%
                 \kern-0.35ex\raisebox{0.06ex}{\ensuremath{\blacktriangleright}}%
                \else
@@ -18821,7 +18914,10 @@
                 \fi%
                \fi%
               \fi%
-            \fi
+              \fi%
+              \fi%
+            \fi%
+         \fi%
          \fi}%
        \fi
       \fi
@@ -19622,10 +19718,23 @@
    \xdef\featureposttttop{1} \xdef\featureposbbbbottom{1}%
    \findc at nsensus%
    \noindent%
+   \setlength{\bar at length}{0pt}%
+   \xdef\fe at turep@s{top}%
    \ifnum\feature at ttttop=1
+      \advance\bar at length by \feature at tttop\baselineskip%
+      \advance\bar at length by \feature at ttop\baselineskip%
+      \advance\bar at length by \feature at top\baselineskip%
+      \multiply\bar at length by 2%
+      \advance\bar at length by \tttt at sp@ce%
+      \advance\bar at length by \ttt at sp@ce%
+      \advance\bar at length by \tt at sp@ce%
       \ifnum\featureonttttop=0 \xdef\feature at ttttop{0} \fi
       \xdef\bottop@{ttttop}%
+      \xdef\shift at feature{n}%
       \put at feature%
+      \advance\bar at length by -\baselineskip%
+      \ifx\shift at feature\y@ \vspace{-\bar at length}\fi%
+      \setlength{\bar at length}{0pt}%
       \vspace{\tttt at sp@ce}%
       \vspace{-\baselineskip}%
       \newline\hbox{}%
@@ -19633,9 +19742,18 @@
       \iffix@\ifttttopfeature \vspace{\tttt at sp@ce}\newline\hbox{}\newline\hbox{}\fi\fi
    \fi
    \ifnum\feature at tttop=1
+      \advance\bar at length by \feature at ttop\baselineskip%
+      \advance\bar at length by \feature at top\baselineskip%
+      \multiply\bar at length by 2%
+      \advance\bar at length by \ttt at sp@ce%
+      \advance\bar at length by \tt at sp@ce%
       \ifnum\featureontttop=0 \xdef\feature at tttop{0} \fi
       \xdef\bottop@{tttop}%
+      \xdef\shift at feature{n}%
       \put at feature%
+      \advance\bar at length by -\baselineskip%
+      \ifx\shift at feature\y@ \vspace{-\bar at length}\fi%
+      \setlength{\bar at length}{0pt}%
       \vspace{\ttt at sp@ce}%
       \vspace{-\baselineskip}%
       \newline\hbox{}%
@@ -19643,9 +19761,16 @@
       \iffix@\iftttopfeature \vspace{\ttt at sp@ce}\newline\hbox{}\newline\hbox{}\fi\fi
    \fi
    \ifnum\feature at ttop=1
+      \advance\bar at length by \feature at top\baselineskip%
+      \multiply\bar at length by 2%
+      \advance\bar at length by \tt at sp@ce\message{tt\the\bar at length tt}%
       \ifnum\featureonttop=0 \xdef\feature at ttop{0} \fi
       \xdef\bottop@{ttop}%
+      \xdef\shift at feature{n}%
       \put at feature%
+      \advance\bar at length by -\baselineskip%
+      \ifx\shift at feature\y@ \vspace{-\bar at length}\fi%
+      \setlength{\bar at length}{0pt}%
       \vspace{\tt at sp@ce}%
       \vspace{-\baselineskip}%
       \newline\hbox{}%
@@ -19761,6 +19886,9 @@
          \ifnum\ruler at rot=0 \vspace{0.25\baselineskip}\fi%
       \fi%
    \fi%
+   \xdef\fe at turep@s{bottom}%
+   \setlength{\bar at length}{0pt}%
+   \xdef\b at feature@count{0}
    \ifnum\feature at bottom=1 %
       \ifnum\featureonbottom=0 \xdef\feature at bottom{0}\fi%
       \xdef\bottop@{bottom}%
@@ -19770,6 +19898,9 @@
          \vspace{\b at r@stretch\box at height}%
       \fi%
       \put at feature%
+      \temp@@count=\b at feature@count%
+      \advance\temp@@count by 1%
+      \xdef\b at feature@count{\the\temp@@count}%
    \else
       \iffix@
       \if\bottom at stretch y%
@@ -19782,14 +19913,25 @@
       \fi%
    \fi%
    \ifnum\feature at bbottom=1 %
+      \advance\bar at length by \b at feature@count \baselineskip%
+      \multiply\bar at length by \b at r@stretch%
+      \multiply\bar at length by 2%
+      \advance\bar at length by \bb at sp@ce\message{bb\the\bar at length bb}%
       \ifnum\featureonbbottom=0 \xdef\feature at bbottom{0}\fi%
       \xdef\bottop@{bbottom}%
       \vspace{\bb at sp@ce}%
       \if\bbottom at stretch y%
+         \advance\bar at length by -\box at height%
+         \advance\bar at length by \b at r@stretch\box at height%
          \vspace{-\box at height}%
          \vspace{\b at r@stretch\box at height}%
       \fi%
+%      \vspace{-\bar at length}%%%%%%%%%%%%%%%%%%%%%%%
+      \setlength{\bar at length}{0pt}%%%%%%%%%%%%%%%%%%%%%%%
       \put at feature%
+      \temp@@count=\b at feature@count%
+      \advance\temp@@count by 1%
+      \xdef\b at feature@count{\the\temp@@count}%
    \else
       \iffix@
       \if\bbottom at stretch y%
@@ -19802,6 +19944,10 @@
       \fi
    \fi
    \ifnum\feature at bbbottom=1 %
+      \advance\bar at length by \b at feature@count\baselineskip%
+      \multiply\bar at length by \b at r@stretch%
+      \multiply\bar at length by 2%
+      \advance\bar at length by \bbb at sp@ce\message{bbb\the\bar at length bbb}%
       \ifnum\featureonbbbottom=0 \xdef\feature at bbbottom{0}\fi%
       \xdef\bottop@{bbbottom}%
       \vspace{\bbb at sp@ce}%
@@ -19810,6 +19956,9 @@
          \vspace{\b at r@stretch\box at height}%
       \fi%
       \put at feature%
+      \temp@@count=\b at feature@count%
+      \advance\temp@@count by 1%
+      \xdef\b at feature@count{\the\temp@@count}%
    \else
       \iffix@
       \if\bbbottom at stretch y%
@@ -19822,6 +19971,10 @@
       \fi
    \fi
    \ifnum\feature at bbbbottom=1 %
+      \advance\bar at length by \b at feature@count\baselineskip%
+      \multiply\bar at length by \b at r@stretch%
+      \multiply\bar at length by 2%
+      \advance\bar at length by \bbbb at sp@ce\message{bbbb\the\bar at length bbbb}%
       \ifnum\featureonbbbbottom=0 \xdef\feature at bbbbottom{0}\fi%
       \xdef\bottop@{bbbbottom}%
       \vspace{\bbbb at sp@ce}%
@@ -20679,8 +20832,8 @@
     \ifnum\loopcount<\seq at count \repeat
     \xdef\seq at order{\seq at order,@}
  \killseq at count=\seq at count
- \seq at percent=100
- \ifnum\seq at count>0 \divide\seq at percent by \seq at count \fi
+% \seq at percent=100
+% \ifnum\seq at count>0 \divide\seq at percent by \seq at count \fi
  \fi
  \fi
 }
@@ -20948,6 +21101,10 @@
            \caption[\c at pshort]{\c at p}
          \fi
       \fi
+      \loopcount = \thresh at ld \multiply\loopcount by \seq at count \divide\loopcount by 100
+      \xdef\thresh at ld@{\the\loopcount}
+      \loopcount = \all at thresh@ld \multiply\loopcount by \seq at count \divide\loopcount by 100
+      \xdef\all at thresh@ld@{\the\loopcount}
       \bgroup
          \ifx\out at put\y@\bigskip\fi
          \iffuncmode \show at consfalse \fi

Modified: trunk/Master/texmf-dist/tex/latex/texshade/texshade.sty
===================================================================
--- trunk/Master/texmf-dist/tex/latex/texshade/texshade.sty	2018-02-07 00:03:51 UTC (rev 46558)
+++ trunk/Master/texmf-dist/tex/latex/texshade/texshade.sty	2018-02-07 00:04:03 UTC (rev 46559)
@@ -13,8 +13,8 @@
 %% 
 
 \NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{texshade}[2011/05/13 LaTeX TeXshade (v1.24)]
-\message{Package `texshade', Version 1.24 of 2011/12/01.}
+\ProvidesPackage{texshade}[2018/01/17 LaTeX TeXshade (v1.25)]
+\message{Package `texshade', Version 1.25 of 2018/01/17.}
 
 \PassOptionsToPackage{dvips}{color}
 \PassOptionsToPackage{dvips}{graphicx}
@@ -94,6 +94,7 @@
 \newlength\equal at height \newlength\temp@@length
 \newlength\vspace at legend
 \newlength\hspace at legend
+\newlength\bar at length
 
 \newif\ifletter       \newif\ifnumber
 \newif\ifnewres       \newif\ifall at shade
@@ -2593,7 +2594,6 @@
             \expandafter\xdef\csname hide@@@seq\first@\endcsname{kill}
             \ifnum\first@=\cons at num \xdef\cons at num{0} \fi
             \advance\killseq at count by -1
-            \seq at percent=100 \divide\seq at percent by \killseq at count
          \fi
       \fi\fi
       \xdef\first@{\first@@ @}
@@ -2612,7 +2612,6 @@
             \expandafter\xdef\csname hide@@@seq\fourth@\endcsname{kill}
             \ifnum\fourth@=\cons at num \xdef\cons at num{0} \fi
             \advance\killseq at count by -1
-            \seq at percent=100 \divide\seq at percent by \killseq at count
          \fi
       \fi\fi
       \killseq@
@@ -3114,22 +3113,33 @@
    \expandafter\xdef\csname stack@\bottop@\seq@\endcsname{\tmpstack}
 }
 \def\getarrow at shape#1#2#3#4&{%
-   \xdef\first@@{#1}\xdef\second@@{#2}\xdef\third@@{#3}
-   \if\first@@ v
-      \if\second@@ =
-      \else \xdef\style@{\first@@ v\third@@#4} \fi
+   \xdef\first@@{#1}\xdef\second@@{#2}\xdef\third@@{#3}\xdef\fourth@@{#4}
+   \ifx\temp@@\y@
+      \if\first@@ ` \xdef\first@@{a} \else
+      \if\first@@ ' \xdef\first@@{a} \else
+      \if\first@@ , \xdef\first@@{b} \else
+      \if\first@@ S \xdef\first@@{c} \xdef\second@@{-}
+      \fi\fi\fi\fi
+      \if\third@@ ` \xdef\third@@{a} \else
+      \if\third@@ ' \xdef\third@@{a} \else
+      \if\third@@ , \xdef\third@@{b} \else
+      \if\third@@ S \xdef\third@@{c} \xdef\second@@{-}
+      \fi\fi\fi\fi
+      \xdef\style@{\first@@ -\third@@\fourth@@}
+   \fi
+   \if\first@@ S
+      \xdef\style@{\first@@ -\third@@\fourth@@}
    \else
    \if\first@@ v
       \if\second@@ =
-      \else \xdef\style@{\first@@ v\third@@#4} \fi
+      \else \xdef\style@{\first@@ v\third@@\fourth@@} \fi
    \else
-   \if\third@@ v
-      \if\second@@ =
-      \else \xdef\style@{\first@@ v\third@@#4} \fi
+   \if\third@@ S
+      \xdef\style@{\first@@ -\third@@\fourth@@}
    \else
    \if\third@@ v
       \if\second@@ =
-      \else \xdef\style@{\first@@ v\third@@#4} \fi
+      \else \xdef\style@{\first@@ v\third@@\fourth@@} \fi
    \fi\fi\fi\fi
 }
 \def\get at shape#1#2#3{%
@@ -5894,7 +5904,11 @@
          \fi
          \xdef\style@{cons[color]:cons[\f at color][0]}
       \else
-         \xdef\style@{#4} \expandafter\getarrow at shape\temp@
+         \xdef\style@{#4} \xdef\temp@@{n}
+         \expandafter\get at firstfill\temp@
+         \if\second@@ ^ \xdef\second@@{_} \fi
+         \if\second@@ _ \xdef\temp@{\fill at char} \xdef\temp@@{y}\fi
+         \expandafter\getarrow at shape\temp@
       \fi
       \fi
       \fi
@@ -7793,9 +7807,8 @@
        \advance\pos at sum by 1 \fi
   \ifnum\innerloopcount<\seq at count \repeat
 
-  \multiply\pos at sum by \seq at percent
   \expandafter\xdef\csname pos\the\loopcount\endcsname{\the\pos at sum}
-  \expandafter\ifnum\csname pos\the\loopcount\endcsname<\thresh at ld
+  \expandafter\ifnum\csname pos\the\loopcount\endcsname<\thresh at ld@
   \else
     \expandafter\ifnum\csname pos\the\loopcount\endcsname>\m at x
       \xdef\m at x{\csname pos\the\loopcount\endcsname}
@@ -7843,13 +7856,12 @@
   \expandafter\ifnum\csname pos\the\loopcount\endcsname=\seq at count
     \xdef\cons at seq{\the\loopcount} \xdef\match at case{2} \loopcount=1
   \else
-   \multiply\pos at sum by \seq at percent
    \expandafter\xdef\csname pos\the\loopcount\endcsname{\the\pos at sum}
-   \expandafter\ifnum\csname pos\the\loopcount\endcsname<\thresh at ld
+   \expandafter\ifnum\csname pos\the\loopcount\endcsname<\thresh at ld@
    \else
     \expandafter\ifnum\csname pos\the\loopcount\endcsname>\m at x
       \xdef\m at x{\csname pos\the\loopcount\endcsname}
-      \expandafter\ifnum\csname pos\the\loopcount\endcsname<\all at thresh@ld
+      \expandafter\ifnum\csname pos\the\loopcount\endcsname<\all at thresh@ld@
          \xdef\cons at seq{\the\loopcount} \xdef\match at case{1}
       \else
          \xdef\cons at seq{\the\loopcount} \xdef\match at case{2}
@@ -11373,7 +11385,7 @@
          \textcolor{\legend at fg}{%
          \ifgerm at n\kern2ex\legend at size{nicht konserviert}%
          \else\ifsp at nish\kern2ex\legend at size{no conservado}%
-         \else\kern2ex\legend at size{non conserved}\fi\fi}
+         \else\kern2ex\legend at size{non-conserved}\fi\fi}
          \newline\hbox{}\noindent%
          \ifsimmode%
          \ifnames@\ifnames at right\else\hbox to \name at width{\hss}\fi\fi
@@ -11862,6 +11874,7 @@
 \def\get at tripletfill#1#2#3#4&{%
    \multiply\temp at count by -1%
    \def\second@@{#1}\def\second@@@{#2}\def\second@@@@{#3}\def\fill at char{#4&}}
+
 \def\putfeature at style#1{%
    \residues at size%
    \setbox1=\hbox{\ensuremath{\overrightarrow{\hbox{}}}}%
@@ -11967,6 +11980,7 @@
        \fontseries{\featurestyles at series}%
        \fontshape{\featurestyles at shape}%
        \selectfont%
+       \xdef\last@{bottom}%
        \ifx\bottop@\temp@\xdef\last@{0.35}\else\xdef\last@{0}\fi%
        \kern0.15\box at width%
        \loopcount=0\relax%
@@ -12137,6 +12151,7 @@
         \ifx\bottop@\temp@ \xdef\last@{0.35}\else\xdef\last@{-0.55}\fi%
         \textcolor{\f at color}{%
         \raisebox{\last@\arrow at height}{%
+         \if\first@@ b \xdef\first@@{,}\fi%
          \if\first@@ ,%
             \rule{0.1\arrow at height}{\arrow at height}\kern-0.35\arrow at height%
          \else%
@@ -12148,10 +12163,15 @@
                   \rule[\arrow at height]%
                      {0.1\arrow at height}{\arrow at height}\kern-0.35\arrow at height%
                \else%
+               \if\first@@ '%
+                  \rule[\arrow at height]%
+                     {0.1\arrow at height}{\arrow at height}\kern-0.35\arrow at height%
+               \else%
                   \if\first@@ -%
                      \rule{0pt}{0pt}\kern-0.35\arrow at height%
                   \fi%
                \fi%
+               \fi%
             \fi%
          \fi%
          \if\third@@ v%
@@ -12212,6 +12232,7 @@
                  \xdef\last@{-0.25}\fi\fi\fi\fi%
         \textcolor{\f at color}{%
         \raisebox{\last@\arrow at height}{%
+         \if\first@@ b \xdef\first@@{,}\fi%
          \if\first@@ ,%
             \rule[-0.5\arrow at height]{0.1\arrow at height}{1.5\arrow at height}%
             \kern-0.1\arrow at height%
@@ -12220,7 +12241,8 @@
                \rule[-0.5\arrow at height]{0.1\arrow at height}{2.25\arrow at height}%
                \kern-0.1\arrow at height%
             \else%
-               \if\first@@ `\xdef\first@@{'}\fi%
+               \if\first@@ a \xdef\first@@{'}\fi%
+               \if\first@@ ` \xdef\first@@{'}\fi%
                \if\first@@ '%
                   \rule[0.4\arrow at height]%
                      {0.1\arrow at height}{1.5\arrow at height}%
@@ -12245,6 +12267,7 @@
             \rule[0.37\arrow at height]{\width at tmp}{0.1\arrow at height}%
             \kern-\width at tmp%
             \rule[0.9\arrow at height]{\width at tmp}{0.1\arrow at height}%
+            \if\first@@ b \xdef\first@@{,}\fi%
             \if\third@@ ,%
                \kern-0.05\arrow at height%
                \rule[-0.5\arrow at height]{0.1\arrow at height}{1.5\arrow at height}%
@@ -12253,11 +12276,17 @@
                   \kern-0.05\arrow at height%
                   \rule[-0.5\arrow at height]{0.1\arrow at height}{2.25\arrow at height}%
                \else%
-                  \if\third@@ `\xdef\third@@{'}\fi%
+                  \if\first@@ a \xdef\first@@{'}\fi%
+                  \if\third@@ ` \xdef\third@@{'}\fi%
                   \if\third@@ '%
                      \kern-0.05\arrow at height%
                      \rule[0.4\arrow at height]{0.1\arrow at height}{1.5\arrow at height}%
+                  \else%
+                  \if\third@@ a%
+                     \kern-0.05\arrow at height%
+                     \rule[0.4\arrow at height]{0.1\arrow at height}{1.5\arrow at height}%
                   \fi%
+                  \fi%
                \fi%
             \fi%
          \fi}}%
@@ -12268,10 +12297,26 @@
         \advance\width at tmp by -0.5\temp@@length%
         \if\first@@ o\xdef\first@@{O}\fi%
         \if\third@@ o\xdef\third@@{O}\fi%
+        \xdef\last@{bottom}%
+        \ifx\fe at turep@s\last@%
+           \vspace{-20pt}\message{(((-20pt)))}%
+        \fi%
         \textcolor{\f at color}{%
          \if\first@@ ,%
-         \rule{\temp@@length}{\arrow at height}\kern-\temp@@length%
+           \rule{\temp@@length}{\arrow at height}\kern-\temp@@length%
          \else%
+         \if\first@@ b%
+           \xdef\last@{bottom}%
+           \ifx\fe at turep@s\last@%
+            \rule{\temp@@length}{\arrow at height}\kern-\temp@@length%
+           \else
+            \xdef\shift at feature{y}%
+            \kern-\temp@@length%
+            \rule[-\bar at length]{\temp@@length}{\bar at length}%
+            \kern-\temp@@length%
+            \rule{\temp@@length}{\arrow at height}\kern-\temp@@length%
+           \fi
+         \else%
             \if\first@@ |%
                \rule{\temp@@length}{2\arrow at height}\kern-\temp@@length%
             \else%
@@ -12279,6 +12324,52 @@
                 \raisebox{0.06ex}{\ensuremath{\bullet}}\kern-0.55ex%
                 \rule[\width at tmp]{0.65ex}{\temp@@length}%
               \else%
+              \if\first@@ S%
+                \xdef\last@{bottom}%
+                \ifx\fe at turep@s\last@%
+                   \advance\width at tmp by 0.5\temp@@length%
+                   \kern0.5\box at width%
+                   \kern-2\temp@@length%
+                   \rule[\width at tmp]{\temp@@length}{\arrow at height}%
+                   \advance\width at tmp by -0.5\temp@@length%
+                   \kern-\temp@@length%
+                   \rule[\width at tmp]{0.5\temp@@length}{\temp@@length}%
+                   \rule[\width at tmp]{0.5\box at width}{\temp@@length}%
+                \else%
+                   \kern0.5\box at width%
+                   \kern-2\temp@@length%
+                   \rule{\temp@@length}{\arrow at height}%
+                   \kern-\temp@@length%
+                   \rule[\width at tmp]{0.5\temp@@length}{\temp@@length}%
+                   \rule[\width at tmp]{0.5\box at width}{\temp@@length}%
+                \fi%
+              \else%
+              \if\first@@ c%
+                \xdef\last@{bottom}%
+                \ifx\fe at turep@s\last@%
+                   \advance\width at tmp by 0.5\temp@@length%
+                   \raisebox{\arrow at height}{\rule[\box at height]{0pt}{\bar at length}}%%%%%%%%%%%%%%%%%%%%%%%
+                   \kern0.5\box at width%
+                   \kern-2\temp@@length%
+                   \rule[2\arrow at height]{\temp@@length}{\bar at length}%%%%%%%%%%%%%%%%%%%%%%
+                   \kern-\temp@@length%%%%%%%%%%%%%%%%%%%%%%%%%
+                   \rule[\width at tmp]{\temp@@length}{\arrow at height}%
+                   \advance\width at tmp by -0.5\temp@@length%
+                   \kern-\temp@@length%
+                   \rule[\width at tmp]{0.5\temp@@length}{\temp@@length}%
+                   \rule[\width at tmp]{0.5\box at width}{\temp@@length}%
+                \else%
+                   \xdef\shift at feature{y}%
+                   \kern0.5\box at width%
+                   \kern-2\temp@@length%
+                   \rule[-\bar at length]{\temp@@length}{\bar at length}%
+                   \kern-\temp@@length%
+                   \rule{\temp@@length}{\arrow at height}%
+                   \kern-\temp@@length%
+                   \rule[\width at tmp]{0.5\temp@@length}{\temp@@length}%
+                   \rule[\width at tmp]{0.5\box at width}{\temp@@length}%
+                \fi%
+              \else%
                \if\first@@ <%
                  \raisebox{0.06ex}{\ensuremath{\blacktriangleleft}}\kern-0.35ex%
                \else
@@ -12290,13 +12381,20 @@
                 \fi%
                \fi%
               \fi%
+              \fi%
+              \fi%
             \fi%
          \fi%
+         \fi%
          \loopcount=\second@%
          \if\first@@ <\advance\loopcount by -1\relax\ifnum\loopcount<0 \loopcount=0\fi\fi%
          \if\third@@ >\advance\loopcount by -1\relax\ifnum\loopcount<0 \loopcount=0\fi\fi%
          \if\first@@ O\advance\loopcount by -1\relax\ifnum\loopcount<0 \loopcount=0\fi\fi%
          \if\third@@ O\advance\loopcount by -1\relax\ifnum\loopcount<0 \loopcount=0\fi\fi%
+         \if\first@@ S\advance\loopcount by -1\relax\ifnum\loopcount<0 \loopcount=0\fi\fi%
+         \if\third@@ S\advance\loopcount by -1\relax\ifnum\loopcount<0 \loopcount=0\fi\fi%
+         \if\first@@ c\advance\loopcount by -1\relax\ifnum\loopcount<0 \loopcount=0\fi\fi%
+         \if\third@@ c\advance\loopcount by -1\relax\ifnum\loopcount<0 \loopcount=0\fi\fi%
          \xdef\second@{\the\loopcount}%
          \rule[\width at tmp]{\second@\box at width}{\temp@@length}%
          \setbox1=\hbox{\residues at size{\fill at char}}%
@@ -12307,6 +12405,17 @@
          \if\third@@ ,%
          \kern-\temp@@length\rule{\temp@@length}{\arrow at height}%
          \else%
+         \if\third@@ b%
+           \xdef\last@{bottom}%
+           \ifx\fe at turep@s\last@%
+            \kern-\temp@@length\rule{\temp@@length}{\arrow at height}%
+           \else
+            \xdef\shift at feature{y}%
+            \kern-\temp@@length%
+            \rule[-\bar at length]{\temp@@length}{\bar at length}%
+            \kern-\temp@@length\rule{\temp@@length}{\arrow at height}%
+           \fi
+         \else%
             \if\third@@ |%
                \kern-\temp@@length\rule{\temp@@length}{2\arrow at height}%
             \else%
@@ -12314,6 +12423,31 @@
                 \rule[\width at tmp]{0.65ex}{\temp@@length}%
                 \kern-0.55ex\raisebox{0.06ex}{\ensuremath{\bullet}}%
               \else%
+              \if\third@@ S%
+                \rule[\width at tmp]{0.5\box at width}{\temp@@length}%
+                \rule[\width at tmp]{0.5\temp@@length}{\temp@@length}%
+                \xdef\last@{bottom}%
+                \ifx\fe at turep@s\last@%
+                  \advance\width at tmp by 0.5\temp@@length%
+                  \kern-\temp@@length\rule[\width at tmp]{\temp@@length}{\arrow at height}%
+                \else
+                  \kern-\temp@@length\rule{\temp@@length}{\arrow at height}%
+                \fi%
+              \else%
+              \if\third@@ c%
+                \xdef\shift at feature{y}%
+                \rule[\width at tmp]{0.5\box at width}{\temp@@length}%
+                \xdef\last@{bottom}%
+                \ifx\fe at turep@s\last@%
+                  \kern-\temp@@length%%%%%%%%%%%%%%%%%%%%%%%%%
+                  \rule[2\arrow at height]{\temp@@length}{\bar at length}%%%%%%%%%%%%%%%%%%%%%%
+                  \advance\width at tmp by 0.5\temp@@length%
+                  \kern-\temp@@length\rule[\width at tmp]{\temp@@length}{\arrow at height}%
+                \else
+                  \kern-\temp@@length\rule[-\bar at length]{\temp@@length}{\bar at length}%
+                  \kern-\temp@@length\rule{\temp@@length}{\arrow at height}%
+                \fi%
+              \else%
                \if\third@@ >%
                 \kern-0.35ex\raisebox{0.06ex}{\ensuremath{\blacktriangleright}}%
                \else
@@ -12324,7 +12458,10 @@
                 \fi%
                \fi%
               \fi%
-            \fi
+              \fi%
+              \fi%
+            \fi%
+         \fi%
          \fi}%
        \fi
       \fi
@@ -13125,10 +13262,23 @@
    \xdef\featureposttttop{1} \xdef\featureposbbbbottom{1}%
    \findc at nsensus%
    \noindent%
+   \setlength{\bar at length}{0pt}%
+   \xdef\fe at turep@s{top}%
    \ifnum\feature at ttttop=1
+      \advance\bar at length by \feature at tttop\baselineskip%
+      \advance\bar at length by \feature at ttop\baselineskip%
+      \advance\bar at length by \feature at top\baselineskip%
+      \multiply\bar at length by 2%
+      \advance\bar at length by \tttt at sp@ce%
+      \advance\bar at length by \ttt at sp@ce%
+      \advance\bar at length by \tt at sp@ce%
       \ifnum\featureonttttop=0 \xdef\feature at ttttop{0} \fi
       \xdef\bottop@{ttttop}%
+      \xdef\shift at feature{n}%
       \put at feature%
+      \advance\bar at length by -\baselineskip%
+      \ifx\shift at feature\y@ \vspace{-\bar at length}\fi%
+      \setlength{\bar at length}{0pt}%
       \vspace{\tttt at sp@ce}%
       \vspace{-\baselineskip}%
       \newline\hbox{}%
@@ -13136,9 +13286,18 @@
       \iffix@\ifttttopfeature \vspace{\tttt at sp@ce}\newline\hbox{}\newline\hbox{}\fi\fi
    \fi
    \ifnum\feature at tttop=1
+      \advance\bar at length by \feature at ttop\baselineskip%
+      \advance\bar at length by \feature at top\baselineskip%
+      \multiply\bar at length by 2%
+      \advance\bar at length by \ttt at sp@ce%
+      \advance\bar at length by \tt at sp@ce%
       \ifnum\featureontttop=0 \xdef\feature at tttop{0} \fi
       \xdef\bottop@{tttop}%
+      \xdef\shift at feature{n}%
       \put at feature%
+      \advance\bar at length by -\baselineskip%
+      \ifx\shift at feature\y@ \vspace{-\bar at length}\fi%
+      \setlength{\bar at length}{0pt}%
       \vspace{\ttt at sp@ce}%
       \vspace{-\baselineskip}%
       \newline\hbox{}%
@@ -13146,9 +13305,16 @@
       \iffix@\iftttopfeature \vspace{\ttt at sp@ce}\newline\hbox{}\newline\hbox{}\fi\fi
    \fi
    \ifnum\feature at ttop=1
+      \advance\bar at length by \feature at top\baselineskip%
+      \multiply\bar at length by 2%
+      \advance\bar at length by \tt at sp@ce\message{tt\the\bar at length tt}%
       \ifnum\featureonttop=0 \xdef\feature at ttop{0} \fi
       \xdef\bottop@{ttop}%
+      \xdef\shift at feature{n}%
       \put at feature%
+      \advance\bar at length by -\baselineskip%
+      \ifx\shift at feature\y@ \vspace{-\bar at length}\fi%
+      \setlength{\bar at length}{0pt}%
       \vspace{\tt at sp@ce}%
       \vspace{-\baselineskip}%
       \newline\hbox{}%
@@ -13264,6 +13430,9 @@
          \ifnum\ruler at rot=0 \vspace{0.25\baselineskip}\fi%
       \fi%
    \fi%
+   \xdef\fe at turep@s{bottom}%
+   \setlength{\bar at length}{0pt}%
+   \xdef\b at feature@count{0}
    \ifnum\feature at bottom=1 %
       \ifnum\featureonbottom=0 \xdef\feature at bottom{0}\fi%
       \xdef\bottop@{bottom}%
@@ -13273,6 +13442,9 @@
          \vspace{\b at r@stretch\box at height}%
       \fi%
       \put at feature%
+      \temp@@count=\b at feature@count%
+      \advance\temp@@count by 1%
+      \xdef\b at feature@count{\the\temp@@count}%
    \else
       \iffix@
       \if\bottom at stretch y%
@@ -13285,14 +13457,24 @@
       \fi%
    \fi%
    \ifnum\feature at bbottom=1 %
+      \advance\bar at length by \b at feature@count \baselineskip%
+      \multiply\bar at length by \b at r@stretch%
+      \multiply\bar at length by 2%
+      \advance\bar at length by \bb at sp@ce\message{bb\the\bar at length bb}%
       \ifnum\featureonbbottom=0 \xdef\feature at bbottom{0}\fi%
       \xdef\bottop@{bbottom}%
       \vspace{\bb at sp@ce}%
       \if\bbottom at stretch y%
+         \advance\bar at length by -\box at height%
+         \advance\bar at length by \b at r@stretch\box at height%
          \vspace{-\box at height}%
          \vspace{\b at r@stretch\box at height}%
       \fi%
+      \setlength{\bar at length}{0pt}%%%%%%%%%%%%%%%%%%%%%%%
       \put at feature%
+      \temp@@count=\b at feature@count%
+      \advance\temp@@count by 1%
+      \xdef\b at feature@count{\the\temp@@count}%
    \else
       \iffix@
       \if\bbottom at stretch y%
@@ -13305,6 +13487,10 @@
       \fi
    \fi
    \ifnum\feature at bbbottom=1 %
+      \advance\bar at length by \b at feature@count\baselineskip%
+      \multiply\bar at length by \b at r@stretch%
+      \multiply\bar at length by 2%
+      \advance\bar at length by \bbb at sp@ce\message{bbb\the\bar at length bbb}%
       \ifnum\featureonbbbottom=0 \xdef\feature at bbbottom{0}\fi%
       \xdef\bottop@{bbbottom}%
       \vspace{\bbb at sp@ce}%
@@ -13313,6 +13499,9 @@
          \vspace{\b at r@stretch\box at height}%
       \fi%
       \put at feature%
+      \temp@@count=\b at feature@count%
+      \advance\temp@@count by 1%
+      \xdef\b at feature@count{\the\temp@@count}%
    \else
       \iffix@
       \if\bbbottom at stretch y%
@@ -13325,6 +13514,10 @@
       \fi
    \fi
    \ifnum\feature at bbbbottom=1 %
+      \advance\bar at length by \b at feature@count\baselineskip%
+      \multiply\bar at length by \b at r@stretch%
+      \multiply\bar at length by 2%
+      \advance\bar at length by \bbbb at sp@ce\message{bbbb\the\bar at length bbbb}%
       \ifnum\featureonbbbbottom=0 \xdef\feature at bbbbottom{0}\fi%
       \xdef\bottop@{bbbbottom}%
       \vspace{\bbbb at sp@ce}%
@@ -14181,8 +14374,6 @@
     \ifnum\loopcount<\seq at count \repeat
     \xdef\seq at order{\seq at order,@}
  \killseq at count=\seq at count
- \seq at percent=100
- \ifnum\seq at count>0 \divide\seq at percent by \seq at count \fi
  \fi
  \fi
 }
@@ -14450,6 +14641,10 @@
            \caption[\c at pshort]{\c at p}
          \fi
       \fi
+      \loopcount = \thresh at ld \multiply\loopcount by \seq at count \divide\loopcount by 100
+      \xdef\thresh at ld@{\the\loopcount}
+      \loopcount = \all at thresh@ld \multiply\loopcount by \seq at count \divide\loopcount by 100
+      \xdef\all at thresh@ld@{\the\loopcount}
       \bgroup
          \ifx\out at put\y@\bigskip\fi
          \iffuncmode \show at consfalse \fi



More information about the tex-live-commits mailing list