% Save file as: BSL.STY                Source: FILESERV@SHSU.BITNET  
% Provide access to the boldface slanted type style for LaTeX.  Once you
% have included "bsl" as a style option, you can use the \bsl command to
% select the boldface slanted style, just as you would select the usual
% boldface Roman style with \bf, EXCEPT:
%
%	The various fonts defined here are all "loaded on demand".  As
%	discussed in the LaTeX book, Section C.14.4, a loaded on demand
%	font is subject to two restrictions when used in math mode:
%
%	- The font must be used OUTSIDE of math mode before it is used
%	  INSIDE of math mode.  The \load command can be used to get
%	  around this restriction.
%
%	- Only a single font size is available within math mode - the
%	  display, text, script and scriptscriptfonts will all be the
%	  same.  This can be avoided ONLY by changing the definitions
%	  given here to pre-load the appropriate fonts; see LFONTS.TEX
%	  for further information.  (Alternatively, \@getfont could be
%	  made more clever.)  Note that pre-loading the fonts could cause
%	  you to fill font space with fonts you never really use.
%
% In order to allow other style files that need access to \bsl to input this
% file safely, it is designed so that an attempt to input it a second time -
% or, more exactly, when command "\bsl" is already defined - is ignored.
%
% This file can be adapted easily to define other font type styles.  The real
% limit is likely to come from the requirement that each style so defined must
% be given a unique family number - TeX only supports 16 families and LaTeX
% as usually configured already uses 10.  The right way to avoid this problem
% is to modify \@getfont so that it ignores a family number of -1.  Fonts
% so specified would not be usable in math mode, but that's no big deal; you
% don't WANT to use tons of non-math fonts in math mode anyway.
%
% As currently written, this file assumes that you have boldface san serif
% fonts available at the following point sizes:
%
%	cmbxsl10 at 9pt
%	cmbxsl10
%	cmbxsl10 at 11pt
%	cmbxsl10 at 12pt
%	cmbxsl10 at 14pt
%	cmbxsl10 at 17pt
%	cmbxsl10 at 20pt
%	cmbxsl10 at 25pt
%
% All but the last of these should be commonly available.  I'm not sure about
% the last one; LFONTS.TEX does not assume the availability of ANY 25 pt fonts
% other than Roman.  If necessary, change the definition of \bslxxv@ to
% \@subfont\bsl\rm.  (Alternatively, if you have boldface slanted fonts
% at sizes smaller than 8pt, you might want to change the definitions of
% \bslv@, \bslvi@, and \bslvii@.)
%
% Technical note:  It is possible to do without the \bsl<size>@ macros by
% including their contents, with a whole bunch of \@prtct's, within the
% \@addfontinfo definitions.  This is a pain to do, and probably doesn't end
% up saving any space anyway.  This way costs you a bunch of extra macros,
% but it's a LOT easier to understand!
%
% Written by GEorge D. Greenwade (BED_GDG@SHSU.BITNET)
%     as a variation from BSF.STY written by Jerry Leichter
%     (LEICHTER-JERRY@CS.YALE.EDU)
% April 5, 1990

\expandafter\ifx\csname bsl\endcsname\relax		%Once only, please
% Note:  It's a pain to use \@ifundefined here - we don't want to pass the
% rest of the definitions as an argument, but we can't easily use \endinput
% since, with docsty, we can't control where the line breaks occur.

\typeout{Document Option 'bsl' for Bold Slanted Fonts -- April 5, 1990 -- GDG}
\def\bsl{\protect\pbsl}
\newfam\bslfam
\@addfontinfo\@vpt{\@prtct\bslv@}
  \def\bslv@{\def\pbsl{\@subfont\bsl\bf}}
\@addfontinfo\@vipt{\@prtct\bslvi@}
  \def\bslvi@{\def\pbsl{\@subfont\bsl\bf}}
\@addfontinfo\@viipt{\@prtct\bslvii@}
  \def\bslvii@{\def\pbsl{\@subfont\bsl\bf}}
\@addfontinfo\@viiipt{\@prtct\bslviii@}
  \def\bslviii@{\def\pbsl{\@subfont\bsl\bf}}
\@addfontinfo\@ixpt{\@prtct\bslx@}
  \def\bslx@{\def\pbsl{\@getfont\pbsl\bslfam\@ixpt{cmbxsl10\@halfmag}}}
\@addfontinfo\@xpt{\@prtct\bslx@}
  \def\bslx@{\def\pbsl{\@getfont\pbsl\bslfam\@xpt{cmbxsl10}}}
\@addfontinfo\@xipt{\@prtct\bslxi@}
  \def\bslxi@{\def\pbsl{\@getfont\pbsl\bslfam\@xipt{cmbxsl10\@halfmag}}}
\@addfontinfo\@xiipt{\@prtct\bslxii@}
  \def\bslxii@{\def\pbsl{\@getfont\pbsl\bslfam\@xiipt{cmbxsl10\@magscale1}}}
\@addfontinfo\@xivpt{\@prtct\bslxiv@}
  \def\bslxiv@{\def\pbsl{\@getfont\pbsl\bslfam\@xivpt{cmbxsl10\@magscale2}}}
\@addfontinfo\@xviipt{\@prtct\bslxvii@}
  \def\bslxvii@{\def\pbsl{\@getfont\pbsl\bslfam\@xviipt{cmbxsl10\@magscale3}}}
\@addfontinfo\@xxpt{\@prtct\bslxx@}
  \def\bslxx@{\def\pbsl{\@getfont\pbsl\bslfam\@xxpt{cmbxsl10\@magscale4}}}
\@addfontinfo\@xxvpt{\@prtct\bslxxv@}
  \def\bslxxv@{\def\pbsl{\@getfont\pbsl\bslfam\@xxvpt{cmbxsl10\@magscale5}}}
\fi
