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
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
|
% smaller.sty %
%
% Original author: ??? (appeared in an old TeXhax)
% Adrian Clark's dates.sty
% Changes: -- Paul L. Allen, Feb 1990 (UKTeX 91, 6)
% -- Bernd Raichle, Oct 1991 (added NFSS V1 support)
% -- Bernard Gaulle, Jan 1992 (environment protected,@ restored)
% -- Daniel Taupin & BG, 3/94 (simulation of \sm@ller for NFSS2)
% -- Bernard Gaulle 03/28/94 (\l@rger simulated for NFSS2 too)
% -- Removing superfluous spaces. --bg 05/10/94
%
% Usage: {\smaller TEXT}
% - sets TEXT in a smaller size in the same typeface.
% {\larger TEXT}
% - sets TEXT in a larger size in the same typeface.
\ifx\larger\undefined\else\expandafter\endinput\fi%
{\gdef\makeatletter{\catcode`\@=11\relax}%
\gdef\makeatother{\catcode`\@=12\relax}%
\ifcat/@ \makeatletter\let\resetat\makeatother%
\else\let\resetat\relax\fi%
%\@ifundefined{selectfont}{...}{...}%
\expandafter\ifx\csname selectfont\endcsname\relax%
%
% Old Font Selection:
%
\csname newcount\endcsname\f@m%
\gdef\sm@ller{\relax\f@m\fam%
% \ifx\@currsize\tiny \tiny\fi%
\ifx\@currsize\scriptsize \tiny\fi%
\ifx\@currsize\footnotesize \scriptsize\fi%
\ifx\@currsize\small \footnotesize\fi%
\ifx\@currsize\normalsize \small\fi%
\ifx\@currsize\large \normalsize\fi%
\ifx\@currsize\Large \large\fi%
\ifx\@currsize\LARGE \Large\fi%
\ifx\@currsize\huge \LARGE\fi%
\ifx\@currsize\Huge \huge\fi%
\ifcase\f@m\rm\or\mit\or\cal\or\tenex % not sure about the tenex%
\or\it\or\sl\or\bf\or\tt\or\sf\or\sc\or\ly\fi}%
\gdef\l@rger{\relax\f@m\fam%
% \ifx\@currsize\Huge \Huge\fi%
\ifx\@currsize\huge \Huge\fi%
\ifx\@currsize\LARGE \huge\fi%
\ifx\@currsize\Large \LARGE\fi%
\ifx\@currsize\large \Large\fi%
\ifx\@currsize\normalsize \large\fi%
\ifx\@currsize\small \normalsize\fi%
\ifx\@currsize\footnotesize \small\fi%
\ifx\@currsize\scriptsize \footnotesize\fi%
\ifx\@currsize\tiny \scriptsize\fi%
\ifcase\f@m\rm\or\mit\or\cal\or\tenex % not sure about the tenex%
\or\it\or\sl\or\bf\or\tt\or\sf\or\sc\or\ly\fi}%
%%
\else%
%%
% New Font Selection V1:
%
% Perhaps it would be better to use different macros for
% the different \@ptsize 10pt, 11pt and 12pt.
% (Now for 12pt: {\normalsize {\smaller a}} = {\footnotsize a})
%
\ifx\DeclareFontShape\undefined% the following for NFSS V1%
\gdef\sm@ller{\relax\@nomath\smaller%
\ifx\f@size\@vpt \else%
\ifx\f@size\@vipt \size\@vpt{6pt}\fi%
\ifx\f@size\@viipt \size\@vpt{6pt}\fi%
\ifx\f@size\@viiipt \size\@viipt{8pt}\fi %\@vipt%
\ifx\f@size\@ixpt \size\@viiipt{9.5pt}\fi%
\ifx\f@size\@xpt \size\@ixpt{11pt}\fi%
\ifx\f@size\@xipt \size\@xpt{12pt}\fi%
\ifx\f@size\@xiipt \size\@xpt{12pt}\fi%
\ifx\f@size\@xivpt \size\@xiipt{14pt}\fi%
\ifx\f@size\@xviipt \size\@xivpt{18pt}\fi%
\ifx\f@size\@xxpt \size\@xviipt{22pt}\fi%
\ifx\f@size\@xxvpt \size\@xxpt{25pt}\fi%
\selectfont%
\fi}%
\gdef\l@rger{\relax\@nomath\larger%
\ifx\f@size\@xxvpt \else%
\ifx\f@size\@xxpt \size\@xxvpt{30pt}\fi%
\ifx\f@size\@xviipt \size\@xxpt{25pt}\fi%
\ifx\f@size\@xivpt \size\@xviip{22pt}\fi%
\ifx\f@size\@xiipt \size\@xivpt{18pt}\fi%
\ifx\f@size\@xipt \size\@xiipt{14pt}\fi%
\ifx\f@size\@xpt \size\@xiipt{14pt}\fi%
\ifx\f@size\@ixpt \size\@xpt{12pt}\fi%
\ifx\f@size\@viiipt \size\@ixp{11pt}\fi%
\ifx\f@size\@viipt \size\@viiipt{9.5pt}\fi%
\ifx\f@size\@vipt \size\@viiipt{9.5pt}\fi%
\ifx\f@size\@vpt \size\@viipt{8pt}\fi%
\selectfont%
\fi}%
\else% Now for NFSS V2 %%%%%%%%%%%%%%%%%%%%%%%%%%%
\gdef\sm@ller{\small}% how to proceed?%
\gdef\l@rger{\relax}%
% proposed by D. Taupin on Mar, 24, 1994:
\global\let\tiny@ORI\tiny\gdef\tiny{\tiny@ORI\def\sm@ller{\tiny}%
\def\l@rger{\scriptsize}}%
\global\let\scriptsize@ORI\scriptsize%
\gdef\scriptsize{\scriptsize@ORI\def\sm@ller{\tiny}%
\def\l@rger{\footnotesize}}%
\global\let\footnotesize@ORI\footnotesize%
\gdef\footnotesize{\footnotesize@ORI\def\sm@ller{\scriptsize}%
\def\l@rger{\small}}%
\global\let\small@ORI\small%
\gdef\small{\small@ORI\def\sm@ller{\footnotesize}%
\def\l@rger{\normalsize}}%
\global\let\normalsize@ORI\normalsize%
\gdef\normalsize{\normalsize@ORI\def\sm@ller{\small}%
\def\l@rger{\large}}%
\global\let\large@ORI\large%
\gdef\large{\large@ORI\def\sm@ller{\normalsize}%
\def\l@rger{\Large}}%
\global\let\Large@ORI\Large%
\gdef\Large{\Large@ORI\def\sm@ller{\large}%
\def\l@rger{\LARGE}}%
\global\let\LARGE@ORI\LARGE%
\gdef\LARGE{\LARGE@ORI\def\sm@ller{\Large}%
\def\l@rger{\huge}}%
\global\let\huge@ORI\huge%
\gdef\huge{\huge@ORI\def\sm@ller{\LARGE}%
\def\l@rger{\Huge}}%
\global\let\Huge@ORI\Huge%
\gdef\Huge{\Huge@ORI\def\sm@ller{\huge}%
\def\l@rger{\Huge}}%
\fi%
%%
\fi%
\gdef\smaller{\protect\sm@ller}%
\gdef\larger{\protect\l@rger}%
\resetat}%
\ifx\ProvidesPackage\undefined\else%
\ProvidesPackage{mysmall}[1994/12/12 Temporary ``smaller'' package %
from the french dist.]%
\fi%
\endinput%%%%%%%%%%%%%%%%%%%%%%%
|
