| Current File : //usr/share/texlive/texmf-dist/tex/latex/tools/ftnright.sty |
%%
%% This is file `ftnright.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% ftnright.dtx (with options: `package')
%%
%% This is a generated file.
%%
%% The source is maintained by the LaTeX Project team and bug
%% reports for it can be opened at https://latex-project.org/bugs/
%% (but please observe conditions on bug reports sent to that address!)
%%
%%
%% Copyright (C) 1993-2020
%% The LaTeX3 Project and any individual authors listed elsewhere
%% in this file.
%%
%% This file was generated from file(s) of the Standard LaTeX `Tools Bundle'.
%% --------------------------------------------------------------------------
%%
%% It may be distributed and/or modified under the
%% conditions of the LaTeX Project Public License, either version 1.3c
%% of this license or (at your option) any later version.
%% The latest version of this license is in
%% https://www.latex-project.org/lppl.txt
%% and version 1.3c or later is part of all distributions of LaTeX
%% version 2005/12/01 or later.
%%
%% This file may only be distributed together with a copy of the LaTeX
%% `Tools Bundle'. You may however distribute the LaTeX `Tools Bundle'
%% without such generated files.
%%
%% The list of all files belonging to the LaTeX `Tools Bundle' is
%% given in the file `manifest.txt'.
%%
%% Package `ftnright' to use with LaTeX 2e
%% Copyright (C) 1989-2004 Frank Mittelbach, all rights reserved.
\NeedsTeXFormat{LaTeX2e}[1995/06/01]
\ProvidesPackage{ftnright}
[2014/10/28 v1.1f footnote layout package (FMi)]
%%
%%
\def\preparefootins{%
\global\rcol@footinsskip\skip\footins
\global\skip\footins\z@
\global\count\footins\z@
\global\dimen\footins\textheight}
\newskip\rcol@footinsskip
\def\@outputdblcol{\if@firstcolumn
\global\@firstcolumnfalse
\global\setbox\@leftcolumn\box\@outputbox
\global\count\footins\@m
\global\skip\footins\rcol@footinsskip
\else \preparefootins
\global\@firstcolumntrue
\setbox\@outputbox\vbox{\hbox to\textwidth
{\hbox to\columnwidth
{\box\@leftcolumn\hss}%
\hfil\vrule\@width\columnseprule\hfil
\hbox to\columnwidth
{\box\@outputbox\hss}}}%
\@combinedblfloats\@outputpage
\begingroup
\@dblfloatplacement\@startdblcolumn
\@whilesw\if@fcolmade\fi
{\@outputpage\@startdblcolumn}%
\endgroup
\fi}
\def\@startcolumn{%
\ifx\@deferlist\@empty
\global\@fcolmadefalse
\global\@colroom\@colht
\else
\ifvoid\footins\else
\ftn@amount\ht\footins
\advance\ftn@amount\dp\footins
\advance\ftn@amount\skip\footins
\fi
\global\advance\@colht-\ftn@amount
\global\@colroom\@colht
\@xstartcol
\global\advance\@colht\ftn@amount
\global\advance\@colroom\ftn@amount
\fi
\if@fcolmade
\setbox\@cclv\box\@outputbox
\@makecol
\else
\ifvoid\footins\else
\insert\footins{\unvbox\footins}\fi
\fi}
\newdimen\ftn@amount
\def\@xstartcol{%
\@tryfcolumn \@deferlist
\if@fcolmade
\else
\begingroup
\let \@tempb \@deferlist
\global \let \@deferlist \@empty
\let \@elt \@scolelt
\@tempb
\endgroup
\fi
}
\def\@makecol{\if@firstcolumn
\setbox\@outputbox\box\@cclv
\if@twocolumn \else
\ifvoid\footins \else
\@latexerr{ftnright package
used in one-column mode}%
{The ftnright package was designed to
work with LaTeX's standard^^Jtwocolumn
option. It does *not* work with the
multicol package.^^JSo please specify
`twocolumn' in the
\noexpand\documentclass command.}%
\shipout\box\footins \fi\fi
\ifnum\insertpenalties>\z@
\@latexerr{ftnright package
scrambled footnotes}%
{There is too much footnote material in
the first column and ftnright^^Jis
unable to cope with this.^^JYou need
to reduce the amount to get a properly
formatted page.}%
\fi
\else
\ifvoid\footins
\setbox\@outputbox\box\@cclv
\else
\setbox\@outputbox\vbox
{\ifvoid\@cclv \else
\unvbox\@cclv
\vskip\skip\footins\fi
\color@begingroup
\normalcolor
\footnoterule\unvbox\footins
\color@endgroup}\fi
\fi
\xdef\@freelist{\@freelist\@midlist}%
\global \let \@midlist \@empty
\@combinefloats
\ifvbox\@kludgeins
\@makespecialcolbox
\else
\setbox\@outputbox\vbox to\@colht
{\boxmaxdepth\maxdepth
\@texttop
\@tempdima\dp\@outputbox
\unvbox\@outputbox
\vskip-\@tempdima
\@textbottom}%
\fi
\global\maxdepth\@maxdepth}
\ifcase \@ptsize
\renewcommand\footnotesize{%
\@setfontsize\footnotesize\@viiipt{9.9}%
\abovedisplayskip 6\p@\@plus2\p@\@minus4\p@
\abovedisplayshortskip \z@ \@plus\p@
\belowdisplayshortskip
3\p@\@plus\p@\@minus2\p@
\def\@listi{\leftmargin\leftmargini
\topsep 3\p@ \@plus\p@ \@minus\p@
\parsep 2\p@ \@plus\p@ \@minus\p@
\itemsep \parsep}%
\belowdisplayskip \abovedisplayskip
}
\or
\renewcommand\footnotesize{%
\@setfontsize\footnotesize\@ixpt{11.1}%
\abovedisplayskip 8\p@\@plus2\p@\@minus4\p@
\abovedisplayshortskip \z@ \@plus\p@
\belowdisplayshortskip
4\p@ \@plus2\p@ \@minus2\p@
\def\@listi{\leftmargin\leftmargini
\topsep 4\p@ \@plus2\p@\@minus2\p@
\parsep 2\p@ \@plus\p@ \@minus\p@
\itemsep \parsep}%
\belowdisplayskip \abovedisplayskip
}
\or
\renewcommand\footnotesize{%
\@setfontsize\footnotesize\@xpt{12.3}%
\abovedisplayskip10\p@\@plus2\p@\@minus5\p@
\abovedisplayshortskip \z@ \@plus3\p@
\belowdisplayshortskip
6\p@ \@plus3\p@ \@minus3\p@
\def\@listi{\leftmargin\leftmargini
\topsep 6\p@ \@plus2\p@ \@minus2\p@
\parsep 3\p@ \@plus2\p@ \@minus\p@
\itemsep \parsep}%
\belowdisplayskip \abovedisplayskip
}
\fi
\let\footnoterule\@empty
\AtBeginDocument
{\global\footnotesep\ht\strutbox}
\long\def\@makefntext#1{\parindent 1em
\noindent\hbox to 2em{}%
\llap{\@thefnmark.\,\,}#1}
\setlength{\skip\footins}
{10pt plus 5pt minus 3pt}
\AtBeginDocument{\preparefootins}
\endinput
%%
%% End of file `ftnright.sty'.