%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%% This is the file bvpacrix.mtx, part of the MathKit package
%% (version 0.7, January , 1998) for math font 
%% generation.  (Author: Alan Hoenig, ajhjj@cunyvm.cuny.edu)
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%


\relax 

This file is part of the MathKit package.  It demonstrates how to
set up an adjustment file, and is for actual use when installing a
math font family marrying Baskerville-like math symbols with Adobe 
Caslon text fonts.

\metrics 

\needsfontinstversion{1.315} 

% \shiftglyph takes four parameters: 
% 
% #1 the name of the glyph 
% #2 the amount of extra space at the left 
% #3 the amount of extra space at the right 
% #4 the amount to move in subscripts (should be -ve) 

\setcommand\shiftglyph#1#2#3#4{ 
   \ifisglyph{#1}\then
     \resetglyph{#1} 
     	\movert{#2} 
     	\glyph{#1}{1000} 
     	\movert{#4} 
     	\resetitalic{\add{\italic{#1}}{\sub{#3}{#4}}} 
     \endresetglyph 
   \fi
} 

% \unfakable produces a missing glyph warning. 

\setcommand\unfakable#1{ 
   \setglyph{#1} 
      \glyphrule{500}{500} 
      \glyphwarning{missing glyph `#1'} 
   \endsetglyph 
} 

% Zero the depth of a glyph. 

\setcommand\zerodepth#1{
   \ifisglyph{#1}\then 
      \resetglyph{#1} 
      	 \glyph{#1}{1000} 
      	 \resetdepth{0} 
      \endresetglyph
   \fi 
} 

% Values produced by trial and error... 

\shiftglyph{C}{-75}{0}{0} 
% \shiftglyph{E}{0}{50}{0} 
% \shiftglyph{F}{0}{50}{-100} 
\shiftglyph{G}{-75}{0}{0}
% \shiftglyph{H}{0}{25}{-25} 
% \shiftglyph{I}{0}{0}{-25} 
\shiftglyph{J}{80}{0}{0}
% \shiftglyph{K}{0}{0}{-25} 
\shiftglyph{J}{30}{0}{0} 
% \shiftglyph{N}{0}{0}{-25} 
\shiftglyph{O}{-75}{0}{0}
% \shiftglyph{P}{0}{0}{-100} 
% \shiftglyph{T}{0}{50}{-75} 
% \shiftglyph{U}{-50}{50}{-25} 
% \shiftglyph{V}{-50}{50}{-50} 
% \shiftglyph{W}{-50}{50}{-50} 
% \shiftglyph{X}{0}{50}{-25} 
% \shiftglyph{Y}{-50}{50}{-50} 
% \shiftglyph{b}{0}{-25}{0} 
% \shiftglyph{d}{0}{25}{0} 
\shiftglyph{f}{\scale{\depth{f}}{700}}{0}{25} 
% \shiftglyph{g}{0}{-50}{0} 
\shiftglyph{j}{150}{25}{0} 
% \shiftglyph{l}{0}{50}{0} 
% \shiftglyph{o}{0}{-50}{0} 
% \shiftglyph{p}{75}{-25}{0} 
% \shiftglyph{t}{-25}{50}{0} 
% \shiftglyph{Upsilon}{0}{0}{-50} 
% \shiftglyph{Upsilon}{0}{0}{-100} 
% \shiftglyph{weierstrass}{-100}{-200}{-150} 
\shiftglyph{dotlessj}{175}{0}{0}
% 
% \unfakable{rho1} 
% 
% \ifisglyph{omega1}\then
%     \setglyph{pi1} 
% 	 \glyph{omega1}{1000} 
%     \endsetglyph
% \fi 
% 
% \ifisglyph{epsilon}\then
%     \setglyph{epsilon1} 
% 	 \glyph{epsilon}{1000} 
%     \endsetglyph 
% \fi

% \resetglyph{vector} 
%    \movert{-100} 
%    \glyph{vector}{1000} 
%    \movert{100} 
% \endresetglyph 

% Accents have to have zero depth. 

% \zerodepth{acute} 
% \zerodepth{grave} 
% \zerodepth{caron} 
% \zerodepth{breve} 
% \zerodepth{macron} 
% \zerodepth{ring} 
% \zerodepth{circumflex} 
% \zerodepth{dotaccent} 
% \zerodepth{tilde} 
% \zerodepth{dieresis} 
% 
\ifisglyph{tie}\then
  \resetglyph{tie}
    \push
	\movert{\add{\div{\width{tie}}{2}}{45}}
	\glyph{tie}{1000}
    \pop
    \samesize{tie}
  \endresetglyph
\fi
% \ifisglyph{vector}\then
%   \resetglyph{vector}
%     \moveup{1}
%     \glyph{vector}{1000}
%     \moveup{-1}
%   \endresetglyph
% \fi

\endmetrics