blob: f3331c9df90b070e4897fb930b0739c25040a0eb (
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
|
%%% 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.
%%%
%%%
%%% Set up the tenpoint macros
%%%
%%% Unhappy things will happen if this file is loaded twice
%%% So don't... as a matter of fact, don't load it directly, let one of the
%%% other size changing macros do it for you.
%%%
%%% Written by Don Hosek
%%%
\ifx\loadedfrommacro Y\else
\message{10point.TeX must be loaded from a macro package.}
\message{Input terminated.}
\endinput\fi
\font\tencsc=cmcsc10
\newfam\scfam
\def\tenpoint{\def\rm{\fam0\tenrm}% switch to 10-point type
\textfont0=\tenrm \scriptfont0=\sevenrm \scriptscriptfont0=\fiverm
\textfont1=\teni \scriptfont1=\seveni \scriptscriptfont1=\fivei
\textfont2=\tensy \scriptfont2=\sevensy \scriptscriptfont2=\fivesy
\textfont3=\tenex \scriptfont3=\tenex \scriptscriptfont3=\tenex
\textfont\itfam=\tenit \def\it{\fam\itfam\tenit}%
\textfont\slfam=\tensl \def\sl{\fam\slfam\tensl}%
\textfont\ttfam=\tentt \def\tt{\fam\ttfam\tentt}%
\textfont\bffam=\tenbf \scriptfont\bffam=\sevenbf
\scriptscriptfont\bffam=\fivebf \def\bf{\fam\bffam\tenbf}%
\textfont\scfam=\tencsc \def\sc{\fam\scfam\tencsc}%
\normalbaselineskip=12pt
\setbox\strutbox=\hbox{\vrule height8.5pt depth 3.5pt width0pt}%
\normalbaselines\rm}
|