[Fontinst] Foundry Sans + Lucida New Math (or: change text font in math mode)

[Ingo Reich]

Hi everybody,

I'm a newbie to this mailing-list and quite unexperienced in working  
with fontinst (though I already had a closer look at fontinst.pdf,  
fontinstallationguide.pdf and Thierry Bouche's article about buidling  
virutal math fonts). What I'd like to do seems to be a standard problem  
to me, but unfortunately I couldn't find a 'recipe' that worked for me.  
This is what I want to do: I'd like to build a virtual font that  
enables me to use my text font (Foundry Sans, ffs-family below) in math  
mode together with Lucida New Math.

The strategy I followed was to build an OT1-encoded and an OML-encoded  
virtual font, make a copy of luctime.sty, rename it and change the  
relevant font families. Below you find what I came up with (after  
playing around with some examples in PSNFSS-Source and Thierry Bouche's  
article; this is all 'documentation' I could find on the web) to  
generate a mixed virtual font family hlcmffs. The result: uppercase  
greek and lowercase greek letters are o.k., and so are the Foundry Sans  
letters A...Z, a...z, Foundry Sans lining numerals, and most math  
symbols. What I lost, however, are the brackets (,) and [,], and some  
math symbols (like e.g. \Joint). So obviously I did something wrong,  
but I just can't figure out what. Any help is very much appreciated.

Best, Ingo

P.S.: It would be nice to also have a similar example file for use with  
mathtimes (plus), but this is probably another story.


%%%%%%%% FONTINST DRIVE FILE %%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% hlcmffs.tex
%
% Fontinst script
% to create virtual math fonts suitable for Foundry Sans
% using the Lucida New Math fonts fonts
%
\input fontinst.sty
%
\needsfontinstversion{1.914}

\substitutesilent{bx}{b}
\substitutesilent{it}{sl}
\substitutesilent{itx}{sl}
\setint{slant}{167}

\recordtransforms{hlcmffs-rec.tex}

\transformfont{ffsr8r}{\reencodefont{8r}{\fromafm{ffsr8a}}}
\transformfont{ffsri8r}{\reencodefont{8r}{\fromafm{ffsri8a}}}
\transformfont{ffsb8r}{\reencodefont{8r}{\fromafm{ffsb8a}}}
\transformfont{ffsrj8r}{\reencodefont{8r}{\fromafm{ffsr8x}}}
\transformfont{ffsrij8r}{\reencodefont{8r}{\fromafm{ffsri8x}}}
\transformfont{ffsbj8r}{\reencodefont{8r}{\fromafm{ffsb8x}}}

\transformfont{ffsro8r}{\slantfont{\int{slant}}\reencodefont{8r}{\fromaf 
m{ffsr8a}}}
\transformfont{ffsbo8r}{\slantfont{\int{slant}}\reencodefont{8r}{\fromaf 
m{ffsb8a}}}

\fromafm{lbmr}
\fromafm{lbmd}
\fromafm{lbmo}
\fromafm{lbmdo}
\fromafm{lbmi}
\fromafm{lbmdi}
%
% Virtual math fonts for Foundry Sans: hlcmffs

\installfonts

% Make math less tight:
\setint{letterspacing}{25}

% Install operators, and letters (symbols and large symbols taken from  
Lucida)

\installfonts
\installfamily{OT1}{hlcmffs}{}

% The `operators' font:
%		latin + = () [] from Foundry Sans
%		greek and dotless j from Lucida New Math
\installfont{hlcrmffs7t}{ffsr8r,nokernum,zrhax,
                                          lbmr scaled  
865,latin}{OT1}{OT1}{hlcmffs}{m}{n}{}
\installfont{hlcdmffs7t}{ffsb8r,nokernum,zrhax,
lbmd scaled 865,latin}{OT1}{OT1}{hlcmffs}{b}{n}{}
\endinstallfonts

% The `letters' font:
%		everything from Lucida Math New Italic, except:
%		latin from Foundry Sans
%		oldstyle digits from Foundry Sans
%		
\installfonts
\installfamily{OML}{hlcmffs}{\skewchar\font=127}
\installfont{hlcrmffs}{lbmr scaled 865,unsetalf,unsetnum,ffsr8r,mathit}
{OML}{OML}{hlcmffs}{m}{n}{}
\installfont{hlcdmffs}{lbmd scaled 865,unsetalf,unsetnum,ffsb8r,mathit}
{OML}{OML}{hlcmffs}{b}{n}{}
%
\installfont{hlcrimaffs}{lbmo scaled  
865,unsetalf,ffsri8r,unsetnum,ffsr8r,mathit}
{OML}{OML}{hlcmffs}{m}{it}{}
\installfont{hlcdimaffs}{lbmdo scaled  
865,unsetalf,ffsbo8r,unsetnum,ffsb8r,mathit}
{OML}{OML}{hlcmffs}{b}{it}{}
%
\installfont{hlcrimffs}{lbmi scaled  
865,unsetalf,ffsri8r,unsetnum,ffsr8r,mathit}
{OML}{OML}{hlcmffs}{m}{itx}{}
\installfont{hlcdimffs}{lbmdi scaled  
865,unsetalf,ffsbo8r,unsetnum,ffsb8r,mathit}
{OML}{OML}{hlcmffs}{b}{itx}{}
\endinstallfonts

\endrecordtransforms
%
\bye

%%%%%%%% END OF FILE %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%


The following is that part of luctimes.sty I changed;

%%%%%%%% BEGINNN OF lucffs.sty %%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\ProvidesPackage{lucffs}
  [ Lucida New Math + Lucida Expert
  + Foundry Sans]
\def\ttdefault{hlct}
\renewcommand{\bfdefault}{b}
\def\Mathdefault{hlcmffs}
\DeclareSymbolFont{letters}{OML}{hlcmffs}{m}{it}
\DeclareSymbolFont{operators}{OT1}{hlcmffs}{m}{n}
\SetSymbolFont{letters}{normal}{OML}{hlcmffs}{m}{it}
\SetSymbolFont{letters}{bold}{OML}{hlcmffs}{b}{it}
\SetSymbolFont{operators}{bold}{OT1}{hlcmffs}{b}{n}
\SetSymbolFont{operators}{normal}{OT1}{hlcmffs}{m}{n}

etc. etc. etc. [no more changes in this file]
%%%%%%%% END OF lucfss.sty %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%



••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••
Dr. Ingo Reich
Universität Tübingen
Deutsches Seminar
Wilhelmstr. 50
D-72074 Tübingen

Tel.: 0049-7071-29 72964
Fax: 0049-7071-29 5321

ingo.reich at uni-tuebingen.de
http://www.linguistik.uni-tuebingen.de/reich/
••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••