%% %% This is file `ftnright.sty', generated %% on <1994/7/28> with the docstrip utility (2.2h). %% %% The original source files were: %% %% ftnright.dtx (with options: `package') %% %% IMPORTANT NOTICE: %% This file is part of the `tools' bundle %% in the LaTeX2e distribution. %% %% You are not allowed to distribute this file. %% For distribution of the original source see %% the copyright notice in the source file, and %% in the file readme.txt distributed with the %% tools bundle. %% \def\filename{ftnright} \def\fileversion{v1.1b} \def\filedate{1994/02/28} \def\docdate {1994/02/28} %% File: ftnright.dtx Copyright (C) 1992-1994 Frank Mittelbach %% See the copyright conditions in readme.txt. %% %% \CheckSum{431} %% \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 \~} %% \wlog{Package: `\filename' \fileversion\space <\filedate> (FMi)} \wlog{English Documentation \@spaces <\docdate> (FMi)} \ProvidesPackage{ftnright}[\filedate\space LaTeX2e package \fileversion] \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'.