% 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%%%%%%%%%%%%%%%%%%%%%%%
