%%
%% This is file `ftnright.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% ftnright.dtx (with options: `package')
%%
%% IMPORTANT NOTICE:
%%
%% This file is a generated file from the sources of the `tools' bundle
%% in the LaTeX2e distribution.
%%
%% For the copyright notice see the source file(s).
%%
%% You are not allowed to modify this file.
%%
%% You are allowed to distribute this file if and only if
%% it is distributed with the corresponding source files in
%% the `tools' bundle.
%%
%% For the copying and distribution conditions of the source files,
%% see the file readme.txt distributed with the tools bundle.
%%
%% Package `ftnright' to use with LaTeX 2e
%% Copyright (C) 1989-1996 Frank Mittelbach, all rights reserved.
\NeedsTeXFormat{LaTeX2e}[1995/06/01]
\ProvidesPackage{ftnright}
[1996/01/01 v1.1c footnote layout package (FMi)]
%%
%% \CheckSum{423}
%% \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
%% Digits \0\1\2\3\4\5\6\7\8\9
%% Exclamation \! Double quote \" Hash (number) \#
%% Dollar \$ Percent \% Ampersand \&
%% Acute accent \' Left paren \( Right paren \)
%% Asterisk \* Plus \+ Comma \,
%% Minus \- Point \. Solidus \/
%% Colon \: Semicolon \; Less than \<
%% Equals \= Greater than \> Question mark \?
%% Commercial at \@ Left bracket \[ Backslash \\
%% Right bracket \] Circumflex \^ Underscore \_
%% Grave accent \` Left brace \{ Vertical bar \|
%% Right brace \} Tilde \~}
%%
\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
`twocolum' in the
\noexpand\documentclass command.}%
\shipout\box\footins \fi\fi
\else
\ifvoid\footins
\setbox\@outputbox\box\@cclv
\else
\setbox\@outputbox\vbox
{\ifvoid\@cclv \else
\unvbox\@cclv
\vskip\skip\footins\fi
\footnoterule\unvbox\footins}\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'.
|