% special distinction EURO-TeX/tm.fonts/dm.fonts
\ifx\rm\undefined\relax
\else\rm
\def\wordsplita#1#2#3.{#1}%
\def\wordsplitb#1#2#3.{#2}%
%
\ifx\fonthdg\undefined
  \edef\fonthdg{\expandafter\wordsplita\fontname\the\font.}\fi
\ifx\fonthdge\undefined
  \edef\fonthdge{\expandafter\wordsplitb\fontname\the\font.}\fi
\fi

\newif\ifeurotex
\immediate\write16{ Font heading:\fonthdg\fonthdge}\relax
\if\fonthdg d\relax
  \if\fonthdge c\relax
    \immediate\write16{ DC fonts active}%
    \eurotextrue
  \fi
\fi
%
\if\fonthdg e\relax
  \if\fonthdge c\relax
    \immediate\write16{ EC fonts active}%
    \eurotextrue
  \fi
\fi
%
\ifx\protect\undefined\let\protect\relax\fi
%
% ================== Special accent macro codes  ============================
% taken from dc-plain.ch
\ifeurotex
  \def\acute{\mathaccent"7001 }
  \def\grave{\mathaccent"7000 }
  \def\ddot{\mathaccent"7004 }
  \def\tilde{\mathaccent"7003 }
  \def\bar{\mathaccent"7009 }
  \def\breve{\mathaccent"7008 }
  \def\check{\mathaccent"7007 }
  \def\hat{\mathaccent"7002 }
  \def\vec{\mathaccent"017E }
  \def\dot{\mathaccent"700A }
  \def\ss{^^ff}
  \def\ae{^^e6}
  \def\oe{^^f7}
  \def\o{^^f8}
  \def\AE{^^c6}
  \def\OE{^^d7}
  \def\O{^^d8}
  \def\i{^^19}\def\j{^^1a} % dotless letters
  \def\aa{^^e5}
  \def\AA{^^c5}
  \def\l{^^aa} %backslash-lowercase L for Polish waw}
  \def\L{^^8a}
  \def\th{^^fe}
  \def\TH{^^de}
  \def\dh{^^f0}
  \def\DH{^^d0}
  \def\dj{^^9e}
  \def\DJ{^^d0}
  \def\ng{^^ad}
  \def\NG{^^8d}
  \def\SS{^^df}
\else  
  \def\ae{^^1a}
  \def\oe{^^1b}
  \def\o{^^1c}
  \def\AE{^^1d}
  \def\OE{^^1e}
  \def\O{^^1f}
  \def\i{^^10}
  \def\j{^^11} % dotless letters
\fi

\ifeurotex
  \def\b#1{\oalign{#1\crcr\hidewidth
    \vbox to.2ex{\hbox{\char"09}\vss}\hidewidth}}
\fi

\ifeurotex
\def\@gr@#1{{\accent"00 #1}}
\else
\def\@gr@#1{{\accent18 #1}}
\fi

\def\`#1{\ifx#1a^^e0% {}
  \else\ifx#1e^^e8% {}
  \else\ifx#1\i ^^ec% {}
  \else\ifx#1i^^ec% {}
  \else\ifx#1o^^f2% {}
  \else\ifx#1u^^f9% {}
  \else\ifx#1A^^c0% {}
  \else\ifx#1E^^c8% {}
  \else\ifx#1I^^cc% {}
  \else\ifx#1O^^d2% {}
  \else\ifx#1U^^d9% {}
  \else\protect\@gr@{#1}%
  \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}

\def\c@{\@c@}
\ifeurotex
\def\@c@#1{\setbox\z@\hbox{#1}\ifdim\ht\z@=1ex\accent"0B #1%
  \else{\ooalign{\hidewidth\char"0B\hidewidth\crcr\unhbox\z@}}\fi}%
\else
\def\@c@#1{\setbox\z@\hbox{#1}\ifdim\ht\z@=1ex\accent 24 #1%
  \else{\ooalign{\hidewidth\char 24\hidewidth\crcr\unhbox\z@}}\fi}%
\fi


\ifeurotex
\def\c#1{\ifx#1c^^e7% {}
  \else\ifx#1a^^a1% {}
  \else\ifx#1e^^a6% {}
  \else\ifx#1s^^b3% {}
  \else\ifx#1t^^b5% {}
  \else\ifx#1C^^c7% {}
  \else\ifx#1A^^81% {}
  \else\ifx#1E^^86% {}
  \else\ifx#1S^^93% {}
  \else\ifx#1T^^95% {}
  \else\protect\@c@{#1}%
  \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}
\else
\def\c#1{\ifx#1c^^e7% {}
  \else\ifx#1C^^c7% {}
  \else\protect\@c@{#1}%
  \fi\fi}
\fi

\ifeurotex
\def\@r@#1{{\accent"06 #1}}
\else
\def\@r@#1{{\accent"17 #1}}
\fi

\ifeurotex
\def\r#1{\ifx#1a^^e5% {}
  \else\ifx#1A^^c5% {}
  \else\ifx#1u^^b7% {}
  \else\ifx#1U^^97% {}
  \else\protect\@r@{#1}%
  \fi\fi\fi\fi}
\else
\def\r#1{\ifx#1a^^e5% {}
  \else\ifx#1A^^c5% {}
  \else\protect\@r@{#1}%
  \fi\fi}
\fi

\ifeurotex
\def\@ac@#1{{\accent"01 #1}}
\else
\def\@ac@#1{{\accent19 #1}}
\fi

\ifeurotex
\def\'#1{\ifx#1a^^e1% {}
  \else\ifx#1e^^e9% {}
  \else\ifx#1\i ^^ed% {}
  \else\ifx#1i^^ed% {}
  \else\ifx#1o^^f3% {}
  \else\ifx#1u^^fa% {}
  \else\ifx#1y^^fd% {}
  \else\ifx#1c^^a2% {}
  \else\ifx#1l^^a8% {}
  \else\ifx#1n^^ab% {}
  \else\ifx#1r^^af% {}
  \else\ifx#1s^^b1% {}
  \else\ifx#1z^^b9% {}
  \else\ifx#1A^^c1% {}
  \else\ifx#1E^^c9% {}
  \else\ifx#1I^^cd% {}
  \else\ifx#1O^^d3% {}
  \else\ifx#1U^^da% {}
  \else\ifx#1Y^^dd% {}
  \else\ifx#1C^^82% {}
  \else\ifx#1L^^88% {}
  \else\ifx#1N^^8b% {}
  \else\ifx#1R^^8f% {}
  \else\ifx#1S^^91% {}
  \else\ifx#1Z^^99% {}
  \else\protect\@ac@{#1}%
  \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}
\else
\def\'#1{\ifx#1a^^e1% {}
  \else\ifx#1e^^e9% {}
  \else\ifx#1\i ^^ed% {}
  \else\ifx#1i^^ed% {}
  \else\ifx#1o^^f3% {}
  \else\ifx#1u^^fa% {}
  \else\ifx#1y^^fd% {}
  \else\ifx#1A^^c1% {}
  \else\ifx#1E^^c9% {}
  \else\ifx#1I^^cd% {}
  \else\ifx#1O^^d3% {}
  \else\ifx#1U^^da% {}
  \else\ifx#1Y^^dd% {}
  \else\protect\@ac@{#1}%
  \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}
\fi

\ifeurotex
\def\@v@#1{{\accent"07 #1}}
\else
\def\@v@#1{{\accent 20 #1}}
\fi

\ifeurotex
\def\v#1{\ifx#1c^^a3% {}
  \else\ifx#1d^^a4% {}
  \else\ifx#1e^^a5% {}
  \else\ifx#1n^^ac% {}
  \else\ifx#1r^^b0% {}
  \else\ifx#1s^^b2% {}
  \else\ifx#1t^^b4% {}
  \else\ifx#1l^^a9% {}
  \else\ifx#1C^^83% {}
  \else\ifx#1D^^84% {}
  \else\ifx#1E^^85% {}
  \else\ifx#1N^^8c% {}
  \else\ifx#1R^^90% {}
  \else\ifx#1S^^92% {}
  \else\ifx#1T^^94% {}
  \else\ifx#1L^^89% {}
  \else\protect\@v@{#1}%
  \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}
\else
\def\v#1{\protect\@v@{#1}}%
\fi

\ifeurotex
\def\@u@#1{{\accent"08 #1}}
\else
\def\@u@#1{{\accent 21 #1}}
\fi

%\check

\ifeurotex
\def\u#1{\ifx#1a^^a0% {}
  \else\ifx#1g^^a7% {}
  \else\ifx#1A^^80% {}
  \else\ifx#1G^^87% {}
  \else\protect\@u@{#1}%
  \fi\fi\fi\fi}
\else
\def\u#1{\protect\@u@{#1}}%
\fi

\ifeurotex
\def\@dot@#1{{\accent"0A #1}}
\else
\def\@dot@#1{{\accent 95 #1}}
\fi

%\check

\ifeurotex
\def\.#1{\ifx#1z^^bb% {}
  \else\ifx#1Z^^9b% {}
  \else\ifx#1I^^9d% {}
  \else\protect\@dot@{#1}%
  \fi\fi\fi}
\else
\def\.#1{\protect\@dot@{#1}}%
\fi

%\check

\ifeurotex
\def\@H@#1{{\accent"05 #1}}
\else
\def\@H@#1{{\accent"7D #1}}
\fi

\ifeurotex
\def\H#1{\ifx#1o^^ae% {}
  \else\ifx#1u^^b6% {}
  \else\ifx#1O^^8e% {}
  \else\ifx#1U^^96% {}
  \else\protect\@H@{#1}%
  \fi\fi\fi\fi}
\else
\def\H#1{\protect\@H@{#1}}%
\fi

%\check

\ifeurotex
\def\@um@#1{{\accent"04 #1}}
\else
\def\@um@#1{{\accent"7F #1}}
\fi

\ifeurotex
\def\"#1{\ifx#1a^^e4% {}
  \else\ifx#1e^^eb% {}
  \else\ifx#1\i ^^ef% {}
  \else\ifx#1i^^ef% {}
  \else\ifx#1o^^f6% {}
  \else\ifx#1u^^fc% {}
  \else\ifx#1y^^b8% {}
  \else\ifx#1A^^c4% {}
  \else\ifx#1E^^cb% {}
  \else\ifx#1I^^cf% {}
  \else\ifx#1O^^d6% {}
  \else\ifx#1U^^dc% {}
  \else\ifx#1Y^^98% {}
  \else\protect\@um@{#1}%
  \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}
\else
\def\"#1{\ifx#1a^^e4% {}
  \else\ifx#1e^^eb% {}
  \else\ifx#1\i ^^ef% {}
  \else\ifx#1i^^ef% {}
  \else\ifx#1o^^f6% {}
  \else\ifx#1u^^fc% {}
  \else\ifx#1A^^c4% {}
  \else\ifx#1E^^cb% {}
  \else\ifx#1I^^cf% {}
  \else\ifx#1O^^d6% {}
  \else\ifx#1U^^dc% {}
  \else\protect\@um@{#1}%
  \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}
\fi


\ifeurotex
\def\@eq@#1{{\accent"09 #1}}
\else
\def\@eq@#1{{\accent22 #1}}
\fi

\def\=#1{\protect\@eq@{#1}}

\ifeurotex
\def\@hat@#1{{\accent"02 #1}}
\else
\def\@hat@#1{{\accent94 #1}}
\fi

\def\^#1{\ifx#1a^^e2% {}
  \else\ifx#1e^^ea% {}
  \else\ifx#1\i ^^ee% {}
  \else\ifx#1i^^ee% {}
  \else\ifx#1o^^f4% {}
  \else\ifx#1u^^fb% {}
  \else\ifx#1A^^c2% {}
  \else\ifx#1E^^ca% {}
  \else\ifx#1I^^ce% {}
  \else\ifx#1O^^d4% {}
  \else\ifx#1U^^db% {}
  \else\protect\@hat@{#1}%
  \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi\fi}

%\check


\ifeurotex
\def\@til@#1{{\accent"03 #1}}
\else
\def\@til@#1{{\accent"7E #1}}
\fi

\def\~#1{\ifx#1a^^e3% {}
  \else\ifx#1n^^f1% {}
  \else\ifx#1o^^f5% {}
  \else\ifx#1A^^c3% {}
  \else\ifx#1N^^d1% {}
  \else\ifx#1O^^d5% {}
  \else\protect\@til@{#1}%
  \fi\fi\fi\fi\fi\fi}

\ifeurotex
% normal greek symbols : lower case slanted, uppercase upright
\mathchardef\Gamma="0180
\mathchardef\Delta="0181
\mathchardef\Theta="0182
\mathchardef\Lambda="0183
\mathchardef\Xi="0184
\mathchardef\Pi="0185
\mathchardef\Sigma="0186
\mathchardef\Upsilon="0187
\mathchardef\Phi="0188
\mathchardef\Psi="0189
\mathchardef\Omega="018A
\mathchardef\alpha="010B
\mathchardef\beta="010C
\mathchardef\gamma="010D
\mathchardef\delta="010E
\mathchardef\epsilon="010F
\mathchardef\zeta="0110
\mathchardef\eta="0111
\mathchardef\theta="0112
\mathchardef\iota="0113
\mathchardef\kappa="0114
\mathchardef\lambda="0115
\mathchardef\mu="0116
\mathchardef\nu="0117
\mathchardef\xi="0118
\mathchardef\pi="0119
\mathchardef\rho="011A
\mathchardef\sigma="011B
\mathchardef\tau="011C
\mathchardef\upsilon="011D
\mathchardef\phi="011E
\mathchardef\chi="011F
\mathchardef\psi="0120
\mathchardef\omega="0121
\mathchardef\varepsilon="0122
\mathchardef\vartheta="0123
\mathchardef\varpi="0124
\mathchardef\varrho="0125
\mathchardef\varsigma="0126
\mathchardef\varphi="0127
 %
% slanted greek symbols : 
\mathchardef\slGamma="0100
\mathchardef\slDelta="0101
\mathchardef\slTheta="0102
\mathchardef\slLambda="0103
\mathchardef\slXi="0104
\mathchardef\slPi="0105
\mathchardef\slSigma="0106
\mathchardef\slUpsilon="0107
\mathchardef\slPhi="0108
\mathchardef\slPsi="0109
\mathchardef\slOmega="010A
\mathchardef\slalpha="010B
\mathchardef\slbeta="010C
\mathchardef\slgamma="010D
\mathchardef\sldelta="010E
\mathchardef\slepsilon="010F
\mathchardef\slzeta="0110
\mathchardef\sleta="0111
\mathchardef\sltheta="0112
\mathchardef\sliota="0113
\mathchardef\slkappa="0114
\mathchardef\sllambda="0115
\mathchardef\slmu="0116
\mathchardef\slnu="0117
\mathchardef\slxi="0118
\mathchardef\slpi="0119
\mathchardef\slrho="011A
\mathchardef\slsigma="011B
\mathchardef\sltau="011C
\mathchardef\slupsilon="011D
\mathchardef\slphi="011E
\mathchardef\slchi="011F
\mathchardef\slpsi="0120
\mathchardef\slomega="0121
\mathchardef\slvarepsilon="0122
\mathchardef\slvartheta="0123
\mathchardef\slvarpi="0124
\mathchardef\slvarrho="0125
\mathchardef\slvarsigma="0126
\mathchardef\slvarphi="0127
 %
% upright (roman) greek symbols : 
\mathchardef\rmGamma="0180
\mathchardef\rmDelta="0181
\mathchardef\rmTheta="0182
\mathchardef\rmLambda="0183
\mathchardef\rmXi="0184
\mathchardef\rmPi="0185
\mathchardef\rmSigma="0186
\mathchardef\rmUpsilon="0187
\mathchardef\rmPhi="0188
\mathchardef\rmPsi="0189
\mathchardef\rmOmega="018A
\mathchardef\rmalpha="018B
\mathchardef\rmbeta="018C
\mathchardef\rmgamma="018D
\mathchardef\rmdelta="018E
\mathchardef\rmepsilon="018F
\mathchardef\rmzeta="0190
\mathchardef\rmeta="0191
\mathchardef\rmtheta="0192
\mathchardef\rmiota="0193
\mathchardef\rmkappa="0194
\mathchardef\rmlambda="0195
\mathchardef\rmmu="0196
\mathchardef\rmnu="0197
\mathchardef\rmxi="0198
\mathchardef\rmpi="0199
\mathchardef\rmrho="019A
\mathchardef\rmsigma="019B
\mathchardef\rmtau="019C
\mathchardef\rmupsilon="019D
\mathchardef\rmphi="019E
\mathchardef\rmchi="019F
\mathchardef\rmpsi="0120
\mathchardef\rmomega="01A1
\mathchardef\rmvarepsilon="01A2
\mathchardef\rmvartheta="01A3
\mathchardef\rmvarpi="01A4
\mathchardef\rmvarrho="01A5
\mathchardef\rmvarsigma="01A6
\mathchardef\rmvarphi="01A7
 %
 %
% bold greek symbols : 
\mathchardef\bfGamma="01A8
\mathchardef\bfDelta="01A9
\mathchardef\bfTheta="01AA
\mathchardef\bfLambda="01AB
\mathchardef\bfXi="01AC
\mathchardef\bfPi="01AD
\mathchardef\bfSigma="01AE
\mathchardef\bfUpsilon="01AF
\mathchardef\bfPhi="01B0
\mathchardef\bfPsi="01B1
\mathchardef\bfOmega="01B2
\mathchardef\bfalpha="01B3
\mathchardef\bfbeta="01B4
\mathchardef\bfgamma="01B5
\mathchardef\bfdelta="01B6
\mathchardef\bfepsilon="01B7
\mathchardef\bfzeta="01B8
\mathchardef\bfeta="01B9
\mathchardef\bftheta="01BA
\mathchardef\bfiota="01BB
\mathchardef\bfkappa="01BC
\mathchardef\bflambda="01BD
\mathchardef\bfmu="01BE
\mathchardef\bfnu="01BF
\mathchardef\bfxi="01C0
\mathchardef\bfpi="01C1
\mathchardef\bfrho="01C2
\mathchardef\bfsigma="01C3
\mathchardef\bftau="01C4
\mathchardef\bfupsilon="01C5
\mathchardef\bfphi="01C6
\mathchardef\bfchi="01C7
\mathchardef\bfpsi="01C8
\mathchardef\bfomega="01C9
\mathchardef\bfvarepsilon="01CA
\mathchardef\bfvartheta="01CB
\mathchardef\bfvarpi="01CC
\mathchardef\bfvarrho="01CD
\mathchardef\bfvarsigma="01CE
\mathchardef\bfvarphi="01CF
 %
 %
% bold slanted greek symbols :
\mathchardef\bfslGamma="01D0
\mathchardef\bfslDelta="01D1
\mathchardef\bfslTheta="01D2
\mathchardef\bfslLambda="01D3
\mathchardef\bfslXi="01D4
\mathchardef\bfslPi="01D5
\mathchardef\bfslSigma="01D6
\mathchardef\bfslUpsilon="01D7
\mathchardef\bfslPhi="01D8
\mathchardef\bfslPsi="01D9
\mathchardef\bfslOmega="01DA
\mathchardef\bfslalpha="01DB
\mathchardef\bfslbeta="01DC
\mathchardef\bfslgamma="01DD
\mathchardef\bfsldelta="01DE
\mathchardef\bfslepsilon="01DF
\mathchardef\bfslzeta="01E0
\mathchardef\bfsleta="01E1
\mathchardef\bfsltheta="01E2
\mathchardef\bfsliota="01E3
\mathchardef\bfslkappa="01E4
\mathchardef\bfsllambda="01E5
\mathchardef\bfslmu="01E6
\mathchardef\bfslnu="01E7
\mathchardef\bfslxi="01E8
\mathchardef\bfslpi="01E9
\mathchardef\bfslrho="01EA
\mathchardef\bfslsigma="01EB
\mathchardef\bfsltau="01EC
\mathchardef\bfslupsilon="01ED
\mathchardef\bfslphi="01EE
\mathchardef\bfslchi="01EF
\mathchardef\bfslpsi="01F0
\mathchardef\bfslomega="01F1
\mathchardef\bfslvarepsilon="01F2
\mathchardef\bfslvartheta="01F3
\mathchardef\bfslvarpi="01F4
\mathchardef\bfslvarrho="01F5
\mathchardef\bfslvarsigma="01F6
\mathchardef\bfslvarphi="01F7
 %
\def\c@{\@c@}
\fi


\gdef\accenthyphcodes{}

\endinput
