blob: 4f0d86a8f1b5aa8eea1886118fbc764454213373 (
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
36
37
38
39
40
|
%%% This file is public domain.
%%% Originally written 1992, Don Hosek.
%%% This declaration added by Clea F. Rees 2008/11/16 with the permission of Dan Hosek.
%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% This file sets up an eight point environment for TeX. It can be initialized
% with the '\eightpoint' macro.
% It also sets up a '\tenpoint' macro in case you want to go back down.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\ifx\tenpoint\undefined\let\loadedfrommacro=Y
\input 10point
\let\loadedfrommacro=N\fi
%%%
%%% Load in the fonts
%%%
\font\eightrm=cmr8 \font\sixrm=cmr6
\font\eighti=cmmi8 \font\sixi=cmmi6
\font\eightsy=cmsy8 \font\sixsy=cmsy6
\font\eightbf=cmbx8 \font\sixbf=cmbx6
\font\eightsl=cmsl8 \font\eighttt=cmtt8 \font\eightit=cmti8
%%%
%%% Set up the eightpoint macros
%%%
\ifx\eightpoint\undefined
\def\eightpoint{\def\rm{\fam0\eightrm} %switch to a 8-point type
\textfont0=\eightrm \scriptfont0=\sixrm \scriptscriptfont0=\fiverm
\textfont1=\eighti \scriptfont1=\sixi \scriptscriptfont1=\fivei
\textfont2=\eightsy \scriptfont2=\sixsy \scriptscriptfont2=\fivesy
\textfont3=\tenex \scriptfont3=\tenex \scriptscriptfont3=\tenex
\textfont\itfam=\eightit \def\it{\fam\itfam\eightit}%
\textfont\slfam=\eightsl \def\sl{\fam\slfam\eightsl}%
\textfont\ttfam=\eighttt \def\tt{\fam\ttfam\eighttt}%
\textfont\bffam=\eightbf \scriptfont\bffam=\sixbf
\scriptscriptfont\bffam=\fivebf \def\bf{\fam\bffam\eightbf}%
\normalbaselineskip=10pt
\setbox\strutbox=\hbox{\vrule height7.5pt depth2.5pt width0pt}%
\normalbaselines\rm}
\fi
|