\relax

This file renames harpoon-like glyphs in accordance with the OML encoding.

\metrics

%% example: \rename{arrowlefttophalf}{harpoonleftup}
\setcommand\rename#1#2{\ifisglyph{#1}\then
  \setglyph{#2}
    \glyph{#1}{1000}
  \endsetglyph
\fi}

\rename{arrowlefttophalf}{harpoonleftup}
\rename{arrowleftbothalf}{harpoonleftdown}
\rename{arrowrighttophalf}{harpoonrightup}
\rename{arrowrightbothalf}{harpoonrightdown}
\rename{arrowhookleft}{hookrightchar}
\rename{arrowhookright}{hookleftchar}

\endmetrics

\setrawglyph{arrowlefttophalf}{cmmi10}{10pt}{40}{1000}{428}{-230}{0}
\setrawglyph{arrowleftbothalf}{cmmi10}{10pt}{41}{1000}{270}{-72}{0}
\setrawglyph{arrowrighttophalf}{cmmi10}{10pt}{42}{1000}{428}{-230}{0}
\setrawglyph{arrowrightbothalf}{cmmi10}{10pt}{43}{1000}{270}{-72}{0}
\setrawglyph{arrowhookleft}{cmmi10}{10pt}{44}{277}{464}{-230}{0}
\setrawglyph{arrowhookright}{cmmi10}{10pt}{45}{277}{464}{-230}{0}

\setslot{harpoonleftup}
\setslot{harpoonleftdown}
\setslot{harpoonrightup}
\setslot{harpoonrightdown}
\setslot{hookrightchar}
\setslot{hookleftchar}