%%% ==================================================================== %%% @LaTeX-style-file{ %%% author = "Geoffrey R. D. Tobin", %%% version = "1.0", %%% date = "23 Jan 1992", %%% time = "15:56:00 AEDT (06:56:00 GMT)", %%% filename = "set_sp.sty", %%% address = "Department of Electronic Engineering %%% La Trobe University %%% Bundoora VIC 3083 %%% Australia", %%% telephone = "+ 613 479-1180", %%% checksum = "06002 253 1152 10466" %%% email = "ecsgrt@luxor.latrobe.edu.au (Internet)", %%% codetable = "ISO/ASCII", %%% keywords = "LaTeX, linespacing, NFSS", %%% supported = "yes, by email", %%% docstring = "The checksum field above contains a CRC-16 %%% checksum as the first value, followed by %%% the equivalent of the standard UNIX wc %%% (word count) utility output of lines, %%% words, and characters. This is produced by %%% Robert Solovay's checksum utility. This %%% program, as well as Nelson Beebe's proposal %%% for standard file headers, is available via %%% anonymous ftp from math.utah.edu.", %%% } %%% ==================================================================== % set_sp.sty - version 1 - 15:56 - Thu 23 Jan 1992 - Geoffrey Tobin % `merge' of ideas of setspace.sty and of dblsp.sty mods by Mark A. Roth. % %% FILE: setspace.sty in SYS2.TEX.PUB.ISULATEX.STYLES %% AUTHOR: Erica M. S. Harris %% DATE: April 1990 %% DESCR: LaTeX Document style option "setspace" %% Usage: \documentstyle[...,setspace,...]{...} %% Based on the doublespace option created by Stephen Page. %% %% This style option provides commands and environments for doing %% double and one-and-a-half spacing based on pt size. %% %% Single spacing is the default. %% %% Three commands, \doublespacing, \onehalfspacing, and %% \singlespacing, are for use in the preamble to set the overall %% spacing for the document. If a different spacing is required then %% the \setstretch{baselinestretch} command can be used in the %% preamble to set the baselinestretch appropriately. The default %% spacing with this style option is single spacing. %% %% Three environments, singlespace, onehalfspace, and doublespace, %% allow the spacing to be changed within the document. Both the %% onehalfspace and doublespace environments are intended to increase %% the spacing, so the onehalfspace environment should not be used in %% a double spaced document. If an increased spacing different from %% one-and-a-half or double spacing is required then the spacing %% environment can be used. The spacing environment takes one %% argument which is the larger baselinestretch to use, %% e.g., \begin{spacing}{2.5}. %% %% \footins is adjusted the same as \parskip - appears to work. Lose %% stretch parts but don't consider that to be crucial %% %% Removed code for altering spacing before and after displayed %% equations - just looked too much. %% %% MODS: %% %% PLEASE REPORT ANY BUGS %% %% Old Documentation follows: %% 1. A new environment "singlespace" is provided, within which single %% spacing will apply. %% JFL - changed so that it works in regular text and so that %% vertical space before and after is correctly computed. %% 2. Double spacing is turned off within footnotes and floats (figures %% and tables). %% 3. Proper double spacing happens below tabular environments and in %% other places where LaTeX uses a strut. %% 4. Slightly more space is inserted before footnotes. %% 5. JFL - fixes spacing before and after displayed math. % 6. MAR - fix to work with new font selection scheme if used. %% % Modified by: Mark A. Roth, mroth@afit.af.mil %% %% mods: Jean-Francois Lamy %% lamy@ai.toronto.edu %% lamy@utai.uucp % % Author: Stephen Page -- sdpage@prg.oxford.ac.uk % % Original ``doublespace.sty'' released 6 July 1986 - 3 September 1986 %% %% POSSIBLE BUGS: %% . Increasing struts may possibly cause some other obscure part of %% formatting to fall over. %% . \begin{singlespace}\begin{quote} produces the wrong spacing before %% the quote (extra glue is inserted). %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% \def\doublespacing{\ifcase \@ptsize \relax % 10pt \def\baselinestretch{1.667} \or % 11pt \def\baselinestretch{1.618} \or % 12pt \def\baselinestretch{1.655} \fi} % EMSH \def\onehalfspacing{\ifcase \@ptsize \relax % 10pt \def\baselinestretch{1.25} \or % 11pt \def\baselinestretch{1.213} \or % 12pt \def\baselinestretch{1.241} \fi} % EMSH \def\singlespacing{\def\baselinestretch{1}} % EMSH \def\setstretch#1{\renewcommand{\baselinestretch}{#1}} %---Stretch the baseline BEFORE calculating the strut size. This improves % spacing below tabular environments etc., probably... % Comments are welcomed. % This change not needed with new font selection scheme-MAR \ifx\undefined\selectfont %then new font selection scheme not invoked-MAR \def\@setsize#1#2#3#4{\@nomath#1 \let\@currsize#1 % \baselineskip #2 % \baselineskip\baselinestretch\baselineskip \parskip\baselinestretch\parskip \setbox\strutbox\hbox{\vrule height.7\baselineskip depth.3\baselineskip width\z@}% \skip\footins \baselinestretch\skip\footins % EMSH \normalbaselineskip\baselineskip#3#4} \else %new font selection scheme is defined, set up way to change baselines-MAR \def\@newbaseline{ \setnew@baselineskip \baselineskip\baselinestretch\baselineskip \setbox\strutbox\hbox{\vrule\@height.7\baselineskip \@depth.3\baselineskip \@width\z@}% \normalbaselineskip\baselineskip}% -MAR \fi %-MAR %---Increase the space between last line of text and footnote rule. %\skip\footins 20pt plus4pt minus4pt % commented out by EMSH. %---Reset baselinestretch within footnotes and floats. \def\@xfloat#1[#2]{\ifhmode \@bsphack\@floatpenalty -\@Mii\else \@floatpenalty-\@Miii\fi\def\@captype{#1}\ifinner \@parmoderr\@floatpenalty\z@ \else\@next\@currbox\@freelist{\@tempcnta\csname ftype@#1\endcsname \multiply\@tempcnta\@xxxii\advance\@tempcnta\sixt@@n \@tfor \@tempa :=#2\do {\if\@tempa h\advance\@tempcnta \@ne\fi \if\@tempa t\advance\@tempcnta \tw@\fi \if\@tempa b\advance\@tempcnta 4\relax\fi \if\@tempa p\advance\@tempcnta 8\relax\fi }\global\count\@currbox\@tempcnta}\@fltovf\fi \global\setbox\@currbox\vbox\bgroup \def\baselinestretch{1} \ifx\undefined\selectfont %then new font selection scheme not invoked-MAR \@normalsize % EMSH mod from "\small\normalsize". \else %else new font selection scheme is invoked-MAR \@newbaseline %include new baselinestretch-MAR \fi %-MAR \boxmaxdepth\z@ \hsize\columnwidth \@parboxrestore} \long\def\@footnotetext#1{\insert\footins{\def\baselinestretch{1}\footnotesize \interlinepenalty\interfootnotelinepenalty \splittopskip\footnotesep \splitmaxdepth \dp\strutbox \floatingpenalty \@MM \hsize\columnwidth \@parboxrestore \edef\@currentlabel{\csname p@footnote\endcsname\@thefnmark}\@makefntext {\rule{\z@}{\footnotesep}\ignorespaces #1\strut}}} % A single spaced quote (say) is done by surrounding singlespace with quote. % \def\singlespace{% \vskip\baselineskip% \def\baselinestretch{1}% \ifx\undefined\selectfont %then new font selection scheme not invoked-MAR \ifx\@currsize\normalsize\@normalsize\else\@currsize\fi% \else %else new font selection scheme is invoked-MAR \@newbaseline %include new baselinestretch-MAR \fi %-MAR % \vskip-\parskip% % EMSH omitted this, so I've commented it out - gt. \vskip-\baselineskip} \def\endsinglespace{\par} % spacing, doublespace and onehalfspace all are meant to INCREASE the % spacing (i.e. calling onehalfspace from within doublespace will not % produce a graceful transition between spacings) % \def\spacing#1{\par% \begingroup % moved from \endspacing by PGBR 1-29-91 \def\baselinestretch{#1}% \ifx\undefined\selectfont %then new font selection scheme not invoked-MAR \ifx\@currsize\normalsize\@normalsize\else\@currsize\fi % MAR removed `}'. \else %else new font selection scheme is invoked-MAR \@newbaseline %include new baselinestretch-MAR \fi %-MAR } % MAR moved `}' hither. \def\endspacing{\par% \vskip \parskip% \vskip \baselineskip% \endgroup% \vskip -\parskip% \vskip -\baselineskip% % \begingroup %\begingroup used to be here, PGBR 1-29-91 } % one and a half spacing is 1.5 x pt size \def\onehalfspace{\ifcase \@ptsize \relax % 10pt \spacing{1.25} \or % 11pt \spacing{1.213} \or % 12pt \spacing{1.241} \fi} \let\endonehalfspace=\endspacing % double spacing is 2 x pt size \def\doublespace{\ifcase \@ptsize \relax % 10pt \spacing{1.667} \or % 11pt \spacing{1.618} \or % 12pt \spacing{1.655} \fi} \let\enddoublespace=\endspacing %first end independently added by MAR & EMSH. % gt - EMSH chose to omit display math part that follows. % She wrote (see above) that the "altered spacing before and after displayed % equations ... just looked too much". % % Fix up spacing before and after displayed math % (arraystretch seems to do a fine job for inside LaTeX displayed math, % since array and eqnarray seem to be affected as expected). % Changing \baselinestretch and doing a font change also works if done here, % but then you have to change @setsize to remove the call to @nomath) % \everydisplay{ \abovedisplayskip \baselinestretch\abovedisplayskip% \belowdisplayskip \abovedisplayskip% \abovedisplayshortskip \baselinestretch\abovedisplayshortskip% \belowdisplayshortskip \baselinestretch\belowdisplayshortskip} % % end "set_sp.sty" %%% ====================================================================