%% file: TXSfonts.tex - TeXsis Font Definitions - TeXsis version 2.18
%% @(#) $Id: TXSfonts.tex,v 18.2 2001/04/06 21:40:14 myers Exp $
%======================================================================*
%
%       Plain TeX defines only 10pt type (plus smaller sizes for superscripts
% and subscripts). TeXsis uses 9, 10, 11, 12, 14, 16, 20, and 24 point type,
% with 12pt being the default and the larger sizes being used for headings and
% other purposes. The following macros switch sizes:
%       \ninepoint               9pt type
%       \tenpoint               10pt type
%       \elevenpoint            11pt type
%       \twelvepoint            12pt type
%       \fourteenpoint          14pt type
%       \sixteenpoint           16pt type
%       \twentypoint            20pt type
%       \twentyfourpoint        24pt type
% Within each size the following commands select fonts:
%       Command     Name              Sizes
%       \rm         Roman             9  10  11  12  14  16  20  24
%       \it         Roman italic      9  10  11  12  14  16  20  24
%       \sl         Slanted           9  10  11  12  14  16  20  24
%       \bf         Roman bold        9  10  11  12  14  16  20  24
%       $ $         Math italic       9  10  11  12  14  16  20  24
%       $ $         Math symbol       9  10  11  12  14  16  20  24
%       $ $         Math extended     9  10  11  12  14  16  20  24
%       \mib        Math italic bold     10  11  12  14  16  20  24
%       \tt         Typewriter        9  10  11  12
%       ---         Sans serif           10      12  14
% where $ $ indicates fonts used in math mode.
%
%       Availability: The available fonts are installation dependent, so this
% file may have to be modified. There are two common problems:
%       (1) Some versions of TeX use Almost Modern fonts names starting with
% starting with amxx, while others use Computer Modern fonts with names cmxx.
% Look at Plain.tex to see which you have, and if necessary change =cm to =am
% or conversely.
%       (2) Some fonts may be missing. In particular, cmex10 (or amex10) may
% not be available in all sizes. This is used to construct large delimiters,
% etc. Use whatever you have; if \magstep3 is the largest, define
% \font\twentyex=cmex10 scaled \magstep3
% \font\twentyfourex=cmex10 scaled \magstep3
%
%       Font Loading: In most versions of TeX there is not enough space to
% load all the fonts defined in TeXsis. Hence fonts are loaded only as they
% are used (see \ninefonts ... \twentyfourfonts below). For this to work with
% PCTeX you must reserve font memory. Make a TEXSIS.BAT containing
%       c:\pctex\tex &c:\texsis\texsis %1 /f 25000
% This will allow you to use, e.g., 9pt to 16pt simultaneously.
%
% Support has also been added for Ralph Smith's Formal Script font,
% which is refered to in TeXsis as \scr.  Use \scr as you would use \cal. 
%======================================================================*
% (C) Copyright 1986, 1992, 1995, 1997, 1999 by Eric Myers and Frank Paige.
% This file is a part of TeXsis.  Distribution and/or modifications
% are allowed under the terms of the LaTeX Project Public License (LPPL).
% See the file COPYING or ftp://ftp.texsis.org/texsis/LPPL
%======================================================================*
\message{TeXsis fonts:}

\catcode`@=11                           % @ is a letter here
\newskip\ttglue

%========================================================================
% FONT DEFINITIONS
%       Macros to define fonts as they are used. Each redefines itself to be
% \relax after it is first called so that it is disabled.

%%++ 9 pt fonts:
\def\ninefonts{%
   \global\font\ninerm=cmr9
   \global\font\ninei=cmmi9
   \global\font\ninesy=cmsy9
   \global\font\nineex=cmex10
   \global\font\ninebf=cmbx9
   \global\font\ninesl=cmsl9
   \global\font\ninett=cmtt9
   \global\font\nineit=cmti9
   \skewchar\ninei='177
   \skewchar\ninesy='60
   \hyphenchar\ninett=-1
   \moreninefonts                               % any custom fonts
   \gdef\ninefonts{\relax}}

\def\moreninefonts{\relax}                      % User customization hook

%%++ 10 pt fonts:                               % most alread loaded by Plain
\font\tenss=cmss10                              % 10 pt sans serif

\def\moretenfonts{\relax}                       % customization hook (unused)

%%++ 11 pt fonts:
\def\elevenfonts{%
   \global\font\elevenrm=cmr10 scaled \magstephalf
   \global\font\eleveni=cmmi10 scaled \magstephalf
   \global\font\elevensy=cmsy10 scaled \magstephalf
   \global\font\elevenex=cmex10
   \global\font\elevenbf=cmbx10 scaled \magstephalf
   \global\font\elevensl=cmsl10 scaled \magstephalf
   \global\font\eleventt=cmtt10 scaled \magstephalf
   \global\font\elevenit=cmti10 scaled \magstephalf
   \global\font\elevenss=cmss10 scaled \magstephalf
   \skewchar\eleveni='177%%
   \skewchar\elevensy='60%%
   \hyphenchar\eleventt=-1%%
   \moreelevenfonts                            % any other custom fonts
   \gdef\elevenfonts{\relax}}%

\def\moreelevenfonts{\relax}                    % User customization hook

%%++ 12 pt fonts:
\def\twelvefonts{%  initialize 12pt fonts
   \global\font\twelverm=cmr10 scaled \magstep1%%
   \global\font\twelvei=cmmi10 scaled \magstep1%%
   \global\font\twelvesy=cmsy10 scaled \magstep1%%
   \global\font\twelveex=cmex10 scaled \magstep1%%
   \global\font\twelvebf=cmbx10 scaled \magstep1%%
   \global\font\twelvesl=cmsl10 scaled \magstep1%%
   \global\font\twelvett=cmtt10 scaled \magstep1%%
   \global\font\twelveit=cmti10 scaled \magstep1%%
   \global\font\twelvess=cmss10 scaled \magstep1%%
   \skewchar\twelvei='177%%
   \skewchar\twelvesy='60%%
   \hyphenchar\twelvett=-1%%
   \moretwelvefonts                             % any other custom fonts
   \gdef\twelvefonts{\relax}}

\def\moretwelvefonts{\relax}                    % User customization hook

%%++ 14 pt fonts:
\def\fourteenfonts{%
   \global\font\fourteenrm=cmr10 scaled \magstep2%%
   \global\font\fourteeni=cmmi10 scaled \magstep2%%
   \global\font\fourteensy=cmsy10 scaled \magstep2%%
   \global\font\fourteenex=cmex10 scaled \magstep2%%
   \global\font\fourteenbf=cmbx10 scaled \magstep2%%
   \global\font\fourteensl=cmsl10 scaled \magstep2%%
   \global\font\fourteenit=cmti10 scaled \magstep2%%
   \global\font\fourteenss=cmss10 scaled \magstep2%%
   \skewchar\fourteeni='177%%
   \skewchar\fourteensy='60%%
   \morefourteenfonts                           % any custom fonts
   \gdef\fourteenfonts{\relax}}

\def\morefourteenfonts{\relax}                  % customization hook

%%++ 16 pt fonts:
\def\sixteenfonts{%
   \global\font\sixteenrm=cmr10 scaled \magstep3%%
   \global\font\sixteeni=cmmi10 scaled \magstep3%%
   \global\font\sixteensy=cmsy10 scaled \magstep3%%
   \global\font\sixteenex=cmex10 scaled \magstep3%%
   \global\font\sixteenbf=cmbx10 scaled \magstep3%%
   \global\font\sixteensl=cmsl10 scaled \magstep3%%
   \global\font\sixteenit=cmti10 scaled \magstep3%%
   \skewchar\sixteeni='177%%
   \skewchar\sixteensy='60%%
   \moresixteenfonts                            % any custom fonts
   \gdef\sixteenfonts{\relax}}

\def\moresixteenfonts{\relax}                   % User customization hook

%%++ 20 pt fonts:
\def\twentyfonts{%
   \global\font\twentyrm=cmr10 scaled \magstep4%%
   \global\font\twentyi=cmmi10 scaled \magstep4%%
   \global\font\twentysy=cmsy10 scaled \magstep4%%
   \global\font\twentyex=cmex10 scaled \magstep4%%
   \global\font\twentybf=cmbx10 scaled \magstep4%%
   \global\font\twentysl=cmsl10 scaled \magstep4%%
   \global\font\twentyit=cmti10 scaled \magstep4%%
   \skewchar\twentyi='177%%
   \skewchar\twentysy='60%%
   \moretwentyfonts                             % any custom fonts
   \gdef\twentyfonts{\relax}}

\def\moretwentyfonts{\relax}                    % User customization hook

%%++ 24 pt fonts:
\def\twentyfourfonts{%
   \global\font\twentyfourrm=cmr10 scaled \magstep5%%
   \global\font\twentyfouri=cmmi10 scaled \magstep5%%
   \global\font\twentyfoursy=cmsy10 scaled \magstep5%%
   \global\font\twentyfourex=cmex10 scaled \magstep5%%
   \global\font\twentyfourbf=cmbx10 scaled \magstep5%%
   \global\font\twentyfoursl=cmsl10 scaled \magstep5%%
   \global\font\twentyfourit=cmti10 scaled \magstep5%%
   \skewchar\twentyfouri='177%%
   \skewchar\twentyfoursy='60%%
   \moretwentyfourfonts                         % any custom fonts
   \gdef\twentyfourfonts{\relax}}

\def\moretwentyfourfonts{\relax}                % User customization hook

%========================================================================
% MATH ITALIC BOLD.
%     This makes boldfaced Greek characters for titles. Available only
% with cm fonts, generally only in 10pt and larger. Hence we use standard
% math fonts for the smaller sizes.

%     Macros to load math italic bold fonts:

\def\tenmibfonts{%                      % ten pt math italic bold
   \global\font\tenmib=cmmib10
   \global\font\tenbsy=cmbsy10
   \skewchar\tenmib='177%%
   \skewchar\tenbsy='60%%
   \gdef\tenmibfonts{\relax}}

\def\elevenmibfonts{%                   % eleven pt math italic bold
   \global\font\elevenmib=cmmib10 scaled \magstephalf
   \global\font\elevenbsy=cmbsy10 scaled \magstephalf
   \skewchar\elevenmib='177%%
   \skewchar\elevenbsy='60%%
   \gdef\elevenmibfonts{\relax}}

\def\twelvemibfonts{%                   % twelve pt math italic bold
   \global\font\twelvemib=cmmib10 scaled \magstep1%%
   \global\font\twelvebsy=cmbsy10 scaled \magstep1%%
   \skewchar\twelvemib='177%%
   \skewchar\twelvebsy='60%%
   \gdef\twelvemibfonts{\relax}}

\def\fourteenmibfonts{%                 % fourteen pt math italic bold
   \global\font\fourteenmib=cmmib10 scaled \magstep2%%
   \global\font\fourteenbsy=cmbsy10 scaled \magstep2%%
   \skewchar\fourteenmib='177%%
   \skewchar\fourteenbsy='60%%
   \gdef\fourteenmibfonts{\relax}}

\def\sixteenmibfonts{%                  % sixteen pt math italic bold
   \global\font\sixteenmib=cmmib10 scaled \magstep3%%
   \global\font\sixteenbsy=cmbsy10 scaled \magstep3%%
   \skewchar\sixteenmib='177%%
   \skewchar\sixteenbsy='60%%
   \gdef\sixteenmibfonts{\relax}}

\def\twentymibfonts{%                   % twenty pt math italic bold
   \global\font\twentymib=cmmib10 scaled \magstep4%%
   \global\font\twentybsy=cmbsy10 scaled \magstep4%%
   \skewchar\twentymib='177%%
   \skewchar\twentybsy='60%%
   \gdef\twentymibfonts{\relax}}

\def\twentyfourmibfonts{%               % twentyfour pt math italic bold
   \global\font\twentyfourmib=cmmib10 scaled \magstep5%%
   \global\font\twentyfourbsy=cmbsy10 scaled \magstep5%%
   \skewchar\twentyfourmib='177%%
   \skewchar\twentyfourbsy='60%%
   \gdef\twentyfourmibfonts{\relax}}

%     \mib changes to math italic bold by setting \textfont1 and \textfont2
% to cmmib10 and cmbsy10 respectively. This gets redefined by all the size
% changing macros.
\message{\string\mib,}

\def\mib{%    set math italic bold for use in $...$
   \tenmibfonts
   \textfont0=\tenbf\scriptfont0=\sevenbf
   \scriptscriptfont0=\fivebf
   \textfont1=\tenmib\scriptfont1=\seveni
   \scriptscriptfont1=\fivei
   \textfont2=\tenbsy\scriptfont2=\sevensy
   \scriptscriptfont2=\fivesy}

%======================================================================*
% FORMAL SCRIPT FONT: rsfs  (if you have it.  If not, get it!)
%
% The following allows the use of Ralph Smith's Formal Script symbols
% in Plain TeX documents.  Just use \scr in place of \cal.
\message{\string\scr,}

% Initialize \scr fonts; these may not exist on your system, and if
% they do, some maginfications may be missing, but today's kpathsea
% and MakeTeXPK make it more likely that you can use it.
% You can get the MetaFont sources from ftp.texsis.org

\newfam\scrfam                          % Define the new font family

% Use \scr to change fonts.  If you don't have these fonts then
% replace this with \let\scr=\cal in TXSsite.tex

\def\scr{\scrfonts\fam\scrfam\tenscr    % switch to rsfs fonts as \scr
   \global\textfont\scrfam=\tenscr\global\scriptfont\scrfam=\sevenscr
   \global\scriptscriptfont\scrfam=\fivescr}


% \scrfonts does a once-only initialization of the files, normally
% the first time \scr is invoked.  Then the \scr for a given font size
% sets the textfont, scriptfont and scriptscriptfont

\def\scrfonts{%     initialize rsfs fonts for \scr
   \global\font\twentyfourscr=rsfs10  scaled \magstep5 % 24 pt
   \global\font\twentyscr=rsfs10  scaled \magstep4     % 20 pt
   \global\font\sixteenscr=rsfs10  scaled \magstep3    % 16 pt
   \global\font\fourteenscr=rsfs10  scaled \magstep2   % 14 pt
   \global\font\twelvescr=rsfs10  scaled \magstep1     % 12 pt
   \global\font\elevenscr=rsfs10  scaled \magstephalf  % 11 pt
   \global\font\tenscr=rsfs10                          % 10 pt
   \global\font\ninescr=rsfs7 scaled \magstep1         %  9 pt
   \global\font\sevenscr=rsfs7                         %  7 pt
   \global\font\fivescr=rsfs5                          %  5 pt
   \global\skewchar\tenscr='177 \global\skewchar\sevenscr='177%%
        \global\skewchar\fivescr='177%%
   \global\textfont\scrfam=\tenscr\global\scriptfont\scrfam=\sevenscr
        \global\scriptscriptfont\scrfam=\fivescr
   \gdef\scrfonts{\relax}}              % disable when done once

%========================================================================
% FONT SIZES
%       Macros to change font sizes. Each of these load the relevant
% fonts the first time it is called, so we don't load fonts until needed.

%       Switch to 9 point type
\message{9pt,}
\def\ninepoint{\ninefonts               % load  9pt fonts if needed
   \def\rm{\fam0\ninerm}%
   \textfont0=\ninerm\scriptfont0=\sevenrm\scriptscriptfont0=\fiverm
   \textfont1=\ninei\scriptfont1=\seveni\scriptscriptfont1=\fivei
   \textfont2=\ninesy\scriptfont2=\sevensy\scriptscriptfont2=\fivesy
   \textfont3=\nineex\scriptfont3=\nineex\scriptscriptfont3=\nineex
   \textfont\itfam=\nineit\def\it{\fam\itfam\nineit}%
   \textfont\slfam=\ninesl\def\sl{\fam\slfam\ninesl}%
   \textfont\ttfam=\ninett\def\tt{\fam\ttfam\ninett}%
   \textfont\bffam=\ninebf
   \scriptfont\bffam=\sevenbf
   \scriptscriptfont\bffam=\fivebf\def\bf{\fam\bffam\ninebf}%
   \def\mib{\relax}%
   \def\scr{\relax}%
   \tt\ttglue=.5emplus.25emminus.15em
   \normalbaselineskip=11pt
   \setbox\strutbox=\hbox{\vrule height 8pt depth 3pt width 0pt}%
   \normalbaselines\rm\singlespaced}%


%       Switch to 10 point type
\message{10pt,}
\def\tenpoint{%                         % 10pt already loaded by default
   \def\rm{\fam0\tenrm}%
   \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}%
   \def\mib{%
      \tenmibfonts
      \textfont0=\tenbf\scriptfont0=\sevenbf
      \scriptscriptfont0=\fivebf
      \textfont1=\tenmib\scriptfont1=\seveni
      \scriptscriptfont1=\fivei
      \textfont2=\tenbsy\scriptfont2=\sevensy
      \scriptscriptfont2=\fivesy}%
   \def\scr{\scrfonts\fam\scrfam\tenscr
      \global\textfont\scrfam=\tenscr\global\scriptfont\scrfam=\sevenscr
      \global\scriptscriptfont\scrfam=\fivescr}%
   \tt\ttglue=.5emplus.25emminus.15em
   \normalbaselineskip=12pt
   \setbox\strutbox=\hbox{\vrule height 8.5pt depth 3.5pt width 0pt}%
   \normalbaselines\rm\singlespaced}%

%       Switch to 11 point type
\message{11pt,}
\def\elevenpoint{\elevenfonts           % load 11pt fonts if needed
   \def\rm{\fam0\elevenrm}%
   \textfont0=\elevenrm\scriptfont0=\sevenrm\scriptscriptfont0=\fiverm
   \textfont1=\eleveni\scriptfont1=\seveni\scriptscriptfont1=\fivei
   \textfont2=\elevensy\scriptfont2=\sevensy\scriptscriptfont2=\fivesy
   \textfont3=\elevenex\scriptfont3=\elevenex\scriptscriptfont3=\elevenex
   \textfont\itfam=\elevenit\def\it{\fam\itfam\elevenit}%
   \textfont\slfam=\elevensl\def\sl{\fam\slfam\elevensl}%
   \textfont\ttfam=\eleventt\def\tt{\fam\ttfam\eleventt}%
   \textfont\bffam=\elevenbf
   \scriptfont\bffam=\sevenbf
   \scriptscriptfont\bffam=\fivebf\def\bf{\fam\bffam\elevenbf}%
   \def\mib{%
      \elevenmibfonts
      \textfont0=\elevenbf\scriptfont0=\sevenbf
      \scriptscriptfont0=\fivebf
      \textfont1=\elevenmib\scriptfont1=\seveni
      \scriptscriptfont1=\fivei
      \textfont2=\elevenbsy\scriptfont2=\sevensy
      \scriptscriptfont2=\fivesy}%
   \def\scr{\scrfonts\fam\scrfam\elevenscr
      \global\textfont\scrfam=\elevenscr\global\scriptfont\scrfam=\sevenscr
      \global\scriptscriptfont\scrfam=\fivescr}% 
   \tt\ttglue=.5emplus.25emminus.15em
   \normalbaselineskip=13pt
   \setbox\strutbox=\hbox{\vrule height 9pt depth 4pt width 0pt}%
   \normalbaselines\rm\singlespaced}%

%       Switch to 12 point type
\message{12pt,}
\def\twelvepoint{\twelvefonts\ninefonts % load 12pt and 9pt fonts if needed
   \def\rm{\fam0\twelverm}%
   \textfont0=\twelverm\scriptfont0=\ninerm\scriptscriptfont0=\sevenrm
   \textfont1=\twelvei\scriptfont1=\ninei\scriptscriptfont1=\seveni
   \textfont2=\twelvesy\scriptfont2=\ninesy\scriptscriptfont2=\sevensy
   \textfont3=\twelveex\scriptfont3=\twelveex\scriptscriptfont3=\twelveex
   \textfont\itfam=\twelveit\def\it{\fam\itfam\twelveit}%
   \textfont\slfam=\twelvesl\def\sl{\fam\slfam\twelvesl}%
   \textfont\ttfam=\twelvett\def\tt{\fam\ttfam\twelvett}%
   \textfont\bffam=\twelvebf
   \scriptfont\bffam=\ninebf
   \scriptscriptfont\bffam=\sevenbf\def\bf{\fam\bffam\twelvebf}%
   \def\mib{%
      \twelvemibfonts\tenmibfonts
      \textfont0=\twelvebf\scriptfont0=\ninebf
      \scriptscriptfont0=\sevenbf
      \textfont1=\twelvemib\scriptfont1=\ninei
      \scriptscriptfont1=\seveni
      \textfont2=\twelvebsy\scriptfont2=\ninesy
      \scriptscriptfont2=\sevensy}%
   \def\scr{\scrfonts\fam\scrfam\twelvescr
      \global\textfont\scrfam=\twelvescr\global\scriptfont\scrfam=\ninescr
      \global\scriptscriptfont\scrfam=\sevenscr}%
   \tt\ttglue=.5emplus.25emminus.15em
   \normalbaselineskip=14pt
   \setbox\strutbox=\hbox{\vrule height 10pt depth 4pt width 0pt}%
   \normalbaselines\rm\singlespaced}%

%       Switch to 14 point type
\message{14pt,}
\def\fourteenpoint{\fourteenfonts\twelvefonts % load fonts as needed
   \def\rm{\fam0\fourteenrm}%
   \textfont0=\fourteenrm\scriptfont0=\twelverm\scriptscriptfont0=\tenrm
   \textfont1=\fourteeni\scriptfont1=\twelvei\scriptscriptfont1=\teni
   \textfont2=\fourteensy\scriptfont2=\twelvesy\scriptscriptfont2=\tensy
   \textfont3=\fourteenex\scriptfont3=\fourteenex
      \scriptscriptfont3=\fourteenex
   \textfont\itfam=\fourteenit\def\it{\fam\itfam\fourteenit}%
   \textfont\slfam=\fourteensl\def\sl{\fam\slfam\fourteensl}%
   \textfont\bffam=\fourteenbf
   \scriptfont\bffam=\twelvebf
   \scriptscriptfont\bffam=\tenbf\def\bf{\fam\bffam\fourteenbf}%
   \def\mib{%
      \fourteenmibfonts\twelvemibfonts\tenmibfonts
      \textfont0=\fourteenbf\scriptfont0=\twelvebf
        \scriptscriptfont0=\tenbf
      \textfont1=\fourteenmib\scriptfont1=\twelvemib
        \scriptscriptfont1=\tenmib
      \textfont2=\fourteenbsy\scriptfont2=\twelvebsy
        \scriptscriptfont2=\tenbsy}%
   \def\scr{\scrfonts\fam\scrfam\fourteenscr
      \global\textfont\scrfam=\fourteenscr\global\scriptfont\scrfam=\twelvescr
      \global\scriptscriptfont\scrfam=\tenscr}%
   \normalbaselineskip=17pt
   \setbox\strutbox=\hbox{\vrule height 12pt depth 5pt width 0pt}%
   \normalbaselines\rm\singlespaced}%

%       Switch to 16 point type
\message{16pt,}
\def\sixteenpoint{\sixteenfonts\fourteenfonts\twelvefonts % load fonts as needed
   \def\rm{\fam0\sixteenrm}%
   \textfont0=\sixteenrm\scriptfont0=\fourteenrm\scriptscriptfont0=\twelverm
   \textfont1=\sixteeni\scriptfont1=\fourteeni\scriptscriptfont1=\twelvei
   \textfont2=\sixteensy\scriptfont2=\fourteensy\scriptscriptfont2=\twelvesy
   \textfont3=\sixteenex\scriptfont3=\sixteenex\scriptscriptfont3=\sixteenex
   \textfont\itfam=\sixteenit\def\it{\fam\itfam\sixteenit}%
   \textfont\slfam=\sixteensl\def\sl{\fam\slfam\sixteensl}%
   \textfont\bffam=\sixteenbf%
   \scriptfont\bffam=\fourteenbf%
   \scriptscriptfont\bffam=\twelvebf\def\bf{\fam\bffam\sixteenbf}%
   \def\mib{%
      \sixteenmibfonts\fourteenmibfonts\twelvemibfonts
      \textfont0=\sixteenbf\scriptfont0=\fourteenbf
        \scriptscriptfont0=\twelvebf
      \textfont1=\sixteenmib\scriptfont1=\fourteenmib
        \scriptscriptfont1=\twelvemib
      \textfont2=\sixteenbsy\scriptfont2=\fourteenbsy
         \scriptscriptfont2=\twelvebsy}%
   \def\scr{\scrfonts\fam\scrfam\sixteenscr
      \global\textfont\scrfam=\sixteenscr\global\scriptfont\scrfam=\fourteenscr
      \global\scriptscriptfont\scrfam=\twelvescr}%
   \normalbaselineskip=20pt%
   \setbox\strutbox=\hbox{\vrule height 14pt depth 6pt width 0pt}%
   \normalbaselines\rm\singlespaced}%

%       Switch to 20 point type
\message{20pt,}
\def\twentypoint{\twentyfonts\sixteenfonts\fourteenfonts % load fonts
   \def\rm{\fam0\twentyrm}%
   \textfont0=\twentyrm\scriptfont0=\sixteenrm\scriptscriptfont0=\fourteenrm
   \textfont1=\twentyi\scriptfont1=\sixteeni\scriptscriptfont1=\fourteeni
   \textfont2=\twentysy\scriptfont2=\sixteensy\scriptscriptfont2=\fourteensy
   \textfont3=\twentyex\scriptfont3=\twentyex\scriptscriptfont3=\twentyex
   \textfont\itfam=\twentyit\def\it{\fam\itfam\twentyit}%
   \textfont\slfam=\twentysl\def\sl{\fam\slfam\twentysl}%
   \textfont\bffam=\twentybf
   \scriptfont\bffam=\sixteenbf
   \scriptscriptfont\bffam=\fourteenbf\def\bf{\fam\bffam\twentybf}%
   \def\mib{%
      \twentymibfonts\sixteenmibfonts\fourteenmibfonts%
      \textfont0=\twentybf\scriptfont0=\sixteenbf%
      \scriptscriptfont0=\fourteenbf%
      \textfont1=\twentymib\scriptfont1=\sixteenmib%
      \scriptscriptfont1=\fourteenmib%
      \textfont2=\twentybsy\scriptfont2=\sixteenbsy%
      \scriptscriptfont2=\fourteenbsy}%
   \def\scr{\scrfonts
      \global\textfont\scrfam=\twentyscr\fam\scrfam\twentyscr}%
   \normalbaselineskip=24pt
   \setbox\strutbox=\hbox{\vrule height 17pt depth 7pt width 0pt}%
   \normalbaselines\rm\singlespaced}%

%       Switch to 24 point type
\message{24pt.}
\def\twentyfourpoint{\twentyfourfonts\twentyfonts\sixteenfonts % load fonts
   \def\rm{\fam0\twentyfourrm}%
   \textfont0=\twentyfourrm\scriptfont0=\twentyrm\scriptscriptfont0=\sixteenrm
   \textfont1=\twentyfouri\scriptfont1=\twentyi\scriptscriptfont1=\sixteeni
   \textfont2=\twentyfoursy\scriptfont2=\twentysy\scriptscriptfont2=\sixteensy
   \textfont3=\twentyfourex\scriptfont3=\twentyfourex
      \scriptscriptfont3=\twentyfourex
   \textfont\itfam=\twentyfourit\def\it{\fam\itfam\twentyfourit}%
   \textfont\slfam=\twentyfoursl\def\sl{\fam\slfam\twentyfoursl}%
   \textfont\bffam=\twentyfourbf
   \scriptfont\bffam=\twentybf
   \scriptscriptfont\bffam=\sixteenbf\def\bf{\fam\bffam\twentyfourbf}%
   \def\mib{%
      \twentyfourmibfonts\twentymibfonts\sixteenmibfonts%
      \textfont0=\twentyfourbf\scriptfont0=\twentybf
      \scriptscriptfont0=\sixteenbf
      \textfont1=\twentyfourmib\scriptfont1=\twentymib
      \scriptscriptfont1=\sixteenmib
      \textfont2=\twentyfourbsy\scriptfont2=\twentybsy
      \scriptscriptfont2=\sixteenbsy}%
   \def\scr{\scrfonts
      \global\textfont\scrfam=\twentyfourscr\fam\scrfam\twentyfourscr}%
   \normalbaselineskip=28pt
   \setbox\strutbox=\hbox{\vrule height 19pt depth 9pt width 0pt}%
   \normalbaselines\rm\singlespaced}%

%------------------------------------------------------------------------
% Starting defaults:

\def\Tbf{\fourteenpoint\bf}
\def\tbf{\twelvepoint\bf}

% \autoload isn't defined yet, so we have to do this to defer, but
% this is the same as just \autoload'ing  it.

\def\printfont{\autoload\printfont{printfont.txs}\printfont}

%>>> EOF TXSfonts.tex <<<
