[comp.text.tex] Need help on double spacing

mburke@eecs.wsu.edu (Matthew Burke - grad student) (11/26/90)

I need to be able to do something double-spaced.  The problem is that the
only way I know to do this is to set BASELINESTRETCH to 2.  This is ok
except now I can't get large quotations (using the quote environemnt) to
be single-spaced.

Can anyone suggest to me a quick fix?
Please e-mail your responses to mburke@cs2.wsu.edu

Thanks,
Matt
-- 
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%      Matthew M. Burke        mburke@cs2.wsu.edu          %
%   Where am I and what am I doing in this handbasket?     %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

myers@ut-emx.uucp (Eric Myers) (11/26/90)

In article <1990Nov25.234902.25671@eecs.wsu.edu> mburke@eecs.wsu.edu
(Matthew Burke - grad student) writes: 
>I need to be able to do something double-spaced...

%--------------------------------------------------*
% INTERLINE SPACING.  (From TeXsis 2.14)

\def\singlespaced{% sets interline spacing to \normalbaselineskip
   \baselineskip=\normalbaselineskip            % reset interline
   \setRuledStrut                          % set ruled table spacing
   \setTableskip}                               % set table spacing
\def\singlespace{\singlespaced}                 % synonym for \singlespaced

\def\doublespaced{% sets interline spacing to 1.5 the \normalbaselineskip
   \baselineskip=\normalbaselineskip            % increase interline
   \multiply\baselineskip by 150                %  spacing by 1.50
   \divide\baselineskip by 100                  %  of normal
   \setRuledStrut                          % set ruled table spacing
   \setTableskip}                               % set table spacing
\def\doublespace{\doublespaced}                 % synonym for \doublespaced

\def\TrueDoubleSpacing{% sets interline spacing to twice \normalbaselineskip
   \baselineskip=\normalbaselineskip            % increase interline
   \multiply\baselineskip by 2                  %  spacing by 2.0
   \setRuledStrut                               % set ruled table spacing
   \setTableskip}                               % set table spacing
\def\truedoublespacing{\TrueDoubleSpacing} % synonym for \TrueDoubleSpacing

\def\triplespaced{% sets interline spacing to 3.0 the \normalbaselineskip
   \baselineskip=\normalbaselineskip            % increases interline
   \multiply\baselineskip by 3                  %   spacing by 3.0
   \setRuledStrut                          % set ruled table spacing
   \setTableskip}                               % set table spacing

\def\widenspacing{% increases the interline spacing by 1.25
   \multiply\baselineskip by 125                % increase the interline
   \divide\baselineskip by 100                  %   spacing by a factor of 1.25
   \setRuledStrut                          % set ruled table spacing
   \setTableskip}                               % set ``nice'' table spacing
\def\whitespaced{\widenspacing}                 % synonym for \widenspacing
\def\whitespace{\widenspacing}                  % synonym for \widenspacing


% \setRuledStrut creates a vertical strut to hold the interline
%  spacing in ruled tables.  It is defined in ruled.tex

\def\setRuledStrut{\relax}

%-------------------------*   (OLD TeXsis 2.13, \Tablebody)
%  \Tableskipsize is the spacing for "nice" tables, using \Tablebody.
%  It is 2pt for single spacing (as in TechRpt) and grows with \baselineskip.

\newdimen\Tableskipsize \Tableskipsize=2pt              % for 10pt 

\def\setTableskip{% sets table skips
   \Tableskipsize=\baselineskip                 % current skip
   \advance \Tableskipsize by -\normalbaselineskip % subtract normal
   \advance \Tableskipsize by 2pt               % and add 2pt
}
%-------------------------*
-- 
Eric Myers	"If God had intended for man to fly 
			He would have given us the brains to build airplanes."
Center for Relativity, Department of Physics, University of Texas at Austin
myers@emx.utexas.edu  |   myers@utaphy.bitnet   |   myers@ut-emx.UUCP