blob: cba2177f7c5d36cc38cec560428ef7b11093be6d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
|
\ProvidesPackage{wrapft}[2004/04/12 ver.0.9]
\RequirePackage{wrapfig}[1999/10/12 \space v 3.3]
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\newdimen\WF@hsep %horizontal separation between fig and text
\newdimen\WF@vsep %vspace on the top and the bottom of the figure
\WF@hsep=1.6\columnsep
\WF@vsep=\intextsep
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\def\WF@rapt[#1]#2{% final two args: #1 = overhang, #2 = width,
\ifnum `c=\WF@place % fig in the center
\@tempdima\hsize \advance\@tempdima-#2 \divide\@tempdima\tw@
\vskip\WF@vsep
\noindent \hspace*{\@tempdima}\begin{minipage}[t]{#2}%
\else
\gdef\WF@ovh{#1}% hold overhang for later, when \width is known
\global\setbox\WF@box\vtop\bgroup \setlength\hsize{#2}%
\ifdim\hsize>\z@ \@parboxrestore \else
\setbox\z@\hbox\bgroup \let\wf@@caption\caption \let\caption\wf@caption
\ignorespaces \fi
\fi}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\let\WF@@putfigmaybe\WF@putfigmaybe
\def\WF@putfigmaybe{%
\columnsep \WF@hsep \intextsep \WF@vsep
\WF@@putfigmaybe}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\let\@endwr@pfigure\endwrapfigure
\def\endwrapfigure{%
\ifnum `c=\WF@place % fig in the center
\end{minipage} \vskip\WF@vsep
\else
\@endwr@pfigure
\fi}
\let\endwraptable\endwrapfigure
%----- end of wrapft.sty ---------
|
