%&plain

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%% This is the file makemma.tex, part of the `makemma' subpackage
%% of the MathInst package
%% (version 0.8, January , 1998) for math font 
%% generation.  (Author: Alan Hoenig, ajhjj@cunyvm.cuny.edu)
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\nopagenumbers

\input fontinst.sty

%% This script makes math fonts in two families---regular Mathematica
%% and Mathematica tt.  In each family, there are two series, regular and
%% bold.  
%% 
%% The fonts so constructed shall serve as raw fonts for other math font
%% families.  Some limited succcess typesetting math can be obtained with
%% these fonts, but note: the math italic fonts contain neither small cap
%% fonts nor upper- and lowercase letters.  Also the calligraphic
%% capitals have been stripped out of the symbol fonts.  (The Mathematica
%% calligraphic alphabet is not well done, at least on the provisional
%% fonts I was given.  They don't even have the same cap heights!)
%% Finally, the uppercase Greek letters in the math italic have not been
%% slanted,s ince we do not yet know the slant of the text italic fonts.
%% (This slanting will need to be done at virtual font time.)
%% 
%% In order to create an oblique font from which to pluck slanted uppercase
%% Greek letters, a stripped down mmamio (math italic oblique) has 
%% been created.  We never use it for any direct typesetting, though.
%% 
%% This script finished up on January 13, 1998, Alan Hoenig author.

\transformfont{mma1o}{\slantfont{167}{\fromafm{mma1}}}
\transformfont{mma2o}{\slantfont{167}{\fromafm{mma2}}}
\transformfont{mma3o}{\slantfont{167}{\fromafm{mma3}}}
\transformfont{mma4o}{\slantfont{167}{\fromafm{mma4}}}
\transformfont{mma5o}{\slantfont{167}{\fromafm{mma5}}}


\installfonts
  \gdef\fontweight{}\gdef\fontvar{}	% let's do regular fonts...
  \installfamily{OML}{mma}{}
  \installfamily{OMS}{mma}{}
  \installfamily{OMX}{mma}{}
  \installfont{mmami\fontvar\fontweight}{mma1\fontvar\fontweight,%
    ma1mi\fontvar,unadobe,mma3\fontvar\fontweight,ma3mi,unadobe,%
    mma4\fontvar\fontweight,ma4mi,unadobe,mma5\fontvar\fontweight,%
    ma5mi,unadobe,unsave,kernoff,cmmi10,kernon,uncmmi}%
    {OML}{OML}{mma}{m}{it}{}
  \installfont{mmamio\fontvar\fontweight}{mma1o\fontvar\fontweight,%
    ma1mi\fontvar,unadobe,mma3o\fontvar\fontweight,ma3mi,unadobe,%
    %% mma4o\fontvar\fontweight,ma4mi,unadobe,mma5o\fontvar\fontweight,%
    %% ma5mi,unadobe,
    unsave,kernoff,cmmi10,kernon,uncmmi}%
    {OML}{OML}{mma}{m}{ob}{}
  \installfont{mmasy\fontvar\fontweight}{mma1\fontvar\fontweight,%
    negslash,ma1sy,unadobe,mma2\fontvar\fontweight,%
    ma2sy,unadobe,mma3\fontvar\fontweight,ma3sy,unadobe,%
    mma4\fontvar\fontweight,ma4sy,unadobe,mma5\fontvar\fontweight,%
    ma5sy,unadobe,%
    unsave,alphoff}{OMS}{OMS}{mma}{m}{n}{}
  \installfont{mmaex\fontvar\fontweight}{mma1\fontvar\fontweight,%
    ma1ex,unadobe,mma2\fontvar\fontweight,ma2ex,unadobe,%
    mma4\fontvar\fontweight,ma4ex,unadobe}{OMX}{OMX}{mma}{m}{n}{}
  \gdef\fontweight{b}\gdef\fontvar{}	% let's do bold fonts...
  \installfont{mmami\fontvar\fontweight}{mma1\fontvar\fontweight,%
    ma1mi\fontvar,unadobe,mma3\fontvar\fontweight,ma3mi,unadobe,%
    mma4\fontvar\fontweight,ma4mi,unadobe,mma5\fontvar\fontweight,%
    ma5mi,unadobe,unsave,kernoff,cmmi10,kernon,uncmmi}%
    {OML}{OML}{mma}{b}{it}{}
  \installfont{mmasy\fontvar\fontweight}{mma1\fontvar\fontweight,%
    negslash,ma1sy,unadobe,mma2\fontvar\fontweight,%
    ma2sy,unadobe,mma3\fontvar\fontweight,ma3sy,unadobe,%
    mma4\fontvar\fontweight,ma4sy,unadobe,mma5\fontvar\fontweight,%
    ma5sy,unadobe,%
    unsave,alphoff}{OMS}{OMS}{mma}{b}{n}{}
  \installfont{mmaex\fontvar\fontweight}{mma1\fontvar\fontweight,%
    ma1ex,unadobe,mma2\fontvar\fontweight,ma2ex,unadobe,%
    mma4\fontvar\fontweight,ma4ex,unadobe}{OMX}{OMX}{mma}{b}{n}{}
  %% NOW FOR TT FONTS...
  \gdef\fontweight{}\gdef\fontvar{tt}	% let's do regular tt fonts...
  \installfamily{OML}{mmatt}{}
  \installfamily{OMS}{mmatt}{}
  \installfamily{OMX}{mmatt}{}
  \installfont{mmami\fontvar\fontweight}{mma1\fontvar\fontweight,%
    ma1mi\fontvar,unadobe,mma3\fontvar\fontweight,ma3mi,unadobe,%
    mma4\fontvar\fontweight,ma4mi,unadobe,mma5\fontvar\fontweight,%
    ma5mi,unadobe,unsave,kernoff,cmmi10,kernon,uncmmi}%
    {OML}{OML}{mmatt}{m}{it}{}
  \installfont{mmasy\fontvar\fontweight}{mma1\fontvar\fontweight,%
    negslash,ma1sy,unadobe,mma2\fontvar\fontweight,%
    ma2sy,unadobe,mma3\fontvar\fontweight,ma3sy,unadobe,%
    mma4\fontvar\fontweight,ma4sy,unadobe,mma5\fontvar\fontweight,%
    ma5sy,unadobe,%
    unsave,alphoff}{OMS}{OMS}{mmatt}{m}{n}{}
  \installfont{mmaex\fontvar\fontweight}{mma1\fontvar\fontweight,%
    ma1ex,unadobe,mma2\fontvar\fontweight,ma2ex,unadobe,%
    mma4\fontvar\fontweight,ma4ex,unadobe}{OMX}{OMX}{mmatt}{m}{n}{}
  \gdef\fontweight{b}\gdef\fontvar{tt}	% let's do bold fonts...
  \installfont{mmami\fontvar\fontweight}{mma1\fontvar\fontweight,%
    ma1mi\fontvar,unadobe,mma3\fontvar\fontweight,ma3mi,unadobe,%
    mma4\fontvar\fontweight,ma4mi,unadobe,mma5\fontvar\fontweight,%
    ma5mi,unadobe,unsave,kernoff,cmmi10,kernon,uncmmi}%
    {OML}{OML}{mmatt}{b}{it}{}
  \installfont{mmasy\fontvar\fontweight}{mma1\fontvar\fontweight,%
    negslash,ma1sy,unadobe,mma2\fontvar\fontweight,%
    ma2sy,unadobe,mma3\fontvar\fontweight,ma3sy,unadobe,%
    mma4\fontvar\fontweight,ma4sy,unadobe,mma5\fontvar\fontweight,%
    ma5sy,unadobe,%
    unsave,alphoff}{OMS}{OMS}{mmatt}{b}{n}{}
  \installfont{mmaex\fontvar\fontweight}{mma1\fontvar\fontweight,%
    ma1ex,unadobe,mma2\fontvar\fontweight,ma2ex,unadobe,%
    mma4\fontvar\fontweight,ma4ex,unadobe}{OMX}{OMX}{mmatt}{b}{n}{}
\endinstallfonts

\bye

