blob: b8486bc456b57b8c7a477325d830702344fa08d7 (
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
|
%-*-tex-*-
% Copyright Michael J. Ferguson, INRS-Telecommunications
% All rights reserved.
% ====== Basic Line Spacing =========
% The basic line spacing in a font is assumed to be scaled according to the
% ex height of the font. This is perhaps not the aesthetically best but
% does allow consistent line spacing commands. The four basic commands are
% \normalbaselines, \normalbaselineskipsize, \spacing, and \setstrut.
\def\normalbaselines{\baselineskip \normalbaselineskipsize
\normallineskipform}
% ----- sets interline spacing in terms of normalbaselines ------
% does not change baseline glue.
\def\spacing#1{\setbox0=\vbox{\vskip \normalbaselineskipsize}\baselineskip
#1\ht0 \normalbaselineskipglue
\normallineskipform}
% ----- a single line spacing strut -------
% Set at current baselineskip size
\def\setstrut{\setbox0=\vbox{\vskip\normalbaselineskipsize}\setbox\strutbox=
\hbox{\vrule height .72\ht0 depth .28\ht0 width\z@}}
% --- The default forms must also be set -- They are shown below but
% are actually set in inrsdef.tex
% \def\normalbaselineskipsize{2.8ex \normalbaselineskipglue}
% \def\normalbaselineskipglue{plus .07ex minus .07ex}
% \def\normallineskipform{\lineskip 1pt \lineskiplimit 0pt}
|