\relax

Part of the tolkienfonts package
Copyright 2009 Ariel Barton

\metrics

\ifisglyph{barundernarrow}\then\else\fontspecificglyphs\fi
% This defines barundernarrow and (glyph)+silme.
% In Tengwar Annatar, it also adjusts the heights of various glyphs.
% It might have been called by underdotstengwar.

\setint{longa}{225}
\setint{longo}{243}
\setint{longi}{237}
\setint{longy}{253}
\setint{longu}{250}
\setint{longe}{233}

\setint{aaslot}{226}
\setint{eeslot}{234}
\setint{iislot}{238}
\setint{ooslot}{244}
\setint{uuslot}{251}

\setint{adislot}{228}
\setint{edislot}{235}
\setint{idislot}{239}
\setint{odislot}{246}
\setint{udislot}{252}
\setint{ydislot}{184}

\setcommand\wordendlig#1{
  \ligature{LIG/}{dashsilent}{#1}
  \ligature{LIG/}{tildevertical}{#1}
  \ligature{LIG/}{latinquoteright}{#1}
  \ligature{LIG/}{tildewide}{#1}
  \ligature{LIG/}{latinexclam}{#1}
  \ligature{LIG/}{tengparen}{#1}
  \ligature{LIG/}{tengparen}{#1}
  \ligature{LIG/}{latinsemicolon}{#1}
  \ligature{LIG/}{onedot}{#1}
  \ligature{LIG/}{twodots}{#1}
  \ligature{LIG/}{latinquestion}{#1}
  \ligature{LIG/}{threedots}{#1}
  \ligature{LIG/}{twodots}{#1}
  \ligature{LIG/}{tildedouble}{#1}
  \ligature{LIG/}{tengquestion}{#1}
  \ligature{LIG/}{latinparenleft}{#1}
  \ligature{LIG/}{latinperiod}{#1}
  \ligature{LIG/}{latinparenright}{#1}
  \ligature{LIG/}{latincomma}{#1}
  \ligature{LIG/}{latinquoteleft}{#1}
  \ligature{LIG/}{tildeteng}{#1}
  \ifisglyph{ringswirlright}\then\ligature{LIG/}{ringswirlright}{#1}\fi
}

\def\scurlO{scurlO}

\setcommand\plaincurlsetup#1#2{
    \def\temp{#1}
    \ifx\temp\scurlO\else\ligature{/LIG}{scurlO}{#1}\fi
    \ifisglyph{#2}\then\ligature{LIG/}{#1}{#2}\fi
}

\setcommand\plaincompoundcurlsetup#1#2#3{
    \def\temp{#1}
    \ifx\temp\scurlO\else\ligature{/LIG}{scurlO}{#1}\fi
    \ifisglyph{#2}\then\ifisglyph{#3}\then\ligature{/LIG/}{#1}{#3}\ligature{LIG/}{#3}{#2}\fi\fi
}

\setcommand\englishcurlsetup#1#2{
    \def\temp{#1}
    \ifx\temp\scurlO\else\ligature{/LIG}{scurlO}{#1}\fi
    \ifisglyph{#2}\then\ligature{LIG/}{#1}{#2}\fi
    \ifisglyph{#1E}\then
        \ifx\temp\scurlO\else\ligature{/LIG}{scurlOE}{#1E}\fi
        \ifisglyph{#2}\then\ligature{LIG/}{#1E}{#2}\else\ligature{/LIG/}{#1E}{yantadipthong}\fi
        \else
        \ligature{/LIG}{scurlOE}{scurlsilmeE}
        \ifisglyph{#2}\then\else\ligature{/LIG/}{scurlsilmeE}{yantadipthong}\fi
        \fi
}

\setcommand\englishcompoundcurlsetup#1#2#3{
    \def\temp{#1}
    \ifx\temp\scurlO\else\ligature{/LIG}{scurlO}{#1}\fi
    \ifisglyph{#2}\then\ifisglyph{#3}\then\ligature{/LIG/}{#1}{#3}\ligature{LIG/}{#3}{#2}\fi\fi
    \ifisglyph{#1E}\then
        \ifx\temp\scurlO\else\ligature{/LIG}{scurlOE}{#1E}\fi
        \ifisglyph{#2}\then\ligature{/LIG/}{#1E}{#3}\ligature{LIG/}{#3}{#2}\else\ligature{/LIG/}{#1E}{yantadipthong}\fi
        \else
        \ligature{/LIG}{scurlOE}{scurlsilmeE}
        \ifisglyph{#2}\then\else
            \ligature{/LIG/}{scurlsilmeE}{yantadipthong}\fi
        \fi
}


\setint{fontdimen(1)}{0} %Italic slant
\setint{fontdimen(2)}{\int{interword}} %Space width
\setint{fontdimen(3)}{\scale{\width{space}}{600}} %Space stretch
\setint{fontdimen(4)}{\scale{\width{space}}{300}} %space shrink
\setint{fontdimen(5)}{\height{tinco}} % 1 ex
\setint{fontdimen(6)}{1000} %1 em
\setint{fontdimen(7)}{\scale{\width{space}}{300}} % Extra space for non-french spacing (default 111)


%\comment{Blanks}

\setglyph{quotesilent}  \endsetglyph
\setglyph{dashsilent}   \endsetglyph
\setglyph{barsilent}    \endsetglyph

\setglyph{quoteafterosse}   \endsetglyph
\setglyph{dashafterosse}    \endsetglyph
\setrightkerning{quoteafterosse}{osse}{1000}
\setrightkerning{dashafterosse}{osse}{1000}

%\comment{Duplicates}

\setglyph{tengparenleft}\glyph{tengparen}{1000}\endsetglyph
\setleftrightkerning{tengparenleft}{tengparen}{1000}

\setglyph{engnumen} \glyph{numen}{1000}\endsetglyph
\setglyph{startcarrier} \glyph{carrier}{1000}\endsetglyph
\setglyph{carrierE} \glyph{carrier}{1000}\endsetglyph
\setglyph{numenfixed}   \glyph{numen}{1000}\endsetglyph
\setglyph{maltafixed}   \glyph{malta}{1000}\endsetglyph
\setglyph{startore} \glyph{ore}{1000}\endsetglyph
\setglyph{orenoromen}   \glyph{ore}{1000}\endsetglyph
\setglyph{startromen}   \glyph{romen}{1000}\endsetglyph
\setglyph{startlambe}   \glyph{lambe}{1000}\endsetglyph
\setglyph{wilyaaftera}  \glyph{wilya}{1000}\endsetglyph
\setglyph{valaaftera}   \glyph{vala}{1000}\endsetglyph
\setglyph{ureafterosse} \glyph{ure}{1000}\endsetglyph
\setglyph{notvformen}   \glyph{formen}{1000}\endsetglyph
\setglyph{cquesse}  \glyph{quesse}{1000}\endsetglyph

\setleftrightkerning{startcarrier}{carrier}{1000}
\setleftrightkerning{carrierE}{carrier}{1000}
\setleftrightkerning{cquesse}{quesse}{1000}
\setleftrightkerning{engnumen}{numen}{1000}
\setleftrightkerning{numenfixed}{numen}{1000}
\setleftrightkerning{maltafixed}{malta}{1000}
\setleftrightkerning{startore}{ore}{1000}
\setleftrightkerning{orenoromen}{ore}{1000}
\setleftrightkerning{startromen}{romen}{1000}
\setleftrightkerning{startlambe}{lambe}{1000}
\setleftrightkerning{wilyaaftera}{wilya}{1000}
\setleftrightkerning{valaaftera}{vala}{1000}
\setleftrightkerning{ureafterosse}{ure}{1000}
\setleftrightkerning{notvformen}{formen}{1000}

\setglyph{tinconotehtar}    \glyph{tinco}{1000}\endsetglyph
\setglyph{quessenotehtar}   \glyph{quesse}{1000}\endsetglyph
\setglyph{andonotehtar} \glyph{ando}{1000}\endsetglyph
\setglyph{umbarnotehtar}    \glyph{umbar}{1000}\endsetglyph
\setglyph{ungwenotehtar}    \glyph{ungwe}{1000}\endsetglyph
\setglyph{silmenotehtar}    \glyph{silme}{1000}\endsetglyph
\setglyph{nwalmenotehtar}   \glyph{nwalme}{1000}\endsetglyph

\setleftrightkerning{quessenotehtar}{quesse}{1000}
\setleftrightkerning{ungwenotehtar} {ungwe}{1000}
\setleftrightkerning{andonotehtar}  {ando}{1000}
\setleftrightkerning{tinconotehtar} {tinco}{1000}
\setleftrightkerning{umbarnotehtar} {umbar}{1000}
\setleftrightkerning{silmenotehtar} {silme}{1000}
\setleftrightkerning{nwalmenotehtar}    {nwalme}{1000}

\setglyph{wilyadipthong}    \glyph{wilya}{1000}\endsetglyph
\setglyph{yantadipthong}    \glyph{yanta}{1000}\endsetglyph
\setglyph{idipthong}    \glyph{carrier}{1000}\endsetglyph
\setglyph{annadipthong} \glyph{anna}{1000}\endsetglyph
\setglyph{valadipthong} \glyph{vala}{1000}\endsetglyph
\setglyph{ydipthong}    \glyph{longcarrier}{1000}\endsetglyph
\setglyph{uredipthong}  \glyph{ure}{1000}\endsetglyph
\setglyph{romendipthong}    \glyph{romen}{1000}\endsetglyph

\setleftrightkerning{wilyadipthong} {wilya}{1000}
\setleftrightkerning{yantadipthong} {yanta}{1000}
\setleftrightkerning{idipthong} {carrier}{1000}
\setleftrightkerning{annadipthong}  {anna}{1000}
\setleftrightkerning{valadipthong}  {vala}{1000}
\setleftrightkerning{ydipthong} {longcarrier}{1000}
\setleftrightkerning{uredipthong}   {ure}{1000}
\setleftrightkerning{romendipthong} {romen}{1000}

\setglyph{wilyanodipthong}  \glyph{wilya}{1000}\endsetglyph
\setglyph{yantanodipthong}  \glyph{yanta}{1000}\endsetglyph
\setglyph{inodipthong}  \glyph{carrier}{1000}\endsetglyph
\setglyph{annanodipthong}   \glyph{anna}{1000}\endsetglyph
\setglyph{valanodipthong}   \glyph{vala}{1000}\endsetglyph
\setglyph{ynodipthong}  \glyph{longcarrier}{1000}\endsetglyph

\setleftrightkerning{wilyanodipthong}   {wilya}{1000}
\setleftrightkerning{yantanodipthong}   {yanta}{1000}
\setleftrightkerning{inodipthong}   {carrier}{1000}
\setleftrightkerning{annanodipthong}    {anna}{1000}
\setleftrightkerning{valanodipthong}    {vala}{1000}
\setleftrightkerning{ynodipthong}   {longcarrier}{1000}

\setglyph{romenydots}   \glyph{IItehtaVII}{1000}\endsetglyph
\setglyph{tincoydots}   \glyph{IItehtaVII}{1000}\endsetglyph
\setglyph{calmaydots}   \glyph{IItehtaVI}{1000}\endsetglyph
\setglyph{hyarmenydots} \glyph{IItehtaVI}{1000}\endsetglyph

%\comment{After osse: dots (some duplicates, some tengwa+tehta)}

\setglyph{oreafterosse} \glyph{ore}{1000}\endsetglyph
\setglyph{silmeafterosse}   \glyph{silme}{1000}\endsetglyph
\setglyph{esseafterosse}    \glyph{altesse}{1000}\endsetglyph
\setglyph{quesseafterosse}  \glyph{quesse}{1000}\endsetglyph
\setglyph{barangaafterosse} \glyph{anga}{1000}  \glyph{Baroverleft}{1000}\endsetglyph
\setglyph{calmaafterosse}   \push\movert{\neg{\kerning{osse}{calma}}}\glyph{Itehta\ossetehta}{1000}\pop \glyph{calma}{1000}\endsetglyph
\setglyph{angaafterosse}    \push\movert{\neg{\kerning{osse}{anga}}}\glyph{Itehta\ossetehta}{1000}\pop  \glyph{anga}{1000}\endsetglyph
\setglyph{ahaafterosse}     \push\movert{\neg{\kerning{osse}{aha}}}\glyph{Itehta\ossetehta}{1000}\pop   \glyph{aha}{1000}\endsetglyph
\setglyph{ancaafterosse}    \push\movert{\neg{\kerning{osse}{anca}}}\glyph{Itehta\ossetehta}{1000}\pop  \glyph{anca}{1000}\endsetglyph
\setglyph{noldoafterosse}   \push\movert{\neg{\kerning{osse}{baranga}}}\glyph{Itehta\ossetehta}{1000}\pop   \glyph{noldo}{1000}\endsetglyph


\setrightkerning{oreafterosse}{ore}{1000}
\setleftrightkerning{barangaafterosse}{baranga}{1000}
\setleftrightkerning{calmaafterosse}{calma}{1000}
\setleftrightkerning{angaafterosse}{anga}{1000}
\setleftrightkerning{ahaafterosse}{aha}{1000}
\setleftrightkerning{ancaafterosse}{anca}{1000}
\setleftrightkerning{noldoafterosse}{noldo}{1000}
\setleftrightkerning{silmeafterosse}{silme}{1000}
\setleftrightkerning{esseafterosse}{esse}{1000}
\setleftrightkerning{quesseafterosse}{quesse}{1000}

%\comment{Doubled tehtar}

\setglyph{EEtehtaI}  \glyph{EtehtaI}{1000}\push\movert{\doubletehtasep}\glyph{EtehtaI}{1000}\pop\endsetglyph
\setglyph{EEtehtaII} \glyph{EtehtaII}{1000}\push\movert{\doubletehtasep}\glyph{EtehtaII}{1000}\pop\endsetglyph
\setglyph{EEtehtaIII}\glyph{EtehtaIII}{1000}\push\movert{\doubletehtasep}\glyph{EtehtaIII}{1000}\pop\endsetglyph
\setglyph{EEtehtaIV} \glyph{EtehtaIV}{1000}\push\movert{-\doubletehtasep}\glyph{EtehtaIV}{1000}\pop\endsetglyph

\setglyph{OOtehtaI}  \glyph{OtehtaI}{1000}\push\movert{\doubletehtasep}\glyph{OtehtaI}{1000}\pop\endsetglyph
\setglyph{OOtehtaII} \glyph{OtehtaII}{1000}\push\movert{\doubletehtasep}\glyph{OtehtaII}{1000}\pop\endsetglyph
\setglyph{OOtehtaIII}\glyph{OtehtaIII}{1000}\push\movert{\doubletehtasep}\glyph{OtehtaIII}{1000}\pop\endsetglyph
\setglyph{OOtehtaIV} \glyph{OtehtaIV}{1000}\push\movert{-\doubletehtasep}\glyph{OtehtaIV}{1000}\pop\endsetglyph

\setglyph{UUtehtaI}  \glyph{UtehtaI}{1000}\push\movert{\doubletehtasep}\glyph{UtehtaI}{1000}\pop\endsetglyph
\setglyph{UUtehtaII} \glyph{UtehtaII}{1000}\push\movert{\doubletehtasep}\glyph{UtehtaII}{1000}\pop\endsetglyph
\setglyph{UUtehtaIII}\glyph{UtehtaIII}{1000}\push\movert{\doubletehtasep}\glyph{UtehtaIII}{1000}\pop\endsetglyph
\setglyph{UUtehtaIV} \glyph{UtehtaIV}{1000}\push\movert{-\doubletehtasep}\glyph{UtehtaIV}{1000}\pop\endsetglyph

%\comment{Tengwar plus tehtar}

\setglyph{annaydots}    \glyph{anna}{1000}  \glyph{IItehtaVI}{1000}\endsetglyph

\setglyph{baranga}  \glyph{anga}{1000}  \glyph{Baroverleft}{1000}\endsetglyph
\setglyph{barungwe} \glyph{ungwe}{1000} \glyph{Baroverleft}{1000}\endsetglyph

\setleftrightkerning{annaydots}{anna}{1000}
\setleftrightkerning{baranga}{anga}{1000}
\setleftrightkerning{barungwe}{ungwe}{1000}

\setglyph{annaandaith}  \glyph{anna}{1000}  \glyph{EtehtaII}{1000}\endsetglyph
\setglyph{iandaith} \glyph{carrier}{1000}   \glyph{EtehtaIV}{1000}\endsetglyph
\setglyph{oreandaith}   \glyph{ore}{1000}   \glyph{EtehtaII}{1000}\endsetglyph
\setglyph{osseandaith}  \glyph{osse}{1000}  \glyph{Etehta\ossetehta}{1000}\endsetglyph
\setglyph{romenandaith} \glyph{romen}{1000} \glyph{Etehta\romentehta}{1000}\endsetglyph
\setglyph{silmenandaith}    \glyph{silmen}{1000}    \glyph{Etehta\silmentehta}{1000}\endsetglyph
\setglyph{ureandaith}   \glyph{ure}{1000}   \glyph{Etehta\uretehta}{1000}\endsetglyph
\setglyph{valaandaith}  \glyph{vala}{1000}  \glyph{EtehtaII}{1000}\endsetglyph
\setglyph{wilyaandaith} \glyph{wilya}{1000} \glyph{EtehtaII}{1000}\endsetglyph
\setglyph{yandaith} \glyph{longcarrier}{1000}   \glyph{EtehtaII}{1000}\endsetglyph
\setglyph{yantaandaith} \glyph{yanta}{1000} \glyph{Etehta\yantatehta}{1000}\endsetglyph

\setleftrightkerning{annaandaith}{anna}{1000}
\setleftrightkerning{iandaith}{carrier}{1000}
\setleftrightkerning{oreandaith}{ore}{1000}
\setleftrightkerning{osseandaith}{osse}{1000}
\setleftrightkerning{romenandaith}{romen}{1000}
\setleftrightkerning{silmenandaith}{silmen}{1000}
\setleftrightkerning{ureandaith}{ure}{1000}
\setleftrightkerning{valaandaith}{vala}{1000}
\setleftrightkerning{wilyaandaith}{wilya}{1000}
\setleftrightkerning{yandaith}{longcarrier}{1000}
\setleftrightkerning{yantaandaith}{yanta}{1000}

\setglyph{Iwilya}   \glyph{wilya}{1000} \glyph{ItehtaII}{1000}\endsetglyph
\setglyph{wilyatwist}   \glyph{wilya}{1000} \glyph{WtehtaII}{1000}\endsetglyph
\setglyph{IIwilya}  \glyph{wilya}{1000} \glyph{IItehtaII}{1000}\endsetglyph
\setglyph{ossetwist}    \glyph{osse}{1000}  \glyph{Wtehta\ossetehta}{1000}\endsetglyph
\setglyph{IIosse}   \glyph{osse}{1000}  \glyph{IItehta\ossetehta}{1000}\endsetglyph
\setglyph{uretwist} \glyph{ure}{1000}   \glyph{Wtehta\uretehta}{1000}\endsetglyph
\setglyph{IIure}    \glyph{ure}{1000}   \glyph{IItehta\uretehta}{1000}\endsetglyph
\setglyph{valatwist}    \glyph{vala}{1000}  \glyph{WtehtaII}{1000}\endsetglyph
\setglyph{IIvala}   \glyph{vala}{1000}  \glyph{IItehtaII}{1000}\endsetglyph
\setglyph{Avala}    \glyph{vala}{1000}  \glyph{AtehtaII}{1000}\endsetglyph

\setglyph{nwalmetwist}  \glyph{nwalme}{1000}    \glyph{WtehtaI}{1000}\endsetglyph
\setglyph{ungwetwist}   \glyph{ungwe}{1000} \glyph{WtehtaI}{1000}\endsetglyph

\setleftrightkerning{Iwilya}{wilya}{1000}
\setleftrightkerning{IIwilya}{wilya}{1000}
\setleftrightkerning{wilyatwist}{wilya}{1000}
\setleftrightkerning{ossetwist}{osse}{1000}
\setleftrightkerning{IIosse}{osse}{1000}
\setleftrightkerning{uretwist}{ure}{1000}
\setleftrightkerning{IIure}{ure}{1000}
\setleftrightkerning{valatwist}{vala}{1000}
\setleftrightkerning{IIvala}{vala}{1000}
\setleftrightkerning{Avala}{vala}{1000}

\setglyph{numenunderdot}    \glyph{numen}{1000} \glyph{ItehtaV}{1000}\endsetglyph
\setglyph{maltaunderdot} \glyph{malta}{1000}\glyph{ItehtaV}{1000}\endsetglyph
\setglyph{esseunderdot} \glyph{altesse}{1000}\glyph{Itehta\essesubtehta}{1000}\endsetglyph
\setglyph{oreunderdot} \glyph{ore}{1000}\glyph{ItehtaVI}{1000}\endsetglyph
\setglyph{romenunderdot} \glyph{romen}{1000}\glyph{Itehta\romensubtehta}{1000}\endsetglyph

\setleftrightkerning{numenunderdot}{numen}{1000}
\setleftrightkerning{maltaunderdot}{malta}{1000}
\setleftrightkerning{esseunderdot}{altesse}{1000}
\setleftrightkerning{oreunderdot}{ore}{1000}
\setleftrightkerning{romenunderdot}{romen}{1000}

\setglyph{yantatehtaI}  \glyph{hattehtaI}{1000}\endsetglyph
\setglyph{yantatehtaII} \glyph{hattehtaII}{1000}\endsetglyph
\setglyph{yantatehtaIII}\glyph{hattehtaIII}{1000}\endsetglyph
\setglyph{yantatehtaIV} \glyph{hattehtaIV}{1000}\endsetglyph

\setglyph{osseyanta}    \glyph{osse}{1000}  \glyph{yantatehta\ossetehta}{1000}\endsetglyph
\setglyph{annayanta}    \glyph{anna}{1000}  \glyph{yantatehtaII}{1000}\endsetglyph

\setglyph{Awilya}   \glyph{wilya}{1000} \glyph{AtehtaII}{1000}\endsetglyph

\setglyph{Aanna}    \glyph{anna}{1000}  \glyph{AtehtaII}{1000}\endsetglyph
\setglyph{Oanna}    \glyph{anna}{1000}  \glyph{OtehtaII}{1000}\endsetglyph
\setglyph{Uanna}    \glyph{anna}{1000}  \glyph{UtehtaII}{1000}\endsetglyph
\setglyph{Ayanta}   \glyph{yanta}{1000} \glyph{Atehta\yantatehta}{1000}\endsetglyph
\setglyph{Oyanta}   \glyph{yanta}{1000} \glyph{Otehta\yantatehta}{1000}\endsetglyph
\setglyph{Uyanta}   \glyph{yanta}{1000} \glyph{Utehta\yantatehta}{1000}\endsetglyph
\setglyph{Aure} \glyph{ure}{1000}   \glyph{Atehta\uretehta}{1000}\endsetglyph
\setglyph{Eure} \glyph{ure}{1000}   \glyph{Etehta\uretehta}{1000}\endsetglyph
\setglyph{Iure} \glyph{ure}{1000}   \glyph{Itehta\uretehta}{1000}\endsetglyph
\setglyph{Oure} \glyph{ure}{1000}   \glyph{Otehta\uretehta}{1000}\endsetglyph

\setglyph{Asilmen}  \glyph{silmen}{1000}    \glyph{Atehta\silmentehta}{1000}\endsetglyph
\setglyph{Esilmen}  \glyph{silmen}{1000}    \glyph{Etehta\silmentehta}{1000}\endsetglyph
\setglyph{Isilmen}  \glyph{silmen}{1000}    \glyph{Itehta\silmentehta}{1000}\endsetglyph
\setglyph{Osilmen}  \glyph{silmen}{1000}    \glyph{Otehta\silmentehta}{1000}\endsetglyph
\setglyph{Usilmen}  \glyph{silmen}{1000}    \glyph{Utehta\silmentehta}{1000}\endsetglyph
\setglyph{Aessen}   \glyph{essen}{1000} \glyph{Atehta\essentehta}{1000}\endsetglyph
\setglyph{Eessen}   \glyph{essen}{1000} \glyph{Etehta\essentehta}{1000}\endsetglyph
\setglyph{Iessen}   \glyph{essen}{1000} \glyph{Itehta\essentehta}{1000}\endsetglyph
\setglyph{Oessen}   \glyph{essen}{1000} \glyph{Otehta\essentehta}{1000}\endsetglyph
\setglyph{Uessen}   \glyph{essen}{1000} \glyph{Utehta\essentehta}{1000}\endsetglyph

\setleftrightkerning{osseyanta}{osse}{1000}
\setleftrightkerning{annayanta}{anna}{1000}
\setleftrightkerning{Awilya}{wilya}{1000}

\setleftrightkerning{Aanna}{anna}{1000}
\setleftrightkerning{Oanna}{anna}{1000}
\setleftrightkerning{Uanna}{anna}{1000}
\setleftrightkerning{Ayanta}{yanta}{1000}
\setleftrightkerning{Oyanta}{yanta}{1000}
\setleftrightkerning{Uyanta}{yanta}{1000}
\setleftrightkerning{Aure}{ure}{1000}
\setleftrightkerning{Eure}{ure}{1000}
\setleftrightkerning{Iure}{ure}{1000}
\setleftrightkerning{Oure}{ure}{1000}

\setleftrightkerning{Asilmen}{silmen}{1000}
\setleftrightkerning{Esilmen}{silmen}{1000}
\setleftrightkerning{Isilmen}{silmen}{1000}
\setleftrightkerning{Osilmen}{silmen}{1000}
\setleftrightkerning{Usilmen}{silmen}{1000}
\setleftrightkerning{Aessen}{essen}{1000}
\setleftrightkerning{Eessen}{essen}{1000}
\setleftrightkerning{Iessen}{essen}{1000}
\setleftrightkerning{Oessen}{essen}{1000}
\setleftrightkerning{Uessen}{essen}{1000}

\setglyph{Anumen}   \glyph{numen}{1000}\glyph{AtehtaI}{1000}\endsetglyph
\setglyph{Enumen}   \glyph{numen}{1000}\glyph{EtehtaI}{1000}\endsetglyph
\setglyph{Inumen}   \glyph{numen}{1000}\glyph{ItehtaI}{1000}\endsetglyph
\setglyph{Onumen}   \glyph{numen}{1000}\glyph{OtehtaI}{1000}\endsetglyph
\setglyph{Unumen}   \glyph{numen}{1000}\glyph{UtehtaI}{1000}\endsetglyph
\setglyph{IInumen}  \glyph{numen}{1000}\glyph{IItehtaI}{1000}\endsetglyph
\setglyph{EEnumen}  \glyph{numen}{1000}\glyph{EEtehtaI}{1000}\endsetglyph
\setglyph{OOnumen}  \glyph{numen}{1000}\glyph{OOtehtaI}{1000}\endsetglyph
\setglyph{UUnumen}  \glyph{numen}{1000}\glyph{UUtehtaI}{1000}\endsetglyph
\setglyph{Ynumen}   \glyph{numen}{1000}\glyph{YtehtaI}{1000}\endsetglyph

\setglyph{Amalta}   \glyph{malta}{1000}\glyph{AtehtaI}{1000}\endsetglyph
\setglyph{Emalta}   \glyph{malta}{1000}\glyph{EtehtaI}{1000}\endsetglyph
\setglyph{Imalta}   \glyph{malta}{1000}\glyph{ItehtaI}{1000}\endsetglyph
\setglyph{Omalta}   \glyph{malta}{1000}\glyph{OtehtaI}{1000}\endsetglyph
\setglyph{Umalta}   \glyph{malta}{1000}\glyph{UtehtaI}{1000}\endsetglyph
\setglyph{IImalta}  \glyph{malta}{1000}\glyph{IItehtaI}{1000}\endsetglyph
\setglyph{EEmalta}  \glyph{malta}{1000}\glyph{EEtehtaI}{1000}\endsetglyph
\setglyph{OOmalta}  \glyph{malta}{1000}\glyph{OOtehtaI}{1000}\endsetglyph
\setglyph{UUmalta}  \glyph{malta}{1000}\glyph{UUtehtaI}{1000}\endsetglyph
\setglyph{Ymalta}   \glyph{malta}{1000}\glyph{YtehtaI}{1000}\endsetglyph

\setglyph{Aquesse}  \glyph{quesse}{1000}\glyph{AtehtaII}{1000}\endsetglyph
\setglyph{Equesse}  \glyph{quesse}{1000}\glyph{EtehtaII}{1000}\endsetglyph
\setglyph{Iquesse}  \glyph{quesse}{1000}\glyph{ItehtaII}{1000}\endsetglyph
\setglyph{Oquesse}  \glyph{quesse}{1000}\glyph{OtehtaII}{1000}\endsetglyph
\setglyph{Uquesse}  \glyph{quesse}{1000}\glyph{UtehtaII}{1000}\endsetglyph
\setglyph{IIquesse} \glyph{quesse}{1000}\glyph{IItehtaII}{1000}\endsetglyph
\setglyph{EEquesse} \glyph{quesse}{1000}\glyph{EEtehtaII}{1000}\endsetglyph
\setglyph{OOquesse} \glyph{quesse}{1000}\glyph{OOtehtaII}{1000}\endsetglyph
\setglyph{UUquesse} \glyph{quesse}{1000}\glyph{UUtehtaII}{1000}\endsetglyph
\setglyph{Yquesse}  \glyph{quesse}{1000}\glyph{YtehtaII}{1000}\endsetglyph

\setglyph{Atinco}   \glyph{tinco}{1000}\glyph{AtehtaII}{1000}\endsetglyph
\setglyph{Etinco}   \glyph{tinco}{1000}\glyph{EtehtaII}{1000}\endsetglyph
\setglyph{Itinco}   \glyph{tinco}{1000}\glyph{ItehtaII}{1000}\endsetglyph
\setglyph{Otinco}   \glyph{tinco}{1000}\glyph{OtehtaII}{1000}\endsetglyph
\setglyph{Utinco}   \glyph{tinco}{1000}\glyph{UtehtaII}{1000}\endsetglyph
\setglyph{IItinco}  \glyph{tinco}{1000}\glyph{IItehtaII}{1000}\endsetglyph
\setglyph{EEtinco}  \glyph{tinco}{1000}\glyph{EEtehtaII}{1000}\endsetglyph
\setglyph{OOtinco}  \glyph{tinco}{1000}\glyph{OOtehtaII}{1000}\endsetglyph
\setglyph{UUtinco}  \glyph{tinco}{1000}\glyph{UUtehtaII}{1000}\endsetglyph
\setglyph{Ytinco}   \glyph{tinco}{1000}\glyph{YtehtaII}{1000}\endsetglyph

\setleftrightkerning{Anumen}{numen}{1000}
\setleftrightkerning{Enumen}{numen}{1000}
\setleftrightkerning{Inumen}{numen}{1000}
\setleftrightkerning{Onumen}{numen}{1000}
\setleftrightkerning{Unumen}{numen}{1000}
\setleftrightkerning{IInumen}{numen}{1000}
\setleftrightkerning{EEnumen}{numen}{1000}
\setleftrightkerning{OOnumen}{numen}{1000}
\setleftrightkerning{UUnumen}{numen}{1000}
\setleftrightkerning{Ynumen}{numen}{1000}

\setleftrightkerning{Amalta}{malta}{1000}
\setleftrightkerning{Emalta}{malta}{1000}
\setleftrightkerning{Imalta}{malta}{1000}
\setleftrightkerning{Omalta}{malta}{1000}
\setleftrightkerning{Umalta}{malta}{1000}
\setleftrightkerning{IImalta}{malta}{1000}
\setleftrightkerning{EEmalta}{malta}{1000}
\setleftrightkerning{OOmalta}{malta}{1000}
\setleftrightkerning{UUmalta}{malta}{1000}
\setleftrightkerning{Ymalta}{malta}{1000}

\setleftrightkerning{Aquesse}{quesse}{1000}
\setleftrightkerning{Equesse}{quesse}{1000}
\setleftrightkerning{Iquesse}{quesse}{1000}
\setleftrightkerning{Oquesse}{quesse}{1000}
\setleftrightkerning{Uquesse}{quesse}{1000}
\setleftrightkerning{IIquesse}{quesse}{1000}
\setleftrightkerning{EEquesse}{quesse}{1000}
\setleftrightkerning{OOquesse}{quesse}{1000}
\setleftrightkerning{UUquesse}{quesse}{1000}
\setleftrightkerning{Yquesse}{quesse}{1000}

\setleftrightkerning{Atinco}{tinco}{1000}
\setleftrightkerning{Etinco}{tinco}{1000}
\setleftrightkerning{Itinco}{tinco}{1000}
\setleftrightkerning{Otinco}{tinco}{1000}
\setleftrightkerning{Utinco}{tinco}{1000}
\setleftrightkerning{IItinco}{tinco}{1000}
\setleftrightkerning{EEtinco}{tinco}{1000}
\setleftrightkerning{OOtinco}{tinco}{1000}
\setleftrightkerning{UUtinco}{tinco}{1000}
\setleftrightkerning{Ytinco}{tinco}{1000}

\setglyph{xcalma}   \glyph{calma}{1000} \glyph{scurlIII}{1000}\endsetglyph
\setglyph{xquesse}  \glyph{quesse}{1000}    \glyph{scurlIII}{1000}\endsetglyph
\setglyph{twistquesse}  \glyph{quesse}{1000}    \glyph{WtehtaII}{1000}\endsetglyph

\setleftrightkerning{xcalma}{calma}{1000}
\setleftrightkerning{xquesse}{quesse}{1000}
\setleftrightkerning{twistquesse}{quesse}{1000}

\setglyph{startIcarrier}    \glyph{carrier}{1000}   \glyph{ItehtaIV}{1000}\endsetglyph
\setglyph{Acarrierdouble}   \glyph{carrier}{1000}   \glyph{AtehtaIV}{1000}\glyph{carrier}{1000} \glyph{AtehtaIV}{1000}\endsetglyph
\setglyph{Acarrier} \glyph{carrier}{1000}   \glyph{AtehtaIV}{1000}\endsetglyph
\setglyph{Ecarrier} \glyph{carrier}{1000}   \glyph{EtehtaIV}{1000}\endsetglyph
\setglyph{Icarrier} \glyph{carrier}{1000}   \glyph{ItehtaIV}{1000}\endsetglyph
\setglyph{Ocarrier} \glyph{carrier}{1000}   \glyph{OtehtaIV}{1000}\endsetglyph
\setglyph{Ucarrier} \glyph{carrier}{1000}   \glyph{UtehtaIV}{1000}\endsetglyph
\setglyph{Ycarrier} \glyph{carrier}{1000}   \glyph{YtehtaIV}{1000}\endsetglyph
\setglyph{Anodipthong}  \glyph{carrier}{1000}   \glyph{AtehtaIV}{1000}\endsetglyph
\setglyph{Enodipthong}  \glyph{carrier}{1000}   \glyph{EtehtaIV}{1000}\endsetglyph
\setglyph{Inodipthong}  \glyph{carrier}{1000}   \glyph{ItehtaIV}{1000}\endsetglyph
\setglyph{Onodipthong}  \glyph{carrier}{1000}   \glyph{OtehtaIV}{1000}\endsetglyph
\setglyph{Unodipthong}  \glyph{carrier}{1000}   \glyph{UtehtaIV}{1000}\endsetglyph
\setglyph{Ynodipthong}  \glyph{carrier}{1000}   \glyph{YtehtaIV}{1000}\endsetglyph
\setglyph{Alongcarrier} \glyph{longcarrier}{1000}   \glyph{AtehtaIV}{1000}\endsetglyph
\setglyph{Elongcarrier} \glyph{longcarrier}{1000}   \glyph{EtehtaIV}{1000}\endsetglyph
\setglyph{Ilongcarrier} \glyph{longcarrier}{1000}   \glyph{ItehtaIV}{1000}\endsetglyph
\setglyph{Olongcarrier} \glyph{longcarrier}{1000}   \glyph{OtehtaIV}{1000}\endsetglyph
\setglyph{Ulongcarrier} \glyph{longcarrier}{1000}   \glyph{UtehtaIV}{1000}\endsetglyph
\setglyph{Ylongcarrier} \glyph{longcarrier}{1000}   \glyph{YtehtaIV}{1000}\endsetglyph
\setglyph{EEcarrier}    \glyph{carrier}{1000}   \glyph{EEtehtaIV}{1000}\endsetglyph
\setglyph{IIcarrier}    \glyph{carrier}{1000}   \glyph{IItehtaIV}{1000}\endsetglyph
\setglyph{OOcarrier}    \glyph{carrier}{1000}   \glyph{OOtehtaIV}{1000}\endsetglyph
\setglyph{UUcarrier}    \glyph{carrier}{1000}   \glyph{UUtehtaIV}{1000}\endsetglyph
\setglyph{IIlongcarrier}    \glyph{longcarrier}{1000}   \glyph{IItehtaIV}{1000}\endsetglyph

%\comment{Letters plus S-curls}

\setglyph{scurlOE}  \glyph{yanta}{1000} \glyph{scurlII}{1000}\endsetglyph
%\setglyph{scurlIIE}    \glyph{yanta}{1000} \glyph{scurlII}{1000}\endsetglyph
\setglyph{scurlVE}  \glyph{yanta}{1000} \glyph{scurlII}{1000}\endsetglyph
\setglyph{scurlsilmeE}  \glyph{yanta}{1000} \glyph{scurlII}{1000}\endsetglyph

%\comment{Shifted characters}

\setglyph{Barover}  \push\movert{\width{ando}}  \glyph{Baroverleft}{1000}\pop\endsetglyph
\setglyph{Barovernotehtar}  \push\movert{\width{ando}}  \glyph{Baroverleft}{1000}\pop\endsetglyph
\setglyph{barover}  \push\movert{\width{tinco}} \glyph{baroverleft}{1000}\pop\endsetglyph
\setglyph{barovernotehtar}  \push\movert{\width{tinco}} \glyph{baroverleft}{1000}\pop\endsetglyph
\setglyph{barunder} \push\movert{\width{tinco}} \glyph{barunderleft}{1000}\pop\endsetglyph
\setglyph{Barunder} \push\movert{\width{ando}}  \glyph{Barunderleft}{1000}\pop\endsetglyph
\setglyph{barL} \push\movert{\width{lambe}} \glyph{barLleft}{1000}\pop\endsetglyph
\setglyph{tildeL}   \push\movert{\width{lambe}} \glyph{tildeLleft}{1000}\pop\endsetglyph

\setglyph{dotposttehtaV}    \push\movert{\width{ando}}\glyph{ItehtaV}{1000}\pop\endsetglyph
\setglyph{dotposttehtaVI}   \push\movert{\width{tinco}}\glyph{ItehtaVI}{1000}\pop\endsetglyph
\setglyph{dotposttehtaVII}  \push\movert{\IIItehtaskip}\glyph{ItehtaVI}{1000}\pop\endsetglyph
\setglyph{dotposttehtaVIII} \push\movert{\width{carrier}}\glyph{ItehtaVIII}{1000}\pop\endsetglyph
\setglyph{dotposttehtaL}    \push\movert{\width{lambe}}\glyph{ItehtaL}{1000}\pop\endsetglyph

\setglyph{AposttehtaI}  \push\movert{\width{ando}}\glyph{AtehtaI}{1000}\pop\endsetglyph
\setglyph{AposttehtaII} \push\movert{\width{tinco}}\glyph{AtehtaII}{1000}\pop\endsetglyph
\setglyph{AposttehtaIII}    \push\movert{\IIItehtaskip}\glyph{AtehtaII}{1000}\pop\endsetglyph

\setglyph{EposttehtaI}  \push\movert{\width{ando}}\glyph{EtehtaI}{1000}\pop\endsetglyph
\setglyph{EposttehtaII} \push\movert{\width{tinco}}\glyph{EtehtaII}{1000}\pop\endsetglyph
\setglyph{EposttehtaIII}    \push\movert{\IIItehtaskip}\glyph{EtehtaII}{1000}\pop\endsetglyph

\setglyph{IposttehtaI}  \push\movert{\width{ando}}\glyph{ItehtaI}{1000}\pop\endsetglyph
\setglyph{IposttehtaII} \push\movert{\width{tinco}}\glyph{ItehtaII}{1000}\pop\endsetglyph
\setglyph{IposttehtaIII}    \push\movert{\IIItehtaskip}\glyph{ItehtaII}{1000}\pop\endsetglyph

\setglyph{OposttehtaI}  \push\movert{\width{ando}}\glyph{OtehtaI}{1000}\pop\endsetglyph
\setglyph{OposttehtaII} \push\movert{\width{tinco}}\glyph{OtehtaII}{1000}\pop\endsetglyph
\setglyph{OposttehtaIII}    \push\movert{\IIItehtaskip}\glyph{OtehtaII}{1000}\pop\endsetglyph

\setglyph{UposttehtaI}  \push\movert{\width{ando}}\glyph{UtehtaI}{1000}\pop\endsetglyph
\setglyph{UposttehtaII} \push\movert{\width{tinco}}\glyph{UtehtaII}{1000}\pop\endsetglyph
\setglyph{UposttehtaIII}    \push\movert{\IIItehtaskip}\glyph{UtehtaII}{1000}\pop\endsetglyph

\setglyph{EEposttehtaI} \push\movert{\width{ando}}\glyph{EEtehtaI}{1000}\pop\endsetglyph
\setglyph{EEposttehtaII}    \push\movert{\width{tinco}}\glyph{EEtehtaII}{1000}\pop\endsetglyph
\setglyph{EEposttehtaIII}   \push\movert{\IIItehtaskip}\glyph{EEtehtaII}{1000}\pop\endsetglyph

\setglyph{IIposttehtaI} \push\movert{\width{ando}}\glyph{IItehtaI}{1000}\pop\endsetglyph
\setglyph{IIposttehtaII}    \push\movert{\width{tinco}}\glyph{IItehtaII}{1000}\pop\endsetglyph
\setglyph{IIposttehtaIII}   \push\movert{\IIItehtaskip}\glyph{IItehtaII}{1000}\pop\endsetglyph

\setglyph{OOposttehtaI} \push\movert{\width{ando}}\glyph{OOtehtaI}{1000}\pop\endsetglyph
\setglyph{OOposttehtaII}    \push\movert{\width{tinco}}\glyph{OOtehtaII}{1000}\pop\endsetglyph
\setglyph{OOposttehtaIII}   \push\movert{\IIItehtaskip}\glyph{OOtehtaII}{1000}\pop\endsetglyph

\setglyph{UUposttehtaI} \push\movert{\width{ando}}\glyph{UUtehtaI}{1000}\pop\endsetglyph
\setglyph{UUposttehtaII}    \push\movert{\width{tinco}}\glyph{UUtehtaII}{1000}\pop\endsetglyph
\setglyph{UUposttehtaIII}   \push\movert{\IIItehtaskip}\glyph{UUtehtaII}{1000}\pop\endsetglyph

\setglyph{YposttehtaI}  \push\movert{\width{ando}}\glyph{YtehtaI}{1000}\pop\endsetglyph
\setglyph{YposttehtaII} \push\movert{\width{tinco}}\glyph{YtehtaII}{1000}\pop\endsetglyph
\setglyph{YposttehtaIII}    \push\movert{\IIItehtaskip}\glyph{YtehtaII}{1000}\pop\endsetglyph

%\comment{Faked glyphs: use these if the base font doesn't have them}

\setglyph{altscurlI}   \glyph{scurlO}{1000}\endsetglyph
\setglyph{althwtengwa} \glyph{hwtengwa}{1000}\endsetglyph

\setglyph{altromen}    \glyph{romen}{1000}\endsetglyph
\setglyph{altanna}     \glyph{anna}{1000}\endsetglyph
\setglyph{altessen}    \glyph{essen}{1000}\endsetglyph
\setglyph{altmhellyn}  \ifisglyph{valacurl}\then\glyph{valacurl}{1000}\else\glyph{vala}{1000}\fi\glyph{scurlO}{1000} \endsetglyph

%\comment{All existing base fonts have these, but just in case...}

\setglyph{altesse}  \glyph{esse}{1000}\endsetglyph
\setglyph{altosse}  \glyph{osse}{1000}\endsetglyph
\setglyph{altsilme} \glyph{silme}{1000}\endsetglyph
\setglyph{altsilmen}\glyph{silmen}{1000}\endsetglyph
\setglyph{mhellyn}  \ifisglyph{maltacurl}\then\glyph{maltacurl}{1000}\else\glyph{malta}{1000}\fi\glyph{scurlO}{1000} \endsetglyph


%\comment{These are fakes of glyphs that I use in no current modes; provided for convenience}

\setglyph{altcarrier}    \glyph{carrier}{1000}\endsetglyph
\setglyph{altlongcarrier}\glyph{longcarrier}{1000}\endsetglyph
\setglyph{altone} \glyph{tengone}{1000}\endsetglyph
\setglyph{altfour}\glyph{tengfour}{1000}\endsetglyph
\setglyph{altsix} \glyph{tengsix}{1000}\endsetglyph
\setglyph{alttengtwelve} \glyph{tengzero}{1000}\glyph{tengone}{1000}\endsetglyph

\setglyph{altYtehtaI}   \glyph{YtehtaI}{1000}\endsetglyph
\setglyph{altYtehtaII}  \glyph{YtehtaII}{1000}\endsetglyph
\setglyph{altYtehtaIII} \glyph{YtehtaIII}{1000}\endsetglyph
\setglyph{altYtehtaIV}  \glyph{YtehtaIV}{1000}\endsetglyph
\setglyph{altUtehtaI}   \glyph{UtehtaI}{1000}\endsetglyph
\setglyph{altUtehtaII}  \glyph{UtehtaII}{1000}\endsetglyph
\setglyph{altUtehtaIII} \glyph{UtehtaIII}{1000}\endsetglyph
\setglyph{altUtehtaIV}  \glyph{UtehtaIV}{1000}\endsetglyph

\setglyph{revAtehtaI}   \push\moveup{\height{Barover}}\moveup{\depth{AtehtaV}}   \glyph{AtehtaV}{1000}\pop\endsetglyph
\setglyph{revAtehtaII}  \push\moveup{\height{Barover}}\moveup{\depth{AtehtaVI}}  \glyph{AtehtaVI}{1000}\pop\endsetglyph
\setglyph{revAtehtaIII} \push\moveup{\height{Barover}}\moveup{\depth{AtehtaVII}} \glyph{AtehtaVII}{1000}\pop\endsetglyph
\setglyph{revAtehtaIV}  \push\moveup{\height{Barover}}\moveup{\depth{AtehtaVIII}}\glyph{AtehtaVIII}{1000}\pop\endsetglyph
\setglyph{circtehtaI}   \push\moveup{\height{Barover}}\moveup{\depth{circtehtaV}}   \glyph{circtehtaV}{1000}\pop\endsetglyph
\setglyph{circtehtaII}  \push\moveup{\height{Barover}}\moveup{\depth{circtehtaVI}}  \glyph{circtehtaVI}{1000}\pop\endsetglyph
\setglyph{circtehtaIII} \push\moveup{\height{Barover}}\moveup{\depth{circtehtaVII}} \glyph{circtehtaVII}{1000}\pop\endsetglyph
\setglyph{circtehtaIV}  \push\moveup{\height{Barover}}\moveup{\depth{circtehtaVIII}}\glyph{circtehtaVIII}{1000}\pop\endsetglyph

\endmetrics