%%% macros for Inessential PostScript
%%% Tom Yu <tlyu@MIT.EDU>
%%%
%%% WARNING: lots of gross hacks follow
%%% $Header:$
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\catcode`@=11
\long\def\@ifundefined#1#2#3{\expandafter\ifx\csname 
  #1\endcsname\relax#2\else#3\fi}
%%% font stuff
% stolen from lfonts.tex
\def\@addfontinfo#1#2{{\def\@prtct{\noexpand\@prtct\noexpand}\def\def{\noexpand
    \def\noexpand}\xdef#1{#1#2}}}
\newfam\sffam
\newfam\scfam
\def\@magscale#1{ scaled \magstep #1}
\def\@halfmag{ scaled \magstephalf}
\def\@ptscale#1{ scaled #100}
\def\@height{height}
\def\@depth{depth}
\def\@width{width}
\def\@nohyphens#1#2{\global\expandafter \hyphenchar\csname 
   \string #1\string #2\endcsname \m@ne}
% Math extension
 \font\tenex   = cmex10 
% twelve point
 \font\twlrm  = cmr12                 % roman  
 \font\twlmi  = cmmi12               % math italic
    \skewchar\twlmi ='177          %  for placement of accents
%\font\twlmib = cmmib10   \@magscale1 % bold math italic
 \font\twlsy  = cmsy10   \@magscale1 % math symbols
    \skewchar\twlsy ='60           %   for placement of math accents
%\font\twlsyb = cmbsy10  \@magscale1 % bold symbols
 \font\twlit  = cmti12               % text italic
 \font\twlsl  = cmsl12               % slanted
 \font\twlbf  = cmbx12               % extended bold 
%\font\twlbfs = cmbxsl10 \@magscale1 % extended bold slanted
 \font\twltt  = cmtt12               % typewriter
    \hyphenchar\twltt = -1         %  suppress hyphenation in \tt font
%\font\twltti = cmitt10  \@magscale1 % italic typewriter
%\font\twltts = cmsltt10 \@magscale1 % slanted typewriter
 \font\twlsf  = cmss12               % sans serif
%\font\twlsfi = cmssi10  \@magscale1 % italic sans serif
%\font\twlsfb = cmssbx10 \@magscale1 % bold sans serif
%\font\twlsc  = cmcsc10  \@magscale1 % small caps
 \font\twlly  = lasy10  \@magscale1 % LaTeX symbols
%\font\twllyb = lasyb10 \@magscale1 % bold LaTeX symbols
%\font\twluit = cmu10    \@magscale1 % unslanted italic
% eight point
 \font\egtrm  = cmr8               % roman
 \font\egtmi  = cmmi8              % math italic
    \skewchar\egtmi ='177          %  for placement of accents
%\font\egtmib = cmmib10  \@ptscale8 % bold math italic
 \font\egtsy  = cmsy8              % math symbols
    \skewchar\egtsy ='60           %   for placement of math accents
%\font\egtsyb = cmbsy10 \@ptscale8 % bold math symbols
 \font\egtit  = cmti8              % text italic
%\font\egtsl  = cmsl8              % slanted
%\font\egtbf  = cmbx8              % extended bold 
%\font\egtbfs = cmbxsl10\@ptscale8 % extended bold slanted
%\font\egttt  = cmtt8              % typewriter
%\font\egttti = cmitt10 \@ptscale8 % italic typewriter
%\font\egttts = cmsltt10\@ptscale8 % slanted typewriter
%\font\egtsf  = cmss10  \@ptscale8 % sans serif
%\font\egtsfi = cmssi10 \@ptscale8 % italic sans serif
%\font\egtsfb = cmssbx10\@ptscale8 % bold sans serif
%\font\egtsc  = cmcsc10 \@ptscale8 % small caps
 \font\egtly  = lasy8             % LaTeX symbols
%\font\egtlyb = lasyb10 \@ptscale8 % LaTeX symbols
%\font\egtuit = cmu10   \@ptscale8 % unslanted italic
% six point
 \font\sixrm  = cmr6               % roman
 \font\sixmi  = cmmi6              % math italic
    \skewchar\sixmi ='177          %  for placement of accents
%\font\sixmib = cmmib10  \@ptscale6 % bold math italic
 \font\sixsy  = cmsy6              % math symbols
    \skewchar\sixsy ='60           %   for placement of math accents
%\font\sixsyb = cmbsy10 \@ptscale6 % bold math symbols
%\font\sixit  = cmti7   scaled 857 % text italic
%\font\sixsl  = cmsl10  \@ptscale6 % slanted
%\font\sixbf  = cmbx7   scaled 857 % extended bold 
%\font\sixbfs = cmbxsl10\@ptscale6 % extended bold slanted
%\font\sixtt  = cmtt10  \@ptscale6 % typewriter
%\font\sixtti = cmitt10 \@ptscale6 % italic typewriter
%\font\sixtts = cmsltt10\@ptscale6 % slanted typewriter
%\font\sixsf  = cmss10  \@ptscale6 % sans serif
%\font\sixsfi = cmssi10 \@ptscale6 % italic sans serif
%\font\sixsfb = cmssbx10\@ptscale6 % bold sans serif
%\font\sixsc  = cmcsc10 \@ptscale6 % small caps
 \font\sixly  = lasy6             % LaTeX symbols
%\font\sixlyb = lasyb10 \@ptscale6 % LaTeX symbols
%\font\sixuit = cmu10   \@ptscale6 % unslanted italic
%%%%%%%%%%
%%% stolen from psfonts.tex
\def\@@getfont#1#2#3#4#5#6#7{%
\@ifundefined{\string #1\string #5}{\global\expandafter
    \font \csname \string #1\string #5\endcsname #4\@ptscale{#5}\relax}{}%
\@ifundefined{\string #1\string #6}{\global\expandafter
    \font \csname \string #1\string #6\endcsname #4\@ptscale{#6}\relax}{}%
\@ifundefined{\string #1\string #7}{\global\expandafter
    \font \csname \string #1\string #7\endcsname #4\@ptscale{#7}\relax}{}%
\@ifundefined{\string #1\string #3}{\global\expandafter
    \let \csname \string #1\string #3\endcsname #3\relax 
     \@addfontinfo#3{\textfont #2\csname \string #1\string #5\endcsname 
     \scriptfont #2\csname \string #1\string #6\endcsname 
     \scriptscriptfont #2\csname \string #1\string #7\endcsname 
     \def#1{\fam #2\csname\string #1\string #5\endcsname}}}{}#3#1}
\def\@psfonts#1#2#3#4{%
\def\prm{\@@getfont\prm\z@#1\@mrm{#2}{#3}{#4}}%
\def\pit{\@@getfont\pit\itfam#1\@mit{#2}{#3}{#4}}%
\def\psl{\@@getfont\psl\slfam#1\@msl{#2}{#3}{#4}}%
\def\pbf{\@@getfont\pbf\bffam#1\@mbf{#2}{#3}{#4}}%
\def\ptt{\@@getfont\ptt\ttfam#1\@mtt{#2}{#3}{#4}%
\@nohyphens\ptt {#2}\@nohyphens\ptt {#3}\@nohyphens\ptt {#4}}%
\def\psf{\@@getfont\psf\sffam#1\@mss{#2}{#3}{#4}}%
\def\psc{\@@getfont\psc\scfam#1\@mcsc{#2}{#3}{#4}}}
\newfam\@cmrfam
\newcount\@cmrscale
\def\@mathmap#1{\@cmrscale=\@cmrfam \multiply\@cmrscale by 256
\advance\@cmrscale by \the\mathcode#1 \mathcode#1=\@cmrscale\relax}
\def\@cmrset#1#2#3{\textfont\@cmrfam #1%
\scriptfont\@cmrfam #2\scriptscriptfont\@cmrfam #3\relax}
\@mathmap{`\(}
\@mathmap{`\)}
\let\+\relax\@mathmap{`\+}
\@mathmap{`\=}
\@mathmap{`\[}
\@mathmap{`\]}
\def\xiipt{%
\textfont\@ne\twlmi \scriptfont\@ne\egtmi \scriptscriptfont\@ne\sixmi
\textfont\tw@\twlsy \scriptfont\tw@\egtsy \scriptscriptfont\tw@\sixsy
\textfont\thr@@\tenex \scriptfont\thr@@\tenex \scriptscriptfont\thr@@\tenex
\@xiipt}%
\@psfonts\@xiipt{12}86%
\@cmrset\twlrm\egtrm\sixrm%
\def\@xiipt{}
\def\@mrm{pncr}
\def\@mit{pncri}
\def\@msl{pncro}
\def\@mbf{pncb}
\def\@mtt{pcrr}
\def\@msf{phvr}
\def\@mcsc{pncrc}
\def\rm{\prm}\def\it{\pit}\def\sl{\psl}\def\bf{\pbf}\def\tt{\ptt}
\def\sf{\psf}\def\sc{\psc}
%%%
%%%%%%%%%%
\xiipt\rm
\baselineskip=14\p@\parindent=40\p@
\def\PS{PostScript}
% stolen from latex.tex.....
\def\LaTeX{{\rm L\kern-.36em\raise.3ex\hbox{\sc a}\kern-.15em
    T\kern-.1667em\lower.7ex\hbox{E}\kern-.125emX}}
\def\prog#1{{\tt#1}}
\def\RCSheader$#1${\def\Rhead{#1}}
\def\toc{}
\def\section{}
\catcode`@=12
