% \iffalse
%% File: sidecap.dtx
%%
%
%<package>\NeedsTeXFormat{LaTeX2e}
%<package>\ProvidesPackage{sidecap}
%<package> [2003/06/06 v1.6f SideCap Package (RN/HjG)]
%
%<*driver>
\documentclass{ltxdoc}
\usepackage{sidecap}
\GetFileInfo{sidecap.sty}
\CodelineIndex
\EnableCrossrefs
\RecordChanges
\begin{document}
\DocInput{sidecap.dtx}
\end{document}
%</driver>
%
% Copyright 1997--2003 Rolf Niepraschk and Hubert Gaesslein.
% This program can be redistributed and/or modified under the terms
% of the LaTeX Project Public License Distributed from CTAN
% archives in directory macros/latex/base/lppl.txt; either
% version 1 of the License, or any later version.
%
% \fi
%
% \CheckSum{696}
%
% \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 \~}
%
% \iffalse meta-comment
% ===================================================================
% @LaTeX-package-file{
% author = {Rolf Niepraschk, Hubert G\"{a}\ss{}lein}
% version = "1.6e",
% date = "04 May 2003",
% filename = "sidecap.sty",
% email = "niepraschk@ptb.de (INTERNET)",
% codetable = "ISO/ASCII",
% keywords = "LaTeX2e, sideways caption, \SCfigure, \SCtable",
% supported = "yes",
% docstring = "LaTeX package which defines new environments
% for easy typesetting sideways captions and
% wide floats".
% }
% ===================================================================
% \fi
%
% \MakeShortVerb{\|}
% \setlength\parindent{0pt}
%
% ^^A \CodelineIndex Fehler !!!
% ^^A \RecordChanges kein Fehler !!!
%
% \changes{v1.0 (RN)}{1997/01/04}{New}
% \changes{v1.1 (RN/HjG)}{1997/05/01}{First public version}
% \changes{v1.2 (HjG)}{1998/01/29}{Proposal for amendments}
% \changes{v1.3 (RN/HjG)}{1998/01/29}{Unsuccessful attempt to make
% star-forms work}
% \changes{v1.4c (HjG)}{1998/06/05}{Successful (?) attempt to make
% star-forms work, plus some amendments}
% \changes{v1.4d (RN)} {1998/06/05}{New (LPPL) license}
% \changes{v1.5d (RN/HjG)}{2000/03/16}{Slight amendments to documentation.}
% \changes{v1.5h (RN/HjG)}{2002/05/24}{Improved compatibility with package
% hyperref.}
% \changes{v1.5h (RN/HjG)}{2002/05/24}{Environment wide does the right thing
% now outside SCfloat environments.}
%
% \changes{v1.6d (RN/HjG)}{2002/09/13}{Simplify internal calculations
% using primitive operators where possible and useful,
% saving tokens (suggested by Frank Mittelbach.}
%
% \IndexPrologue{^^A
% \section*{Index}^^A
% \markboth{Index}{Index}^^A
% Numbers written in \emph{italic} refer to the page where the
% corresponding entry is described, the ones
% \underline{underlined} to the definition, the rest to the places
% where the entry is used.}
%
%
% ^^A -----------------------------
%
% \title{\unskip
% The \textsf{sidecap} package^^A
% }
% \author{Rolf Niepraschk {\normalsize (\texttt{niepraschk@ptb.de})}\and
% Hubert G\"a{\ss}lein}
% \date{\fileversion\ -- \filedate}
% \maketitle
%
%
% ^^A -----------------------------
%
%
% \begin{abstract}
% This package defines the new environments |SCfigure| and |SCtable|,
% analogous to |figure| and |table|, which make it easy to
% typeset captions sideways.
%
% Additionally, a |wide| environment is defined; it allows to use
% the margin area, e.\,g., for figures wider than |\textwidth|.
%
% \iffalse
% (???)
% Support for other types of floating environments is provided,
% e.\,g., as available by the |newfloat| package.
% \fi
% \end{abstract}
%
% \pagestyle{headings}
%
% ^^A -----------------------------
%
% ^^A \tableofcontents
%
% ^^A -----------------------------
%
% \section{Introduction}
%
% In some cases it may be useful to typeset the caption aside the figure or
% the table. For this purpose the package \textsf{sidecap} defines the new
% environments |SCfigure| and |SCtable|. The figure or the table and the
% caption are put into two minipages that are positioned side by side and
% centered as a whole. The space between the minipages is |\sidecaptionsep|. The
% correct positioning with respect to left and right pages requires at least
% two compilation runs.
%
% ^^A -----------------------------
%
% \section{Usage}
%
% |\usepackage[|\meta{option}|]{sidecap}|
%
% \smallskip
%
% |\begin{SCtable} [|\meta{relwidth}|][|\meta{float}|] ... |
% |\end{SCtable}|
%
% |\begin{SCfigure} [|\meta{relwidth}|][|\meta{float}|] ... |
% |\end{SCfigure}|
%
% \smallskip
% |\begin{SCtable*} [|\meta{relwidth}|][|\meta{float}|] ... |
% |\end{SCtable*}|
%
% |\begin{SCfigure*}[|\meta{relwidth}|][|\meta{float}|] ... |
% |\end{SCfigure*}|
%
% \medskip
% \begin{center}
% \begin{tabular}{r@{~}p{.75\linewidth}}
% \meta{option} -- & |outercaption| (default): Caption appears left on
% left pages and right on right
% pages. \\[.25\baselineskip]
% & |innercaption|: Caption appears right on left pages
% and left on right pages.\\[.25\baselineskip]
% & |leftcaption|, |rightcaption|: Caption is always on
% the left or right, respectively.\\[.25\baselineskip]
% & |wide|: The floating objects may extend into the
% margin area.
% \\[.25\baselineskip]
% & |raggedright|, |raggedleft|, |ragged|: Better
% justification for small captions.
% The \textsf{ragged2e} package is used if available.
% \\[.5\baselineskip]
% \meta{relwidth} -- & optional; caption width relative to the width of the
% figure or table. A large value (e.g., 50) reserves
% the maximum width that is possible.
% Default is |\sidecaptionrelwidth|
% (which is initialized to 1.0).\\[.5\baselineskip]
% \meta{float} -- & optional; like the floating position parameter of the
% original table\slash figure environments.
% Default is |tbp|.
% \end{tabular}
% \end{center}
%
% \medskip
% |\begin{wide} ... \end{wide}|
%
% The |wide| environment may be used inside |figure| and |table|
% environments as well as in the normal text.
%
% ^^A -----------------------------
%
% \section{Required packages}
%
% This package requires the standard \LaTeX\ package \textsf{ifthen}.
%
% ^^A -----------------------------
%
% \section{Supported packages}
%
% This package is compatible with \LaTeX\ package \textsf{hyperref}
% (tested with version 6.71v as of 2001/11/12).
% If the |raggedright| or |raggedleft| or |ragged| package option has
% been given, then captions will be set with ragged margin.
% The \textsf{ragged2e} package will be used if it can be found.
%
% \iffalse
% This package supports the \LaTeX\ package \textsf{newfloat},
% coming soon \dots\ (?)
% \fi
%
% ^^A -----------------------------
%
% \StopEventually{^^A
% \PrintChanges\PrintIndex
% ^^A Make sure that the index is not printed twice
% ^^A (ltxdoc.cfg might have a second \PrintIndex command)
% \let\PrintChanges\relax
% \let\PrintIndex\relax
% }
%
% ^^A -----------------------------
%
% \section{The implementation}
%
% \subsection{Register allocation and auxiliary macros}
%
% \begin{macrocode}
%<*package>
\RequirePackage{ifthen}
\@ifdefinable{\SC@BOXWD}{\newdimen\SC@BOXWD}
\@ifdefinable{\SC@CAPWD}{\newdimen\SC@CAPWD}
% 2 noetig ???
\@ifdefinable{\SC@tempdima}{\newdimen\SC@tempdima}
\@ifdefinable{\SC@tempdimb}{\newdimen\SC@tempdimb}
\newcounter{SC@C} \newsavebox{\SC@BOX} \newcommand*{\SC@FLOAT}{}
\newcommand*{\SC@IDENT}{SC@\number\value{SC@C}}
\newcommand*\SC@label[1]{\gdef\SC@LABtext{#1}\ignorespaces}
\newcommand*\SC@orig@caption{} \newcommand*\SC@orig@label{}
\newcommand*\sidecaptionsep{} \newcommand*\SC@pageref{}
\edef\sidecaptionsep{\the\marginparsep}
\newcommand*\sidecaptionrelwidth{1.0}
\newcommand*\sidecaptionvpos[2]{% 2002/08/31
\@namedef{SC@#1@vpos}{#2}%
}
\newboolean{SC@wide}
\def\SC@widefalse{\global\let\ifSC@wide\iffalse}
\def\SC@widetrue {\global\let\ifSC@wide\iftrue}
% Kann man auf dieses Laengenregister verzichten? Nein! (RN) <****>
\newcommand*\SC@calcwidths[1]{%
\SC@tempdima#1\relax
\SC@BOXWD\wd\SC@BOX
\SC@CAPWD\SC@fraction\SC@BOXWD
\@tempdima\SC@BOXWD
\advance\@tempdima\SC@CAPWD
\advance\@tempdima\sidecaptionsep
\ifdim\@tempdima>\SC@tempdima
\advance\SC@CAPWD-\@tempdima
\advance\SC@CAPWD\SC@tempdima
\fi
\SC@tempdimb\@tempdima
}
%\newcommand*{\isSC@WIDEi}[2]{#2} %default: false
%\newcommand*{\isSC@WIDEii}[2]{#2} %default: false
\newcommand*{\isSC@WIDEi}[2]{\ifSC@wide#1\else#2\fi} %default: false
\newcommand*{\isSC@WIDEii}[2]{\ifSC@wide#1\else#2\fi} %default: false
%\newcommand*{\isSC@First}[2]{#1} %default: true
\newcommand*\SC@justify{}
\newcommand*\SC@justify@caption{}
\newcommand*\SC@justify@body{}
\newboolean{SC@origRagged} \setboolean{SC@origRagged}{false} %% ???
% \end{macrocode}
% \begin{macro}{\SC@SaveCommands}
% \changes{v1.5e (RN)}{2001/11/10}{\cmd\SC@AtFirstCall:
% Saves the old meaning
% of \cmd\caption\ and \cmd\label\ at first call of some SC macros
% (compatibility with `hyperref').}
% \changes{v1.5h (RN/HjG)}{2002/05/24}{Renamed \cmd\SC@AtFirstCall\ ^^A
% to \cmd\SC@SaveCommands\ and changed definition.}
% \begin{macrocode}
\newcommand*{\SC@SaveCommands}{%
\let\SC@orig@caption=\caption \let\SC@orig@label=\label%
}
% \end{macrocode}
% \end{macro}
% \begin{macrocode}
\SC@SaveCommands % necessary? or even wrong?
% \end{macrocode}
%
% \subsection{Package \textsf{hyperref} compatibility}
%
% \changes{v1.5d (RN/HjG)}{2000/02/04}{Compatibility with `hyperref',
% thanks to Heiko Oberdiek}
% Note: The |\pageref| doesn't work with \textsf{hyperref} \dots \mbox{:-(}
% \changes{v1.6 (RN/HjG)}{2002/06/07}{%
% Oneside mode had been forgotten ;-)}%
% \begin{macrocode}
\if@twoside
\newcommand*{\isSC@ODD}[2]{%
\ifthenelse{\isodd{\SC@pageref{\SC@IDENT}}}{#1}{#2}}
\else
\newcommand*{\isSC@ODD}[2]{#1}%
\fi
% \end{macrocode}
%
%
% \subsection{Option processing}
%
% \begin{macrocode}
\DeclareOption{innercaption}{%
\renewcommand*{\SC@FLOAT}[2]{%
\isSC@ODD{{#1}\hspace{\sidecaptionsep}{#2}} {{#2}\hspace{\sidecaptionsep}{#1}}}
\renewcommand*\SC@justify@caption{%
\isSC@ODD{\RaggedLeft}{\RaggedRight}}
}
\DeclareOption{outercaption}{%
\renewcommand*{\SC@FLOAT}[2]{%
\isSC@ODD{{#2}\hspace{\sidecaptionsep}{#1}} {{#1}\hspace{\sidecaptionsep}{#2}}}
\renewcommand*\SC@justify@caption{%
\isSC@ODD{\RaggedRight}{\RaggedLeft}}
}
\DeclareOption{rightcaption}{%
\renewcommand*{\SC@FLOAT}[2]{{#2}\hspace{\sidecaptionsep}{#1}}
\def\SC@justify@caption{\RaggedRight}%
}
\DeclareOption{leftcaption}{%
\renewcommand*{\SC@FLOAT}[2]{{#1}\hspace{\sidecaptionsep}{#2}}
\def\SC@justify@caption{\RaggedLeft}%
}
% \end{macrocode}
% \changes{v1.5a (RN)}{1999/07/18}{New Option and environment `wide'; some
% small changes}
% \begin{macrocode}
\DeclareOption{wide}{%
\renewcommand*{\isSC@WIDEi}[2]{\if@twocolumn #2\else #1\fi}% ???
\renewcommand*{\isSC@WIDEii}[2]{#1}}
% \end{macrocode}
% These `ragged\dots' options should stay here, behind the `\dots caption' options!
% \changes{v1.5b (RN)}{1999/10/31}{New Option `raggedright' as suggested by
% James Kilfiger (mailto:mapdn@csv.warwick.ac.uk)}
% \begin{macrocode}
\DeclareOption{raggedright}{%
\def\SC@justify{\RaggedRight}}
% \end{macrocode}
% \changes{v1.5f (RN)}{2002/01/13}{New option `raggedleft'}
% \begin{macrocode}
\DeclareOption{raggedleft}{%
\def\SC@justify{\RaggedLeft}}
% \end{macrocode}
% \changes{v1.5g (RN)}{2002/01/18}{New option `ragged'}
% \begin{macrocode}
\DeclareOption{ragged}{%
\def\SC@justify{\SC@justify@caption}% \let ?
}
% \end{macrocode}
%
% \begin{macrocode}
\DeclareOption{origragged}{\setboolean{SC@origRagged}{true}}
% \end{macrocode}
%
%
% \changes{v1.6 (RN/HjG)}{2002/06/07}{%
% New option `margincaption' added.}%
% \begin{macrocode}
\DeclareOption{margincaption}{%
\ds@outercaption\ds@outerbody\ds@wide
\let\ds@innercaption\@empty
\let\ds@leftcaption\@empty
\let\ds@rightcaption\@empty
\def\SC@calcwidths#1{%
\SC@tempdimb#1\relax
\SC@BOXWD\SC@tempdimb % *-form !!! ???
\advance\SC@BOXWD-\marginparwidth
\advance\SC@BOXWD-\marginparsep
\SC@CAPWD\marginparwidth
}%
}
% \end{macrocode}
%
% \begin{macrocode}
\DeclareOption{innerbody}{%
\def\SC@justify@body{%
\isSC@ODD{\RaggedRight}{\RaggedLeft}}
}
\DeclareOption{outerbody}{%
\def\SC@justify@body{%
\isSC@ODD{\RaggedLeft}{\RaggedRight}}
}
\DeclareOption{centerbody}{%
\def\SC@justify@body{\Centering}
}
\DeclareOption{rightbody}{%
\def\SC@justify@body{\RaggedLeft}%
}
\DeclareOption{leftbody}{%
\def\SC@justify@body{\RaggedRight}%
}
% \end{macrocode}
%
% \begin{macrocode}
\ExecuteOptions{outercaption}
%%\InputIfFileExists{sidecap.cfg}{}{} % hier ? % 2002/06/14
\ProcessOptions\relax
% \end{macrocode}
% \changes{v1.6 (RN)}{2002/06/09}{``Smart'' loading of package ragged2e.
% More simple code for hyperref compatibilty (\cmd\hypergetpageref).}
% \changes{v1.6f (RN/HjG)}{2003/06/06}{Test for presence of package babel
% (\cmd\org@pageref).}
% \begin{macrocode}
\AtBeginDocument{%
\ifSC@origRagged\else
\@ifpackageloaded{ragged2e}{}%
{%
\IfFileExists{ragged2e.sty}{%
\RequirePackage[NewParameters]{ragged2e}}%
{%
\PackageWarningNoLine{sidecap}{%
Package `ragged2e' not found -- expect bad formatting}%
}%
}
\fi
\@ifundefined{RaggedRight}%
{%
\let\RaggedLeft\raggedleft
\let\RaggedRight\raggedright
\let\Centering\centering
}{}
\@ifpackageloaded{hyperref}%
{\let\SC@pageref=\hypergetpageref}%
{%
\@ifpackageloaded{babel}%
{\let\SC@pageref=\org@pageref}%
{\let\SC@pageref=\pageref}%
}
}
% \end{macrocode}
%
%
% \subsection{User-level macros (environments)}
%
% \begin{environment}{SCfigure}
% Simply passes the first (optional) parameter and the required one,
% in this case `figure', to |SC@float|\,.
% The figure caption should be bottom aligned.
% \begin{macrocode}
%\newcommand*\SCfigureVpos{b}% 2002/06/14
\@ifdefinable\SC@figure@vpos{\def\SC@figure@vpos{b}}
\newenvironment{SCfigure}{\SC@float[\SC@figure@vpos]{figure}}{\endSC@float}
\newenvironment{SCfigure*}{\SC@dblfloat[\SC@figure@vpos]{figure}}{\endSC@dblfloat}
% \end{macrocode}
% \end{environment}
%
% \begin{environment}{SCtable}
% Simply passes the first (optional) parameter and the required one,
% in this case `table', to |SC@float|\,.
% The table caption should be top aligned.
% \begin{macrocode}
%\newcommand*\SCtableVpos{t}% 2002/06/14
\@ifdefinable\SC@table@vpos{\def\SC@table@vpos{t}}
\newenvironment{SCtable}{\SC@float[\SC@table@vpos]{table}}{\endSC@float}
\newenvironment{SCtable*}{\SC@dblfloat[\SC@table@vpos]{table}}{\endSC@dblfloat}
% \end{macrocode}
% \end{environment}
%
% \begin{environment}{wide}
% This is an environment that allows to extend the width of the
% text body (or of a floating environment) by using the margin space.
%
% It shouldn't be used in twocolumn text.
% \begin{macrocode}
%
\newenvironment{wide}%
{%
\@parboxrestore% 2002/06/14 -- SW-Arch.: wozu? 2002/08/24
\advance\linewidth\marginparwidth
\advance\linewidth\marginparsep
\ifx\label\SC@label
%<+debug> \typeout{WIDE: inside SCfloat}%
\SC@widetrue
\else
%<+debug> \typeout{WIDE: outside SCfloat}%
\begin{lrbox}\SC@BOX % \begin necessary: --> \@noitemerr
\minipage\linewidth
\fi
}%
{%
\ifx\label\SC@label
%<+debug>
\typeout{WIDE: inside SCfloat}%
%\renewcommand*{\isSC@WIDEi}[2]{\if@twocolumn ##2\else ##1\fi}%
%\renewcommand*{\isSC@WIDEii}[2]{##1}%
%\let\isSC@WIDE\isSC@WIDEi
\else
%<+debug>
\typeout{WIDE: outside SCfloat}%
\endminipage
\end{lrbox}% \end necessary: --> \@noitemerr
\global\advance\c@SC@C\@ne
\SC@orig@label{\SC@IDENT}% nicht \ref... !!!
\trivlist \item\relax
\isSC@ODD{\def\SC@hpos{l}}{\def\SC@hpos{r}}%
%<+debug>
\typeout{WIDE: \string\linewidth=\the\linewidth}%
\noindent\makebox[\textwidth][\SC@hpos]{\copy\SC@BOX}% \usebox{\SC@BOX}
\endtrivlist
\fi
}
% \end{macrocode}
% \end{environment}
%
%
% \subsection{Internal macros}
%
% \subsubsection{Collecting arguments}
%
% The new internal float environment, similar\slash analogous to
% \LaTeX's |@float| environment.
%
% \smallskip
% Syntax:
% |\SC@float[|\meta{vpos}|]{|\meta{name}|}[|\meta{relwidth}|][|\meta{fps}|]|
%
% \begin{itemize}
% \item
% Parameter \meta{vpos} (optional) is the vertical positioning of the
% caption.
% \item
% Parameter \meta{name} (required) is the name of the `original' \LaTeX\
% floating environment (e.g., `figure' or `table').
% \iffalse
% ; or one defined with the
% |newfloat| package.
% \fi
% \item
% Parameter \meta{relwidth} (optional) is the desired relative width of the
% caption.
% \item
% Parameter \meta{fps} (optional) is the usual \LaTeX\ float positioning
% specifier.
% \end{itemize}
%
% The usual `cascading' programming style is applied
% (cf.\ \LaTeX's |\@float|).
%
% \begin{macro}{\SC@float}
% Initially, the first optional parameter is checked for.
% \begin{macrocode}
\def\SC@float{\SC@SaveCommands\@ifnextchar[\SC@xfloat{\SC@xfloat[c]}}
% \end{macrocode}
% \end{macro}
% \begin{macro}{\SC@xfloat}
% Then the first and second parameters are consumed and the third one is
% checked for.
% \begin{macrocode}
\def\SC@xfloat[#1]#2{\@ifnextchar[%
{\SC@yfloat{#1}{#2}}%
{\SC@zfloat{#1}{#2}{\sidecaptionrelwidth}[\@nameuse{fps@#2}]}}
% \end{macrocode}
% \end{macro}
% \begin{macro}{\SC@yfloat}
% Again, the fourth (and last) parameter is checked for.
% \begin{macrocode}
\def\SC@yfloat#1#2[#3]{\@ifnextchar[%
{\SC@zfloat{#1}{#2}{#3}}%
{\SC@zfloat{#1}{#2}{#3}[\@nameuse{fps@#2}]}}
% \end{macrocode}
% \end{macro}
%
%
% \subsubsection{Capturing the float's contents}
%
% \begin{macro}{\SC@zfloat}
% Finally, here is the macro that does all the work.
% \begin{macrocode}
\def\SC@zfloat#1#2#3[#4]{%
\def\SC@vpos{#1}%
\expandafter\edef\csname fps@#2\endcsname{#4}%
\def\SC@captype{#2}%
\ifx#3\@empty\def\SC@fraction{1}\else\def\SC@fraction{#3}\fi%
% \end{macrocode}
% The |\caption| and |\label| commands must be redefined.
% \begin{macrocode}
\let\SC@CAPtext\@empty \let\SC@OPTCAPtext\@empty \let\SC@LABtext\@empty%
\renewcommand\caption[2][]{\gdef\SC@OPTCAPtext{##1}%
\gdef\SC@CAPtext{##2}\ignorespaces}% \SC@justify
\let\label=\SC@label
\@namedef{fnum@#2}{\mbox{\@nameuse{#2name}~\@nameuse{the#2}}}% caption2 ?
% \end{macrocode}
% Save the figure or table (or whatever) in a box.
% \begin{macrocode}
\SC@widefalse
\begin{lrbox}\SC@BOX % \begin necessary: --> \@noitemerr
%%% \strut
}%
% \end{macrocode}
% \end{macro}
%
% \begin{macro}{\SC@dblfloat}
% Analogous to \LaTeX's |\@dblfloat|.
% \begin{macrocode}
\def\SC@dblfloat{%
\SC@SaveCommands%
\if@twocolumn\let\reserved@a\SC@dbflt\else\let\reserved@a\SC@float\fi
\reserved@a}
\def\SC@dbflt{\SC@float}
% \end{macrocode}
% \end{macro}
%
%
% \subsubsection{Output the float's contents}
%
% \begin{macro}{\endSC@float}
% Outputs the figure or table (or whatever) and the caption.
% \begin{macrocode}
\def\endSC@float{%
%%% \strut
\end{lrbox}% \end necessary: --> \@noitemerr
%<+debug> \typeout{onecolumn}%
\let\isSC@WIDE\isSC@WIDEi%
\def\@FLOAT{\@float}\def\end@FLOAT{\end@float}%
\isSC@WIDE%
{\@tempdima\textwidth % \columnwidth ???
\advance\@tempdima\marginparwidth
\advance\@tempdima\marginparsep}%
{\@tempdima\columnwidth}%
%<+debug> \typeout{endSC@float: \string\@tempdima=\the\@tempdima}%
\endSC@FLOAT\@tempdima}%
% \end{macrocode}
% \end{macro}
% \begin{macro}{\endSC@dblfloat}
% Ditto for |*|\mbox{-}forms of floats.
% \begin{macrocode}
\def\endSC@dblfloat{%
\end{lrbox}% \end necessary: --> \@noitemerr
%<+debug> \typeout{twocolumn}%
\let\isSC@WIDE\isSC@WIDEii%
\def\@FLOAT{\@dblfloat}\def\end@FLOAT{\end@dblfloat}%
\isSC@WIDE%
{\@tempdima\textwidth%
\advance\@tempdima\marginparwidth
\advance\@tempdima\marginparsep}%
{\@tempdima\textwidth}%
%<+debug>
\typeout{endSC@dblfloat: \string\@tempdima=\the\@tempdima}%
\endSC@FLOAT\@tempdima}%
% \end{macrocode}
% \end{macro}
% \begin{macro}{\endSC@FLOAT}
% Sets the caption width. If caption width plus figure\slash table width
% (plus separation space) is too large then the caption width is set equal
% to the remaining width.
% \begin{macrocode}
\def\endSC@FLOAT#1{%
\SC@calcwidths{#1}%
% \end{macrocode}
% \begin{macro}{\@FLOAT}
% Calls the \LaTeX\ float command with the two minipages inside a main minipage.
% \end{macro}
% \begin{macrocode}
\@FLOAT{\SC@captype}%
\abovecaptionskip\z@skip
\belowcaptionskip\z@skip
% \end{macrocode}
% Creates a label for each figure or table (etc.)\ for later determination if
% the page is odd or even. The counter |SC@C| must be incremented before.
% \begin{macrocode}
\global\advance\c@SC@C\@ne
\SC@orig@label{\SC@IDENT}% nicht \ref... !!!
% \end{macrocode}
% \begin{macro}{\isSC@WIDE}
% ^^A ???
% \end{macro}
% \begin{macrocode}
\isSC@WIDE%
{\ifdim\SC@tempdimb>\textwidth % ???
\isSC@ODD{\def\SC@hpos{l}}{\def\SC@hpos{r}}%
\else%
\def\SC@hpos{c}%
\fi
\@tempdimc\textwidth}% ???
{\@tempdimc\SC@tempdima\def\SC@hpos{c}}%
% \end{macrocode}
% ^^A ???
% \begin{macrocode}
\makebox[\@tempdimc][\SC@hpos]{%
% \end{macrocode}
% \begin{macro}{\SC@FLOAT}
% Has two parameters. The first parameter is the minipage with the caption
% text inside and the last parameter is the minipage with the body of the figure
% or table ^^A (or whatever floating environment object)
% inside.
% \end{macro}
% \begin{macrocode}
\SC@FLOAT%
{\minipage[\SC@vpos]{\SC@CAPWD}%
%% \nointerlineskip %\offinterlineskip%
%% \kern0pt\relax
\hrule \@height\z@\@depth\z@ %%% Testen, Doku. (Implementierung) !!!
%\show\SC@justify@caption
%%% \tracingall\tracingonline=0
\SC@justify
\let\@arrayparboxrestore\relax % sonst Blocksatz! (\@parboxrestore)
\let\usecaptionmargin\relax % sonst Pseudo-Blocksatz, nicht-alternierend!
% \isSC@ODD {\RaggedRight }{\RaggedLeft }
%%% A B C
% \isSC@ODD{\typeout{xxxxx ungerade}}{\typeout{xxxxx gerade}}%
% \def\@makecaption##1##2{##1: ##2\endgraf}%
% \@parboxrestore
% \@setminipage
\iffalse
% DEBUG:
\endgraf
\@makecaption{\csname fnum@\SC@captype\endcsname}%
{\ignorespaces \SC@CAPtext}%
\endgraf
\else
% \ifthenelse{\equal{\SC@OPTCAPtext}{\@empty}}%
\ifx\SC@OPTCAPtext\@empty% Noetig?
% FM: strut needed twice for multiline captions
\SC@orig@caption[\SC@CAPtext]%
{\strut\ignorespaces\SC@CAPtext\unskip\strut}% \expandafter\protect
\else
% FM: strut needed twice for multiline captions
% FM: if \SC@CAPtext can contain trailing banks then we also need \unskip
% FM: (not checked)
\SC@orig@caption[\SC@OPTCAPtext]% \expandafter\protect
{\strut\ignorespaces\SC@CAPtext\unskip\strut}% \expandafter\protect
\fi
\unskip% ??? Dok. !!!
\ifx\SC@LABtext\@empty\else
\SC@orig@label{\SC@LABtext}\fi% \expandafter\protect
\fi
%%% X Y Z
\hrule \@height\z@\@depth\z@
\endminipage}%
{\minipage[\SC@vpos]{\SC@BOXWD}%
%% \nointerlineskip %\offinterlineskip%
%% \kern0pt\relax
\hrule \@height\z@\@depth\z@
\SC@justify@body
\unhbox\SC@BOX % \strut \unhbox/\usebox{\SC@BOX}% TESTEN!
% \kern0pt\relax
\hrule \@height\z@\@depth\z@
\endminipage}%
}%
\end@FLOAT%
}
% \end{macrocode}
% \end{macro}
% \begin{macrocode}
\InputIfFileExists{sidecap.cfg}{}{} % hier ? % 2002/06/14
%</package>
% \end{macrocode}
%
% ^^A -----------------------------
%
% \Finale